|
发表于 2014-1-19 12:04:00
|
显示全部楼层
空间 现实
ts=com("ts.tssoft")
线程句柄
//开始按钮_点击操作
功能 开始_点击()
线程句柄=线程.开启("现实.开始","")
功能结束
功能 开始()
ts.SetPath(辅助.获取资源路径("rc:"))
hwnd = ts.FindWindow("","游戏")
调试输出(hwnd)
ts.MoveWindow(hwnd,-1,+10)
ret=ts.BindWindow(hwnd,"gdi","dx","dx",101)//windows
辅助.等待(2000)
ts.EnableRealKeypad(1)
调试输出(ret)
ts_ret=ts.SetDict(0,"zk1.txt")
现实.问号闪()
功能结束
功能 问号闪()
循环(真)
问号x,问号y
辅助.等待(辅助.随机数(100,300))
ts_ret= ts.FindPicS(613,21,797,153,"问号亮.bmp","000000",0.8,0,问号x,问号y)
如果(问号x>-1)
辅助.等待(辅助.随机数(50,100))
//判断BOOS
BOSS房x,BOSS房y
辅助.等待(辅助.随机数(50,100))
ts_ret= ts.FindPic(613,21,797,153,"BOSS房.bmp","000000",0.8,0,BOSS房x,BOSS房y)
调试输出("BOSS房在右="&ts_ret&","&BOSS房x&","&BOSS房y)
如果(BOSS房x>=0&&BOSS房y>=0)
ts.KeyPress(88)
否则
//没BOSS?继续吧找问号亮。
如果结束
否则
辅助.等待(辅助.随机数(50,100))
怪x,怪y
辅助.等待(辅助.随机数(120,130))
ret=ts.FindColor(1,212,797,552,"ff0080-000000",1.0,0,怪x,怪y)
如果(怪x>= 0 && 怪y>= 0)
ts.KeyPress(65)
否则
//我草,怪哪了?
如果结束
辅助.等待(辅助.随机数(50,100))
如果结束
循环结束
功能结束
空间结束
直接这样不就好了?省事,调来调去。你以为程序是神啊?
不过还是需要测试看看哪里出现错误了
一般出现这样都是代码出现问题,好好参考吧。
|
|