马上加入TC
您需要 登录 才可以下载或查看，没有帐号？立即注册
x
今天自己写了个自动打怪的。打怪也可以。。但是一旦停止调试。。游戏业被结束了。。。请各位懂行的老师看下问题
#import "dm.dmsoft" dm
空间 自动打怪
功能 逻辑型 开始_点击()
dm.SetPath("rc:")
辅助.等待(3000)
整型 窗口句柄
整型 头部颜色
整型 尾部颜色
整型 dm_ret
窗口句柄=dm.GetMousePointWindow()
辅助.等待(500)
dm.SetWindowState(窗口句柄,12)
dm.BindWindow(窗口句柄,"dx","dx","dx",0)
辅助.等待(1000)
while(7==7)
dm.KeyPress(9)
辅助.等待(1000)
头部颜色=dm.CmpColor(533,46,"a02500-247033",1.0)
如果 (头部颜色==1)
继续
否则
while(7==7)
dm.KeyPress(49)
辅助.等待(2000)
尾部颜色=dm.CmpColor(381,46,"a02500-247033",1.0)
如果 (尾部颜色==0)
继续
否则
如果结束
endwhile
如果结束
返回 真
endwhile
dm_ret= dm.UnBindWindow()
功能结束
空间结束
|
/2 
发表于 2012-3-12 09:52:38
楼主