Quantcast
Channel: AutoIt v3 - General Help and Support
Viewing all articles
Browse latest Browse all 12506

*.ini + Checkbox Problem

$
0
0
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.

[ autoit ]         
#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..

Viewing all articles
Browse latest Browse all 12506

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>