TC官方合作论坛

标题: 求大神帮忙看下这段源码。应该怎么改呢。一直不对。 [打印本页]

作者: liu8666894 时间: 2013-3-30 20:20
标题: 求大神帮忙看下这段源码。应该怎么改呢。一直不对。
空间自动打怪
//默认空间
dm=com("dm.dmsoft")

变量线程句柄
功能自动打怪()

hwnd = dm.GetMousePointWindow()
dm.BindWindow(hwnd,"dx","dx","dx",0)

变量 x,y
循环(真)
         dm.KeyPress(9)
         辅助.等待(50)
         取怪颜色
         dm.FindColor(566,50,586,70,"bc0003-000000",1.0,0,x,y)
         辅助.等待(50)
         循环(x>0)
         辅助.等待(50)
         dm.KeyPress(49)
         辅助.等待(50)
         dm.KeyPress(50)
         辅助.等待(50)
         dm.KeyPress(51)
         辅助.等待(50)
         取怪颜色=dm.FindColor(446,52,466,72,"bc0003-000000",1.0,0,x,y)
         循环结束
         dm.KeyPress(9)
         辅助.等待(50)
      循环结束

功能结束
//开始按钮_点击操作
功能开始_点击()
线程句柄=线程.开启("自动打怪.自动打怪","")
功能结束

//退出按钮_点击操作
功能退出_点击()
线程.关闭(线程句柄)
辅助.退出()
功能结束

功能热键0_热键()//开始打怪
//这里添加你要执行的代码
自动打怪.开始_点击()
功能结束

功能热键1_热键()//退出打怪
//这里添加你要执行的代码
自动打怪.退出_点击()
功能结束

功能热键2_热键()
//这里添加你要执行的代码
dm.UnBindWindow()

功能结束

空间结束
//空间结束语句

跪求大神帮个忙。

作者: 1774322927 时间: 2013-3-30 20:37
哪边报错 - -

作者: liu8666894 时间: 2013-3-30 20:40
错是没错。但是运行的时候。不打怪。

作者: 187144831 时间: 2013-3-30 20:53
回复 3楼liu8666894的帖子

找找关于TC调试的教程
自己每行代码找原因

作者: Tc无名 时间: 2013-3-30 20:57
绑定窗口后
循环(真)
         dm.KeyPress(9)
         辅助.等待(50)
         取怪颜色
         dm.FindColor(566,50,586,70,"bc0003-000000",1.0,0,x,y)
                     if(x>=0)
                     dm.KeyPress(49)
                              dm.FindColor(566,50,586,70,"bc0003-000000",1.0,0,x,y)
                              if(x>=0)
                                 dm.KeyPress(49)
                              否则
               继续
                              endif
                     否则
         继续
                     endif
循环结束

作者: laowantong 时间: 2013-3-30 21:24
点击你的开始按钮试试

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