Guest Shakra Posted June 22, 2004 Ok, i have a problem. I made a gui, theres 3 buttons on it. Start, Pause, Restart. The start button, when pressed, will maximize a already existant windows and click enter until pause is pressed. My problem is even when i press Pause, it continue to click on enter. Heres the code of my gui, i hope someone can help me expandcollapse popup$timer = 0; Opt("GUICoordMode", 1) Opt("GUINotifyMode", 1) GuiCreate("LoL", 115,206,(@DesktopHeight-115)/2, (@DesktopHeight-206)/2 , 0x04CF0000) $start = GUISetControl("button", "Start", 30, 40, 60, 20) $pause = GUISetControl("button", "Pause", 30, 80, 60, 20) $restart = GUISetControl("button", "Restart", 30, 120, 60, 20) $made = GUISetControl("pic", "made.gif", 20, 10, 80, 20) $more = GUISetControl("pic", "more.gif", 10, 160, 100, 20) GuiShow() While 1 sleep(100) $msg = GuiMsg(0) Select Case $msg = -3 Exit Case $msg = 5 ;;; Case $msg = $start WinActivate("Lords of Lords Default - Netscape","") $timer = 1; Do Send("{ENTER down}") Until $timer = 0; Case $msg = $pause $timer = 0; Do Sleep(100) Until $timer = 1; Case $msg = $restart WinActivate("Lords of Lords Default - Netscape","") $timer = 1; Do Send("{ENTER down}") Until $timer = 0; Case $msg = $made ;;; Case $msg = $more ;;; EndSelect WEnd Exit Share this post Link to post Share on other sites
Jos 2,177 Posted June 22, 2004 Have a look at this code and see if that helps: $TIMER = 0; Opt ("GUICoordMode", 1) Opt ("GUINotifyMode", 1) GUICreate("LoL", 115, 206, (@DesktopHeight - 115) / 2, (@DesktopHeight - 206) / 2, 0x04CF0000) $START = GUISetControl("button", "Start", 30, 40, 60, 20) $PAUSE = GUISetControl("button", "Pause", 30, 80, 60, 20) $RESTART = GUISetControl("button", "Restart", 30, 120, 60, 20) GUIShow() While 1 Sleep(100) $MSG = GUIMsg(0) Select Case $MSG = -3 Exit Case $MSG = $START $TIMER = 1; msgbox(0,'Enter' ,'Enter',1) Case $MSG = $PAUSE $TIMER = 0; msgbox(0,' Pause' ,'Pause',1) Case $MSG = $RESTART msgbox(0,' Restart' ,'Restart',1) Case $TIMER = 0 msgbox(0,' Timer=0' ,' Timer=0',1) Case $TIMER = 1 msgbox(0,' Timer=1' ,' Timer=1',1) EndSelect Wend Exit SciTE4AutoIt3 Full installer Download page - Beta files Read before posting How to post scriptsource Forum etiquette Forum Rules Live for the present, Dream of the future, Learn from the past. Share this post Link to post Share on other sites
Guest Shakra Posted June 22, 2004 Thanks, it works Now i will modifie it so it can log in from the beginning. Thanks alot Share this post Link to post Share on other sites