skitt

ahhh. i didnt really need the tooltip so i was totally disregarding it the whole time, leading me to believe having the if then statements before the case was proper. thanks again

ahh, thats makes total sense. thanks for the quick reply. when tested, though, the checkbox thing is still whacky. it gives be a larger number when the checkboxes are unchecked then when they aren't!

it has to do with calculating the total Attack you get when adding up the attack on your weapon, some other attack modifiers, buffs, ect. if you must know, its a game called aion. It has absolutely nothing to do with a bot. I do not condone cheating in any games. Please don't jump to conclusions just because it has to do with a game.

The checkboxes value seems to be random when i start the GUI. its like 12 and 13 or some random number under 20. what i want it to do is give me a 0 if off and a 1 if on. Also, after i press my calculate button, it will do the fuction, but if i change a variable, or even not change anything, and press calculate again, it goes to 0 and doesnt work, meaning everytime i wanna do a calculation, i need to restart the GUI. Thats pretty much what im having trouble with. If you see anything else that looks wrong, don't hesitate to tell meh! #include <ButtonConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> #Region ### START Koda GUI section ### Form= $Form1 = GUICreate("Form1", 400, 179, 197, 127) $Label1 = GUICtrlCreateLabel("Attack =", 296, 80, 44, 17) $Label2 = GUICtrlCreateLabel("Label2", 344, 80, 36, 17) GUICtrlSetBkColor(-1, 0xFFFF00) $Label3 = GUICtrlCreateLabel("Base Attack min - max", 16, 8, 109, 17) $min = GUICtrlCreateInput("", 16, 32, 41, 21) $Label4 = GUICtrlCreateLabel("-", 64, 32, 7, 17) $max = GUICtrlCreateInput("", 80, 32, 41, 21) $Label5 = GUICtrlCreateLabel("Added Attack", 8, 64, 69, 17) $add = GUICtrlCreateInput("", 24, 88, 33, 21) $Calculate = GUICtrlCreateButton("Calculate", 296, 32, 73, 25, $WS_GROUP) $devo = GUICtrlCreateCheckbox("devo", 144, 32, 17, 17) $best = GUICtrlCreateCheckbox("best", 144, 64, 17, 17) $bow = GUICtrlCreateCheckbox("bow", 144, 96, 17, 17) $speed = GUICtrlCreateCheckbox("speed", 144, 128, 17, 17) $Devotion = GUICtrlCreateLabel("Devotion", 168, 32, 47, 17) $control2 = GUICtrlCreateLabel("Bestial Fury", 168, 64, 58, 17) $control4 = GUICtrlCreateLabel("Speed of the Wind", 168, 128, 93, 17) $control3 = GUICtrlCreateLabel("Bow of Blessing", 168, 96, 79, 17) $Label6 = GUICtrlCreateLabel("Enchant", 16, 120, 44, 17) $Enchant = GUICtrlCreateInput("", 24, 144, 25, 21) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### $a = 0 $avg = 0 While 1 ToolTip($devo&" "&$best) $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $Calculate $min = GUICtrlRead($min) $max = GUICtrlRead($max) $add = GUICtrlRead($add) $devo = GUICtrlRead($devo) $Enchant = GUICtrlRead($Enchant) $best = GUICtrlRead($best) $bow = GUICtrlRead($bow) $speed = GUICtrlRead($speed) $avg = (($min+$max)/2)+($Enchant*4) $a = int($add+$avg+($avg*$devo*.4)+($avg*$best*.5)+($avg*$bow*.2)+($avg*$speed*.2)+($avg*.0785)) $Label2 = GUICtrlCreateLabel($a, 344, 80, 36, 17) EndSwitch WEnd

thanx to below, can be deleted.

bump for the sake of an easy problem.

both windows have the same everything. and i know how controlsend works, i just need it to work for a handle, not window title.

what im having trouble with though, is putting the handle in for controlsend(). what i have right now is this. (gives an error) Global $hwnd = "0x00000000001E0574" ControlSend($hwnd, "", "", "5")

I have two windows named the same thing. How can i seperate them apart persay, so i can send commands to only one of them. IE: controlsending stuff. i tried winsettitle but obviously that didnt work right since theres two windows of the same name. controlsend(......, "", "") both windows have the same everything. and i know how controlsend works, i just need it to work for a handle, not window title.

C:\Users\Blake\Desktop\Tutz\carpettest.au3 (112) : ==> Variable used without being declared.: If $checkboxer Then If ^ ERROR >Exit code: 1 Time: 44.707 yu. psst check my auto vent comment post also.

I believe it would of worked well if the Run cmd would work. but it still won't run l2net.exe . and yes that is the exact directory. and caps and all.

Update, It works perfectly, BUT!: It will not edit the Text ventrilo comment when the GUI window is active. If i use other windows, such as msn, Firefox, it will work properly. So to make it work, I give it the strings i want it to run through, then press start, and switch windows to something else. otherwise, if the GUI window is still the active window, the start button will start the script, but will not send any strings to the vent comment. It will only go to the edit vent comment window, then press enter to close it. (the GUI window stays active throughout the whole script) And If you are wondering, no the checkbox doesn't work. :/ #include <ButtonConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #Region ### START Koda GUI section ### Form= $Form1 = GUICreate("Form1", 625, 445, 192, 124) $iSpam1 = GUICtrlCreateInput("", 56, 32, 121, 21) $iSpam2 = GUICtrlCreateInput("", 56, 64, 121, 21) $iSpam3 = GUICtrlCreateInput("", 56, 96, 121, 21) $iSpam4 = GUICtrlCreateInput("", 56, 128, 121, 21) $iSpam5 = GUICtrlCreateInput("", 56, 160, 121, 21) $loop = GUICtrlCreateCheckbox("Check here to loop!", 256, 64, 121, 17) $Start = GUICtrlCreateButton("Start", 256, 128, 161, 33, $WS_GROUP) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### Global $Paused HotKeySet("{ESC}", "TogglePause") Func TogglePause() $Paused = NOT $Paused While $Paused ToolTip("Press ESC to keep spamming or ALT+ESC to stop the script.",0,0) HotKeySet("!{ESC}", "Exitt") sleep(100) WEnd ToolTip("") EndFunc Func Exitt() Exit EndFunc Func Spamz() ControlClick("Ventrilo", "Comment", 1060) sleep(500) ControlSend("Comment - Advanced ", "", "", $spam1 & "~~~~by skitt") sleep(500) ControlClick("Comment - Advanced", "OK", 1) sleep(4000) ControlClick("Ventrilo", "Comment", 1060) sleep(500) ControlSend("Comment - Advanced", "", "", $spam2 & "~~~~by skitt") sleep(500) ControlClick("Comment - Advanced", "Enter", 1) sleep(4000) ControlClick("Ventrilo", "Comment", 1060) sleep(500) ControlSend("Comment - Advanced", "", "", $spam3 & "~~~~by skitt") sleep(500) ControlClick("Comment - Advanced", "Enter", 1) sleep(4000) ControlClick("Ventrilo", "Comment", 1060) sleep(500) ControlSend("Comment - Advanced", "", "", $spam4 & "~~~~by skitt") sleep(500) ControlClick("Comment - Advanced", "Enter", 1) sleep(4000) ControlClick("Ventrilo", "Comment", 1060) sleep(500) ControlSend("Comment - Advanced", "", "", $spam5 & "~~~~by skitt") sleep(500) ControlClick("Comment - Advanced", "Enter", 1) sleep(4000) EndFunc While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $start $spam1 = GUICtrlRead($ispam1) $spam2 = GUICtrlRead($ispam2) $spam3 = GUICtrlRead($ispam3) $spam4 = GUICtrlRead($ispam4) $spam5 = GUICtrlRead($ispam5) Spamz() Case $start & $loop While 1 $spam1 = GUICtrlRead($ispam1) $spam2 = GUICtrlRead($ispam2) $spam3 = GUICtrlRead($ispam3) $spam4 = GUICtrlRead($ispam4) $spam5 = GUICtrlRead($ispam5) Spamz() WEnd EndSwitch WEnd

that presses the windows key, types that line, then presses enter, which opens the program. I did this because Run() wouldn't work :/ so that would be another problem. problems=login button not working, getting warnings about $handle's and shit.

Ok, so this is like, my 6th script maybe ever made. What its supposed to do. pop the a GUI when the usernames and passwords are all in, you press login, and it starts the script to log in on all the clients. the checkbox is supposed to arrange the windows on my desktop how i wanted them to. its to login into a game on 5 clients total. So, i have no doubt that alot of it is wrong. i finished it about 3 hours ago, and have just gotten error after error and working them out, then getting more. and so on and so forth. Its a bit messy. :/ Any help would be greatly appreciated. #include <ButtonConstants.au3> #include <ComboConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> #Region ### START Koda GUI section ### Form= $Form1 = GUICreate("Auto 5 acc login", 625, 445, 189, 124) $login = GUICtrlCreateButton("Login", 448, 88, 137, 33, $WS_GROUP) $Checkbox1 = GUICtrlCreateCheckbox("", 8, 16, 17, 17) $Label1 = GUICtrlCreateLabel("Organize windows", 32, 16, 90, 17) AutoItSetOption("WinTitleMatchMode", 4) $Char1 = GUICtrlCreateCombo("1st Char Selection", 224, 64, 145, 25) GUICtrlSetData(-1, "Char 1|Char 2|Char 3|Char 4|Char 5|Char 6|Char 7") $Char2 = GUICtrlCreateCombo("2nd Char Selection", 16, 247, 145, 25) GUICtrlSetData(-1, "Char 1|Char 2|Char 3|Char 4|Char 5|Char 6|Char 7") $Char3 = GUICtrlCreateCombo("3rd Char Selection", 16, 345, 145, 25) GUICtrlSetData(-1, "Char 1|Char 2|Char 3|Char 4|Char 5|Char 6|Char 7") $Char4 = GUICtrlCreateCombo("5th Char Selection", 282, 345, 145, 25) GUICtrlSetData(-1, "Char 1|Char 2|Char 3|Char 4|Char 5|Char 6|Char 7") $Char5 = GUICtrlCreateCombo("4th Char Selection", 282, 247, 145, 25) GUICtrlSetData(-1, "Char 1|Char 2|Char 3|Char 4|Char 5|Char 6|Char 7") $User1 = GUICtrlCreateInput("", 176, 104, 217, 21) $Pass1 = GUICtrlCreateInput("", 176, 136, 217, 21) $pass3 = GUICtrlCreateInput("", 16, 313, 217, 21) $user3 = GUICtrlCreateInput("", 16, 284, 217, 21) $pass5 = GUICtrlCreateInput("", 282, 313, 217, 21) $user5 = GUICtrlCreateInput("", 282, 284, 217, 21) $pass4 = GUICtrlCreateInput("", 282, 212, 217, 21) $user4 = GUICtrlCreateInput("", 281, 183, 217, 21) $pass2 = GUICtrlCreateInput("", 16, 212, 217, 21) $user2 = GUICtrlCreateInput("", 16, 183, 217, 21) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ## ;functions Func Login1() send("{LWIN}") sleep(200) send("C:\Users\Blake\Desktop\l2 stuff\L2 net\L2NET.exe") sleep(100) send("{enter}") WinWaitActive("L2.Net v370") global $handle = WinGetHandle("[ACTIVE]") controlclick($handle, "File", 330046) ControlClick($handle, "Login", "", "Left", 1, 128, 24) ControlClick($handle, "OOG", 199230) ControlClick($handle, "", 133674) ControlClick($handle, "", "", "left", 1, 413, 207) ControlClick($handle, "", 264710) Send($user1) ControlClick($handle, "", 133732) Send($pass1) ControlClick($handle, "", 199344) ControlClick($handle, "", 133786) ControlClick($handle, "", 133752) ControlClick($handle, "", 133704) ControlClick($handle, "", 133766) ControlClick($handle, "", 330046) ControlClick($handle, "","" , "left", 1, 155, 38) EndFunc Func Login2() send("{LWIN}") sleep(200) send("C:\Users\Blake\Desktop\l2 stuff\L2 net\L2NET.exe") sleep(100) send("{enter}") WinWaitActive("L2.Net v370") global $handle2 = WinGetHandle("[ACTIVE]") controlclick($handle2, "File", 330046) ControlClick($handle2, "Login", "", "Left", 1, 128, 24) ControlClick($handle2, "OOG", 199230) ControlClick($handle2, "", 133674) ControlClick($handle2, "", "", "left", 1, 413, 207) ControlClick($handle2, "", 264710) Send($user2) ControlClick($handle2, "", 133732) Send($pass2) ControlClick($handle2, "", 199344) ControlClick($handle2, "", 133786) ControlClick($handle2, "", 133752) ControlClick($handle2, "", 133704) ControlClick($handle2, "", 133766) ControlClick($handle2, "", 330046) ControlClick($handle2, "","" , "left", 1, 155, 38) EndFunc Func Login3() send("{LWIN}") sleep(200) send("C:\Users\Blake\Desktop\l2 stuff\L2 net\L2NET.exe") sleep(100) send("{enter}") WinWaitActive("L2.Net v370") global $handle3 = WinGetHandle("[ACTIVE]") controlclick($handle3, "File", 330046) ControlClick($handle3, "Login", "", "Left", 1, 128, 24) ControlClick($handle3, "OOG", 199230) ControlClick($handle3, "", 133674) ControlClick($handle3, "", "", "left", 1, 413, 207) ControlClick($handle3, "", 264710) Send($user3) ControlClick($handle3, "", 133732) Send($pass3) ControlClick($handle3, "", 199344) ControlClick($handle3, "", 133786) ControlClick($handle3, "", 133752) ControlClick($handle3, "", 133704) ControlClick($handle3, "", 133766) ControlClick($handle3, "", 330046) ControlClick($handle3, "","" , "left", 1, 155, 38) EndFunc Func Login4() send("{LWIN}") sleep(200) send("C:\Users\Blake\Desktop\l2 stuff\L2 net\L2NET.exe") sleep(100) send("{enter}") WinWaitActive("L2.Net v370") global $handle4 = WinGetHandle("[ACTIVE]") controlclick($handle4, "File", 330046) ControlClick($handle4, "Login", "", "Left", 1, 128, 24) ControlClick($handle4, "OOG", 199230) ControlClick($handle4, "", 133674) ControlClick($handle4, "", "", "left", 1, 413, 207) ControlClick($handle4, "", 264710) Send($user4) ControlClick($handle4, "", 133732) Send($pass4) ControlClick($handle4, "", 199344) ControlClick($handle4, "", 133786) ControlClick($handle4, "", 133752) ControlClick($handle4, "", 133704) ControlClick($handle4, "", 133766) ControlClick($handle4, "", 330046) ControlClick($handle4, "","" , "left", 1, 155, 38) EndFunc Func Login5() send("{LWIN}") sleep(200) send("C:\Users\Blake\Desktop\l2 stuff\L2 net\L2NET.exe") sleep(100) send("{enter}") WinWaitActive("L2.Net v370") global $handle5 = WinGetHandle("[ACTIVE]") controlclick($handle5, "File", 330046) ControlClick($handle5, "Login", "", "Left", 1, 128, 24) ControlClick($handle5, "OOG", 199230) ControlClick($handle5, "", 133674) ControlClick($handle5, "", "", "left", 1, 413, 207) ControlClick($handle5, "", 264710) Send($user5) ControlClick($handle5, "", 133732) Send($pass5) ControlClick($handle5, "", 199344) ControlClick($handle5, "", 133786) ControlClick($handle5, "", 133752) ControlClick($handle5, "", 133704) ControlClick($handle5, "", 133766) ControlClick($handle5, "", 330046) ControlClick($handle5, "","" , "left", 1, 155, 38) EndFunc Func Organize() If StringRegExp($user1, '[abcdefghijklmnopqrstuvwxyz]') = 1 Then winmove($handle, "", 197, 294) EndIf If StringRegExp($user2, '[abcdefghijklmnopqrstuvwxyz]') = 1 Then WinMove($handle2, "", 199, 26) EndIf If StringRegExp($user3, '[abcdefghijklmnopqrstuvwxyz]') = 1 Then WinMove($handle3, "", 127, 52) EndIf If StringRegExp($user4, '[abcdefghijklmnopqrstuvwxyz]') = 1 Then WinMove($handle4, "", 55, 77) EndIf If StringRegExp($user5, '[abcdefghijklmnopqrstuvwxyz]') = 1 Then WinMove($handle5, "", -14, 735) EndIf EndFunc func Login() If StringRegExp($user1, '[abcdefghijklmnopqrstuvwxyz]') = 1 Then Login1() EndIf sleep(500) If StringRegExp($user2, '[abcdefghijklmnopqrstuvwxyz]') = 1 Then Login2() EndIf sleep(500) If StringRegExp($user3, '[abcdefghijklmnopqrstuvwxyz]') = 1 Then Login3() EndIf sleep(500) If StringRegExp($user4, '[abcdefghijklmnopqrstuvwxyz]') = 1 Then Login4() EndIf sleep(500) If StringRegExp($user5, '[abcdefghijklmnopqrstuvwxyz]') = 1 Then Login5() EndIf sleep(500) If $checkboxer == 1 Then organize() EndIf EndFunc GUICtrlSetOnEvent($Button1, "login") While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $Button1 Login() Case $checkbox1 $checkboxer = 1 EndSwitch WEnd

doesnt that just click at a certain position on the computer? thats kind what i didn't want to do.