Code:
#RequireAdmin #include <ButtonConstants.au3> #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #include <NomadMemory.au3> #include <Crypt.au3> #include <StaticConstants.au3> #Region ### START Koda GUI section ### Form= $Form1 = GUICreate("☺♥DiabloCore Simple Trainer☺♥", 625, 442, 512, 117) GUISetIcon("C:\AeriaGames\Downloader\aeria_ignite_install.exe") GUISetBkColor(0xFFFBF0) $Label1 = GUICtrlCreateLabel("www.elitepvpers.com", 216, 344, 240, 29) GUICtrlSetFont(-1, 14, 400, 0, "Snap ITC") $Label2 = GUICtrlCreateLabel("DiabloCore", 280, 392, 122, 29) GUICtrlSetFont(-1, 14, 400, 0, "Snap ITC") $Checkbox1 = GUICtrlCreateCheckbox("200Hp", 16, 16, 97, 17) GUICtrlSetFont(-1, 14, 400, 0, "Chiller") $Checkbox2 = GUICtrlCreateCheckbox("INF SP", 136, 16, 97, 17) GUICtrlSetFont(-1, 14, 400, 0, "Chiller") $Checkbox3 = GUICtrlCreateCheckbox("Instant Respawn", 296, 16, 97, 17) GUICtrlSetFont(-1, 14, 400, 0, "Chiller") $Checkbox4 = GUICtrlCreateCheckbox("SP Regen", 496, 16, 97, 17) GUICtrlSetFont(-1, 14, 400, 0, "Chiller") $Checkbox5 = GUICtrlCreateCheckbox("Dodge Speed", 16, 64, 97, 17) GUICtrlSetFont(-1, 14, 400, 0, "Chiller") $Checkbox6 = GUICtrlCreateCheckbox("Inf Anchor", 136, 64, 97, 17) GUICtrlSetFont(-1, 14, 400, 0, "Chiller") $Checkbox7 = GUICtrlCreateCheckbox("God Mod", 296, 64, 97, 17) GUICtrlSetFont(-1, 14, 400, 0, "Chiller") $Checkbox8 = GUICtrlCreateCheckbox("Cut Speed", 496, 64, 97, 17) GUICtrlSetFont(-1, 14, 400, 0, "Chiller") $Checkbox9 = GUICtrlCreateCheckbox("Anchor Delay", 16, 112, 97, 17) GUICtrlSetFont(-1, 14, 400, 0, "Chiller") $Checkbox10 = GUICtrlCreateCheckbox("1Hit Kill", 136, 112, 97, 17) GUICtrlSetFont(-1, 14, 400, 0, "Chiller") $Checkbox11 = GUICtrlCreateCheckbox("Speed Hack", 296, 112, 97, 17) GUICtrlSetFont(-1, 14, 400, 0, "Chiller") $Checkbox12 = GUICtrlCreateCheckbox("Anchor Range", 496, 112, 97, 17) GUICtrlSetFont(-1, 14, 400, 0, "Chiller") $Checkbox13 = GUICtrlCreateCheckbox("Inf Ammo", 16, 160, 97, 17) GUICtrlSetFont(-1, 14, 400, 0, "Chiller") $Checkbox14 = GUICtrlCreateCheckbox("Fast Fire", 136, 160, 97, 17) GUICtrlSetFont(-1, 14, 400, 0, "Chiller") $Checkbox15 = GUICtrlCreateCheckbox("Anchor Speed", 296, 160, 97, 17) GUICtrlSetFont(-1, 14, 400, 0, "Chiller") $Checkbox16 = GUICtrlCreateCheckbox("0Gravity", 496, 160, 97, 17) GUICtrlSetFont(-1, 14, 400, 0, "Chiller") $Checkbox17 = GUICtrlCreateCheckbox("Sentry Range", 256, 200, 97, 17) GUICtrlSetFont(-1, 14, 400, 0, "Chiller") $Checkbox18 = GUICtrlCreateCheckbox("Sentry Delay", 256, 232, 97, 17) GUICtrlSetFont(-1, 14, 400, 0, "Chiller") $Button1 = GUICtrlCreateButton("Enjoy ", 240, 264, 145, 65, 0) GUICtrlSetFont(-1, 16, 400, 0, "Chiller") GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $button1 _something() EndSwitch WEnd Func _something() GUISetState(@SW_HIDE) ToolTip("Waiting For S4League...", 0, 0) $wait = ProcessWait("S4Client.exe") $pid = ProcessExists("S4Client.exe") Sleep(500) $open = _memoryopen($pid) If GUICtrlRead($checkbox1) = 1 Then _memorywrite(4712878, $open, "1166868842", "long") EndIf If GUICtrlRead($checkbox2) = 1 Then _memorywrite(5346361, $open, "1593591259", "long") EndIf If GUICtrlRead($checkbox3) = 1 Then _memorywrite(5343716, $open, "2348565979", "long") EndIf If GUICtrlRead($checkbox4) = 1 Then _memorywrite(6203647, $open, "1376212363", "long") EndIf If GUICtrlRead($checkbox5) = 1 Then _memorywrite(6205727, $open, "990071435", "long") EndIf If GUICtrlRead($checkbox6) = 1 Then _memorywrite(6205522, $open, "2298761611", "long") EndIf If GUICtrlRead($checkbox7) = 1 Then _memorywrite(6377918, $open, "2240612458", "long") EndIf If GUICtrlRead($checkbox8) = 1 Then _memorywrite(6112602, $open, "1166872682", "long") EndIf If GUICtrlRead($checkbox9) = 1 Then _memorywrite(5635049, $open, "990399115", "long") EndIf If GUICtrlRead($checkbox10) = 1 Then _memorywrite(5343813, $open, "3135869072", "long") EndIf If GUICtrlRead($checkbox11) = 1 Then _memorywrite(7704898, $open, "3051982992", "long") EndIf If GUICtrlRead($checkbox12) = 1 Then _memorywrite(6205918, $open, "2374697322", "long") EndIf If GUICtrlRead($checkbox13) = 1 Then _memorywrite(4723746, $open, "2348565979", "long") EndIf If GUICtrlRead($checkbox14) = 1 Then _memorywrite(6174003, $open, "989874827", "long") EndIf If GUICtrlRead($checkbox15) = 1 Then _memorywrite(5950033, $open, "2332050691", "long") EndIf If GUICtrlRead($checkbox16) = 1 Then _memorywrite(5451734, $open, "2348565979", "long") EndIf If GUICtrlRead($checkbox17) = 1 Then _memorywrite(4753893, $open, "1166870634", "long") EndIf If GUICtrlRead($checkbox18) = 1 Then _memorywrite(4715581, $open, "4284253659", "long") EndIf Exit EndFunc