TC官方合作论坛

标题: 请教重复的问题 [打印本页]
作者: iycamtkg    时间: 2015-11-24 19:38
标题: 请教重复的问题
本帖最后由 iycamtkg 于 2015-11-24 19:51 编辑

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

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

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

作者: 君凌天下    时间: 2015-11-24 19:56
功能 复选框10_点击()
    变量 状态=复选框获取状态("复选框10")
    遍历(变量 i = 0; i < 10; i++)
        如果(状态)
            线程句柄=线程开启("刷精英","")
            跳出
        结束
    结束   
结束
作者: iycamtkg    时间: 2015-11-24 20:13
君凌天下 发表于 2015-11-24 19:56
功能 复选框10_点击()
    变量 状态=复选框获取状态("复选框10")
    遍历(变量 i = 0; i < 10; i++)

点选后,还是只做了一次任务就停止了
作者: iycamtkg    时间: 2015-11-24 20:15
君凌天下 发表于 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. 结束


  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. 结束
复制代码


这是全部的代码
作者: 君凌天下    时间: 2015-11-24 20:17
iycamtkg 发表于 2015-11-24 20:13
点选后,还是只做了一次任务就停止了:

功能 复选框10_点击()
    变量 状态=复选框获取状态("复选框10")
    遍历(变量 i = 0; i < 10; i++)
        如果(状态)
            线程句柄=线程开启("刷精英","")
            //跳出
        结束
    结束   
结束
作者: 君凌天下    时间: 2015-11-24 20:18
把那个跳出不要
作者: 言术    时间: 2015-11-24 20:31
  1. 功能 复选框10_点击()
  2.     变量 状态=复选框获取状态("复选框10")
  3.     如果(状态)
  4.         线程句柄=线程开启("打怪","")
  5.     结束
  6. 结束

  8. 功能 打怪()
  9.     遍历(变量 i = 0; i < 10; i++)
  10.         刷精英()
  11.     结束
  12. 结束
复制代码
作者: iycamtkg    时间: 2015-11-24 20:38
君凌天下 发表于 2015-11-24 20:18
把那个跳出不要

试过了,我用记事本记A,发现它会一下子把10个A都写出来
作者: iycamtkg    时间: 2015-11-24 20:50
言术 发表于 2015-11-24 20:31

我用记事本10秒一次写字母A,可行,可是做任务还是只有一次,不知哪出问题
  1. 功能 复选框10_点击()
  2.     变量 状态=复选框获取状态("复选框10")
  3.     如果(状态)
  4.         线程句柄=线程开启("打怪","")
  5.     结束
  6. 结束

  8. 功能 打怪()
  9.     遍历(变量 i = 0; i < 10; i++)
  10.         刷精英()
  11.     结束
  12. 结束


  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. 结束
复制代码
作者: 君凌天下    时间: 2015-11-24 21:10
那就对了
作者: 言术    时间: 2015-11-24 21:12
iycamtkg 发表于 2015-11-24 20:50
我用记事本10秒一次写字母A,可行,可是做任务还是只有一次,不知哪出问题

我不知道原因，我试着精简了一下，供你参考。


功能 复选框10_点击()
    变量 状态=复选框获取状态("复选框10")
    如果(状态)
        线程句柄=线程开启("打怪","")
    结束
结束

功能 打怪()
    遍历(变量 i = 0; i < 10; i++)
        刷精英()
    结束
结束


功能 刷精英()
    //    找图点击("jy1.bmp")
    //    找图点击("jy2.bmp")
    //    找图点击("jy3.bmp")
    //    找图点击("jy4.bmp")
    //    找图点击("jy5.bmp")
    遍历(变量 i = 1; i <= 5; i++)
        找图点击("jy"&i&".bmp")
    结束
结束

功能 找图点击(图片名)
    变量 x,y
    等待(200)
    循环(真)        
        等待(200)
        dm.FindPic(0,0,2000,2000,图片名,"050505",0.9,0,x,y)
        如果(x>0)
            调试输出(图片名&x&","&y)
            点击(x,y)            
            跳出           
        结束
    结束
结束
作者: 君凌天下    时间: 2015-11-24 21:14
iycamtkg 发表于 2015-11-24 20:38
试过了,我用记事本记A,发现它会一下子把10个A都写出来

遍历里面最好不要用线程...
作者: liuhaiyan008    时间: 2015-11-25 12:03
本帖最后由 liuhaiyan008 于 2015-11-25 12:05 编辑

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


作者: iycamtkg    时间: 2015-11-26 22:07
言术 发表于 2015-11-24 21:12
我不知道原因，我试着精简了一下，供你参考。

你好,上次用的挺顺的,我想把操作步骤变化一下,先找到JY1和JY2后,再循环再3,4,5,改来改去,一点复选框就卡死了



欢迎光临 TC官方合作论坛 (http://bbs.52tc.co/) Powered by Discuz! X3.1