Misha Posted May 8, 2006 Posted May 8, 2006 HI I have a problem with my code it doesnt work at the buttons it should take them and send but doesnt work :\ look at $attackbutton it always does the same attackbutton function expandcollapse popup#NoTrayIcon if FileExists (@ScriptDir & "config.ini\") Then Dim $SkillButton = IniRead( @ScriptDir & "config.ini\" , "BuffCheckers" , "HealButton" , 1) Dim $SkillButton = IniRead( @ScriptDir & "config.ini\" , "BuffCheckers" , "SkillButton" , 5) Dim $SkillButton = IniRead( @ScriptDir & "config.ini\" , "BuffCheckers" , "DefenseButton" , 2) Dim $SkillButton = IniRead( @ScriptDir & "config.ini\" , "BuffCheckers" , "AttackButton" , 3) Else Dim $SkillButton = 5 , $HealButton = 1 , $DefenseButton = 2 , $AttackButton = 3 EndIf HotKeySet ("+{F5}", "AE_Pattern" ) HotKeySet ("+{F6}", "AE_Pattern_Plus") HotKeySet ("+{F9}", "Left_Click" ) HotkeySet ("+{F10}", "Stop" ) HotKeySet ("+{F11}", "Right_Click" ); + = Shift Key Opt ("WinTitleMatchMode", 3 ) Opt ("MouseClickDownDelay", 55) Opt ("MouseClickDelay", 1 ) Opt ("SendKeyDownDelay", 10 ) Opt ("SendKeyDelay", 1 ) Opt ("CaretCoordMode", 2 ) Dim $Skill_Delay, $Buff_Delay1, $Key_Delay = 1, $HC = 0 , $AC = 0 , $DC = 0 ,$APRC,$APLC,$APBC,$APHC,$Msg GuiCreate( "Hybrid Bot V1.3", 400, 300,50,50) GUISetFont(8,100,1,"") $FileMenu=GuiCtrlCreateMenu( "File") $Save=GuiCtrlCreateMenuItem( "Save",$FileMenu) $defualt=GuiCtrlCreateMenuItem( "Default",$FileMenu) $AboutMenu=GUICtrlCreateMenu( "Other") $About=GUICtrlCreateMenuitem("About",$AboutMenu) GuiCtrlCreateGroup( "Options of Buff" , 10 , 10, 150,110) $HealCheck=GuiCtrlCreateCheckBox( "Heal" , 20 , 30, 100,20) $DefenseCheck=GuiCtrlCreateCheckBox( "Defense" , 20 , 50,100,20) $AttackCheck=GUICtrlCreateCheckbox( "Attack" , 20 , 70,100,20) GUISetFont(9 ,400,4,"Maryiad Web Pro Bold") GUICtrlCreateLabel( "Enjoy!",20,90,100,20) GUISetFont(8,100,1,"") GuiCtrlCreateGroup( "Options of Keys" , 10 ,120 , 150 , 145) $SkillInput = GUICtrlCreateInput ("5",20, 140, 50,20) $SkillUpdown = GUICtrlCreateUpdown($SkillInput) GuiCtrlCreateLabel( "Attack Skill",75,143,60,20) GuiCtrlSetLimit( $SkillUpdown, 9,1) $HealInput = GuiCtrlCreateInput ("1",20,165,50,20) $HealUpdown = GUICtrlCreateUpdown($HealInput) GUICtrlCreateLabel( "Heal Buff" , 75,168,60,20) GuiCtrlSetLimit( $HealUpdown, 9 ,1) $DefenseInput = GuiCtrlcreateInput( "2",20 ,193,50,20) $DefenseUpdown = GUICtrlCreateUpdown($DefenseInput) GuiCtrlCreateLabel( "Def Buff", 75 , 198 ,60 ,20) GuiCtrlSetLimit ( $DefenseUpdown, 9,1) $AttackInput = GuiCtrlCreateInput("3",20,223,50,20) $AttackUpdown = GUICtrlCreateUpdown($AttackInput) GUICtrlCreateLabel( "Attack Buff" , 75 ,228 ,60 ,20) GuiCtrlSetLimit($AttackUpdown, 9 ,1 ) GuiCtrlCreateGroup( "AutoPickers" , 170, 10, 150,110) $APB=GuiCtrlCreateCheckBox( "While AE",180,30,100,20) $APH=GUICtrlCreateCheckbox( "While Hybrid",180,50,100,20) $APL=GUICtrlCreateCheckbox( "While LeftClick",180,70,100,20) $APR=GUICtrlCreateCheckbox( "While RightClick",180,90,100,20) GuiCtrlCreateGroup( "Instructions",170,120,200,145) GUICtrlCreateLabel( "Welcome to the Hybrid bot V1.3" & @CRLF & "To use it press Shift + Button" & @Crlf & "Here is the list of buttons" & @CRLF & "Shift+F5 - AE Bot" & @CRLF & "Shift+F6 - Hybrid Bot" & @CRLF & "Shift+F9 - LeftClicker" & @CRLF & "Shift+F10 - Stoping all Functions" & @CRLF & "Shift+F11 - RightClicker" & @CRLF & "Enjoy. Made By zzxxzzxx and Misha", 180,140,170,120) GUISetState () Func Left_Click (); Continuously Pressing Left Click. While 1 $TimerDif = TimerDiff() If WinActive("MU") Then MouseClick ("Left") if $APLC = 1 Then Send (" ", 1) Endif MouseUp ("Right") Else MouseClick ("Left") if $APLC = 1 Then Send (" ", 1) EndIf MouseUp ("Right") EndIf WEnd EndFunc Func Right_Click (); Continuously Pressing Right Click. While 1 If WinActive("MU") Then MouseClick ("Right") if $APRC = 1 Then Send (" ", 1) EndIf MouseUp ("Right") Else MouseClick ("Right") if $APRC =1 Then Send (" ", 1) EndIf Sleep(25) MouseUp ("Right") EndIf WEnd EndFunc Func AE_Pattern (); Skills In Fixed Pattern (L, R, LUU, RUU, LD, RD, LU, RU, U, D). Dim $x[11] = ['', 315, 495, 320, 480, 355, 440, 315, 495, 405, 405] Dim $y[11] = ['', 290, 290, 180, 180, 320, 310, 245, 245, 150, 320] While 1 If WinActive("MU") Then For $p = 1 To 10 $Skill_Delay = 25 if $APBC = 1 Then Send ("{"&$SkillButton&"} ") Else Send($SkillButton) EndIf Sleep ($Key_Delay) MouseClick ("Right", $x[$p] ,$y[$p] , 1) Skill_Delay () Next EndIf WEnd EndFunc Func AE_Pattern_Plus (); Buff & Skills In Fixed Pattern (L, R, LUU, RUU, LD, RD, LU, RU, U, D). Local $x[11] = ['', 335, 440, 355, 445, 390, 420, 390, 420, 405, 405] Local $y[11] = ['', 290, 290, 245, 245, 300, 300, 280, 280, 270, 300] $Buff_Delay = 15; Change Here For Buff Delay. While 1 If WinActive("MU") Then $Buff_Delay1 = $Buff_Delay if $DC = 1 Then Send ("{"&$DefenseButton&"} ") EndIf if $AC = 1 Then Send ("{"&$AttackButton&"} ") EndIf MouseClick ("Right", 410, 285, 1); Clicks On Self. MouseUp ("Right") Buff_Delay () For $p = 1 To 10 $Skill_Delay = 36; Change Here For Skill Delay. Send ("{"&$SkillButton&"} "); Skill number. Sleep ($Key_Delay) MouseClick ("Right", $x[$p] ,$y[$p] , 1) Skill_Delay () Next $Buff_Delay1 = $Buff_Delay if $HC = 1 Then Send ("{"&$HealButton&"} "); Heal MouseClick ("Right", 410, 285, 1) MouseUp ("Right") EndIf Buff_Delay () EndIf WEnd EndFunc Func Stop (); Stops The Program. While 1 Select Case $Msg = $Gui_event_close Exit Case $Msg = $defualt Dim $SkillButton = 5 , $HealButton = 1 , $DefenseButton = 2 , $AttackButton = 1 Case $msg = $About MsgBox(0 ,"About", "This bot was created by zzxxzzx and Misha" & @CRLF & "If you have any problems go on irc://irc.rizon.net and join #mpc_mu") Case $Msg = $Save if FileExists(@ScriptDir & "config.ini\") Then IniWrite( @ScriptDir & "config.ini\","BuffCheckers","HealButton",$HealButton) IniWrite( @ScriptDir & "config.ini\","BuffCheckers","DefButton",$DefenseButton) IniWrite( @ScriptDir & "config.ini\","BuffCheckers","AttackButton",$AttackButton) IniWrite( @ScriptDir & "config.ini\","BuffCheckers","SkillButton",$SkillButton) Else _FileCreate( @ScriptDir & "config.ini\") EndIf Case $Msg == $HealCheck If GuiCtrlRead($HealCheck) == $GUI_CHECKED Then $HC = 1 Else $HC = 0 EndIf If GUICtrlRead($DefenseCheck) == $GUI_CHECKED Then $DC = 1 Else $DC = 0 EndIf If GuiCtrlRead($AttackCheck) == $GUI_CHECKED Then $AC = 1 Else $AC = 0 EndIf Case $Msg == $SkillUpdown $SkillButton = GuiCtrlRead($SkillInput) Case $Msg = $HealUpdown $HealButton = GuiCtrlRead($HealInput) Case $Msg == $DefenseUpdown $DefenseButton = GuiCtrlRead($DefenseInput) Case $Msg = $AttackUpdown $AttackButton = GuiCtrlRead($AttackInput) Case $Msg == $APB if GuiCtrlRead($APB) == $GUI_CHECKED Then $APBC = 1 Else $APBC = 0 EndIf Case $Msg == $APH if GUICtrlRead($APH) == $GUI_CHECKED Then $APHC = 1 Else $APHC = 0 EndIf Case $Msg == $APL If GUICtrlRead($APL) == $GUI_CHECKED Then $APLC = 1 Else $APLC = 0 EndIf Case $Msg == $APR if GuiCtrlRead($APR) == $GUI_CHECKED Then $APRC = 1 Else $APRC = 0 EndIf EndSelect Sleep (1) WEnd EndFunc Func Skill_Delay (); Delay Interval In Between Skills. While $Skill_Delay > 0 MouseClick ("Right") Send (" ", 1) $Skill_Delay = $Skill_Delay - 1 WEnd EndFunc Func Buff_Delay (); Delay Interval In Between Buffs. While $Buff_Delay1 > 0 Send (" ", 1) $Buff_Delay1 = $Buff_Delay1 - 1 WEnd EndFunc While 1 ; Continuous Loop Of Program. $Msg = GUIGetMsg() Select Case $msg = $Gui_event_close Exit Case $Msg = $defualt Dim $SkillButton = 5 , $HealButton = 1 , $DefenseButton = 2 , $AttackButton = 1 Case $msg = $About MsgBox(0 ,"About", "This bot was created by zzxxzzx and Misha" & @CRLF & "If you have any problems go on irc://irc.rizon.net and join #mpc_mu") Case $Msg = $Save if FileExists(@ScriptDir & "config.ini\") Then IniWrite( @ScriptDir & "config.ini\","BuffCheckers","HealButton",$HealButton) IniWrite( @ScriptDir & "config.ini\","BuffCheckers","DefButton",$DefenseButton) IniWrite( @ScriptDir & "config.ini\","BuffCheckers","AttackButton",$AttackButton) IniWrite( @ScriptDir & "config.ini\","BuffCheckers","SkillButton",$SkillButton) Else _FileCreate( @ScriptDir & "config.ini\") EndIf Case $Msg == $HealCheck If GuiCtrlRead($HealCheck) == $GUI_CHECKED Then $HC = 1 Else $HC = 0 EndIf If GUICtrlRead($DefenseCheck) == $GUI_CHECKED Then $DC = 1 Else $DC = 0 EndIf If GuiCtrlRead($AttackCheck) == $GUI_CHECKED Then $AC = 1 Else $AC = 0 EndIf Case $Msg == $SkillUpdown $SkillButton = GuiCtrlRead($SkillInput) Case $Msg == $HealUpdown $HealButton = GuiCtrlRead($HealInput) Case $Msg == $DefenseUpdown $DefenseButton = GuiCtrlRead($DefenseInput) Case $Msg == $AttackUpdown $AttackButton = GuiCtrlRead($AttackInput) Case $Msg == $APB if GuiCtrlRead($APB) == $GUI_CHECKED Then $APBC = 1 Else $APBC = 0 EndIf Case $Msg == $APH if GUICtrlRead($APH) == $GUI_CHECKED Then $APHC = 1 Else $APHC = 0 EndIf Case $Msg == $APL If GUICtrlRead($APL) == $GUI_CHECKED Then $APLC = 1 Else $APLC = 0 EndIf Case $Msg == $APR if GuiCtrlRead($APR) == $GUI_CHECKED Then $APRC = 1 Else $APRC = 0 EndIf EndSelect Sleep (1) WEnd
GaryFrost Posted May 8, 2006 Posted May 8, 2006 I made some changes just to get it to run, these may be part of the problem, put comments to the right of each change expandcollapse popup#NoTrayIcon #include <GuiConstants.au3>;<<<<<< was missing #include <File.au3> ;<<<<<< was missing If FileExists(@ScriptDir & "config.ini\") Then Dim $SkillButton = IniRead(@ScriptDir & "config.ini\", "BuffCheckers", "HealButton", 1) Dim $SkillButton = IniRead(@ScriptDir & "config.ini\", "BuffCheckers", "SkillButton", 5) Dim $SkillButton = IniRead(@ScriptDir & "config.ini\", "BuffCheckers", "DefenseButton", 2) Dim $SkillButton = IniRead(@ScriptDir & "config.ini\", "BuffCheckers", "AttackButton", 3) Else Dim $SkillButton = 5, $HealButton = 1, $DefenseButton = 2, $AttackButton = 3 EndIf HotKeySet("+{F5}", "AE_Pattern") HotKeySet("+{F6}", "AE_Pattern_Plus") HotKeySet("+{F9}", "Left_Click") HotKeySet("+{F10}", "Stop") HotKeySet("+{F11}", "Right_Click"); + = Shift Key Opt("WinTitleMatchMode", 3) Opt("MouseClickDownDelay", 55) Opt("MouseClickDelay", 1) Opt("SendKeyDownDelay", 10) Opt("SendKeyDelay", 1) Opt("CaretCoordMode", 2) Dim $Skill_Delay, $Buff_Delay1, $Key_Delay = 1, $HC = 0, $AC = 0, $DC = 0, $APRC, $APLC, $APBC, $APHC, $Msg GUICreate( "Hybrid Bot V1.3", 400, 300, 50, 50) GUISetFont(8, 100, 1, "") $FileMenu = GUICtrlCreateMenu( "File") $Save = GUICtrlCreateMenuitem( "Save", $FileMenu) $defualt = GUICtrlCreateMenuitem( "Default", $FileMenu) $AboutMenu = GUICtrlCreateMenu( "Other") $About = GUICtrlCreateMenuitem("About", $AboutMenu) GUICtrlCreateGroup( "Options of Buff", 10, 10, 150, 110) $HealCheck = GUICtrlCreateCheckbox( "Heal", 20, 30, 100, 20) $DefenseCheck = GUICtrlCreateCheckbox( "Defense", 20, 50, 100, 20) $AttackCheck = GUICtrlCreateCheckbox( "Attack", 20, 70, 100, 20) GUISetFont(9, 400, 4, "Maryiad Web Pro Bold") GUICtrlCreateLabel( "Enjoy!", 20, 90, 100, 20) GUISetFont(8, 100, 1, "") GUICtrlCreateGroup( "Options of Keys", 10, 120, 150, 145) $SkillInput = GUICtrlCreateInput("5", 20, 140, 50, 20) $SkillUpdown = GUICtrlCreateUpdown($SkillInput) GUICtrlCreateLabel( "Attack Skill", 75, 143, 60, 20) GUICtrlSetLimit($SkillUpdown, 9, 1) $HealInput = GUICtrlCreateInput("1", 20, 165, 50, 20) $HealUpdown = GUICtrlCreateUpdown($HealInput) GUICtrlCreateLabel( "Heal Buff", 75, 168, 60, 20) GUICtrlSetLimit($HealUpdown, 9, 1) $DefenseInput = GUICtrlCreateInput( "2", 20, 193, 50, 20) $DefenseUpdown = GUICtrlCreateUpdown($DefenseInput) GUICtrlCreateLabel( "Def Buff", 75, 198, 60, 20) GUICtrlSetLimit($DefenseUpdown, 9, 1) $AttackInput = GUICtrlCreateInput("3", 20, 223, 50, 20) $AttackUpdown = GUICtrlCreateUpdown($AttackInput) GUICtrlCreateLabel( "Attack Buff", 75, 228, 60, 20) GUICtrlSetLimit($AttackUpdown, 9, 1) GUICtrlCreateGroup( "AutoPickers", 170, 10, 150, 110) $APB = GUICtrlCreateCheckbox( "While AE", 180, 30, 100, 20) $APH = GUICtrlCreateCheckbox( "While Hybrid", 180, 50, 100, 20) $APL = GUICtrlCreateCheckbox( "While LeftClick", 180, 70, 100, 20) $APR = GUICtrlCreateCheckbox( "While RightClick", 180, 90, 100, 20) GUICtrlCreateGroup( "Instructions", 170, 120, 200, 145) GUICtrlCreateLabel( "Welcome to the Hybrid bot V1.3" & @CRLF & "To use it press Shift + Button" & @CRLF & "Here is the list of buttons" & @CRLF & "Shift+F5 - AE Bot" & @CRLF & "Shift+F6 - Hybrid Bot" & @CRLF & "Shift+F9 - LeftClicker" & @CRLF & "Shift+F10 - Stoping all Functions" & @CRLF & "Shift+F11 - RightClicker" & @CRLF & "Enjoy. Made By zzxxzzxx and Misha", 180, 140, 170, 120) GUISetState() Func Left_Click(); Continuously Pressing Left Click. While 1 ;~ $TimerDif = TimerDiff();<<<<< this is not correct If WinActive("MU") Then MouseClick("Left") If $APLC = 1 Then Send(" ", 1) EndIf MouseUp("Right") Else MouseClick("Left") If $APLC = 1 Then Send(" ", 1) EndIf MouseUp("Right") EndIf WEnd EndFunc ;==>Left_Click Func Right_Click(); Continuously Pressing Right Click. While 1 If WinActive("MU") Then MouseClick("Right") If $APRC = 1 Then Send(" ", 1) EndIf MouseUp("Right") Else MouseClick("Right") If $APRC = 1 Then Send(" ", 1) EndIf Sleep(25) MouseUp("Right") EndIf WEnd EndFunc ;==>Right_Click Func AE_Pattern(); Skills In Fixed Pattern (L, R, LUU, RUU, LD, RD, LU, RU, U, D). Dim $x[11] = ['', 315, 495, 320, 480, 355, 440, 315, 495, 405, 405] Dim $y[11] = ['', 290, 290, 180, 180, 320, 310, 245, 245, 150, 320] While 1 If WinActive("MU") Then For $p = 1 To 10 $Skill_Delay = 25 If $APBC = 1 Then Send("{" & $SkillButton & "} ") Else Send($SkillButton) EndIf Sleep($Key_Delay) MouseClick("Right", $x[$p], $y[$p], 1) Skill_Delay() Next EndIf WEnd EndFunc ;==>AE_Pattern Func AE_Pattern_Plus(); Buff & Skills In Fixed Pattern (L, R, LUU, RUU, LD, RD, LU, RU, U, D). Local $x[11] = ['', 335, 440, 355, 445, 390, 420, 390, 420, 405, 405] Local $y[11] = ['', 290, 290, 245, 245, 300, 300, 280, 280, 270, 300] $Buff_Delay = 15; Change Here For Buff Delay. While 1 If WinActive("MU") Then $Buff_Delay1 = $Buff_Delay If $DC = 1 Then Send("{" & $DefenseButton & "} ") EndIf If $AC = 1 Then Send("{" & $AttackButton & "} ") EndIf MouseClick("Right", 410, 285, 1); Clicks On Self. MouseUp("Right") Buff_Delay() For $p = 1 To 10 $Skill_Delay = 36; Change Here For Skill Delay. Send("{" & $SkillButton & "} "); Skill number. Sleep($Key_Delay) MouseClick("Right", $x[$p], $y[$p], 1) Skill_Delay() Next $Buff_Delay1 = $Buff_Delay If $HC = 1 Then Send("{" & $HealButton & "} "); Heal MouseClick("Right", 410, 285, 1) MouseUp("Right") EndIf Buff_Delay() EndIf WEnd EndFunc ;==>AE_Pattern_Plus Func Stop(); Stops The Program. While 1 $Msg = GUIGetMsg();<<<<< this was missing from the loop Select Case $Msg = $Gui_event_close Exit Case $Msg = $defualt Dim $SkillButton = 5, $HealButton = 1, $DefenseButton = 2, $AttackButton = 1 Case $Msg = $About MsgBox(0, "About", "This bot was created by zzxxzzx and Misha" & @CRLF & "If you have any problems go on irc://irc.rizon.net and join #mpc_mu") Case $Msg = $Save If FileExists(@ScriptDir & "config.ini\") Then IniWrite(@ScriptDir & "config.ini\", "BuffCheckers", "HealButton", $HealButton) IniWrite(@ScriptDir & "config.ini\", "BuffCheckers", "DefButton", $DefenseButton) IniWrite(@ScriptDir & "config.ini\", "BuffCheckers", "AttackButton", $AttackButton) IniWrite(@ScriptDir & "config.ini\", "BuffCheckers", "SkillButton", $SkillButton) Else _FileCreate(@ScriptDir & "config.ini\") EndIf Case $Msg == $HealCheck If GUICtrlRead($HealCheck) == $GUI_CHECKED Then $HC = 1 Else $HC = 0 EndIf If GUICtrlRead($DefenseCheck) == $GUI_CHECKED Then $DC = 1 Else $DC = 0 EndIf If GUICtrlRead($AttackCheck) == $GUI_CHECKED Then $AC = 1 Else $AC = 0 EndIf Case $Msg == $SkillUpdown $SkillButton = GUICtrlRead($SkillInput) Case $Msg = $HealUpdown $HealButton = GUICtrlRead($HealInput) Case $Msg == $DefenseUpdown $DefenseButton = GUICtrlRead($DefenseInput) Case $Msg = $AttackUpdown $AttackButton = GUICtrlRead($AttackInput) Case $Msg == $APB If GUICtrlRead($APB) == $GUI_CHECKED Then $APBC = 1 Else $APBC = 0 EndIf Case $Msg == $APH If GUICtrlRead($APH) == $GUI_CHECKED Then $APHC = 1 Else $APHC = 0 EndIf Case $Msg == $APL If GUICtrlRead($APL) == $GUI_CHECKED Then $APLC = 1 Else $APLC = 0 EndIf Case $Msg == $APR If GUICtrlRead($APR) == $GUI_CHECKED Then $APRC = 1 Else $APRC = 0 EndIf EndSelect Sleep(1) WEnd EndFunc ;==>Stop Func Skill_Delay(); Delay Interval In Between Skills. While $Skill_Delay > 0 MouseClick("Right") Send(" ", 1) $Skill_Delay = $Skill_Delay - 1 WEnd EndFunc ;==>Skill_Delay Func Buff_Delay(); Delay Interval In Between Buffs. While $Buff_Delay1 > 0 Send(" ", 1) $Buff_Delay1 = $Buff_Delay1 - 1 WEnd EndFunc ;==>Buff_Delay While 1 ; Continuous Loop Of Program. $Msg = GUIGetMsg() Select Case $Msg = $Gui_event_close Exit Case $Msg = $defualt Dim $SkillButton = 5, $HealButton = 1, $DefenseButton = 2, $AttackButton = 1 Case $Msg = $About MsgBox(0, "About", "This bot was created by zzxxzzx and Misha" & @CRLF & "If you have any problems go on irc://irc.rizon.net and join #mpc_mu") Case $Msg = $Save If FileExists(@ScriptDir & "config.ini\") Then IniWrite(@ScriptDir & "config.ini\", "BuffCheckers", "HealButton", $HealButton) IniWrite(@ScriptDir & "config.ini\", "BuffCheckers", "DefButton", $DefenseButton) IniWrite(@ScriptDir & "config.ini\", "BuffCheckers", "AttackButton", $AttackButton) IniWrite(@ScriptDir & "config.ini\", "BuffCheckers", "SkillButton", $SkillButton) Else _FileCreate(@ScriptDir & "config.ini\") EndIf Case $Msg == $HealCheck If GUICtrlRead($HealCheck) == $GUI_CHECKED Then $HC = 1 Else $HC = 0 EndIf If GUICtrlRead($DefenseCheck) == $GUI_CHECKED Then $DC = 1 Else $DC = 0 EndIf If GUICtrlRead($AttackCheck) == $GUI_CHECKED Then $AC = 1 Else $AC = 0 EndIf Case $Msg == $SkillUpdown $SkillButton = GUICtrlRead($SkillInput) Case $Msg == $HealUpdown $HealButton = GUICtrlRead($HealInput) Case $Msg == $DefenseUpdown $DefenseButton = GUICtrlRead($DefenseInput) Case $Msg == $AttackUpdown $AttackButton = GUICtrlRead($AttackInput) Case $Msg == $APB If GUICtrlRead($APB) == $GUI_CHECKED Then $APBC = 1 Else $APBC = 0 EndIf Case $Msg == $APH If GUICtrlRead($APH) == $GUI_CHECKED Then $APHC = 1 Else $APHC = 0 EndIf Case $Msg == $APL If GUICtrlRead($APL) == $GUI_CHECKED Then $APLC = 1 Else $APLC = 0 EndIf Case $Msg == $APR If GUICtrlRead($APR) == $GUI_CHECKED Then $APRC = 1 Else $APRC = 0 EndIf EndSelect Sleep(1) WEnd SciTE for AutoItDirections for Submitting Standard UDFs Don't argue with an idiot; people watching may not be able to tell the difference.
Misha Posted May 8, 2006 Author Posted May 8, 2006 the timer differ is like I made the program run only 30 min then edited back forgot to delete that part
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now