View Single Post

Old 2009-01-12, 16:20   #37 (permalink)
puremagik
ArtificialAiming User
 
puremagik is offline
Join Date: Jan 2007
Location: Charlotte NC
Posts: 347
Quote:
Originally Posted by jasonsdoorn View Post
where to put the script?

i'm getting an anti virus message when trying to open the exe. 1.31 hitfixer...
save the text version as an .ahk script. You dont want to run the exe in game anyway.


<AutoHotKey Script>


#NoEnv
SendMode Input
#Singleinstance Force
#NoTrayIcon








Gui, font, s8 italic, Arial
Gui, Add, Text, x17 y12, Leave this window open while playing BF2
Gui, font, s8 norm, Arial
Gui, Add, Text, x35 y28,
(
1. In Battlefield press tilde (~) to show console
2. Press the CONTROL and ZERO keys
3. Type ping and press enter
4. Done! Press tilde (~) again to hide console
)

Gui, Add, Button, x116 y110 w70 gQuitScript, Exit
Gui, Add, Button, x190 y110 w20 gLaunchHelp, ?
Gui, Show, w320 h144 x200 y150, Battlefield HitFixer 1.3
return




~LCtrl & Numpad0::
~LCtrl & 0::

WinGet, szProcessName, ProcessName, A
if szProcessName != bf2.exe
{
return
}

Sleep 50
Send,TYPE PING THEN HIT ENTER{Space}{Space}
Input, PingVar, T10 V,{Enter}{Esc}

if (ErrorLevel = "EndKey:Escape")
{
Send,{Space}(OPERATION CANCELLED){ENTER}
return
}
if !(PingVar < 1000 and PingVar > 0)
{
Send,PLEASE TRY AGAIN AND ENTER A NUMBER BETWEEN 1 AND 999.{ENTER}
return
}
if PingVar is not digit
{
Send,PLEASE TRY AGAIN AND ENTER A NUMBER BETWEEN 1 AND 999.{ENTER}
return
}

PingVar += 7
Temp01 := PingVar / 1000
Temp02 := PingVar * 12
Send {Enter}
Send,SettingsManager.floatSet GSDefaultLatencyCompensation %Temp01% {Enter}
Sleep 20
Send,SettingsManager.U32Set GSExtrapolationTime{Space} %Temp02% {Enter}
Sleep 20
Send,SettingsManager.U32Set GSInterpolationTime{Space} %PingVar% {Enter}

Sleep 50
Send {Shift Up}
Send {Alt Up}
return




~Lctrl & 7::

GetKeyState, FireApp, LAlt
if FireApp = U
return

WinGet, szProcessName, ProcessName, A
if szProcessName != bf2.exe
{
return
}

Sleep 50
Send,SettingsManager.floatSet GSDefaultLatencyCompensation 0.0

Send {Shift Up}
Send {Alt Up}
return


~Lctrl & 8::

GetKeyState, FireApp, LAlt
if FireApp = U
return

WinGet, szProcessName, ProcessName, A
if szProcessName != bf2.exe
{
return
}

Sleep 50
Send,SettingsManager.U32Set GSExtrapolationTime{Space}

Sleep 50
Send {Shift Up}
Send {Alt Up}
return


~Lctrl & 9::

GetKeyState, FireApp, LAlt
if FireApp = U
return

WinGet, szProcessName, ProcessName, A
if szProcessName != bf2.exe
{
return
}

Sleep 50
Send,SettingsManager.U32Set GSInterpolationTime{Space}

Sleep 50
Send {Shift Up}
Send {Alt Up}
return




LaunchHelp:
Run http://img66.imageshack.us/img66/2879/tutorial01xu3.jpg
return


GuiClose:
QuitScript:
ExitApp
return

Last edited by puremagik : 2009-01-12 at 16:26.
  Reply With Quote