请教重复的问题

iycamtkg

功能 复选框10_点击()
    变量 状态=复选框获取状态("复选框10")

    循环(状态)
        如果(状态==真)            
            线程句柄=线程开启("刷精英","")
            跳出
        结束
    结束   
结束

我想要把刷精英的任务 重复10次,要怎样写,这样只能做一次

君凌天下

功能 复选框10_点击()
    变量 状态=复选框获取状态("复选框10")
    遍历(变量 i = 0; i < 10; i++)
        如果(状态)
            线程句柄=线程开启("刷精英","")
            跳出
        结束
    结束   
结束

iycamtkg

君凌天下 发表于 2015-11-24 19:56
功能 复选框10_点击()
    变量 状态=复选框获取状态("复选框10")
    遍历(变量 i = 0; i < 10; i++)

点选后,还是只做了一次任务就停止了

iycamtkg

君凌天下 发表于 2015-11-24 19:56
功能 复选框10_点击()
    变量 状态=复选框获取状态("复选框10")
    遍历(变量 i = 0; i < 10; i++)

1. 功能 复选框10_点击()
   
2.     变量 状态=复选框获取状态("复选框10")
   
3.    
   
4.     遍历(变量 i = 0; i < 10; i++)
   
5.         如果(状态)
   
6.             线程句柄=线程开启("刷精英","")
   
7.             跳出
   
8.         结束
   
9.     结束   
   
10.    
    
11. 结束
    
12. 
    
13. 
    
14. 功能 刷精英(x,y)
    
15.     //dm.KeyPress(76)   
    
16.     等待(200)
    
17.     循环(真)        
    
18.         等待(200)
    
19.         变量 dm_ret = dm.FindPic(0,0,2000,2000,"jy1.bmp","050505",0.9,0,x,y)
    
20.         如果(dm_ret>=0)
    
21.             调试输出(x&","&y)
    
22.             点击(x,y)            
    
23.             跳出           
    
24.         结束
    
25.     结束
    
26.    
    
27.     等待(200)
    
28.     循环(真)        
    
29.         等待(200)
    
30.         变量 dm_ret = dm.FindPic(0,0,2000,2000,"jy2.bmp","050505",0.9,0,x,y)
    
31.         如果(dm_ret>=0)
    
32.             调试输出(x&","&y)
    
33.             点击(x,y)            
    
34.             跳出           
    
35.         结束
    
36.     结束
    
37.    
    
38.     等待(200)
    
39.     循环(真)        
    
40.         等待(200)
    
41.         变量 dm_ret = dm.FindPic(0,0,2000,2000,"jy3.bmp","050505",0.9,0,x,y)
    
42.         如果(dm_ret>=0)
    
43.             调试输出(x&","&y)
    
44.             点击(x,y)            
    
45.             跳出           
    
46.         结束
    
47.     结束
    
48.     等待(200)
    
49.     循环(真)        
    
50.         等待(200)
    
51.         变量 dm_ret = dm.FindPic(0,0,2000,2000,"jy4.bmp","050505",0.9,0,x,y)
    
52.         如果(dm_ret>=0)
    
53.             调试输出(x&","&y)
    
54.             点击(x,y)            
    
55.             跳出           
    
56.         结束
    
57.     结束
    
58.     等待(200)
    
59.     循环(真)        
    
60.         等待(200)
    
61.         变量 dm_ret = dm.FindPic(0,0,2000,2000,"jy5.bmp","050505",0.9,0,x,y)
    
62.         如果(dm_ret>=0)
    
63.             调试输出(x&","&y)
    
64.             点击(x,y)            
    
65.             跳出
    
66.         结束
    
67.     结束
    
68.    
    
69.    
    
70. 结束

复制代码

这是全部的代码

君凌天下

iycamtkg 发表于 2015-11-24 20:13
点选后,还是只做了一次任务就停止了:

功能 复选框10_点击()     变量 状态=复选框获取状态("复选框10")     遍历(变量 i = 0; i < 10; i++)         如果(状态)             线程句柄=线程开启("刷精英","")             //跳出         结束     结束    结束

君凌天下

把那个跳出不要

言术

1. 功能 复选框10_点击()
   
2.     变量 状态=复选框获取状态("复选框10")
   
3.     如果(状态)
   
4.         线程句柄=线程开启("打怪","")
   
5.     结束
   
6. 结束
   
7. 
   
8. 功能 打怪()
   
9.     遍历(变量 i = 0; i < 10; i++)
   
10.         刷精英()
    
11.     结束
    
12. 结束

复制代码

iycamtkg

君凌天下 发表于 2015-11-24 20:18
把那个跳出不要

试过了,我用记事本记A,发现它会一下子把10个A都写出来

iycamtkg

言术 发表于 2015-11-24 20:31

我用记事本10秒一次写字母A,可行,可是做任务还是只有一次,不知哪出问题

1. 功能 复选框10_点击()
   
2.     变量 状态=复选框获取状态("复选框10")
   
3.     如果(状态)
   
4.         线程句柄=线程开启("打怪","")
   
5.     结束
   
6. 结束
   
7. 
   
8. 功能 打怪()
   
9.     遍历(变量 i = 0; i < 10; i++)
   
10.         刷精英()
    
11.     结束
    
12. 结束
    
13. 
    
14. 
    
15. 功能 刷精英()
    
16.     变量 x,y
    
17.     //dm.KeyPress(76)   
    
18.     等待(200)
    
19.     循环(真)        
    
20.         等待(200)
    
21.         变量 dm_ret = dm.FindPic(0,0,2000,2000,"jy1.bmp","050505",0.9,0,x,y)
    
22.         如果(dm_ret>=0)
    
23.             调试输出(x&","&y)
    
24.             点击(x,y)            
    
25.             跳出           
    
26.         结束
    
27.     结束
    
28.    
    
29.     等待(200)
    
30.     循环(真)        
    
31.         等待(200)
    
32.         变量 dm_ret = dm.FindPic(0,0,2000,2000,"jy2.bmp","050505",0.9,0,x,y)
    
33.         如果(dm_ret>=0)
    
34.             调试输出(x&","&y)
    
35.             点击(x,y)            
    
36.             跳出           
    
37.         结束
    
38.     结束
    
39.    
    
40.     等待(200)
    
41.     循环(真)        
    
42.         等待(200)
    
43.         变量 dm_ret = dm.FindPic(0,0,2000,2000,"jy3.bmp","050505",0.9,0,x,y)
    
44.         如果(dm_ret>=0)
    
45.             调试输出(x&","&y)
    
46.             点击(x,y)            
    
47.             跳出           
    
48.         结束
    
49.     结束
    
50.     等待(200)
    
51.     循环(真)        
    
52.         等待(200)
    
53.         变量 dm_ret = dm.FindPic(0,0,2000,2000,"jy4.bmp","050505",0.9,0,x,y)
    
54.         如果(dm_ret>=0)
    
55.             调试输出(x&","&y)
    
56.             点击(x,y)            
    
57.             跳出           
    
58.         结束
    
59.     结束
    
60.     等待(200)
    
61.     循环(真)        
    
62.         等待(200)
    
63.         变量 dm_ret = dm.FindPic(0,0,2000,2000,"jy5.bmp","050505",0.9,0,x,y)
    
64.         如果(dm_ret>=0)
    
65.             调试输出(x&","&y)
    
66.             点击(x,y)
    
67.             跳出
    
68.         结束
    
69.     结束
    
70.    
    
71.    
    
72. 结束

复制代码

君凌天下

那就对了