XperientAE Posted January 12, 2013 Posted January 12, 2013 Hey,im new to AutoIT.And im also new to this forum I already visitied this forum before to get more into AutoIT,but now i got a problem i don't know how to fix so i registered here. I don't know if it's allowed to post this here,because some Forums got a problem with tools for games i think. Soo..im just trying to ask. expandcollapse popup#include #include #include #include #include Opt("GUIOnEventMode", 1) Opt("WinTitleMatchMode", 1) Opt("SendKeyDelay", 2.0) Global $toggle = False Global $gw ; gw window handle ; ==== Get gw window handle ==== $PID = ProcessExists("gw.exe") $windows = WinList("Guild Wars") If $windows[0][0]==0 Or $PID==0 Then MsgBox(0, "Error", "Run Guild Wars first!") Exit EndIf For $i=0 To $windows[0][0] Step 1 If WinGetProcess($windows[$i][1])==$PID Then $gw = $windows[$i][1] EndIf Next $gw_multitool = GUICreate("Guild Wars Template Tool", 890, 700, 387, 129) $banner = GUICtrlCreatePic("images\banner.jpg", 0, 0, 700, 135) $Label_Buildmacro = GUICtrlCreateLabel("Build - Macro", 35, 145, 100, 30) GUISetOnEvent($GUI_EVENT_CLOSE, "_exit") $tb1 = GUICtrlCreateLabel("Teambuild #1", 35, 178, 100, 30) $tb2 = GUICtrlCreateLabel("Teambuild #2", 255, 178, 100, 30) $tb3 = GUICtrlCreateLabel("Teambuild #3", 475, 178, 100, 30) $tb4 = GUICtrlCreateLabel("Teambuild #4", 695, 178, 100, 30) ;TEAMBUILD 1 $Input1_Name = IniRead ( "settings.ini", "Teambuild1", "Name", "" ) $Input1_Text1 = IniRead ( "settings.ini", "Teambuild1", "1", "" ) $Input1_Text2 = IniRead ( "settings.ini", "Teambuild1", "2", "" ) $Input1_Text3 = IniRead ( "settings.ini", "Teambuild1", "3", "" ) $Input1_Text4 = IniRead ( "settings.ini", "Teambuild1", "4", "" ) $Input1_Text5 = IniRead ( "settings.ini", "Teambuild1", "5", "" ) $Input1_Text6 = IniRead ( "settings.ini", "Teambuild1", "6", "" ) $Input1_Text7 = IniRead ( "settings.ini", "Teambuild1", "7", "" ) $Input1_Text8 = IniRead ( "settings.ini", "Teambuild1", "8", "" ) $Teambuild1_Name = GUICtrlCreateInput($Input1_Name, 35, 200, 170, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $Teambuild1_Input1 = GUICtrlCreateInput($Input1_Text1, 35, 240, 170, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $Teambuild1_Input2 = GUICtrlCreateInput($Input1_Text2, 35, 265, 170, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $Teambuild1_Input3 = GUICtrlCreateInput($Input1_Text3, 35, 295, 170, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $Teambuild1_Input4 = GUICtrlCreateInput($Input1_Text4, 35, 320, 170, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $Teambuild1_Input5 = GUICtrlCreateInput($Input1_Text5, 35, 345, 170, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $Teambuild1_Input6 = GUICtrlCreateInput($Input1_Text6, 35, 370, 170, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $Teambuild1_Input7 = GUICtrlCreateInput($Input1_Text7, 35, 395, 170, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $Teambuild1_Input8 = GUICtrlCreateInput($Input1_Text8, 35, 420, 170, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $Label1 = GUICtrlCreateLabel("#1", 8, 242, 15, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $Label2 = GUICtrlCreateLabel("#2", 8, 267, 15, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $Label3 = GUICtrlCreateLabel("#3", 8, 297, 15, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $Label4 = GUICtrlCreateLabel("#4", 8, 322, 15, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $Label5 = GUICtrlCreateLabel("#5", 8, 347, 15, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $Label6 = GUICtrlCreateLabel("#6", 8, 372, 15, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $Label7 = GUICtrlCreateLabel("#7", 8, 397, 15, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $Label8 = GUICtrlCreateLabel("#8", 8, 422, 15, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") ;TEAMBUILD 2 $Input2_Name = IniRead ( "settings.ini", "Teambuild2", "Name", "" ) $Input2_Text1 = IniRead ( "settings.ini", "Teambuild2", "1", "" ) $Input2_Text2 = IniRead ( "settings.ini", "Teambuild2", "2", "" ) $Input2_Text3 = IniRead ( "settings.ini", "Teambuild2", "3", "" ) $Input2_Text4 = IniRead ( "settings.ini", "Teambuild2", "4", "" ) $Input2_Text5 = IniRead ( "settings.ini", "Teambuild2", "5", "" ) $Input2_Text6 = IniRead ( "settings.ini", "Teambuild2", "6", "" ) $Input2_Text7 = IniRead ( "settings.ini", "Teambuild2", "7", "" ) $Input2_Text8 = IniRead ( "settings.ini", "Teambuild2", "8", "" ) $Teambuild2_Name = GUICtrlCreateInput($Input2_Name, 255, 200, 170, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $Teambuild2_Input1 = GUICtrlCreateInput($Input2_Text1, 255, 240, 170, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $Teambuild2_Input2 = GUICtrlCreateInput($Input2_Text2, 255, 265, 170, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $Teambuild2_Input3 = GUICtrlCreateInput($Input2_Text3, 255, 295, 170, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $Teambuild2_Input4 = GUICtrlCreateInput($Input2_Text4, 255, 320, 170, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $Teambuild2_Input5 = GUICtrlCreateInput($Input2_Text5, 255, 345, 170, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $Teambuild2_Input6 = GUICtrlCreateInput($Input2_Text6, 255, 370, 170, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $Teambuild2_Input7 = GUICtrlCreateInput($Input2_Text7, 255, 395, 170, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $Teambuild2_Input8 = GUICtrlCreateInput($Input2_Text8, 255, 420, 170, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $1Label1 = GUICtrlCreateLabel("#1", 228, 242, 15, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $1Label2 = GUICtrlCreateLabel("#2", 228, 267, 15, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $1Label3 = GUICtrlCreateLabel("#3", 228, 297, 15, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $1Label4 = GUICtrlCreateLabel("#4", 228, 322, 15, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $1Label5 = GUICtrlCreateLabel("#5",228, 347, 15, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $1Label6 = GUICtrlCreateLabel("#6", 228, 372, 15, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $1Label7 = GUICtrlCreateLabel("#7", 228, 397, 15, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $1Label8 = GUICtrlCreateLabel("#8", 228, 422, 15, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") ;TEAMBUILD3 $Input3_Name = IniRead ( "settings.ini", "Teambuild3", "Name", "" ) $Input3_Text1 = IniRead ( "settings.ini", "Teambuild3", "1", "" ) $Input3_Text2 = IniRead ( "settings.ini", "Teambuild3", "2", "" ) $Input3_Text3 = IniRead ( "settings.ini", "Teambuild3", "3", "" ) $Input3_Text4 = IniRead ( "settings.ini", "Teambuild3", "4", "" ) $Input3_Text5 = IniRead ( "settings.ini", "Teambuild3", "5", "" ) $Input3_Text6 = IniRead ( "settings.ini", "Teambuild3", "6", "" ) $Input3_Text7 = IniRead ( "settings.ini", "Teambuild3", "7", "" ) $Input3_Text8 = IniRead ( "settings.ini", "Teambuild3", "8", "" ) $Teambuild3_Name = GUICtrlCreateInput($Input3_Name, 475, 200, 170, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $Teambuild3_Input1 = GUICtrlCreateInput($Input3_Text1, 475, 240, 170, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $Teambuild3_Input2 = GUICtrlCreateInput($Input3_Text2, 475, 265, 170, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $Teambuild3_Input3 = GUICtrlCreateInput($Input3_Text3, 475, 295, 170, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $Teambuild3_Input4 = GUICtrlCreateInput($Input3_Text4, 475, 320, 170, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $Teambuild3_Input5 = GUICtrlCreateInput($Input3_Text5, 475, 345, 170, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $Teambuild3_Input6 = GUICtrlCreateInput($Input3_Text6, 475, 370, 170, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $Teambuild3_Input7 = GUICtrlCreateInput($Input3_Text7, 475, 395, 170, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $Teambuild3_Input8 = GUICtrlCreateInput($Input3_Text8, 475, 420, 170, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $3Label1 = GUICtrlCreateLabel("#1", 447, 242, 15, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $3Label2 = GUICtrlCreateLabel("#2", 447, 267, 15, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $3Label3 = GUICtrlCreateLabel("#3", 447, 297, 15, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $3Label4 = GUICtrlCreateLabel("#4", 447, 322, 15, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $3Label5 = GUICtrlCreateLabel("#5",447, 347, 15, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $3Label6 = GUICtrlCreateLabel("#6", 447, 372, 15, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $3Label7 = GUICtrlCreateLabel("#7", 447, 397, 15, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $3Label8 = GUICtrlCreateLabel("#8", 447, 422, 15, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") ;TEAMBUILD4 $Input4_Name = IniRead ( "settings.ini", "Teambuild4", "Name", "" ) $Input4_Text1 = IniRead ( "settings.ini", "Teambuild4", "1", "" ) $Input4_Text2 = IniRead ( "settings.ini", "Teambuild4", "2", "" ) $Input4_Text3 = IniRead ( "settings.ini", "Teambuild4", "3", "" ) $Input4_Text4 = IniRead ( "settings.ini", "Teambuild4", "4", "" ) $Input4_Text5 = IniRead ( "settings.ini", "Teambuild4", "5", "" ) $Input4_Text6 = IniRead ( "settings.ini", "Teambuild4", "6", "" ) $Input4_Text7 = IniRead ( "settings.ini", "Teambuild4", "7", "" ) $Input4_Text8 = IniRead ( "settings.ini", "Teambuild4", "8", "" ) $Teambuild4_Name = GUICtrlCreateInput($Input4_Name, 695, 200, 170, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $Teambuild4_Input1 = GUICtrlCreateInput($Input4_Text1, 695, 240, 170, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $Teambuild4_Input2 = GUICtrlCreateInput($Input4_Text2, 695, 265, 170, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $Teambuild4_Input3 = GUICtrlCreateInput($Input4_Text3, 695, 295, 170, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $Teambuild4_Input4 = GUICtrlCreateInput($Input4_Text4, 695, 320, 170, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $Teambuild4_Input5 = GUICtrlCreateInput($Input4_Text5, 695, 345, 170, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $Teambuild4_Input6 = GUICtrlCreateInput($Input4_Text6, 695, 370, 170, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $Teambuild4_Input7 = GUICtrlCreateInput($Input4_Text7, 695, 395, 170, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $Teambuild4_Input8 = GUICtrlCreateInput($Input4_Text8, 695, 420, 170, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $4Label1 = GUICtrlCreateLabel("#1", 667, 242, 15, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $4Label2 = GUICtrlCreateLabel("#2", 667, 267, 15, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $4Label3 = GUICtrlCreateLabel("#3", 667, 297, 15, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $4Label4 = GUICtrlCreateLabel("#4", 667, 322, 15, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $4Label5 = GUICtrlCreateLabel("#5",667, 347, 15, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $4Label6 = GUICtrlCreateLabel("#6", 667, 372, 15, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $4Label7 = GUICtrlCreateLabel("#7", 667, 397, 15, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $4Label8 = GUICtrlCreateLabel("#8", 667, 422, 15, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $savenum1 = GUICtrlCreateLabel("NUMPAD 1", 95, 470, 70, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $save = GUICtrlCreateButton("Save", 35, 450, 170, 20) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $save2 = GUICtrlCreateButton("Save", 255, 450, 170, 20) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $savenum2 = GUICtrlCreateLabel("NUMPAD 2", 315, 470, 70, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $save3 = GUICtrlCreateButton("Save", 475, 450, 170, 20) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $savenum3 = GUICtrlCreateLabel("NUMPAD 3", 535, 470, 70, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $save4 = GUICtrlCreateButton("Save", 695, 450, 170, 20) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") $savenum4 = GUICtrlCreateLabel("NUMPAD 4", 755, 470, 70, 18) GUICtrlSetFont(-1, 8, 400, 0, "Comic Sans MS") GUISetState(@SW_SHOW) HotKeySet("{NUMPAD1}", "teambuild") HotKeySet("{NUMPAD2}", "teambuild2") HotKeySet("{NUMPAD3}", "teambuild3") HotKeySet("{NUMPAD4}", "teambuild4") Global $stu[8] For $i = 0 To 7 Step 1 $stu[$i] = (IniRead("settings.ini", "s", $i + 1, False) == "True") Next Global $checkBoxes[8] GUISetOnEvent($GUI_EVENT_CLOSE, "_exit") ; -3 = $GUI_EVENT_CLOSE $checkBoxes[0] = GUICtrlCreateCheckbox("1", 8, 600, 25, 17) $checkBoxes[1] = GUICtrlCreateCheckbox("2", 40, 600, 25, 17) $checkBoxes[2] = GUICtrlCreateCheckbox("3", 72, 600, 25, 17) $checkBoxes[3] = GUICtrlCreateCheckbox("4", 104, 600, 25, 17) $checkBoxes[4] = GUICtrlCreateCheckbox("5", 136, 600, 25, 17) $checkBoxes[5] = GUICtrlCreateCheckbox("6", 168, 600, 25, 17) $checkBoxes[6] = GUICtrlCreateCheckbox("7", 200, 600, 25, 17) $checkBoxes[7] = GUICtrlCreateCheckbox("8", 232, 600, 25, 17) For $i = 0 To 7 Step 1 If $stu[$i] == True Then GUICtrlSetState($checkBoxes[$i], $GUI_CHECKED) EndIf GUICtrlSetOnEvent($checkBoxes[$i], "toggles") Next $Button = GUICtrlCreateButton("Start", 0, 630, 270, 44) GUICtrlSetState($Button, $GUI_FOCUS) GUICtrlSetOnEvent($Button, "toggle") GUISetState(@SW_SHOW) ; ==== main loop ==== While True If $toggle Then For $i = 0 To 7 Step 1 If $stu[$i] Then _Send($i + 1) Sleeep(50, 20) EndIf Next EndIf Sleeep(500) WEnd While 1 $nMsg = GUIGetMsg() $Build1Name = IniRead ("settings.ini", "Teambuild1", "Name", GUICtrlRead($Teambuild1_Name)) $Build1 = IniRead ("settings.ini", "Teambuild1", "1", GUICtrlRead($Teambuild1_Input1)) $Build2 = IniRead ("settings.ini", "Teambuild1", "2", GUICtrlRead($Teambuild1_Input2)) $Build3 = IniRead ("settings.ini", "Teambuild1", "3", GUICtrlRead($Teambuild1_Input3)) $Build4 = IniRead ("settings.ini", "Teambuild1", "4", GUICtrlRead($Teambuild1_Input4)) $Build5 = IniRead ("settings.ini", "Teambuild1", "5", GUICtrlRead($Teambuild1_Input5)) $Build6 = IniRead ("settings.ini", "Teambuild1", "6", GUICtrlRead($Teambuild1_Input6)) $Build7 = IniRead ("settings.ini", "Teambuild1", "7", GUICtrlRead($Teambuild1_Input7)) $Build8 = IniRead ("settings.ini", "Teambuild1", "8", GUICtrlRead($Teambuild1_Input8)) $2BuildName = IniRead ("settings.ini", "Teambuild2", "Name", GUICtrlRead($Teambuild2_Name)) $2Build1 = IniRead ("settings.ini", "Teambuild2", "1", GUICtrlRead($Teambuild2_Input1)) $2Build2 = IniRead ("settings.ini", "Teambuild2", "2", GUICtrlRead($Teambuild2_Input2)) $2Build3 = IniRead ("Data/se ttings.ini", "Teambuild2", "3", GUICtrlRead($Teambuild2_Input3)) $2Build4 = IniRead ("settings.ini", "Teambuild2", "4", GUICtrlRead($Teambuild2_Input4)) $2Build5 = IniRead ("settings.ini", "Teambuild2", "5", GUICtrlRead($Teambuild2_Input5)) $2Build6 = IniRead ("settings.ini", "Teambuild2", "6", GUICtrlRead($Teambuild2_Input6)) $2Build7 = IniRead ("settings.ini", "Teambuild2", "7", GUICtrlRead($Teambuild2_Input7)) $2Build8 = IniRead ("settings.ini", "Teambuild2", "8", GUICtrlRead($Teambuild2_Input8)) $3BuildName = IniRead ("settings.ini", "Teambuild3", "Name", GUICtrlRead($Teambuild3_Name)) $3Build1 = IniRead ("settings.ini", "Teambuild3", "1", GUICtrlRead($Teambuild3_Input1)) $3Build2 = IniRead ("settings.ini", "Teambuild3", "2", GUICtrlRead($Teambuild3_Input2)) $3Build3 = IniRead ("Data/se ttings.ini","Teambuild3", "3", GUICtrlRead($Teambuild3_Input3)) $3Build4 = IniRead ("settings.ini", "Teambuild3", "4", GUICtrlRead($Teambuild3_Input4)) $3Build5 = IniRead ("settings.ini", "Teambuild3", "5", GUICtrlRead($Teambuild3_Input5)) $3Build6 = IniRead ("settings.ini", "Teambuild3", "6", GUICtrlRead($Teambuild3_Input6)) $3Build7 = IniRead ("settings.ini", "Teambuild3", "7", GUICtrlRead($Teambuild3_Input7)) $3Build8 = IniRead ("settings.ini", "Teambuild3", "8", GUICtrlRead($Teambuild3_Input8)) $4BuildName = IniRead ("settings.ini", "Teambuild4", "Name", GUICtrlRead($Teambuild4_Name)) $4Build1 = IniRead ("settings.ini", "Teambuild4", "1", GUICtrlRead($Teambuild4_Input1)) $4Build2 = IniRead ("settings.ini", "Teambuild4", "2", GUICtrlRead($Teambuild4_Input2)) $4Build3 = IniRead ("Data/se ttings.ini","Teambuild4", "3", GUICtrlRead($Teambuild4_Input3)) $4Build4 = IniRead ("settings.ini", "Teambuild4", "4", GUICtrlRead($Teambuild4_Input4)) $4Build5 = IniRead ("settings.ini", "Teambuild4", "5", GUICtrlRead($Teambuild4_Input5)) $4Build6 = IniRead ("settings.ini", "Teambuild4", "6", GUICtrlRead($Teambuild4_Input6)) $4Build7 = IniRead ("settings.ini", "Teambuild4", "7", GUICtrlRead($Teambuild4_Input7)) $4Build8 = IniRead ("settings.ini", "Teambuild4", "8", GUICtrlRead($Teambuild4_Input8)) Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $save iniwrite("settings.ini","Teambuild1","Name", GUICtrlRead($Teambuild1_Name)) iniwrite("settings.ini","Teambuild1","1", GUICtrlRead($Teambuild1_Input1)) iniwrite("settings.ini","Teambuild1","2", GUICtrlRead($Teambuild1_Input2)) iniwrite("settings.ini","Teambuild1","3", GUICtrlRead($Teambuild1_Input3)) iniwrite("settings.ini","Teambuild1","4", GUICtrlRead($Teambuild1_Input4)) iniwrite("settings.ini","Teambuild1","5", GUICtrlRead($Teambuild1_Input5)) iniwrite("settings.ini","Teambuild1","6", GUICtrlRead($Teambuild1_Input6)) iniwrite("settings.ini","Teambuild1","7", GUICtrlRead($Teambuild1_Input7)) iniwrite("settings.ini","Teambuild1","8", GUICtrlRead($Teambuild1_Input8)) Case $save2 iniwrite("settings.ini","Teambuild2","Name", GUICtrlRead($Teambuild2_Name)) iniwrite("settings.ini","Teambuild2","1", GUICtrlRead($Teambuild2_Input1)) iniwrite("settings.ini","Teambuild2","2", GUICtrlRead($Teambuild2_Input2)) iniwrite("settings.ini","Teambuild2","3", GUICtrlRead($Teambuild2_Input3)) iniwrite("settings.ini","Teambuild2","4", GUICtrlRead($Teambuild2_Input4)) iniwrite("settings.ini","Teambuild2","5", GUICtrlRead($Teambuild2_Input5)) iniwrite("settings.ini","Teambuild2","6", GUICtrlRead($Teambuild2_Input6)) iniwrite("settings.ini","Teambuild2","7", GUICtrlRead($Teambuild2_Input7)) iniwrite("settings.ini","Teambuild2","8", GUICtrlRead($Teambuild2_Input8)) Case $save3 iniwrite("settings.ini","Teambuild3","Name", GUICtrlRead($Teambuild3_Name)) iniwrite("settings.ini","Teambuild3","1", GUICtrlRead($Teambuild3_Input1)) iniwrite("settings.ini","Teambuild3","2", GUICtrlRead($Teambuild3_Input2)) iniwrite("settings.ini","Teambuild3","3", GUICtrlRead($Teambuild3_Input3)) iniwrite("settings.ini","Teambuild3","4", GUICtrlRead($Teambuild3_Input4)) iniwrite("settings.ini","Teambuild3","5", GUICtrlRead($Teambuild3_Input5)) iniwrite("settings.ini","Teambuild3","6", GUICtrlRead($Teambuild3_Input6)) iniwrite("settings.ini","Teambuild3","7", GUICtrlRead($Teambuild3_Input7)) iniwrite("settings.ini","Teambuild3","8", GUICtrlRead($Teambuild3_Input8)) Case $save4 iniwrite("settings.ini","Teambuild4","Name", GUICtrlRead($Teambuild4_Name)) iniwrite("settings.ini","Teambuild4","1", GUICtrlRead($Teambuild4_Input1)) iniwrite("settings.ini","Teambuild4","2", GUICtrlRead($Teambuild4_Input2)) iniwrite("settings.ini","Teambuild4","3", GUICtrlRead($Teambuild4_Input3)) iniwrite("settings.ini","Teambuild4","4", GUICtrlRead($Teambuild4_Input4)) iniwrite("settings.ini","Teambuild4","5", GUICtrlRead($Teambuild4_Input5)) iniwrite("settings.ini","Teambuild4","6", GUICtrlRead($Teambuild4_Input6)) iniwrite("settings.ini","Teambuild4","7", GUICtrlRead($Teambuild4_Input7)) iniwrite("settings.ini","Teambuild4","8", GUICtrlRead($Teambuild4_Input8)) EndSwitch WEnd While 2 Sleep(500) WEnd Func teambuild () Send ("{ENTER}") Send ($Build1Name) Send ("{ENTER}") Send ("{ENTER}") Send ($Build1) Send ("{ENTER}") Send ("{ENTER}") Send ($Build2) Send ("{ENTER}") Send ("{ENTER}") Send ($Build3) Send ("{ENTER}") Send ("{ENTER}") Send ($Build4) Send ("{ENTER}") Send ("{ENTER}") Send ($Build5) Send ("{ENTER}") Send ("{ENTER}") Send ($Build6) Send ("{ENTER}") Send ("{ENTER}") Send ($Build7) Send ("{ENTER}") Send ("{ENTER}") Send ($Build8) Send ("{ENTER}") EndFunc Func teambuild2 () Send ("{ENTER}") Send ($2BuildName) Send ("{ENTER}") Send ("{ENTER}") Send ($2Build1) Send ("{ENTER}") Send ("{ENTER}") Send ($2Build2) Send ("{ENTER}") Send ("{ENTER}") Send ($2Build3) Send ("{ENTER}") Send ("{ENTER}") Send ($2Build4) Send ("{ENTER}") Send ("{ENTER}") Send ($2Build5) Send ("{ENTER}") Send ("{ENTER}") Send ($2Build6) Send ("{ENTER}") Send ("{ENTER}") Send ($2Build7) Send ("{ENTER}") Send ("{ENTER}") Send ($2Build8) Send ("{ENTER}") EndFunc Func teambuild3 () Send ("{ENTER}") Send ($3BuildName) Send ("{ENTER}") Send ("{ENTER}") Send ($3Build1) Send ("{ENTER}") Send ("{ENTER}") Send ($3Build2) Send ("{ENTER}") Send ("{ENTER}") Send ($3Build3) Send ("{ENTER}") Send ("{ENTER}") Send ($3Build4) Send ("{ENTER}") Send ("{ENTER}") Send ($3Build5) Send ("{ENTER}") Send ("{ENTER}") Send ($3Build6) Send ("{ENTER}") Send ("{ENTER}") Send ($3Build7) Send ("{ENTER}") Send ("{ENTER}") Send ($3Build8) Send ("{ENTER}") EndFunc Func teambuild4 () Send ("{ENTER}") Send ($4BuildName) Send ("{ENTER}") Send ("{ENTER}") Send ($4Build1) Send ("{ENTER}") Send ("{ENTER}") Send ($4Build2) Send ("{ENTER}") Send ("{ENTER}") Send ($4Build3) Send ("{ENTER}") Send ("{ENTER}") Send ($4Build4) Send ("{ENTER}") Send ("{ENTER}") Send ($4Build5) Send ("{ENTER}") Send ("{ENTER}") Send ($4Build6) Send ("{ENTER}") Send ("{ENTER}") Send ($4Build7) Send ("{ENTER}") Send ("{ENTER}") Send ($4Build8) Send ("{ENTER}") EndFunc Func toggles() For $i = 0 To 7 Step 1 If $checkBoxes[$i] == @GUI_CtrlId Then $stu[$i] = Not $stu[$i] IniWrite("settings.ini", "s", $i+1, $stu[$i]) EndIf Next EndFunc ;==>toggles Func toggle() $toggle = Not $toggle If $toggle Then GUICtrlSetData($Button, "Pause") Else GUICtrlSetData($Button, "Start") EndIf EndFunc ;==>toggle Func _send($msg) ControlSend($gw, "", "", $msg) EndFunc ;==>_send Func _exit() Exit EndFunc ;==>_exit Func Sleeep($time, $offset = 100) Sleep($time + Random(-$offset, $offset, 1)) EndFunc ;==>Sleeep What it shall do : it's a tool for the game guild wars to spam Template-Skillcodes for other Players so that they can load them.And since i dont have a macro-keyboard where i can save those i wanted to do this tool for personal use. This worked fine so far.But now i dont know how to combine the Checkboxes ini-stuff with the other Ini.The checkboxes are working but it doesnt work in combination with each other.would be really cool if you could help me..
Moderators Melba23 Posted January 12, 2013 Moderators Posted January 12, 2013 XperientAE,Welcome to the AutoIt forum. Unfortunately you appear to have missed the Forum rules on your way in. Please read them now (there is also a link at bottom right of each page) - particularly the bit about not discussing game automation - and then you will understand that this forum also "got a problem with tools for games", which is why you will get no help and this thread will now be locked. See you soon with a legitimate question I hope. M23 Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind Open spoiler to see my UDFs: Spoiler ArrayMultiColSort ---- Sort arrays on multiple columnsChooseFileFolder ---- Single and multiple selections from specified path treeview listingDate_Time_Convert -- Easily convert date/time formats, including the language usedExtMsgBox --------- A highly customisable replacement for MsgBoxGUIExtender -------- Extend and retract multiple sections within a GUIGUIFrame ---------- Subdivide GUIs into many adjustable framesGUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView itemsGUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeViewMarquee ----------- Scrolling tickertape GUIsNoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxesNotify ------------- Small notifications on the edge of the displayScrollbars ----------Automatically sized scrollbars with a single commandStringSize ---------- Automatically size controls to fit textToast -------------- Small GUIs which pop out of the notification area
Recommended Posts