Overjoint modified source

; <COMPILER: v1.1.25.01>
#SingleInstance, Force
#Persistent
#NoEnv
#Warn
SendMode, Input
SetWorkingDir, %A_ScriptDir%
Application := {Name: "UPDATED", Version: "1"}
Window := {Width: 600, Height: 400, Title: Application.Name}
Navigation := {Label: ["Aim Key", "Aim Settings", "Aim Speed", "FoV Range", "Pause Settings", "---", "Help", "---"]}
Box_Init(C="FF0000") {
Gui, 96: -Caption +ToolWindow +E0x20
Gui, 96: Color, % C
Gui, 97: -Caption +ToolWindow +E0x20
Gui, 97: Color, % C
Gui, 98: -Caption +ToolWindow +E0x20
Gui, 98: Color, % C
Gui, 99: -Caption +ToolWindow +E0x20
Gui, 99: Color, % C
}
Box_Draw(X, Y, W, H, T="1", O="I") {
If(W < 0)
X += W, W *= -1
If(H < 0)
Y += H, H *= -1
If(T >= 2)
{
If(O == "O")
X -= T, Y -= T, W += T, H += T
If(O == "C")
X -= T / 2, Y -= T / 2
If(O == "I")
W -= T, H -= T
}
Gui, 96: Show, % "x" X " y" Y " w" W " h" T " NA", Horizontal 1
Gui, 96:+AlwaysOnTop
Gui, 98: Show, % "x" X " y" Y + H " w" W " h" T " NA", Horizontal 2
Gui, 98:+AlwaysOnTop
Gui, 97: Show, % "x" X " y" Y " w" T " h" H " NA", Vertical 1
Gui, 97:+AlwaysOnTop
Gui, 99: Show, % "x" X + W " y" Y " w" T " h" H " NA", Vertical 2
Gui, 99:+AlwaysOnTop
}
Box_Destroy() {
Loop, 4
Gui, % A_Index + 95 ":  Destroy"
}
Box_Hide() {
Loop, 4
Gui, % A_Index + 95 ":  Hide"
}
Box_Init_Target(C="FF0000") {
Gui, 90: -Caption +ToolWindow +E0x20
Gui, 90: Color, % C
Gui, 91: -Caption +ToolWindow +E0x20
Gui, 91: Color, % C
Gui, 92: -Caption +ToolWindow +E0x20
Gui, 92: Color, % C
Gui, 93: -Caption +ToolWindow +E0x20
Gui, 93: Color, % C
}
Box_Draw_Target(X, Y, W, H, T="1", O="I") {
If(W < 0)
X += W, W *= -1
If(H < 0)
Y += H, H *= -1
If(T >= 2)
{
If(O == "O")
X -= T, Y -= T, W += T, H += T
If(O == "C")
X -= T / 2, Y -= T / 2
If(O == "I")
W -= T, H -= T
}
Gui, 90: Show, % "x" X " y" Y " w" W " h" T " NA", Horizontal 1
Gui, 90:+AlwaysOnTop
Gui, 92: Show, % "x" X " y" Y + H " w" W " h" T " NA", Horizontal 2
Gui, 92:+AlwaysOnTop
Gui, 91: Show, % "x" X " y" Y " w" T " h" H " NA", Vertical 1
Gui, 91:+AlwaysOnTop
Gui, 93: Show, % "x" X + W " y" Y " w" T " h" H " NA", Vertical 2
Gui, 93:+AlwaysOnTop
}
Box_Destroy_Target() {
Loop, 4
Gui, % A_Index + 89 ":  Destroy"
}
Box_Hide_Target() {
Loop, 4
Gui, % A_Index + 89 ":  Hide"
}
Box_Show_Target() {
Loop, 4
Gui, % A_Index + 89 ":  Show"
}
inicount := 9
fileread,settings,settings.ini
stringsplit,settings,settings,`n
if !(fileexist("settings.ini")) || (settings0-3 != inicount){
iniread,sen_Short,settings.ini,settings,senShort, 5
iniread,sen_Long,settings.ini,settings,senLong, 6
iniread,Fov_X,settings.ini,settings,FovX, 2
iniread,Fov_Y,settings.ini,settings,FovY, 2
iniread,AimShort_X,settings.ini,settings,AimShortX, 58
iniread,AimShort_Y,settings.ini,settings,AimShortY, 85
iniread,AimLong_X,settings.ini,settings,AimLongX, 40
iniread,AimLong_Y,settings.ini,settings,AimLongY, 70
}
Menu, Tray, Icon, Shell32.dll, 175
Menu, Tray, Tip, % Application.Name
Menu, Tray, NoStandard
Gui, +LastFound -Resize +HwndhGui1
Gui, Color, FFFFFF
Gui, Add, Tab2, % " x" -999999 " y" -999999 " w" 0 " h" 0 " -Wrap +Theme vTabControl", % ""
Gui, Tab
Gui, Add, Picture, % "x" -999999 " y" -999999 " w" 4 " h" 32 " vpMenuHover +0x4E +HWNDhMenuHover",
Gui, Add, Picture, % "x" 0 " y" 18 " w" 4 " h" 32 " vpMenuSelect +0x4E +HWNDhMenuSelect",
Gui, Font, s9 c808080, Segoe UI
Loop, % Navigation.Label.Length() {
GuiControl,, TabControl, % Navigation.Label[A_Index] "|"
If (Navigation.Label[A_Index] = "---") {
Continue
}
Gui, Add, Text, % "x" 18 " y" (32*A_Index)-14 " h" 32 " +0x200 gMenuClick vMenuItem" . A_Index, % Navigation.Label[A_Index]
Gui, Add, Text, x18 y280 w150, [F1] To Start
Gui, Add, Text, x18 y300 h150, [F2] To Reload
}
Gui, Font
Gui, Font, s11 c000000, Segoe UI
Gui, Add, Text, % "x" 192 " y" 18 " w" (Window.Width-192)-14 " h" 32 " +0x200 vPageTitle", % ""
Gui, Font
Gui, Add, Picture, % "x" 192 " y" 50 " w" (Window.Width-192)-14 " h" 1 " +0x4E +HWNDhDividerLine",
Gui, Tab, 1
Gui, Add, Checkbox, x192 y60 w150 vaimtype, Left Mouse Button
Gui, Add, Checkbox, x192 y80 w150 vaimtype1, Right Mouse Button
Gui, Add, Checkbox, x192 y100 w150 vaimtype3, Mouse Button 4
Gui, Add, Checkbox, x192 y120 w150 vaimtype4, Mouse Button 5
Gui, Add, Checkbox, x192 y140 w150 vaimtype5, Middle Mouse Button
Gui, Add, ActiveX, x192 y200 w308 h200, mshtml:<img src='http://i.imgur.com/k88k6dd.png' />
Gui, Tab, 2
Gui, Add, Text, % "x" 192 " y" 66 " w" (Window.Width-192)-14, % "Short Range -"
Gui, Add, Text, % "x" 272 " y" 66 " w" (Window.Width-192)-14, % "X:"
Gui, Add, Edit, x292 y61 w30 vxa, % AimShort_X
Gui, Add, Text, % "x" 342 " y" 66 " w" (Window.Width-192)-14, % "Y:"
Gui, Add, Edit, x362 y61 w30 vxy, % AimShort_Y
Gui, Add, Text, % "x" 192 " y" 106 " w" (Window.Width-192)-14, % "Long Range -"
Gui, Add, Text, % "x" 272 " y" 106 " w" (Window.Width-192)-14, % "X:"
Gui, Add, Edit, x292 y101 w30 vxxa, % AimLong_X
Gui, Add, Text, % "x" 342 " y" 106 " w" (Window.Width-192)-14, % "Y:"
Gui, Add, Edit, x362 y101 w30 vxxy, % AimLong_Y
Gui, Add, ActiveX, x192 y200 w308 h200, mshtml:<img src='http://i.imgur.com/k88k6dd.png' />
Gui, Tab, 3
Gui, Add, Text, % "x" 192 " y" 66 " w" (Window.Width-192)-14, % "Short Range Speed -"
Gui, Add, Edit, x302 y61 w30 vrx, % sen_Short
Gui, Add, Text, % "x" 192 " y" 106 " w" (Window.Width-192)-14, % "Long Range Speed -"
Gui, Add, Edit, x302 y101 w30 vrxl, % sen_Long
Gui, Add, ActiveX, x192 y200 w308 h200, mshtml:<img src='http://i.imgur.com/k88k6dd.png' />
Gui, Tab, 4
Gui, Add, Text, % "x" 192 " y" 66 " w" (Window.Width-192)-14, % "X - Axis :"
Gui, Add, Edit, x302 y61 w30 vxrange, % Fov_X
Gui, Add, Text, % "x" 192 " y" 106 " w" (Window.Width-192)-14, % "Y - Axis :"
Gui, Add, Edit, x302 y101 w30 vyrange, % Fov_Y
Gui, Add, Text, % "x" 192 " y" 150 " w" (Window.Width-192)-14, % "Lower the Number Larger the FoV"
Gui, Add, ActiveX, x192 y200 w308 h200, mshtml:<img src='http://i.imgur.com/k88k6dd.png' />
Gui, Tab, 5
Gui, Add, Text, % "x" 192 " y" 66 " w" (Window.Width-192)-14, % "Here you can select your own Pause key,"
Gui, Add, Text, % "x" 192 " y" 86 " w" (Window.Width-192)-14, % "Please Note: You have to use a Key combo"
Gui, Add, Text, % "x" 192 " y" 106 " w" (Window.Width-192)-14, % "For Example: ALT+A"
Gui, Add, Hotkey, x192 y135 w45 h20 vHK gPauseKey,
Gui, Show,,Dynamic Hotkeys
Gui, Add, ActiveX, x192 y200 w308 h200, mshtml:<img src='http://i.imgur.com/k88k6dd.png' />
Gui, Tab, 6
Gui, Tab, 7
Gui, Add, Link, x192 y66, Need help? `n`nSet to Windowless, `n`nIf your problem is not solved: Disable aero and remember to press F1
Gui, Add, ActiveX, x192 y200 w308 h200, mshtml:<img src='http://i.imgur.com/k88k6dd.png' />
Gui, Tab, 8
Gui, Show, % " w" Window.Width " h" Window.Height, % Window.Title
GoSub, OnLoad
return
OnLoad:
SetPixelColor("4C4C4C", hMenuHover)
SetPixelColor("0E0C0D", hMenuSelect)
SetPixelColor("0E0C0D", hDividerLine)
SelectMenu("MenuItem1")
OnMessage(0x200, "WM_MOUSEMOVE")
return
MenuClick:
SelectMenu(A_GuiControl)
return
SelectMenu(Control) {
Global
CurrentMenu := Control
Loop, % Navigation.Label.Length() {
SetControlColor("808080", Navigation.Label[A_Index])
}
SetControlColor("000000", Control)
GuiControl, Move, pMenuSelect, % "x" 0 " y" (32*SubStr(Control, 9, 2))-14 " w" 4 " h" 32
GuiControl, Choose, TabControl, % SubStr(Control, 9, 2)
GuiControl,, PageTitle, % Navigation.Label[SubStr(Control, 9, 2)]
}
WM_MOUSEMOVE(wParam, lParam, Msg, Hwnd) {
Global
If (InStr(A_GuiControl, "MenuItem") = true && A_GuiControl != CurrentMenu) {
GuiControl, Move, pMenuHover, % "x" 0 " y" (32*SubStr(A_GuiControl, 9, 2))-14 " w" 4 " h" 32
} Else If (InStr(A_GuiControl, "MenuItem") = false || A_GuiControl = CurrentMenu) {
GuiControl, Move, pMenuHover, % "x" -999999 " y" -999999 " w" 4 " h" 32
}
}
SetControlColor(Color, Control) {
Global
GuiControl, % "+c" Color, % Control
GuiControlGet, ControlText,, % Control
GuiControlGet, ControlHandle, Hwnd, % Control
DllCall("SetWindowText", "Ptr", ControlHandle, "Str", ControlText)
}
SetPixelColor(Color, Handle) {
VarSetCapacity(BMBITS, 4, 0), Numput("0x" . Color, &BMBITS, 0, "UInt")
hBM := DllCall("Gdi32.dll\CreateBitmap", Int, 1, Int, 1, UInt, 1, UInt, 24, Ptr, 0)
hBM := DllCall("User32.dll\CopyImage", Ptr, hBM, UInt, 0, Int, 0, Int, 0, UInt, 0x2008)
DllCall("Gdi32.dll\SetBitmapBits", Ptr, hBM, UInt, 3, Ptr, &BMBITS)
return DllCall("User32.dll\SendMessage", Ptr, Handle, UInt, 0x172, Ptr, 0, Ptr, hBM)
}
F1::
#Persistent
#KeyHistory, 0
#NoEnv
#HotKeyInterval 1
#MaxHotkeysPerInterval 2511
#InstallKeybdHook
#UseHook
#SingleInstance, Force
SetKeyDelay,-1, 8
SetControlDelay, -1
SetMouseDelay, 0
SetWinDelay,-1
SendMode, InputThenPlay
SetBatchLines,-1
ListLines, Off
CoordMode, Mouse, client
PID := DllCall("GetCurrentProcessId")
Process, Priority, %PID%, Normal
ZeroX := 960
ZeroY := 540
CFovX := 80
CFovY := 200
ScanL := 660
ScanR := 1250
ScanT := 280
ScanB := 610
GuiControlget, rX
GuiControlget, xa
GuiControlget, ya
GuiControlget, xrange
GuiControlget, yrange
Loop, {
Gui,Submit, Nohide
if (aimtype=1)
{
GetKeyState, Mouse2, LButton, P
GoSub MouseMoves2
}
if (aimtype1=1)
{
GetKeyState, Mouse2, RButton, P
GoSub MouseMoves2
}
if (aimtype3=1)
{
GetKeyState, Mouse2, XButton1, P
GoSub MouseMoves2
}
if (aimtype4=1)
{
GetKeyState, Mouse2, XButton2, P
GoSub MouseMoves2
}
if (aimtype5=1)
{
GetKeyState, Mouse2, MButton, P
GoSub MouseMoves2
}
imageSearch, AimPixelX, AimPixelY, 0 + (A_Screenwidth * (xrange/10)), 0 + (A_Screenheight * (yrange/10)), A_Screenwidth - (A_Screenwidth * (xrange/10)), A_Screenheight - (A_Screenheight * (yrange / 10)),  *4 hhp2.bmp
GoSub GetAimOffset1
GoSub GetAimMoves1
if(ErrorLevel = 1){
imageSearch, AimPixelX, AimPixelY, 0 + (A_Screenwidth * (xrange/10)), 0 + (A_Screenheight * (yrange/10)), A_Screenwidth - (A_Screenwidth * (xrange/10)), A_Screenheight - (A_Screenheight * (yrange / 10)),  *4 hhp.bmp
GoSub GetAimOffset2
GoSub GetAimMoves1
}
}
MouseMoves2:
If ( Mouse2 == "D" ) {
DllCall("mouse_event", uint, 1, int, MoveX, int, MoveY, uint, 0, int, 0)
}
Return
MouseMoves11:
If ( Mouse2 == "U" ) {
DllCall("mouse_event", uint, 1, int, MoveX, int, MoveY, uint, 0, int, 0)
}
GetAimOffset1:
Gui,Submit, Nohide
AimX := AimPixelX - ZeroX +xa
AimY := AimPixelY - ZeroY +xy
If ( AimX+5 > 0) {
DirX := rx / 10
}
If ( AimX+5 < 0) {
DirX := (-rx) / 10
}
If ( AimY+2 > 0 ) {
DirY := rX /10 *0.5
}
If ( AimY+2 < 0 ) {
DirY := (-rx) /10 *0.5
}
AimOffsetX := AimX * DirX
AimOffsetY := AimY * DirY
Return
GetAimOffset2:
Gui,Submit, Nohide
AimX := AimPixelX - ZeroX +xxa
AimY := AimPixelY - ZeroY +xxy
If ( AimX+5 > 0) {
DirX := rxl / 10
}
If ( AimX+5 < 0) {
DirX := (-rxl) / 10
}
If ( AimY+2 > 0 ) {
DirY := rxl /10 *0.5
}
If ( AimY+2 < 0 ) {
DirY := (-rxl) /10 *0.5
}
AimOffsetX := AimX * DirX
AimOffsetY := AimY * DirY
Return
GetAimMoves1:
RootX := Ceil(( AimOffsetX ** ( 1 )))
RootY := Ceil(( AimOffsetY ** ( 1 )))
MoveX := RootX * DirX * 2
MoveY := RootY * DirY * 2
Return
reload:
SleepF1:
SleepDuration = 1
TimePeriod = 1
DllCall("Winmm\timeBeginPeriod", uint, TimePeriod)
Iterations = 1
StartTime := A_TickCount
Loop, %Iterations% {
DllCall("Sleep", UInt, TimePeriod)
}
DllCall("Winmm\timeEndPeriod", UInt, TimePeriod)
Return
DebugTool1:
MouseGetPos, MX, MY
ToolTip, %AimOffsetX% | %AimOffsetY%
ToolTip, %AimX% | %AimY%
ToolTip, %IntAimX% | %IntAimY%
ToolTip, %RootX% | %RootY%
ToolTip, %MoveX% | %MoveY% || %MX% %MY%
Return
PauseKey:
If HK in +,^,!,+^,+!,^!,+^!
return
Gui, Submit, NoHide
If StrLen(HK) = 1
HK := "~" HK
Hotkey, %HK%, NewPauseKey, On
savedHK := HK
return
NewPauseKey:
pause,toggle,1
{
if(A_IsPaused=0)
{
Gui, Add, Text, % "x" (Window.Width-170)-10 " y" (Window.Height-24)-10 " w" 80 " h" 24, % "Hack Running"
Soundbeep
}
if(A_IsPaused=0)
{
Gui, Add, Text, % "x" (Window.Width-170)-10 " y" (Window.Height-24)-10 " w" 80 " h" 24, % "Hack Running"
Soundbeep
}
}
if(A_IsPaused=1)
{
Gui, Add, Text, % "x" (Window.Width-170)-10 " y" (Window.Height-24)-10 " w" 80 " h" 24, % "Hack Paused"
Soundbeep
}
if(A_IsPaused=1)
{
Gui, Add, Text, % "x" (Window.Width-170)-10 " y" (Window.Height-24)-10 " w" 80 " h" 24, % "Hack Paused"
Soundbeep
}
return
F2::
Reload
GuiClose:
gui,submit
iniwrite,%rx%,settings.ini,settings,senShort
iniwrite,%rxl%,settings.ini,settings,senLong
iniwrite,%xrange%,settings.ini,settings,FovX
iniwrite,%yrange%,settings.ini,settings,FovY
iniwrite,%xa%,settings.ini,settings,AimShortX
iniwrite,%xy%,settings.ini,settings,AimShortY
iniwrite,%xxa%,settings.ini,settings,AimLongX
iniwrite,%xxy%,settings.ini,settings,AimLongY
ExitApp