;H1Z1 Multi-Tool Created by: T3HMILFWHISPER3R & KennysNoRecoil.
#Persistent
#KeyHistory, 0
#NoEnv
#HotKeyInterval 1
#MaxHotkeysPerInterval 600
#InstallKeybdHook
#InstallMouseHook
#UseHook
#SingleInstance, Force
SetKeyDelay,-1, 3
SetControlDelay, -1
SetMouseDelay, -1
SetWinDelay,-1
SendMode, InputThenPlay
SetBatchLines,-1
ListLines, Off
CoordMode, Pixel, Screen, RGB
CoordMode, Mouse, Screen
PID := DllCall("GetCurrentProcessId")
Process, Priority, %PID%, Normal
Menu, Tray, Icon,,, 1
Menu,Tray,Click,1
;//Dynamic HotKey being created and written to configuration file.
IniRead, Key1, Settings.ini, Settings, SuspendKey, %Key1%
IniWrite, %Key1%, Settings.ini, Settings, SuspendKey
Hotkey, %Key1%, ~$hkWrite
;//GUI population
Ver = V.2.5
TrayTip, Phantom H1+ %Ver%, Now Running in the Background!, 2
Gui Color, 0x00000
Gui, font, cWhite, bold
Gui, Add, Text, x90 y20 w120 h23 +0x200 +center, AIM ASSIST SETTINGS:
Gui, Add, Text, x90 y60 w120 h23 +0x200 +center, Iterations:
Gui, Add, ComboBox, x90 y80 w120 vAMOUNT, 5|10|15|20||30|40|50
Gui, Add, Text, x90 y100 w120 h23 +0x200 +center, Color Variances:
Gui, Add, ComboBox, x90 y120 w120 vDIFFERENCES, 1|5|10|15||20|30|40|50|60
Gui, Add, Text, x90 y140 w120 h23 +0x200 +center, Suspend:
Gui, Add, ComboBox, x90 y160 w120 vSuspend, %Key1%||
Gui, Add, Button, gChangeVal x130 y200, Submit
Gui Show, w310 h240, Phantom H1+ - %Ver%
suspend, on
;//Show Message on Startup
MsgBox, Welcome to Phantom H1+ Aim Assist
MsgBox, Please read the Read Me
MsgBox, The program is suspended by default press "SUBMIT" to enable it
;//Aim Assist Configurationd and color configuration based ON HEX COLORS RGB > hex
on google to help ya
Gui, Submit, nohide
HEXCol := 0xFFFABC
Gui, Submit, nohide
ColVn := DIFFERENCES
goSub Search
;//Search Sub Routine
Search:
AntiShakeX := (A_ScreenWidth // 160)
AntiShakeY := (A_ScreenHeight // 128)
ZeroX := (A_ScreenWidth / 2)
ZeroY := (A_ScreenHeight / 2)
CFovX := 10
CFovY := 10
ScanL := ZeroX - CFovX
ScanT := ZeroY
ScanR := ZeroX + CFovX
ScanB := ZeroY + CFovY
NearAimL := ZeroX - AntiShakeX
NearAimT := ZeroY - AntiShakeY
NearAimR := ZeroX + AntiShakeX
NearAimB := ZeroY + AntiShakeY
return
Loop,
~LButton::
While GetKeyState ("LButton", "P"){
KeyWait, LButton, D
PixelSearch, pAimX, pAimY, NearAimL, NearAimT, NearAimR, NearAimB, HEXCol, ColVn,
Fast RGB
if (!ErrorLevel=0)
Gui, submit, nohide
loop, %AMOUNT% {
goSub pDetect
}
}
;Pixel Detection Sub routine
pDetect:
PixelSearch, pAimX, pAimY, ScanL, ScanT, ScanR, ScanB, HEXCol, ColVn, Fast RGB
AimX := pAimX - ZeroX
AimY := pAimY - ZeroY
DirX := -1
DirY := -1
goSub Goods
return
;Adjusting Aim to Detected Pixel Sub Routine
Goods:
If ( AimX > 0 ) {
DirX := 1
}
If ( AimY > 0 ) {
DirY := 1
}
AimOffsetX := AimX * DirX
AimOffsetY := AimY * DirY
MoveX := Floor(( AimOffsetX ** ( 1 / 2 ))) * DirX
MoveY := Floor(( AimOffsetY ** ( 1 / 2 ))) * DirY
DllCall("mouse_event", uint, 1, int, MoveX * 2.72, int, MoveY, uint, 0, int, 0)
return
;Suspend Sub Routine
~$hkWrite:
suspend, toggle
SoundBeep, 200, 100
return
;Change Value Sub Routine
ChangeVal:
Gui, submit, nohide
SoundBeep, 300, 100
suspend, off
return
GuiEscape:
GuiClose:
ExitApp
