求帮忙看这段源码自动闪退崩溃的原因

hnbc520

功能 师门任务(参数)
    变量 判断=1,情况,情,下标=参数,X,Y
    情=0
    等待(400)
    dm[下标].FindStr(879,559,957,638,"自动","62f3fa-202020",0.8,X,Y)
    如果(X>0)
        dm[下标].MoveTo(X,Y)
        等待(100)
        dm[下标].LeftClick()
        等待(500)
    否则
        dm[下标].FindPic(392,37,549,203, 获取资源路径("rc:关小.bmp"), "202020", 0.9, 0, X, Y)
        如果(X>0)
            dm[下标].MoveTo(X,Y)
            等待(100)
            dm[下标].LeftClick()
            等待(500)
        结束
        dm[下标].FindStr(724,96,963,452,"宠物1|宠物|抓宠","fafa01-202020",0.8,X,Y)
        如果(X>0)
            情=1
            等待(100)

        结束
        dm[下标].FindPic(598,422,808,567, 获取资源路径("rc:领取.bmp"), "202020", 0.9, 0, X, Y)
        如果(X>0)
            dm[下标].MoveTo(X,Y)
            等待(100)
            dm[下标].LeftClick()
            等待(500)     
            跳=0
        否则
            dm[下标].FindPic(368,427,448,470, 获取资源路径("rc:对话.bmp"), "202020", 0.9, 0, X, Y)
            如果(X>0)
                循环(真)
                    dm[下标].FindPic(368,427,448,470, 获取资源路径("rc:对话.bmp"), "202020", 0.9, 0, X, Y)
                    如果(X>0)
                        dm[下标].MoveTo(X,Y)
                        等待(100)
                        dm[下标].LeftClick()
                        等待(500)     
                    否则
                        等待(300)
                        跳出
                    结束  
                    跳=0
                结束
            否则
                dm[下标].FindPic(795,292,957,629, 获取资源路径("rc:正在战斗.bmp|rc:正在战斗1.bmp"), "020202", 0.9, 0, X, Y)
                如果(X>0)
                    循环(真)
                        等待(600)
                        dm[下标].FindPic(795,292,957,629, 获取资源路径("rc:正在战斗.bmp|rc:正在战斗1.bmp"), "020202", 0.9, 0, X, Y)
                        如果(X>0)
                            等待(1000)
                        否则
                            如果(正在发言=="0")
                                等待(1000)
                            否则
                                等待(300)
                                跳出
                            结束
                        结束
                    结束
                    跳=0
                否则
                    dm[下标].FindPic(4,83,68,359, 获取资源路径("rc:日程.bmp|rc:日程1.bmp"), "202020", 0.9, 0, X, Y)
                    如果(X>0)
                        dm[下标].MoveTo(X,Y)
                        等待(100)
                        dm[下标].LeftClick()
                        等待(1200)      
                        dm[下标].FindPic(100,147,854,180, 获取资源路径("rc:师门.bmp"), "202020", 0.9, 0, X, Y)
                        变量 比1,比2,比值=0
                        如果(X>0)
                            跳=0
                            dm[下标].MoveTo(X+23,Y+209)
                            等待(100)
                            dm[下标].LeftClick()
                            等待(100)
                            循环(真)
                                比值=比值+1
                                等待(500)
                                如果(比值>19)
                                    跳出
                                结束
                                dm[下标].FindPic(672,5,951,394, 获取资源路径("rc:关闭1.bmp|rc:关闭.bmp|rc:关闭2.bmp"), "202020", 0.9, 0, X, Y)
                                如果(X>0)
                                    dm[下标].MoveTo(X,Y)
                                    等待(100)
                                    dm[下标].LeftClick()
                                    等待(500)
                                结束
                                dm[下标].FindPic(550,300,906,463, 获取资源路径("rc:领取任务.bmp"), "020202", 0.9, 0, X, Y)
                                如果(X>0)
                                    比值=0
                                    dm[下标].MoveTo(X,Y)
                                    等待(100)
                                    dm[下标].LeftClick()
                                    等待(500)
                                否则
                                    dm[下标].FindPic(447,420,840,553, 获取资源路径("rc:给予.bmp"), "020202", 0.9, 0, X, Y)
                                    如果(X>0)
                                        比值=0
                                        dm[下标].MoveTo(X,Y)
                                        等待(100)
                                        dm[下标].LeftClick()
                                        等待(500)
                                    否则
                                        dm[下标].FindStr(724,96,963,452,"宠物1|宠物|抓宠","fafa01-202020",0.8,X,Y)
                                        如果(X=="-1")
                                            等待(200)
                                        否则
                                            情=1
                                            等待(200)
                                        结束
                                        dm[下标].FindPic(168,480,897,587, 获取资源路径("rc:购买.bmp|rc:购买1.bmp"), "202020", 0.9, 0, X, Y)
                                        如果(X>0)
                                            如果(情=="1")
                                                dm[下标].FindPic(72,110,353,551, 获取资源路径("rc:点宠物.bmp"), "202020", 0.9, 0, X, Y)
                                                如果(X>0)
                                                    dm[下标].MoveTo(X,Y)
                                                    等待(100)
                                                    dm[下标].LeftClick()
                                                    等待(500)     
                                                否则
                                                    dm[下标].MoveTo(210,396)
                                                    等待(100)
                                                    dm[下标].LeftDown()
                                                    等待(500)
                                                    dm[下标].MoveTo(202,135)
                                                    等待(100)
                                                    dm[下标].LeftUp()
                                                    等待(500)   
                                                结束
                                            结束
                                            变量 小循环=0
                                            循环(真)
                                                dm[下标].FindPic(151,63,867,552, 获取资源路径("rc:需求.bmp"), "202020", 0.9, 0, X, Y)
                                                如果(X>0)
                                                    等待(200)
                                                    跳出
                                                否则
                                                    小循环=小循环+1
                                                    dm[下标].MoveTo(830,569)
                                                    等待(100)
                                                    dm[下标].LeftClick()
                                                    等待(200)     
                                                结束
                                                如果(小循环>5)
                                                    等待(200)
                                                    跳出
                                                结束
                                                等待(700)
                                            结束
                                            dm[下标].FindPic(168,480,897,587, 获取资源路径("rc:购买.bmp|rc:购买1.bmp"), "202020", 0.9, 0, X, Y)
                                            dm[下标].MoveTo(X,Y)
                                            等待(100)
                                            dm[下标].LeftClick()
                                            等待(500)
                                            跳出
                                        否则
                                            dm[下标].FindStr(879,559,957,638,"自动","62f3fa-202020",0.8,X,Y)
                                            如果(X>0)
                                                dm[下标].MoveTo(X,Y)
                                                等待(100)
                                                dm[下标].LeftClick()
                                                等待(500)   
                                            结束
                                            dm[下标].FindPic(795,292,957,629, 获取资源路径("rc:正在战斗.bmp|rc:正在战斗1.bmp"), "020202", 0.9, 0, X, Y)
                                            如果(X>0)
                                                等待(600)
                                                循环(真)
                                                    dm[下标].FindPic(795,292,957,629, 获取资源路径("rc:正在战斗.bmp|rc:正在战斗1.bmp"), "020202", 0.9, 0, X, Y)
                                                    如果(X>0)
                                                        等待(1000)
                                                    否则
                                                        如果(正在发言=="0")
                                                            等待(1000)
                                                        否则
                                                            等待(200)
                                                            跳出
                                                        结束
                                                    结束
                                                结束
                                                跳出
                                            否则
                                                dm[下标].FindPic(368,427,448,470, 获取资源路径("rc:对话.bmp"), "020202", 0.9, 0, X, Y)
                                                如果(X>0)
                                                    循环(真)
                                                        dm[下标].FindPic(368,427,448,470, 获取资源路径("rc:对话.bmp"), "020202", 0.9, 0, X, Y)
                                                        如果(X>0)
                                                            dm[下标].MoveTo(X,Y)
                                                            等待(100)
                                                            dm[下标].LeftClick()
                                                            等待(500)     
                                                        否则  
                                                            等待(200)
                                                            跳出
                                                        结束   
                                                    结束
                                                    跳出
                                                否则
                                                    如果(比值>19)
                                                        比1=dm[下标].GetColor(440,11)
                                                        等待(1000)
                                                        比2=dm[下标].GetColor(440,11)
                                                        如果(比1==比2)
                                                            等待(200)
                                                            跳出
                                                        结束
                                                    否则
                                                        dm[下标].FindPic(672,5,951,394, 获取资源路径("rc:关闭1.bmp|rc:关闭.bmp|rc:关闭2.bmp"), "202020", 0.9, 0, X, Y)
                                                        如果(X>0)
                                                            dm[下标].MoveTo(X,Y)
                                                            等待(100)
                                                            dm[下标].LeftClick()
                                                            等待(500)
                                                        否则
                                                            如果(比值>9)
                                                                比1=dm[下标].GetColor(280,81)
                                                                等待(1000)
                                                                比2=dm[下标].GetColor(280,81)
                                                                如果(比1==比2)
                                                                    等待(200)
                                                                    跳出
                                                                结束
                                                            结束
                                                        结束
                                                    结束
                                                结束
                                            结束
                                        结束
                                    结束
                                结束                                                                     
                            结束
                            等待(200)
                            记录=时间时(当前时间())&":"&时间分(当前时间())&":"&时间秒(当前时间())&":"
                            列表框增加文本("列表框_记录",记录&" [完成一次师门任务]"&下标)
                        结束
                    否则
                        dm[下标].FindPic(432,13,541,65, 获取资源路径("rc:奖励.bmp"), "202020", 0.9, 0, X, Y)
                        如果(X>0)
                            跳=0
                            dm[下标].MoveTo(828,140)
                            等待(100)
                            dm[下标].LeftClick()
                            等待(500)
                        否则
                            dm[下标].FindPic(827,15,944,153, 获取资源路径("rc:关闭.bmp|rc:关闭1.bmp|rc:关闭2.bmp"), "202020", 0.9, 0, X, Y)
                            如果(X>0)
                                跳=跳+1
                                dm[下标].MoveTo(X,Y)
                                等待(100)
                                dm[下标].LeftClick()
                                等待(500)
                            否则
                                dm[下标].FindPic(373,166,586,256, 获取资源路径("rc:入帮.bmp"), "202020", 0.9, 0, X, Y)
                                如果(X>0)
                                    跳=0
                                    dm[下标].MoveTo(360,431)
                                    等待(100)
                                    dm[下标].LeftClick()
                                    等待(500)  
                                否则
                                    等待(1000)
                                    跳=跳+1
                                结束
                            结束  
                        结束      
                    结束
                结束
            结束
        结束   
        等待(200)
    结束

hnbc520

没有人？解决的了吗？

by烟仔

这是单线程嘛？你是多线程

by烟仔

虽然我是新人，不过我写过如果和循环套用多了不是脚本散退，而是根本就会执行。不动，用多线程就会动了！貌似不能这样写？新人大神勿喷！如果有大神看见请说个正确的写法。我说的只代表我个人看法，因为才接触5.5不到2个星期！谢谢，重要的说三遍，别喷我，别喷我，别喷我！如果我说错了，我虚心接受！

baby杰杰

这么复杂。。。。我晕了

yhmjh

里面逻辑太多了，多用几个function吧，这样的话方便调试，出错了容易改啊