TC官方合作论坛

标题: 哪些错了只要线程跳出第一个循环程序就会崩溃 [打印本页]

作者: mumu940307 时间: 2013-8-30 11:28
标题: 哪些错了只要线程跳出第一个循环程序就会崩溃
功能开启模式(参数)
变量下标,游戏窗口,参数数组,是否成功,intX, intY
dm_ret
字符串.分割(参数,",",参数数组)
游戏窗口=参数数组[0]
下标=参数数组[1]
dm[下标] = com("dm.dmsoft")
dm[下标].SetPath(辅助.获取资源路径("rc:"))
释放[下标]=true
辅助.等待(50)
dm_ret = dm[下标].SetWindowState(游戏窗口,1)
辅助.等待(50)
是否成功= dm[下标].BindWindowEx(游戏窗口, "dx2", "windows","windows","dx.public.disable.window.size", 0)
辅助.等待(800)
如果(是否成功)
标记1:
      辅助.等待(100)
      循环(真&&释放[下标])
      辅助.等待(100)
      dm_ret =dm[下标].FindPic(0, 0,46, 18,"小窗口.bmp|游戏.bmp","000000",0.7,0,intX,intY)
      如果(intX > 0 && intY > 0)
         dm[下标].MoveTo(intX+5, intY+3)
         辅助.等待(50)
         dm[下标].LeftClick
         辅助.等待(50)
         dm[下标].MoveTo(intX+22, intY+22)
         辅助.等待(200)
      如果结束
      辅助.等待(200)
      dm_ret = dm[下标].CmpColor(310,52,"ffffff-101010",0.9)
      如果(dm_ret == 0)
         辅助.等待(10)
         dm_ret = dm[下标].CmpColor(320,66, "ffffff-101010", 0.9)
         如果(dm_ret == 0)
            辅助.等待(10)
            dm_ret = dm[下标].CmpColor(250,10, "ffffff-101010", 0.9)
            如果(dm_ret == 0)
                  跳出
            如果结束
         如果结束
      如果结束
循环结束
      辅助.等待(300)
      遍历(6)
         辅助.等待(1000)
      遍历结束
      dm[下标].KeyDown(87)
      循环(真&&释放[下标])
         辅助.等待(10)
         dm_ret = dm[下标].CmpColor(301,127,"cbcbcb-000000|c82c12-024202",0.9)
如果(dm_ret == 0)
      辅助.等待(5)
      dm_ret = dm[下标].CmpColor(302,138,"cbcbcb-000000|c82c12-024202",0.9)
      如果(dm_ret==0)
         辅助.等待(5)
         dm_ret = dm[下标].CmpColor(332,136,"cbcbcb-000000",0.9)
         如果(dm_ret==0)
            dm[下标].KeyUp(82)
            辅助.等待(50)
            dm[下标].KeyUp(82)
         如果结束
      如果结束
如果结束
辅助.等待(5)
dm_ret = dm[下标].CmpColor(311,124,"cbcbcb-000000|c82c12-024202",0.9)
如果(dm_ret==0)
      辅助.等待(5)
      dm_ret = dm[下标].CmpColor(302,130,"cbcbcb-000000|c82c12-024202",0.9)
      如果(dm_ret==0)
         辅助.等待(5)
         dm_ret = dm[下标].CmpColor(308,149,"cbcbcb-000000|c82c12-024202",0.9)
         如果(dm_ret==0)
            辅助.等待(5)
            dm_ret = dm[下标].CmpColor(343,139,"cbcbcb-000000|c82c12-024202",0.9)
            如果(dm_ret==0)
                  dm[下标].KeyUp(82)
                  辅助.等待(50)
                  dm[下标].KeyUp(82)
            如果结束
         如果结束
      如果结束
如果结束
辅助.等待(5)
dm_ret = dm[下标].CmpColor(310,122,"cbcbcb-000000|c82c12-024202",0.9)
如果(dm_ret==0)
      辅助.等待(5)
      dm_ret = dm[下标].CmpColor(305,128,"cbcbcb-000000|c82c12-024202",0.9)
      如果(dm_ret==0)
         辅助.等待(5)
         dm_ret = dm[下标].CmpColor(317,144,"cbcbcb-000000|c82c12-024202",0.9)
         如果(dm_ret==0)
            辅助.等待(5)
            dm_ret = dm[下标].CmpColor(344,132,"cbcbcb-000000|c82c12-024202",0.9)
            如果(dm_ret==0)
                  dm[下标].KeyUp(82)
                  辅助.等待(50)
                  dm[下标].KeyUp(82)
            如果结束
         如果结束
      如果结束
如果结束
         辅助.等待(10)
         dm_ret = dm[下标].CmpColor(280,201,"202020-222222",0.9)
如果(dm_ret==0)
      dm[下标].KeyUp(82)
      辅助.等待(50)
      dm[下标].KeyUp(82)
      辅助.等待(100)
      dm[下标].KeyUp(87)
如果结束
         辅助.等待(10)
         dm_ret = dm[下标].CmpColor(68,66, "A60703-151515", 0.9)
如果(dm_ret==0)
      dm_ret = dm[下标].CmpColor(63,69, "E4E0D9-151515", 0.9)
      如果(dm_ret==0)
         辅助.等待(50)
         dm[下标].KeyDown(32)
         辅助.等待(50)
         dm[下标].KeyUp(32)
      如果结束
如果结束
         辅助.等待(10)
         dm_ret = dm[下标].CmpColor(50,32, "F7E51C-152015", 0.9)
如果(dm_ret == 0 )
      dm[下标].KeyDown(162)
      辅助.等待(50)
      dm[下标].KeyUp(162)
如果结束
         辅助.等待(10)
         dm[下标].KeyUp[38]
辅助.等待(50)
dm[下标].KeyUp[38]
         辅助.等待(10)
         dm_ret = dm[下标].CmpColor(322,52, "ffffff-101010", 0.8)
         如果(dm_ret == 1)
            遍历(15)
                  辅助.等待(10)
                  dm[下标].KeyPress(8)
            遍历结束
            辅助.等待(200)
            遍历(15)
                  辅助.等待(1000)
            遍历结束
            辅助.等待(500)
            goto 标记1
         如果结束
      循环结束
如果结束

ret=dm[下标].UnBindWindow()
窗口.设置位置(游戏窗口,0,0)
dm[下标].SetClientSize(游戏窗口,800,600)
返回真

功能结束

欢迎光临 TC官方合作论坛 (http://bbs.52tc.co/)