- UID
- 28083
- 帖子
- 169
- 积分
- 102
- 紫菀
- 0 朵
- 花瓣
- 94 片
- 花蕊
- 13 朵
- 野草莓
- 4 个
- 蒲公英
- 6 朵
- 社区等级
- 9 级
- 在线时间
- 40 小时
- 注册时间
- 2008-4-24
- 登录状态
-
当前离线
|
楼主
发表于 2008-6-28 01:10
| 只看该作者
自动开冰盾脚本新贴
其实先前的帖子我也写上这个脚本了,在5楼,只是大家懒得看贴
Rem 开始
Delay 2000
PutAttachment .\plugin 冰盾.bmp
VBS dim x,y
t1=now:t2=now
UserVar a=DropList{不使用:0|F1:112|F2:113|F3:114|F4:115|F5:116|F6:117|F7:118|F8:119|F9:120|F10:121} 1.技能1快捷键设置
UserVar s1=10 技能时间间隔
UserVar b=DropList{不使用:0|F1:112|F2:113|F3:114|F4:115|F5:116|F6:117|F7:118|F8:119|F9:120|F10:121} 2.技能2快捷键设置
UserVar s2=10 技能时间间隔
UserVar c=DropList{不使用:0|F1:112|F2:113|F3:114|F4:115|F5:116|F6:117|F7:118|F8:119|F9:120|F10:121} 3.集中技能快捷键设置
UserVar d=DropList{不使用:0|F1:112|F2:113|F3:114|F4:115|F5:116|F6:117|F7:118|F8:119|F9:120|F10:121} 4.盾技能快捷键设置
Rem 主程序
VBSCall FindPic(0,0,1024,384,"Attachment:\冰盾.bmp",0.6,x,y)
If x>0 and y>0
Delay 955
Gosub 12
Else
Delay 10
KeyPress c,1
Delay 10
KeyPress c,1
Delay 15
KeyPress d,1
EndIf
Goto 主程序
EndScript
Sub 12
If DateDiff("s",t1,now)>=s1
Delay 50
KeyPress a,1
t1=now
EndIf
If DateDiff("s",t2,now)>=s2
Delay 50
KeyPress b,1
t2=now
EndIf
Return 12
冰盾.bmp,这个图片就是截图,就是开盾时右上角冰盾的状态图标,要把它保存在按键精灵的脚本的附件里
要多加几个技能的话
上面的这部分修改如如下:
Sub 12
If DateDiff("s",t1,now)>=s1
Delay 50
KeyPress a,1
t1=now
EndIf
If DateDiff("s",t2,now)>=s2
Delay 50
KeyPress b,1
t2=now
EndIf
If DateDiff("s",t3,now)>=s3
Delay 50
KeyPress c,1
t3=now
EndIf
Return 12
前面的时间t1=now:t2=now要变成t1=now:t2=now:t3=now
[ 本帖最后由 nil2susan1314 于 2008-6-30 16:14 编辑 ] |
|