=========================
//使用说明:(适用分辩率:1024 x 768 32位色)
//技能设在F5里.
//排列:123弓技能4防或箭,5狼血6治愈7红8蓝.
//自动接受组队,自动吃红蓝.
//自动开近身箱子.
//自动修理武器。
//使用使用图案识别加狼血时,要将图标移到聊天窗口上方
//.
//作者信息:
//作者: 逍遥导师 QQ:9838898
//===============================
Rem 主程序开始
k=0
z=0
Rem 【开始】
KeyPress 116,1
Call 狼血()
Call 自动接受组队()
Call 修理()
Call 防()
Call 攻击()
Goto 【开始】
EndScript
Rem 主程序结束
//===============================
Rem 子程序部分
//===============================
Sub 自动接受组队()
IfColor 405,307,"9cdff7",2 Then
IfColor 349,443,"6bcff7",2 Then
IfColor 375,459,"9cdfef",2 Then
IfColor 389,436,"b5ebf7",2 Then
MoveTo 389,436
Delay 350
LeftDown 1
Delay 500
LeftUp 1
Delay 350
End if
End if
End if
End if
IfColor 626,143,"c6cfe7",2 Then
IfColor 375,525,"bdcfe7",2 Then
IfColor 681,548,"bdcfe7",2 Then
IfColor 663,156,"21344a",2 Then
MoveTo 663,156
Delay 350
LeftDown 1
Delay 500
LeftUp 1
Delay 350
End if
End if
End if
End if
End Sub
//===============================
Sub 狼血()
btlx=time
ctlx=DateDiff("s",atlx,btlx)
ctlx=Abs(ctlx)
If ctlx>125 Then
atlx=time
Delay 350
KeyDown 53,1
Delay 350
KeyUp 53,1
Delay 1000
End if
End Sub
//===============================
Sub 防()
btF=time
ctF=DateDiff("s",atF,btF)
ctF=Abs(ctF)
If ctF>20 Then
atF=time
Delay 350
KeyDown 52,1
Delay 350
KeyUp 52,1
Delay 1000
End if
End Sub
//===============================
Sub ZG()
KeyDown 90,1
Call 自动吃红蓝()
Call 自动接受组队()
Delay 200
Call 狼血()
Call 防()
// Gosub 全捡
KeyUp 90,1
End Sub
//===============================
Sub Kill00()
Call ZG()