按键精灵怎么清空赋值的变量?

DimwdPluginwd=Window.Foreground()PluginWindow.Move(wd,0,0)Rem开始MoveTo675,607Delay500L... Dim wd
Plugin wd = Window.Foreground()
Plugin Window.Move(wd, 0, 0)
Rem 开始
MoveTo 675,607
Delay 500
LeftClick 1
MoveTo 490,258
Delay 500
LeftClick 1
MoveTo 675,607
Delay 500
LeftClick 1
a=0:b=120
Rem 计时1
Delay 1000
a=a+1
Plugin Msg.ShowScrTXT(0, 0, 1024, 768, a, "0000FF")
If a=b
a=0
Goto 开始
Else
MoveTo 373,312
IfColor 373,312,7bfaff,0
Delay 500
LeftClick 1
Delay 500
LeftClick 1
Goto 打怪
EndIf
EndIf
Goto 计时1
Rem 打怪
Delay 500
MoveTo 675,607
Delay 500
LeftClick 1
MoveTo 407,258
Delay 500
LeftClick 1
MoveTo 675,607
Delay 500
LeftClick 1
a=0:b=120
Rem 计时2
Delay 1000
a=a+1
Plugin Msg.ShowScrTXT(0, 0, 1024, 768, a, "0000FF")
If a=b
a=1
Goto 重打
Else
VBSCall FindPic(0,0,1024,768,"Attachment:\来.bmp",0.73,intX,intY)
If intX > 0 and intY > 0
MoveTo intX+50,intY+7
Delay 500
LeftClick 2
Goto 完成
EndIf
EndIf
Goto 计时2
Rem 重打
Delay 500
MoveTo 767,41
LeftClick 1
Delay 500
MoveTo 301,182
LeftDoubleClick 1
Delay 8000
MoveTo 675,607
LeftClick 1
Delay 500
MoveTo 407,258
Delay 500
LeftClick 1
Goto 计时2
dim c
dim d
c=0:d=60
Rem 完成
Delay 1000
c=c+1
Plugin Msg.ShowScrTXT(0, 0, 1024, 768, c, "0000FF")
If c=d
Goto 2
Else
VBSCall FindPic(0,0,1024,768,"Attachment:\任务完成.bmp",0.75,intX,intY)
If intX > 0 and intY > 0
MoveTo intX+50,intY+7
Delay 1000
LeftClick 1
Goto 开始
EndIf
EndIf
Goto 完成
以上代码,a累加到120时跳转条件,之后是100的累加,而不是从0开始,1的累加,这是怎么回事,求大侠解答,急啊。。。
展开
 我来答
点横
2010-11-16 · TA获得超过4602个赞
知道大有可为答主
回答量:2082
采纳率:60%
帮助的人:959万
展开全部
脚本写的比较乱,多次用到a=a+1、a=0:b=0。不需要多次给b赋值。
还有,你要求a=120后,a是重新从100开始还是从0开始。从脚本看,是有些从0开始,有一个是从1开始。
QQ:1103054945
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式