TC官方合作论坛

标题: 有关窗口的问题！ [打印本页]

作者: guoliang 时间: 2015-11-24 17:25
标题: 有关窗口的问题！
我写了段代码关于窗口后台找怪找物拾取的  我的想法是在窗口里执行的  可遮挡  但是我这段代码执行起来  没反应啊不用设置窗口按键的时候  还好使！原因是什么呢？
变量线程1
变量 dm

功能决战大漠版_初始化()
//这里添加你要执行的代码
//编辑框设置文本("编辑框0","我爱郭明瑞")
变量 ret=是否注册("dm.dmsoft")
如果(ret)
//       消息框("插件已注册")
      dm=com("dm.dmsoft")

否则
      消息框("插件未注册")
      变量 ret1=注册插件("rc:\\dm.dll",真)
      如果(ret1)
         dm=com("dm.dmsoft")
         变量版本号=dm.Ver()
         消息框("插件注册成功版本号为"&版本号)
      结束
结束

结束

功能启动_热键()

线程1=线程开启("打怪","")
结束

//终止热键操作
功能终止_热键()
线程关闭(线程1)
结束

功能打怪()
变量窗口句柄=窗口查找("┊¤▁决战巅峰01－24区▁网通▁已合▁¤┊ - 01-24区 - 呵呵aa")

dm.SetWindowState(窗口句柄,12)
变量绑定是否成功 = dm.BindWindow(窗口句柄,"dx","dx","dx",1)
调试输出(绑定是否成功)

循环(真)

      变量 x
      变量 y

      dm.SetPath(获取资源路径("rc:"))
      变量 ret3 = dm.FindPic(0,0,800,800,"/500元宝.bmp","000000",0.9,0,x,y)

      如果(ret3==0)
         x=x+19
         y=y+23 //x 620-599=21 y 306-283=23
         窗口鼠标左键单击(窗口句柄,x,y)
//          鼠标移动(x,y)
//          鼠标左键单击()
         等待(200)
         窗口鼠标左键单击(窗口句柄,x,y)
//          鼠标左键单击()
         等待(700)
//          鼠标左键单击()
         窗口鼠标左键单击(窗口句柄,x,y)
         等待(900)
         //          调试输出("现在在运行拾取")
      否则
         变量 x1=-1,y1=-1
         //          dm.SetPath(获取资源路径("rc:"))
         变量  ret2=dm.FindPic(0,0,800,500,"/血管图全.bmp","000000",0.9,0,x1,y1)
         如果(ret2==0)
            x1=x1+18
            y1=y1+30
//             鼠标移动(x1,y1)
//
//             鼠标左键单击()
            窗口鼠标左键单击(窗口句柄,x1,y1)
            等待(100)
//             鼠标左键单击()
            窗口鼠标左键单击(窗口句柄,x1,y1)
            等待(3500)
            调试输出("运行打怪")
         否则
            等待(1000)
//             键盘按键(49) //东西又没血又没的情况下按随机键重新开始
            窗口发送按键(窗口句柄,49)

            等待(1000)
            调试输出("没东西打")
         结束
      结束

结束

结束

作者: 爱上老公 时间: 2015-11-24 17:38
你既然想后台，就要用大漠键盘和鼠标

作者: 爱上老公 时间: 2015-11-24 17:39
你既然想后台，就要用大漠键盘和鼠标

作者: guoliang 时间: 2015-11-24 18:47

爱上老公发表于 2015-11-24 17:39
你既然想后台，就要用大漠键盘和鼠标

我找了下大漠的接口说明看了下按键没找到专门为后台的啊知道那个是后台的吗？还是就用普通的就行鼠标和键盘的！！知道的帮忙说下~~~

作者: guoliang 时间: 2015-11-24 19:25

爱上老公发表于 2015-11-24 17:39
你既然想后台，就要用大漠键盘和鼠标

dm.MoveTo x,y
dm.LeftClick
第一句大漠上的我复制下来提示语句错误

作者: 爱上老公 时间: 2015-11-24 20:23
后面加小括号

作者: guoliang 时间: 2015-11-24 21:34

爱上老公发表于 2015-11-24 20:23
后面加小括号

加了后在前台好使一到后台没反应

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