TC官方合作论坛

标题: 后台多开,怎么调用一个线程对各个窗口监视? [打印本页]
作者: cybkk    时间: 2013-11-17 23:20
标题: 后台多开,怎么调用一个线程对各个窗口监视?
本帖最后由 cybkk 于 2013-11-18 21:19 编辑

后台多开,怎么调用一个线程对各个窗口监视?
作者: cylhb    时间: 2013-11-17 23:26
保存好每个窗口句柄。
线程内遍历每个窗口监视
作者: kaixindexifan    时间: 2013-11-18 02:56
  1. 线程.开启("空间.方法","")

  3. 功能 方法()
  4.     x,y
  5.     dm=数组[10],窗口句柄=数组[10]
  6.    
  7.     窗口句柄[1]
  8.     窗口句柄[2]
  9.     窗口句柄[3]
  10.    
  11.     for(i=1;i<4;i++)
  12.         dm[i]=com("dm.dmsoft")
  13.         dm[i].BindWindow(窗口句柄[i],"dx","dx","dx",0)
  14.         辅助.等待(1000)
  15.     endfor
  16.    
  17.     循环(真)
  18.         辅助.等待(1000)
  19.         
  20.         for(i=1;i<4;i++)
  21.             ret=dm[i].FindPic(0,0,1024,768,"警告.bmp","000000",0.9,,0,x,y)
  22.             如果(x>=0&&y>=0)
  23.                
  24.                 .......
  25.             如果结束
  26.         endfor
  27.         
  28.         
  29.         
  30.     循环结束
  31.    
  32.    
  33.    
  34.    
  35. 功能结束
复制代码


作者: cybkk    时间: 2013-11-18 13:49
cylhb 发表于 2013-11-17 23:26
保存好每个窗口句柄。
线程内遍历每个窗口监视

我用 TC结合天使插件多对象多开示例 试了怎么只有最后一个窗口有效
作者: cybkk    时间: 2013-11-18 13:50
kaixindexifan 发表于 2013-11-18 02:56


我用 TC结合天使插件多对象多开示例 试了怎么只有最后一个窗口有效?
作者: kaixindexifan    时间: 2013-11-18 17:51
cybkk 发表于 2013-11-18 13:50
我用 TC结合天使插件多对象多开示例 试了怎么只有最后一个窗口有效?

你得贴你的代码 亲  你这一句话信息量太大了

作者: cybkk    时间: 2013-11-18 18:24
kaixindexifan 发表于 2013-11-18 17:51
你得贴你的代码 亲  你这一句话信息量太大了

天使=数组[]
线程=数组[]
句柄数组=数组[]
功能 主线程()
    大小
    句柄组合=系统.枚举("Notepad",1)
    如果(句柄组合=="")
        辅助.消息框("目标程序未开启")
        返回 假
    如果结束
    字符串.分割(句柄组合,"|",句柄数组)
    数组空间.大小(句柄数组,大小)
    遍历(下标=0;下标<大小;下标++)
        线程参数=句柄数组[下标]&","&下标
        天使对象=com("ts.tssoft")
        数组空间.增加(天使,天使对象)
        句柄值=线程.开启("多开.子线程",线程参数)
        数组空间.增加(线程,句柄值)
    遍历结束
   
功能结束

功能 子线程(参数)
    变量 下标,窗口句柄,参数数组
    字符串.分割(参数,",",参数数组)
    窗口句柄=参数数组[0]
    下标=参数数组[1]
    绑定=天使[下标].BindWindow(窗口句柄,"normal","normal","normal",1)
    辅助.等待(1000)
    天使[下标].SetPath(辅助.获取资源路径("rc:"))
    天使[下标].SetDict(0,"ll.txt")
    如果(绑定==0)
        辅助.消息框("绑定失败")
        返回 假
    否则
        线程.开启("多开2.查找",下标)
        //天使[下标].LockInput(1)
        //天使[下标].SendString(窗口句柄,"123456")
    如果结束
功能结束

功能 查找(下标)
        x,y
        天使[下标].FindStrFastS(0,1,224,127,"6","000000-000000",1.0,x,y)
        辅助.等待(2000)
功能结束


功能 开始_点击()
    如果(辅助.是否注册("ts.tssoft")==0)
        help.messagebox("没有注册插件,点击确定进行插件下载")
        help.cmd("http://bbs.tyuyan.com/thread-17666-1-1.html",true)
        返回 假
    如果结束
    线程.开启("多开.主线程","")
功能结束
作者: cybkk    时间: 2013-11-18 18:29
cybkk 发表于 2013-11-18 18:24
天使=数组[]
线程=数组[]
句柄数组=数组[]

天使=数组[]
线程=数组[]

功能 主线程()
    大小,句柄数组
    句柄组合=系统.枚举("Notepad",1)
    如果(句柄组合=="")
        辅助.消息框("目标程序未开启")
        返回 假
    如果结束
    字符串.分割(句柄组合,"|",句柄数组)
    数组空间.大小(句柄数组,大小)
    遍历(下标=0;下标<大小;下标++)
        线程参数=句柄数组[下标]&","&下标
        天使对象=com("ts.tssoft")
        数组空间.增加(天使,天使对象)
        句柄值=线程.开启("多开2.子线程",线程参数)
        数组空间.增加(线程,句柄值)
    遍历结束
   
功能结束

功能 子线程(参数)
    变量 下标,窗口句柄,参数数组
    字符串.分割(参数,",",参数数组)
    窗口句柄=参数数组[0]
    下标=参数数组[1]
    绑定=天使[下标].BindWindow(窗口句柄,"normal","normal","normal",1)
    辅助.等待(1000)
    天使[下标].SetPath(辅助.获取资源路径("rc:"))
    天使[下标].SetDict(0,"ll.txt")
    如果(绑定==0)
        辅助.消息框("绑定失败")
        返回 假
    否则
        线程.开启("多开2.查找",下标)
        //天使[下标].LockInput(1)
        //天使[下标].SendString(窗口句柄,"123456")
    如果结束
功能结束

功能 查找(下标)
    循环(真)
        x,y
        天使[下标].FindStrFastS(0,1,224,127,"6","000000-000000",1.0,x,y)
        调试输出(下标&","&x)
        辅助.等待(2000)
    循环结束
   
功能结束


功能 开始_点击()
    如果(辅助.是否注册("ts.tssoft")==0)
        help.messagebox("没有注册插件,点击确定进行插件下载")
        help.cmd("http://bbs.tyuyan.com/thread-17666-1-1.html",true)
        返回 假
    如果结束
    线程.开启("多开2.主线程","")
功能结束



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