- UID
- 108468
- 帖子
- 11
- 积分
- 10
- 紫菀
- 0 朵
- 花瓣
- 24 片
- 花蕊
- 0 朵
- 野草莓
- 4 个
- 蒲公英
- 17 朵
- 社区等级
- 2 级
- 在线时间
- 7 小时
- 注册时间
- 2011-7-18
- 登录状态
-
当前离线
|
楼主
发表于 2011-7-19 11:30
| 只看该作者
[求助] QQ自由幻想按键精灵药师挂机代码谁能帮忙改下
VBS dim t1
VBS dim t2
VBS t1=now
VBS t2=now
//--------------------------------------------- [脚本主程序]
Rem ST
Delay 356
IfColor 90,29,b0e4f8,0
Gosub 加血
EndIf
Gosub 状态
IfColor 820,685,f8,0
Gosub 侦查
EndIf
Goto ST
//--------------------------------------------- [加状态程序]
Sub 状态
Delay 10
If DateDiff("s",t1,now)>=120
Delay 200
KeyPress 113,1
Delay 700
KeyPress 114,1
Delay 3000
KeyPress 112,1
Delay 500
KeyPress 115,1
VBS t1=now
EndIf
Return 状态
//--------------------------------------------- [加血盾程序]
Sub 加血
IfColor 113,111,58a8d8,2
Delay 256
KeyPress 112,1
Delay 1500
KeyPress 113,1
Else
MoveTo 55,33
Delay 256
RightClick 1
Delay 256
KeyPress 112,1
Delay 1500
KeyPress 113,1
EndIf
Return sub 加血
//--------------------------------------------- [侦查程序]
Sub 侦查
MoveTo 929,623
LeftClick 1
Delay 2000
Return 防查
F1 加血 F2加盾 F3加攻击 F4加防御 |
|