请问有谁有按键游侠的自由幻想挂机脚本

'----------------打怪----------------
guaicode=HMEM.ReadMEMEX(Hwnd,bug,3)
If jnms="首招技能" Then
dlan2 = HMEM.ReadMEMEX(Hwnd,dlan,3)
Do While HMEM.ReadMEMEX(Hwnd,dlan,3) >= dlan2
HApp.SendKeyPress hwnd,"2"
Delay 425
Loop

End If

Do While guaicode<>0
If jnms="首招技能" Then
KeyPress "1" ,1
End If
If jnms="间隔技能" Then
'--------------施放技能1-------------
If GetTime-jn1>2 * 1000 Then
jn1=GetTime
KeyPress"1" ,1 '第一技能按键，我的是按键<1>
Delay 300
End If
'------------------------------------

'--------------施放技能2-------------
If GetTime-jn2>jn2Setup * 1000 Then
jn2=GetTime
KeyPress "2" ,1 '第二技能按键，我的是按键<2>
Delay 300
End If
'------------------------------------
End If

Call SupplyHP '补血
Call SupplyMP '补蓝

Delay 300
guaicode=HMEM.ReadMEMEX(Hwnd,bug,3)
If guaicode <> oldguaicode1 Then
oldguaicode1 = guaicode
tmpTime1 = GetTime
ElseIf (GetTime - tmpTime1) > dg_time * 1000 Then
Call zhaoguai()
guaicode = HMEM.ReadMEMEX(Hwnd,bug,3)
End If
If oldguaicode<>guaicode Then
oldguaicode=guaicode
Exit Do
End If
Loop
'-----------------------------------

Call CullArticle '拣东西

If newloop=0 Then
Call RenewVitality '运气回复
End If

Loop
End Sub