测试脚本时，脚本卡死，求高手相助，TC第一个脚本

l13304648

看了基础篇的界面排版 线程的简单使用，已经解决。感谢大家的无私解答。

1. #import "dm.dmsoft" dm
   
2. 
   
3. 空间 QQ仙灵脚本
   
4. //定义默认空间
   
5. 
   
6. 功能 逻辑型 退出_点击()
   
7. //这里添加你要执行的代码
   
8. 辅助.退出()
   
9. 返回 真
   
10. //函数返回语句
    
11. 功能结束
    
12. 
    
13. 功能 逻辑型 抓宝宝_点击()
    
14. //这里添加你要执行的代码
    
15. 辅助.等待(3000)
    
16. 整型 QQXL=窗口.鼠标所在窗口句柄()
    
17. 窗口.设置位置(QQXL,0,0)
    
18. 窗口.激活(QQXL)
    
19. 辅助.等待(50)
    
20. 键盘.按键(119,1)   //119是F8的键位码
    
21. 辅助.等待(50)
    
22. 
    
23. 循环(真)
    
24. 
    
25. 整型 战斗外=图像.坐标点取色(28,35)
    
26. 如果(战斗外==#607D8E)
    
27. 辅助.等待(50)
    
28. 键盘.按键(119,1)
    
29. 否则
    
30. 整型 返回值,X,Y
    
31. dm.SetPath(辅助.获取资源路径("rc:"))
    
32. dm.SetDict(0,"QQXL.txt")             //设置  字库
    
33. dm.UseDict(0)         //使用 字库0
    
34. dm.FindStrFast(0,0,1024,768,"宝宝","fefefe-000000",1.0,X,Y)
    
35. 辅助.等待(100)
    
36.             如果(X>0)      //大于0，有宝宝
    
37.                                  整型 捕捉=图像.坐标点取色(493,123)             //找捕捉按钮颜色
    
38.                                  如果(捕捉==#A36B17)         //捕捉按钮是否可点击
    
39.                                  鼠标.移动(493,123)             //如果可以点击表示轮到自己出手，抓宝宝
    
40.                                  鼠标.左键单击(1)
    
41.                                  鼠标.移动(X-5,Y-50)
    
42.                                  鼠标.左键单击(1)
    
43.            否则      //没有宝宝
    
44.                 整型 捕捉1=图像.坐标点取色(493,123)            //找捕捉按钮颜色
    
45.                     如果(捕捉1==#A36B17)                      //捕捉按钮是否可点击
    
46.                                          键盘.按下(164)           //如果可以点击表示轮到自己出手，普通攻击杀怪
    
47.                                          辅助.等待(10)
    
48.                                          键盘.按键(65,1)
    
49.                                          辅助.等待(10)
    
50.                                          键盘.按键(65,1)
    
51.                                          辅助.等待(10)
    
52.                                          键盘.弹起(164)
    
53.                                          辅助.等待(10)
    
54.                     如果结束
    
55.                                  如果结束
    
56.             如果结束
    
57. 如果结束
    
58. 循环结束
    
59. 
    
60. 返回 真
    
61. 功能结束
    
62. 
    
63. 
    
64. 
    
65. 
    
66. 
    
67. 
    
68. 空间结束
    
69. //空间结束语句
    

复制代码

代码就是上面的那些。思路是： 判断是否遇敌（如果不遇敌后面的代码不会执行，循环一圈后继续按自动遇敌按钮）-如果遇敌，判断是否有宝宝，如果有宝宝，判断捕捉按钮是否亮起，亮起的话点击捕捉按钮，点击宝宝，如果没有亮起，代码循环一圈后继续判断捕捉按钮，如果没有宝宝，ALT+A打死，然后进入循环，判断是否遇敌

因为刚接触TC，用惯了GOTO、REM，突然没有了，有点不习惯。憋了2天，才憋出1个功能，测试的时候进入循环界面就卡死，然后后面的功能全部失效。请教大神，我的代码要怎么优化，可以的话麻烦帮下忙，十分感谢。  

Abin

又是一个不怎么看视频的人！

TC的程序执行是事件启动的！因为你的事件里有循环，这样会导致界面事件挂起，所以你的事件里功能应该放到线程里去执行！这样就不影响你的界面了，就不会界面卡死了！

官网视频-- 界面设计里 讲解了这个现象和解决办法！

冷月无痕

如果(X>0)      //大于0，有宝宝
                                 整型 捕捉=图像.坐标点取色(493,123)             //找捕捉按钮颜色
                                 如果(捕捉==#A36B17)         //捕捉按钮是否可点击
                                 鼠标.移动(493,123)             //如果可以点击表示轮到自己出手，抓宝宝
                                 鼠标.左键单击(1)
                                                                  鼠标.移动(X-5,Y-50)
                                                                  鼠标.左键单击(1)
                                                                  如果结束 //结束捕捉按钮的判断
           否则      //没有宝宝
                整型 捕捉1=图像.坐标点取色(493,123)            //找捕捉按钮颜色
                    如果(捕捉1==#A36B17)                      //捕捉按钮是否可点击
                    键盘.按下(164)           //如果可以点击表示轮到自己出手，普通攻击杀怪
                    辅助.等待(10)
                                        键盘.按键(65,1)
                                        辅助.等待(10)
                                        键盘.按键(65,1)
                                        辅助.等待(10)
                                        键盘.弹起(164)
                                        辅助.等待(10)
                                        如果结束
如果结束

如果结束 并不是你与那个如果的位置对应 而是与离最近的上一个如果对应

jimye0526

阿斌老师正解

shine宝宝

又是一个不怎么看视频的人！

TC的程序执行是事件启动的！因为你的事件里有循环，这样会导致界面事件挂起，所以你的事件里功能应该放到线程里去执行！这样就不影响你的界面了，就不会界面卡死了！

官网视频-- 界......
Abin 发表于 2012-10-8 17:59:46

abin你太激动了！(? ?;)

wl_20110226

要使用 线程开启，不然会假死。

l13304648

感谢各位，我去看视频教程去