핵커의 프로그래밍 세상

guif:

#NoEnv

#SingleInstance force

SkinForm(Apply, A_ScriptDir . "\USkin.dll", A_ScriptDir . "\Milikymac.msstyles")

Gui, Add, Text, x12 y40 w200 h30 , 오토에임 시작[F2]

Gui, Add, Text, x12 y60 w200 h30 , 프로그램 재시작[F3]

Gui, Add, Text, x12 y80 w200 h30 , 일시정지/해제[ALT]

 

Gui, Add, CheckBox, x292 y25 w150 h40 vaimtype Checked, 좌클릭 오토에임

Gui, Add, CheckBox, x292 y55 w150 h40 vaimtype1, 우클릭 오토에임

Gui, Add, Text, x230 y115 w80 h30 , 에임 속도

Gui, Add, Edit, x300 y110 w30 h20 vrx, 20

Gui, Add, Text, x230 y150 w80 h40 , 영점 조정

Gui, Add, Text, x230 y175 w80 h40 , x축 :

Gui, Add, Edit, x260 y170 w30 h20 vxa, 40

Gui, Add, Text, x300 y175 w80 h40 , y축 :

Gui, Add, Edit, x330 y170 w30 h20 vxy, 57

Gui, Add, Text, x230 y205 w80 h40 , 인식 범위

Gui, Add, Text, x230 y230 w80 h40 , x축 :

Gui, Add, Slider, x260 y225 w130 h25 vxrange Invert Tickinterval1 range1-4, 4

Gui, Add, Text, x230 y260 w80 h40 , y축 :

Gui, Add, Slider, x260 y255 w130 h25 vyrange Invert Tickinterval1 range1-4, 4

 

 

 

Gui, Show

Loop {

Gui, Submit, NoHide

Sleep -1

}

Return

 

#If

return

 

 

mouseXY(x,y)

{

DllCall("mouse_event",int,1,int,x,int,y,uint,0,uint,0)

}

#If

return

 

GuiClose:

ExitApp

return

SkinForm(Param1 = "Apply", DLL = "", SkinName = ""){

if(Param1 = Apply){

DllCall("LoadLibrary", str, DLL)

DllCall(DLL . "\USkinInit", Int,0, Int,0, AStr, SkinName)

}else if(Param1 = 0){

DllCall(DLL . "\USkinExit")

}

}

Change1:

MsgBox, Applied

Gui,Submit, Nohide

return

 

 

F2::

#Persistent

#KeyHistory, 0

#NoEnv

#HotKeyInterval 1

#MaxHotkeysPerInterval 127

#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 := 800

ZeroY := 440

CFovX := 760

CFovY := 400

 

ScanL := ZeroX - CFovX

ScanR := ZeroX + CFovX

ScanT := ZeroY - CFovY

ScanB := ZeroY + CFovY

 

GuiControlget, rX

GuiControlget, xA

GuiControlget, yA

GuiControlget, xrange

GuiControlget, yrange

 

 

 

Loop,

 

{

if (aimtype=1)

{

GetKeyState, Mouse2, LButton, P

GoSub MouseMoves2

}

 

Gui,Submit, Nohide

if (aimtype1=1)

{

GetKeyState, Mouse2, RButton, 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 hhp.bmp

GoSub GetAimOffset

GoSub GetAimMoves

 

}

 

MouseMoves:

If ( Mouse2 == "D" ) {

DllCall("mouse_event", uint, 1, int, MoveX, int, MoveY, uint, 0, int, 0)

}

Return

 

MouseMoves1:

If ( Mouse2 == "U" ) {

DllCall("mouse_event", uint, 1, int, MoveX, int, MoveY, uint, 0, int, 0)

}

Return

 

MouseMoves2:

If ( Mouse2 == "D" ) {

DllCall("mouse_event", uint, 1, int, MoveX, int, MoveY, uint, 0, int, 0)

}

GetAimOffset:

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

GetAimMoves:

RootX := Ceil(( AimOffsetX ** ( 1/2 )))

RootY := Ceil(( AimOffsetY ** ( 1/2 )))

MoveX := RootX * DirX

MoveY := RootY * DirY

Return

SleepF:

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

DebugTool:

MouseGetPos, MX, MY

ToolTip, %AimOffsetX% | %AimOffsetY%

ToolTip, %AimX% | %AimY%

ToolTip, %IntAimX% | %IntAimY%

ToolTip, %RootX% | %RootY%

ToolTip, %MoveX% | %MoveY% || %MX% %MY%

Return

 

DebugTool1:

MouseGetPos, MX, MY

ToolTip, %AimOffsetX% | %AimOffsetY%

ToolTip, %AimX% | %AimY%

ToolTip, %IntAimX% | %IntAimY%

ToolTip, %RootX% | %RootY%

ToolTip, %MoveX% | %MoveY% || %MX% %MY%

Return

ALT::

pause

SoundBEEP

return

F3::

Reload

Return