33% found this document useful (3 votes)
3K views3 pages

Aimbot Ahk

This document provides a summary of a multi-tool program created for the game H1Z1. It includes sections for initializing settings, creating a dynamic hotkey, populating a GUI, showing startup messages, configuring aim assist settings based on hex color values, detecting pixel color values within a search area, adjusting aim based on pixel detection, toggling suspension of the program, and changing values via the GUI.

Uploaded by

Levi Goessling
Copyright
© © All Rights Reserved
We take content rights seriously. If you suspect this is your content, claim it here.
Available Formats
Download as TXT, PDF, TXT or read online on Scribd
33% found this document useful (3 votes)
3K views3 pages

Aimbot Ahk

This document provides a summary of a multi-tool program created for the game H1Z1. It includes sections for initializing settings, creating a dynamic hotkey, populating a GUI, showing startup messages, configuring aim assist settings based on hex color values, detecting pixel color values within a search area, adjusting aim based on pixel detection, toggling suspension of the program, and changing values via the GUI.

Uploaded by

Levi Goessling
Copyright
© © All Rights Reserved
We take content rights seriously. If you suspect this is your content, claim it here.
Available Formats
Download as TXT, PDF, TXT or read online on Scribd
You are on page 1/ 3

;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

You might also like