This script was created by T3D from EliteEvil forums.
You will need AutoHotKey (AHK)
Once installed copy paste this script into a text editor and save it with extension .ahk
Double click to launch AHK and the Script.
Enjoy
; -------------------------------------------------------------------------------------------------------------------------------------------------- .
; ----------------------- B A T T L E F I E L D 2 I N F A N T R Y & C H O P P E R ----------------------- :
; -------------------------------------------------------------------------------------------------------------------------------------------------- '
#MaxHotkeysPerInterval 999
#SingleInstance force
#InstallMouseHook
#InstallKeybdHook
#NoEnv
KeepRunning:
WinGet, szProcessName, ProcessName, A
if szProcessName = bf2.exe
{
Suspend, off
}
else
{
Suspend, toggle
}
return
; ---------------------------------------------------------------------------- .
; ------------------- S C R I P T O N / O F F ----------------- :
; ---------------------------------------------------------------------------- '
$\::
Suspend, Toggle
If toggle != 1
{
toggle := 1
SoundBeep 333
SoundBeep 444
SoundBeep 555
}
else
{
toggle := 0
SoundBeep 555
SoundBeep 444
SoundBeep 222
}
return
; ----------------------------------------------------------------------------- .
; ------------------ I N F A N T R Y M O D E ------------------- :
; ----------------------------------------------------------------------------- '
$[::
Hotkey, $H, On
Hotkey, $Y, On
Hotkey, MButton, On
Hotkey, LButton, On
Hotkey, XButton1, Off
Hotkey, Space, Off
Hotkey, WheelUp, Off
Hotkey, WheelDown, Off
Goto, Infantry
return
; ----------------------------------------------------------------------------- .
; ------------------- C H O P P E R M O D E -------------------- :
; ----------------------------------------------------------------------------- '
$]::
Hotkey, $H, Off
Hotkey, $Y, Off
Hotkey, MButton, Off
Hotkey, LButton, On
Hotkey, XButton1, On
Hotkey, Space, On
Hotkey, WheelUp, On
Hotkey, WheelDown, On
Goto, Chopper
return
; ---------------------------------------------------------------------------- .
; ---------- A U T O C L I C K E R O N / O F F ---------- :
; ---------------------------------------------------------------------------- '
$=::
Hotkey, ~LButton, toggle
If toggle != 1
{
toggle := 1
SoundBeep
}
else
{
toggle := 0
SoundBeep
SoundBeep
}
return
; ------------------------------------------------------------------------------------------------------------------------ .
; ------------------------------- S O U N D P L A Y I N F A N T R Y -------------------------------- :
; ------------------------------------------------------------------------------------------------------------------------ '
Infantry:
TEMPFILE = %TEMP%\TALK.vbs
IfExist, %TEMPFILE%
FileDelete, %TEMPFILE%
FileAppend, Dim Talk`nSet Talk = WScript.CreateObject("SAPI.SpVoice")`nTalk.Speak "INFANTRY", %TEMPFILE%
Sleep, 30
RunWait, %TEMPFILE%
return
; ----------------------------------------------------------------------------- .
; -------------------------- JUMP/PRONE SPAM -------------------------- :
; ----------------------------------------------------------------------------- '
~$H::
Hotkey, LButton, On
{
Loop
{
Send, {Space Down}
Sleep 30
Send, {Space Up}
Sleep 300
Send, {Z Down}
Sleep 30
Send, {Z Up}
Sleep 450
Send, {LCtl Down}
Sleep 30
Send, {LCtr Up}
Sleep 800
GetKeyState, HState, H, T
IF HState = D
{
continue
}
GetKeyState, HState, H, T
IF HState = U
{
break
}
}
}
return
; -----------------------------------------------------------------------------.
; -------------------------------- DROP ITEM ----------------------------- :
; -----------------------------------------------------------------------------'
$Y::
Send, {5 down}
Sleep 30
Send, {5 up}
Sleep 1000
MouseClick, Left,,, 1, 0, D
Sleep, 30
MouseClick, Left,,, 1, 0, U
Sleep 30
Send, {3 down}
Sleep 30
Send, {3 up}
return
; ----------------------------------------------------------------------------- .
; ---------------------------- QUICK ENEMY SPOT -------------------------- :
; ----------------------------------------------------------------------------- '
$MButton::
Send, {Q Down}
Sleep 40
MouseClick, Left, , , , , D
sleep 40
MouseClick, Left, , , , , U
Send, {Q Up}
return
; ----------------------------------------------------------------------------- .
; ------------------------------- AUTO CLICKER --------------------------- :
; ----------------------------------------------------------------------------- '
~LButton::
Loop
{
if (GetKeyState("LButton", "P") = 0)
{
break
}
else
{
MouseClick, left,,, 1, 0, D
Sleep, 30
MouseClick, left,,, 1, 0, U
Sleep 30
}
}
return
; ------------------------------------------------------------------------------------------------------------------------ .
; -------------------------------- S O U N D P L A Y C H O P P E R --------------------------------- :
; ------------------------------------------------------------------------------------------------------------------------ '
Chopper:
TEMPFILE = %TEMP%\TALK.vbs
IfExist, %TEMPFILE%
FileDelete, %TEMPFILE%
FileAppend, Dim Talk`nSet Talk = WScript.CreateObject("SAPI.SpVoice")`nTalk.Speak "CHOPPER", %TEMPFILE%
Sleep, 30
RunWait, %TEMPFILE%
return
; ----------------------------------------------------------------------------- .
; --------------------- PILOT/GUNNER SWITCH : TVGM ----------------- :
; ----------------------------------------------------------------------------- '
~XButton1::
Send {F2 down}
Sleep 30
Send {F2 up}
MouseClick, Right,,, 1, 0, D
Sleep, 30
MouseClick, Right,,, 1, 0, U
Sleep 50
MouseClick, Left,,, 1, 0, D
Sleep, 30
MouseClick, Left,,, 1, 0, U
{
Loop
{
MouseClick, Left,,, 1, 0, D
Sleep, 30
MouseClick, Left,,, 1, 0, U
Sleep 30
GetKeyState, XButton1State, XButton1, P
If XButton1State = D
{
continue
}
GetKeyState, XButton1State, XButton1, T
IF XButton1State = U
{
break
}
}
}
Sleep 50
Send {F1 down}
Sleep 30
Send {F1 up}
Sleep 30
Send {F8 down}
Sleep 30
Send {F8 up}
return
; ----------------------------------------------------------------------------- .
; ------------------- PILOT/GUNNER SWITCH : CANNON ----------------- :
; ----------------------------------------------------------------------------- '
~Space::
Send {F2 down}
Sleep 30
Send {F2 up}
Sleep 30
Send {F8 down}
Sleep 30
Send {F8 up}
Loop
{
GetKeyState, SpaceState, Space, P
If SpaceState = U
break
MouseClick, Left,,, 1, 0, D
}
MouseClick, Left,,, 1, 0, U
Sleep 30
Send {F1 down}
Sleep 30
Send {F1 up}
Send {F8 down}
Sleep 30
Send {F8 up}
return
; ----------------------------------------------------------------------------- .
; -------------------------------- COMMO ROSE ----------------------------- :
; ----------------------------------------------------------------------------- '
$WheelUp::
Send, {Q Down}
Sleep 3000
Send, {Q Up}
return
; ----------------------------------------------------------------------------- .
; --------------- TOGGLE : FLY-BY/CHASE-REAR/COCKPIT -------------- :
; ----------------------------------------------------------------------------- '
$WheelDown::
Send, {F11 down}
Sleep 30
Send, {F11 up}
Sleep 300
Send, {F10 down}
Sleep 30
Send, {F10 up}
Sleep 300
Send, {F8 down}
Sleep 30
Send, {F8 up}
Sleep 30
Send, {F8 down}
Sleep 30
Send, {F8 up}
return
; -------------------------------------------------------------------------------------------------------------------------------------------------- .
; ----------------------- B A T T L E F I E L D 2 I N F A N T R Y & C H O P P E R ----------------------- :
; -------------------------------------------------------------------------------------------------------------------------------------------------- '