求助贴，脚本不能循环执行 _ 综合讨论 - 按键精灵论坛
腾讯微博：
软件版本：2014.05软件大小：21.6M更新时间：07-04
软件版本：3.2.7软件大小：62.5M更新时间：11-02
软件版本：1.3.1软件大小：29.2M更新时间：09-29
软件版本：1.1.0软件大小：12.3M更新时间：12-29
查看: 635|回复: 9
本人小白一个，问题解决不了，求大神指点！这是一个课程培训。脚本内容是：附件几个图中找到A，点击，然后，几个图中找到提交，点击，然后，几个图中找到继续，点击。经实验，这个脚本可以这成操作，但问题是每次只能开始执行时顺利完成一次任务，然后就没有反应了，中止，再点开始，就能继续。picpath=array(&a&,&a1&,&a2&,&a3&)i=0do
FindPic 0,0,,&Attachment:\&&picpath(i)&&.bmp&,0.8,X,Y
If X & 0 And Y & 0 Then
MoveTo x + 5, y + 5
LeftClick 1
//找到后跳出循环
If 5=i Then
looppicpath=array(&提交&,&提交1&,&提交2&,&提交3&,&提交4&)i=0do
FindPic 0,0,,&Attachment:\&&picpath(i)&&.bmp&,0.8,X,Y
If X & 0 And Y & 0 Then
MoveTo x + 5, y + 5
LeftClick 1
//找到后跳出循环
If 5=i Then
End ifLooppicpath=array(&继续&,&继续1&,&继续2&,&继续3&)i=0do
FindPic 0,0,,&Attachment:\&&picpath(i)&&.bmp&,0.8,X,Y
If X & 0 And Y & 0 Then
MoveTo x + 5, y + 5
LeftClick 1
//找到后跳出循环
If 5=i Then
End ifloop后来我在整个脚本上加了一个DO LOOP 也不管用。
xcsunbo 最后编辑于
自己顶，解决不了，睡不着，求前辈指点
剑侠勋章剑侠世界公测活动勋章过大年勋章俩小福娃给大家拜年啦！猴年勋章猴年专属“大圣”勋章双十一绝版纪念勋章双十一绝版纪念勋章抗战胜利70周年勋章抗战胜利70周年活动的专属勋章单身汪勋章单身贵族的专属勋章按键14周年庆纪念勋章按键14周年庆纪念勋章（360天）按键精灵开发者6级（新浪V认证）通过新浪微博加V后自动发放，并替换普通的认证6级勋章。 微博达人（90天）完成新浪微博加V的奖励，结合活动不定期开放申请。幸运草勋章（永久）商业小精灵限时活动勋章。马年勋章（360天） 马年纪念勋章（360天）年全勤论坛连续打卡签到365次以上（365天）月全勤论坛自然月（如8.1-8.31）签到满勤，系统会在月底自动判断发放。鹰眼勋章鹰眼注册用户专属勋章黄瓜勋章（永久）体验商业小精灵活动的奖励按键图书勋章尊贵的按键图书用户天使勋章天使一样的用户潜水员按键潜水员勋章按键明星按键明星勋章黄金之翼黄金之翼勋章活动狂人论坛活动狂人骨灰级按键用户3年以上的按键论坛用户龙年勋章（360天）龙年纪念勋章（360天）十周年勋章（360天）十周年纪念勋章兔年勋章（360天）兔年纪念勋章(360天)论坛GG按键论坛男性用户勋章小红帽对论坛提出良好建议（可向管理员申请）学有所成学有所成勋章，新手步入按键学堂的第一枚勋章
你可以在脚本卡住是按暂停，然后按步进按钮，看具体卡在什么地方，然后想为什么此时找不到这个图。
承接各类脚本开发 有偿解决按键基础问题（可远程讲解）寻6级作者分摊单子，无需任何押金，开发全程不经我手！QQ： 《征途2S》和《千军》全部功能完全免费的脚本 ↓
回复 脚本运行一次是没有问题的，但是不能一直运行，第二次出现选项的时候不能选择，中止，再开始就可以进行下去。属性里已经改成了循环到按中止。
有大神在不
来人帮忙呀，谢谢~~
小红帽对论坛提出良好建议（可向管理员申请）
楼主啊，你这个问题让我沉默好久好久，因为带给了我很大的启发。一种编程语言如果不能改变我，尤其我的思想，我基本不会去学习的，因为没有学习的必要，对于我。也许别人视若珍宝，但我不屑一顾。回答问题，我同样坚持这个原则。一个问题，如果不能改变我点什么，我很少去回答的。如果不能改变了我的一些看法，而且给我很多大的启发，我就会思量好久好久。这个题我会收录到《按键100问》，非常具有典型意义，希望楼主能答应。人无远虑必有近忧。楼主不应该仅限于眼前的这道题，而应该彻底解决一个真正的大问题，即楼主学习方向、路线的问题。楼主可以参加培训，这很好，但学习编程不要看视频，1、效率太低2、非常严重，影响思考。看书你会自己思考，看教程、视频，是别人帮你思考。有点像水和饮料。你看书，看编程的书，好比天天喝水吃饭，但看视频、录像，只能为辅，就像饮料，虽然有营养，但不能当水，不能天天喝。另外一个视频教程、培训机构，为了显得自己有水平，就会整出些貌似很华丽，技术很高，让你看着头晕，但感觉必须要学的东西。你貌似学会了，就是那段华丽的代码，但真正遇到实际问题的解决，你发现你什么也想不起来了。因为基础知识没打牢固。万丈高楼平地起在于地基的扎实、稳固，否则必然坍塌。建议楼主回归按键，多多看看，多多使用按键基本、基础的命令，这些问题也就不是什么问题了。回到楼主的这个问题。其实这段代码有另外一种基本、基础的写法，只是写起来代码量大，重复代码量多，给人的感觉看起来笨笨的、傻傻的，没有这种看起来简洁、高效，有水平。通过代码形式、结构上的改变、优化，减少大量重复代码，这是值得大赞特赞的事，但凡事有利有弊。这种减化的写法必然会带来无法细致的调控，比如你加入延迟试下。呵呵。你不要认为这样看似高水平的代码就没有问题，因为形式、结构上的简化必然无法进行细致的微调。你在具体代码的形式、结构上作了聪明的调整、优化，但如果不太熟悉具体代码结构改变前后的情况，呵呵。老老实实把另外一种写法写出来，两种对比下，你会找到答案，也会收获更多。另外建议楼主看一本书，2012审定《七年级数学上册》第二页正文第一句：“数的产生和发展离不开生活和生产的需要”。编程亦然。楼主学习具体命令和读、写代码时一定要注意过程，重复的、复杂的想办法在形式、结果上简化、优化，但这必然会带来另外一个问题，所以在提到代码聪明、智商的过程中，不要忽视了它的基本、基础的完整。代码如果不受你的控制，就会发生你意想不到的问题。这也就是缘何计算机语言后，第二种语言是汇编语言。可以不可以从计算机语言直接跳到高级语言，自然可以，但是呵呵，计算机有时会不受到你的控制，而汇编语言会让你完整控制计算机的硬件。对于编程，对于你的代码，你同样要完全控制它。尽量控制它。即使暂时做不到，起码你要意识到这点。有些看似聪明的做法，其实你需要注意其中的陷阱。我几乎很少直接告诉大家答案。笛卡尔说，不要告诉我答案，这样影响我思考。这句话，送给你，我只告诉你思路，但不会直接告诉你答案。只要你稍微思考下，其实答案呼之欲出。我始终认为，你自己找出的答案始终比别人直接给出的更具有成就感，也更具有意义，也会更让你在编程的道路上走的更久更久更高……完整的真正的答案，我需要很长时间的思考，然后写出来，打印出来，自己反复的观摩，然后再写一遍，基本差不多算是完整的、真正的答案。到时该文会收录到《按键100问》。
有高手在不。。。。
先逐步排除问题 你调试下找图intx的值是否找到请问一下为什么这个脚本不能循环【按键精灵吧】_百度贴吧
&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&签到排名：今日本吧第个签到，本吧因你更精彩，明天继续来努力！
本吧签到人数：0成为超级会员，使用一键签到本月漏签0次！成为超级会员，赠送8张补签卡连续签到：天&&累计签到：天超级会员单次开通12个月以上，赠送连续签到卡3张
关注：394,328贴子：
请问一下为什么这个脚本不能循环收藏
想要循环的部分不循环，直接开始执行后面的了按键原本设定是是点击一下然后找一次图，没找到就重复点击然后找图FindPic 0,0,,&Attachment:\xjt.bmp&,0.9,intX,intYIf intX & 0 And intY & 0 ThenMoveTo intX, intYEnd IfDelay 1000i=0While i=0LeftClick 1Delay 200FindPic 0,0,,&Attachment:\lt.bmp&,0.9,intX,intYIf intX & 0 And intY & 0 Then
MoveTo intX, intY
Delay 200WendDelay 1000FindPic 0,0,,&Attachment:\st.bmp&,0.9,intX,intYIf intX & 0 And intY & 0 ThenMoveTo intX, intYEnd IfDelay 1000下面的这个也试过了还是不能循环DoDelay 1000FindPic 0,0,,&Attachment:\神盾.bmp&,0.9,intX,intYIf intX & 0 And intY & 0 Then Exit DoEnd Ifloop
新朗页游助手支持海量页游,页游辅助完美支持小号多开,微端多平台登陆.精品页游辅助工具,自动日常,自动副本,一键操作,玩页游更省时!
楼主是新手，平时只会写点简单的脚本，基本上不会用到控制命令，这还是第一次接触这种脚本
while 0 代表为假 。。。你改下i 的值吧！！！
If intX & 0 And intY & 0 Then Exit Do这个表示找到图之后就退出循环。。。。啥操作都没
i=1While i=1LeftClick 1Delay 200FindPic 0,0,,&Attachment:\lt.bmp&,0.9,intX,intYIf intX & 0 And intY & 0 Then
MoveTo intX, intY
Delay 200Wend改成这样还是不行是其它地方的问题吗
用Rem和Goto吧
登录百度帐号推荐应用腾讯微博：
软件版本：2014.05软件大小：21.6M更新时间：07-04
软件版本：3.2.7软件大小：62.5M更新时间：11-02
软件版本：1.3.1软件大小：29.2M更新时间：09-29
软件版本：1.1.0软件大小：12.3M更新时间：12-29
出现了1个错误
此主题未经审核！
& &|& & & &|& &求助，脚本不能循环执行 _ 有问有答 - 按键精灵论坛
腾讯微博：
软件版本：2014.05软件大小：21.6M更新时间：07-04
软件版本：3.2.7软件大小：62.5M更新时间：11-02
软件版本：1.3.1软件大小：29.2M更新时间：09-29
软件版本：1.1.0软件大小：12.3M更新时间：12-29
查看: 398|回复: 4
本人小白一个，问题解决不了，求大神指点！这是一个课程培训。脚本内容是：附件几个图中找到A，点击，然后，几个图中找到提交，点击，然后，几个图中找到继续，点击。经实验，这个脚本可以这成操作，但问题是每次只能开始执行时顺利完成一次任务，然后就没有反应了，中止，再点开始，就能继续。picpath=array(&a&,&a1&,&a2&,&a3&)i=0doFindPic 0,0,,&Attachment:\&&picpath(i)&&.bmp&,0.8,X,YIf X & 0 And Y & 0 ThenMoveTo x + 5, y + 5Delay 300LeftClick 1Exit do //找到后跳出循环End Ifi=i+1If 5=i Theni=0End Iflooppicpath=array(&提交&,&提交1&,&提交2&,&提交3&,&提交4&)i=0doFindPic 0,0,,&Attachment:\&&picpath(i)&&.bmp&,0.8,X,YIf X & 0 And Y & 0 ThenMoveTo x + 5, y + 5Delay 300LeftClick 1Exit do //找到后跳出循环End Ifi=i+1If 5=i Theni=0End ifLooppicpath=array(&继续&,&继续1&,&继续2&,&继续3&)i=0doFindPic 0,0,,&Attachment:\&&picpath(i)&&.bmp&,0.8,X,YIf X & 0 And Y & 0 ThenMoveTo x + 5, y + 5Delay 300LeftClick 1Exit do //找到后跳出循环End Ifi=i+1If 5=i Theni=0End ifloop
求大大解答
按键精灵开发者6级可通过提升认证等级来升级勋章：月全勤论坛自然月（如8.1-8.31）签到满勤，系统会在月底自动判断发放。
严重怀疑你在编写干部教育培训网自动上课的脚本，我帮你看看脚本吧，等下回复你
按键会友，共同进步，QQ 3766 9324
按键精灵开发者6级可通过提升认证等级来升级勋章：月全勤论坛自然月（如8.1-8.31）签到满勤，系统会在月底自动判断发放。
你的问题是只有3次点击动作，并没有循环（你的循环是在找图，找到三次就完了）需要中止再重新开始，我没发现会卡在哪里，你确定不是自动结束了吗Do
picpath1=array(&a&,&a1&,&a2&,&a3&)
FindPic 0,0,,&Attachment:\&&picpath1(i1)&&.bmp&,0.8,X,Y
If X & 0 And Y & 0 Then
MoveTo x + 5, y + 5
LeftClick 1
Exit do //找到后跳出循环
If i1=4 Then//只有4个哦
picpath2=array(&提交&,&提交1&,&提交2&,&提交3&,&提交4&)
FindPic 0,0,,&Attachment:\&&picpath2(i2)&&.bmp&,0.8,X,Y
If X & 0 And Y & 0 Then
MoveTo x + 5, y + 5
LeftClick 1
Exit do //找到后跳出循环
If i2=5 Then
picpath3=array(&继续&,&继续1&,&继续2&,&继续3&)
FindPic 0,0,,&Attachment:\&&picpath3(i3)&&.bmp&,0.8,X,Y
If X & 0 And Y & 0 Then
MoveTo x + 5, y + 5
LeftClick 1
Exit do //找到后跳出循环
If i3=4 Then
Delay 1000Loop
按键会友，共同进步，QQ 3766 9324藤本植物导航
&>&&>&&>&正文
语法错误：脚本 我的脚本1 ，第65行，第1个字符：（错误码0）缺少符号。...for循环缺少next，不知道你代码里是怎么处理的，在最下面的loo上面添加2个next Next Next Loop 或者这样 Hwnd = Plugin.Window.MousePoint() Do Call Plugin.Bkgnd.LeftClick(Hwnd, 704, 935) Delay 20 //以上为：打开主角界面 For 2 Call Plugi...
缺少符号Loop.按键精灵脚本最后一行出问题了，大神帮忙看下
/以上为：定位主角界面Call Plugin.Bkgnd.LeftClick(Hwnd.LeftDoubleClick(Hwnd, )Delay 100Call Plugin.Bkgnd.LeftDoubleClick(Hwnd, 938, 220)Delay 500NextCall Plugin.Bkgnd.LeftDown(Hwnd, 918.Bkgnd, 390)Delay 500/&#47：定位英雄For 30For 4Call Plugin.Bkgnd.LeftClick(Hwnd, 935)Delay 20&#47，天堂圣击，重击出击Call Plugin.Bkgnd.LeftClick(Hwnd, 632)Delay 85Call Plugin.Bkgnd.LeftClick(Hwnd, 917, 818)Delay 100&#47.Bkgnd, 268)Delay 100Call Plugin.B/以上为：打开主角界面For 2Call Plugin.LeftClick(Hwnd, )Delay 100Call Plugin.Bkgnd.LeftClick(Hwnd.LeftDoubleClick(Hwnd, 1168, 19)Delay 100Call Plugin.MousePoint()DoCall Plugin, 802, 827)Delay 100Call Plugin.Bkgnd.LeftClick(Hwnd, 1150.B以上为, 566)Call Plugin.Bkgnd.LeftDown(Hwnd, 938, )Delay 100Call Plugin, 220)Delay 100Call P/以上为：3英雄自动升级NextCall Plugin, 739)Delay 85Call Plugin.Bkgnd.LeftClick(Hwnd, 365)Delay 10Call Plugin.Bkgnd.MoveTo(Hwnd, 938, 835)Delay 85&#47, 715, 824)Delay 100Call Plugin.Bkgnd.LeftClick(Hwnd，重击出击及关闭技能窗口Call Plugin.Bkgnd.LeftClick(Hwnd, 1150;以上为, 442)Delay 100Call Plugin.LeftClick(Hwnd, )Delay 500&#47, 1150.MoveTo(Hwnd, 918, 390)Delay 200Call Plugin.Bkgnd.LeftUp(Hwnd, 918.Bkgnd.LeftClick(Hwnd, 1170, 21)Delay 100Call Plugin.LeftUp(Hwnd.Bkgnd.Bkgnd.Bkgnd, 832, 938)Delay 100Next /&#47：打开英雄界面For 2Call Plugin.Bkgnd.LeftClick(H/以上为：开影分身;/以上为：升级影分身，天堂圣击.Bkgnd.LeftClick(Hwnd, )Delay 100&#47, .LeftClick(Hwnd, 704for循环缺少next，不知道你代码里是怎么处理的，在最下面的loo上面添加2个nextNextNextLoop或者这样Hwnd = Plugin.Window, 842, 340)Delay 100Call Plugin.Bkgnd.LeftDoubleClick(Hwnd缺少符号Loop.按键精灵脚本最后一行出问题了，大神帮忙看下for循环缺少next，不知道你代码里是怎么处理的，在最下面的loo上面添加2个nextNextNextLoop或者这样Hwnd = Plugin.Window.MousePoint()DoCall Plugin.Bkgnd
语法错误：脚本 我的脚本1 ，第65行，第1个字符：（错误码0）缺少符号。...for循环缺少next，不知道你代码里是怎么处理的，在最下面的loo上面添加2个next Next Next Loop 或者这样 Hwnd = Plugin.Window.MousePoint() Do Call Plugin.Bkgnd.LeftClick(Hwnd, 704, 935) Delay 20 //以上为：打开主角界面 For 2 Call Plugi...跪求大神帮忙看看！~无限感谢给追分~让我这个脚本可以运行起来就行逻辑...语法错误：脚本 我的脚本1 ，第16行，第1个字符：（错误码0）没有找到合法的符号。 语法错误：脚本 我的脚本1 ，第16行，第1个字符：（错误码13）缺少符号Loop。 改成这样： Do DMColor = Plugin.Color.GetPixelColor(410, 721, 0)//得到地面点...[8a559e50-0ed9-52cbbc80f5] BeginHotkey=32782 BeginHotke...[8a559e50-0ed9-52cbbc80f5][9c33e4fa-26b8-46eb-c4a-100e-9a41c39dcf]这是什么代码？为什么我看不懂，可以解释一下吗？ While true FindPic 0,0,,"Attachment:\zanting.bmp",0.5,intX,...虽然我没用过这个，但这里确认是这样的？ End If//这里是确认要end的吗？ Else MessageBox "没有找到" EndScript End If //这里不应该是end else吗？还有后面是不是还有end whileDim ax，ay, bx, by, sTime, dw，dh，qw, bbs,op dw=Plugin.Sys.GetScRX...Loop改为Next，语法就没错误了，不过你写程序的习惯不好，程序尽量不要用Goto，程序员的要求，是不能用Goto的，因为滥用Goto，程序结构会变得混乱，一旦代码有逻辑问题，会非常麻烦，建议你先学习按键精灵语言语法。将 Event Form1.Button1.Click 放到第一行就可以正常使用，而放到中间任...放在中间某些位置不能用，但绝不是任何一行。例如下面脚本可以运行的： MessageBox "12" Event Form1.Button1.Click MessageBox "aa" End Event MessageBox "34" 下面脚本就存在语法错误： MessageBox "12" Sub AA() Event Form1.Button1.Click ...Rem a MoveTo 653, 721 LeftClick 1 Delay 毫秒数600 MoveTo 653, 721 L...Rem a MoveTo 653, 721 LeftClick 1 Delay 600 MoveTo 653, 721 LeftClick 1 Delay 300 MoveTo 622, 473 LeftClick 1 For 9 MoveTo 910, 717 LeftClick 1 Delay 300 MoveTo 402, 369 LeftClick 1 MoveTo 547, 566 LeftClick 1 MoveTo 643, 564 L...大家帮帮忙埃按键精灵提示：最后一行第0个字符:(错误码0)缺少符号Wend/E...Wend/EndWhile是条件循环结束命令，不能用Next次数循环结束命令代替，你看下循环结束语句是否用Next代替了Wend/EndWhile1.Hwnd = Plugin.Window.MousePoint() 2.Do 3.n = 0 4.Do 5.Call Plugin...17行代码多了一个空格 else if n&=190 then 改成.elseif n&=190 then endif 和end if 是不一样的代码入下 Dim a(3),B,C(3) a(0) = 5 a(1) = 1 a(2) = 6 a(3) = 4 For i ...Dim a(3),B,C(3) a(0) = 5 a(1) = 1 a(2) = 6 a(3) = 4 For i = 0 To UBound(a) For k = 0 To UBound(a) If a(i) - a(k) & 0 Then b = 1 Else b = 0 End If c(i) = c(i) + b Next Next 复制以上代码可解决。 最基本的代码错误重复问题，你第一个...
种植经验最新
种植经验推荐
& 6种植网 版权所有
渝ICP备号-23}