#NoEnv
SendMode Input


;;;;;;;;;;;;;;Based on your weapon of choice modify the following values;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;The current values work perfectly with a Spar 16 in Project Argo ;;;;;;;;;;;;;;;;;;;;;;;

HipAttack = 0.0290;
Scope1Attack = 0.00500;
Scope2Attack = 0.00060;




;;;;;;;;;;;;;;DO NOT MODIFY BELOW THIS LINE;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;UNLESS YOU KNOW WHAT YOU ARE DOING;;;;;;;;;;;;;;;;;;;;;

~LButton::
GetKeyState, State, RButton
if State = U
reduce(HipAttack)
    else
reduce_scoped(Scope1Attack)
;reduce_scoped(Scope2Attack); if you want to reduce recoil on a 2xScope, uncomment this line.
return

reduce(x){
while GetKeyState("LButton")
{

DllCall("mouse_event", uint, 1, int, 0, int, 1, uint, 0, int, 0)
DllCall("mouse_event", uint, 1, int, 0, int, 1, uint, 0, int, 0)
DllCall("mouse_event", uint, 1, int, 0, int, 1, uint, 0, int, 0)
DllCall("mouse_event", uint, 1, int, 0, int, 1, uint, 0, int, 0)
AccuSleep(x)
DllCall("mouse_event", uint, 1, int, 0, int, 1, uint, 0, int, 0)
DllCall("mouse_event", uint, 1, int, 0, int, 1, uint, 0, int, 0)
DllCall("mouse_event", uint, 1, int, 0, int, 1, uint, 0, int, 0)
DllCall("mouse_event", uint, 1, int, 0, int, 1, uint, 0, int, 0)
AccuSleep(x)
DllCall("mouse_event", uint, 1, int, -1, int, 0, uint, 0, int, 0)
DllCall("mouse_event", uint, 1, int, 1, int, 0, uint, 0, int, 0)
DllCall("mouse_event", uint, 1, int, -2, int, 0, uint, 0, int, 0)
DllCall("mouse_event", uint, 1, int, 1, int, 0, uint, 0, int, 0)
DllCall("mouse_event", uint, 1, int, 1, int, 0, uint, 0, int, 0)
DllCall("mouse_event", uint, 1, int, 0, int, 0, uint, 0, int, 0)
AccuSleep(x)
DllCall("mouse_event", uint, 1, int, -1, int, 0, uint, 0, int, 0)
DllCall("mouse_event", uint, 1, int, -1, int, 0, uint, 0, int, 0)
DllCall("mouse_event", uint, 1, int, +2, int, 0, uint, 0, int, 0)
DllCall("mouse_event", uint, 1, int, -1, int, 0, uint, 0, int, 0)
DllCall("mouse_event", uint, 1, int, -1, int, 0, uint, 0, int, 0)
DllCall("mouse_event", uint, 1, int, -1, int, 0, uint, 0, int, 0)
DllCall("mouse_event", uint, 1, int, +1, int, 0, uint, 0, int, 0)
AccuSleep(x)

}
Return
}

reduce_scoped(x){
while GetKeyState("LButton")
{

DllCall("mouse_event", uint, 1, int, 0, int, 1, uint, 0, int, 0)
DllCall("mouse_event", uint, 1, int, 0, int, 1, uint, 0, int, 0)
DllCall("mouse_event", uint, 1, int, 0, int, 1, uint, 0, int, 0)
DllCall("mouse_event", uint, 1, int, 0, int, 1, uint, 0, int, 0)
AccuSleep(x)
DllCall("mouse_event", uint, 1, int, 0, int, 1, uint, 0, int, 0)
DllCall("mouse_event", uint, 1, int, 0, int, 1, uint, 0, int, 0)
DllCall("mouse_event", uint, 1, int, 0, int, 1, uint, 0, int, 0)
DllCall("mouse_event", uint, 1, int, 0, int, 1, uint, 0, int, 0)
AccuSleep(x)
DllCall("mouse_event", uint, 1, int, -1, int, 0, uint, 0, int, 0)
DllCall("mouse_event", uint, 1, int, 1, int, 0, uint, 0, int, 0)
DllCall("mouse_event", uint, 1, int, -2, int, 0, uint, 0, int, 0)
DllCall("mouse_event", uint, 1, int, 1, int, 0, uint, 0, int, 0)
DllCall("mouse_event", uint, 1, int, 1, int, 0, uint, 0, int, 0)
DllCall("mouse_event", uint, 1, int, 0, int, 0, uint, 0, int, 0)

AccuSleep(x)

DllCall("mouse_event", uint, 1, int, -1, int, 0, uint, 0, int, 0)
DllCall("mouse_event", uint, 1, int, -1, int, 0, uint, 0, int, 0)
DllCall("mouse_event", uint, 1, int, +3, int, 0, uint, 0, int, 0)
DllCall("mouse_event", uint, 1, int, -1, int, 0, uint, 0, int, 0)
DllCall("mouse_event", uint, 1, int, -1, int, 0, uint, 0, int, 0)
DllCall("mouse_event", uint, 1, int, 0, int, 0, uint, 0, int, 0)
DllCall("mouse_event", uint, 1, int, 0, int, 0, uint, 0, int, 0)
AccuSleep(x)

}
Return
}


;;;;;;;;;;;accurate sleep fucntion from
;;;;;;;;;;;https://autohotkey.com/board/topic/70555-my-script-work-incorrectly-on-ahk-l/

AccuSleep( Seconds= 5000 ) { ;  High-Resolution Sleep,  accurate upto a millisecond
 Static Freq      ; By SKAN, www.autohotkey.com/forum/viewtopic.php?p=388198#388198
 _BatchLines := A_Batchlines ;  Created : 05-Oct-2010 | Last Modified : 24-08-2011c

 IfEqual,Freq,, SetEnv, ErrorLevel, % DllCall( "QueryPerformanceFrequency", Int64P,Freq )

 DllCall( "QueryPerformanceCounter",Int64P,T1 )
 If ( Seconds > 0.032 ) {
   Sleep %  ( Seconds - 0.016 ) * 1000
   DllCall( "QueryPerformanceCounter",Int64P,T2 ), Seconds := Seconds - ((T2-T1)/Freq)
 }
 SetBatchlines, -1
 DllCall( "QueryPerformanceCounter", Int64P,pTick ), cTick := pTick
 While( ( (Tick:=(pTick-cTick)/Freq)) < Seconds ) {
   DllCall( "QueryPerformanceCounter", Int64P,pTick )
   Sleep -1
 }
 DllCall( "QueryPerformanceCounter",Int64P,T3 )
 SetBatchlines, %_BatchLines%
Return Round( (T3-T1)/Freq,3 )
}

; accurate integer
accuInt(num) {
      Return (1-2*(num>>31)) * (2**((num>>23 & 255)-127)) * (1+(num & 8388607)/8388608)
}