2技能,3防,4狼血,6治疗术,7红,8蓝.,支持自动修,不支持自动捡物.
如果大家有什么不懂的地方,一般情况下可以去R服二线密我,我的游戏名"Pipal"是SS
新建个文本文件,打开,把下边的源码复制进去,粘贴,保存,用按键导入即可!
[General]
Description=骑士挂机
BeginHotkey=122
BeginHotkeyMod=0
PauseHotkey=0
PauseHotkeyMod=0
StopHotkey=123
StopHotkeyMod=0
RunOnce=1
EnableWindow=
Enable=1
[Repeat]
Type=0
Number=1
[CallBack]
OnSetup=
[Comment]
Content=
[Script]
2技能,3防,4狼血,6治疗术,7红,8蓝.
VBS a=now
VBS c=now
VBS dim hong,lan,ziyu,hongT,lanT,ziyuT
UserVar hong=60 血量<hong%时，自动吃红。
UserVar lan=30 蓝量<lan%时，自动吃蓝。
UserVar hongT=200 补血延时时间（毫秒）
UserVar lanT=200 补蓝延时时间（毫秒）
UserVar ziyu=85 血量<ziyu%时，自动治愈。
UserVar ziyuT=10 补血延时时间（毫秒）
Delay 32
Delay 1000
KeyPress 52 2
Delay 2500
KeyPress 51,2
Delay 500
Rem c
KeyPress 90 1
Delay 30
KeyPress 50 2
Delay 30
Gosub a
Gosub b
If DateDiff("s",a,now)>=122
Delay 2000
KeyPress 52,2
Delay 2500
VBS a=now
Else
EndIf
If DateDiff("s",c,now)>=25
Delay 500
KeyPress 51,1
Delay 500
VBS c=now
Else
EndIf
Goto c
Sub a
Rem 补红
IfColor hong*2.25+14 39,001439,2
KeyPressH 55,2
Delay hongT
Else
EndIf
Rem 补蓝
IfColor lan*2.25+14 54,001031,2
KeyPressH 56,2
Delay lanT
Else
EndIf
Rem 治愈
IfColor ziyu*2.25+14,39,001439,2
KeyPressH 54,1
Delay hongT
EndIf
Return a
Sub b
IfColor 888 172 80852 0
MoveTo 888 172
Delay 30
LeftDoubleClick 1
Else
EndIf
IfColor 996 180 80852 0
MoveTo 996 180
Delay 30
LeftDoubleClick 1
Else
EndIf
Return a |
