TC官方合作论坛

 找回密码
 立即注册
查看: 46|回复: 0

[TC5.0源码] 2DQQ桌球源码

[复制链接]
发表于 7 天前 | 显示全部楼层 |阅读模式
学了几天的(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
回复

使用道具 举报

*滑动验证:
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

关闭

站长推荐上一条 /2 下一条

关闭

小黑屋|TC官方合作论坛 (苏ICP备18045623号)

GMT+8, 2019-4-22 06:53 , Processed in 0.030530 second(s), 23 queries .

Powered by 海安简单软件服务部

© 2008-2018 版权所有 保留所有权利

快速回复 返回顶部 返回列表