|
学了几天的(TC)今天在家闲的没事干做的一个,发上来分享一下不过就是后面的不会做了,本来想那个(斯诺克10)(八九球15)
就是假设用x1,y1和x2,y2,用加减乘除法算出来再加(斯诺克10)或者(八九球15)
让光标到母球的后边,到这里就不会弄了(斯诺克的球体和八九球的球体大小不一样)
实在是不会做了所以把源码发上来,分享一下
//==============================
变量 线程ID
//从这里开始执行
变量 r,x1,y1,x2,y2
功能 执行()
如果(单选框获取状态("单选框0"))
消息框("斯诺克模式")
r = 10
否则
消息框("八九球模式")
r = 10
结束
调试输出(r)
循环(真)
循环(真)
设置托盘("请选被击球",真)
设置托盘气泡("请选被击球","目标")
变量 sb = 鼠标等待点击()
调试输出(sb)
如果(sb==1004)
鼠标获取坐标(x1,y1)
跳出
结束
结束
等待(500)
循环(真)
设置托盘("请选球袋",真)
设置托盘气泡("请选球袋","目标")
变量 sm=键盘等待按键()
调试输出(sm)
如果(sm==100)
鼠标移动(493,224)
等待(20)
鼠标获取坐标(x2,y2)
跳出
否则如果(sm==101)
鼠标移动(961,215)
等待(20)
鼠标获取坐标(x2,y2)
跳出
否则如果(sm==102)
鼠标移动(1428,224)
等待(20)
鼠标获取坐标(x2,y2)
跳出
否则如果(sm==97)
鼠标移动(493,700)
等待(20)
鼠标获取坐标(x2,y2)
跳出
否则如果(sm==98)
鼠标移动(961,708)
等待(20)
鼠标获取坐标(x2,y2)
跳出
否则如果(sm==99)
鼠标移动(1428,700)
等待(20)
鼠标获取坐标(x2,y2)
跳出
结束
结束
循环(真)
设置托盘("点击左键开球",真)
设置托盘气泡("点击左键开球","目标")
鼠标移动(x1,y1)
变量 sl = 鼠标等待点击()
如果(sl==1001)
跳出
结束
结束
结束
结束
//启动_热键操作
功能 启动_热键()
线程ID=线程开启("执行","")
结束
//终止热键操作
功能 终止_热键()
线程关闭(线程ID)
结束
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
|