TC官方合作论坛

 找回密码
 立即注册
查看: 331|回复: 2
打印 上一主题 下一主题

[问题] 为什么这这样编写,绑定一次后在绑定的话软件会卡死?

[复制链接]
跳转到指定楼层
楼主
发表于 2013-7-6 17:07:41 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

马上加入TC

您需要 登录 才可以下载或查看,没有帐号?立即注册

x

空间 游戏检查

ts=com("ts.tssoft")
intX,intY
x,y
线程句柄


功能 绑定和游戏检查()
   
   
    ts.SetPath(辅助.获取资源路径("rc:"))
    ts.SetDict(0,"御龙找字.txt")
   
   
    编辑框.设置文本("编辑框2","1.正在绑定")
    顶层句柄= ts.GetForegroundWindow()
    判断=ts.BindWindow(顶层句柄,"dx","dx","dx",101)
    如果(判断==1)
        辅助.等待(1000)
        编辑框.设置文本("编辑框2","1.绑定成功!")
    否则
        辅助.消息框("失败")
    如果结束
    辅助.等待(1000)
   
    编辑框.设置文本("编辑框2","2.正在检查")
    循环(真)
        ts.FindPic(0,0,2000,2000,"游戏检查.bmp","000000",1.0,0,x,y)
        辅助.等待(200)
        如果(x>=0)
            辅助.等待(1000)
            编辑框.设置文本("编辑框2","3.检查成功!")
            跳出
        如果结束
    循环结束
    辅助.等待(1000)
    编辑框.设置文本("编辑框2","正在设置,请等待一会!")
    辅助.等待(3000)
   
   
    循环(真)
        判断=ts.FindPic(0,0,2000,2000,"画面设置.bmp","000000",1.0,0,x,y)
        辅助.等待(200)
        如果(判断==-1)
            ts.KeyPress(27)
            辅助.等待(200)
        否则      
            跳出
        如果结束
    循环结束
    ts.FindPic(0,0,2000,2000,"画面设置.bmp","000000",1.0,0,x,y)
    辅助.等待(100)
    ts.MoveTo(x,y)
    help.sleep(200)
    ts.LeftClick()
   
   
   
    ret=ts.FindStr(0,0,2000,2000,"固定视角","e18700-000000",1.0,x,y)
    辅助.等待(200)
   
    如果(ret==0)
        
    否则
        ts.FindStr(0,0,2000,2000,"自由视角","e18700-000000",1.0,x,y)
        辅助.等待(100)
        ts.MoveTo(x+4,y+5)
        辅助.等待(100)
        ts.LeftClick()
        辅助.等待(100)
        
        ts.FindStr(0,0,2000,2000,"自由视角","e18700-000000",1.0,x,y)
        辅助.等待(100)
        ts.MoveTo(x+30,y+60)
        辅助.等待(200)
        ts.LeftClick()
    如果结束
   
   
    辅助.等待(1000)
   
    判断=ts.FindStr(0,0,2000,2000,"1024*768","e18700-000000",1.0,x,y)
    辅助.等待(100)
    如果(判断==0)
        辅助.等待(200)
        
    否则
        ts.FindStr(0,0,2000,2000,"固定视角","e18700-000000",1.0,x,y)
        ts.MoveTo(x-268,y+5)
        辅助.等待(100)
        ts.LeftClick()
        辅助.等待(200)
        
        ts.FindStr(0,0,2000,2000,"1024*768","e18700-000000",1.0,x,y)
        辅助.等待(100)
        ts.MoveTo(x,y)
        辅助.等待(100)
        ts.LeftClick()
        辅助.等待(100)   
    如果结束
   
    辅助.等待(1000)
    ts.FindPic(0,0,2000,2000,"声音设置.bmp","000000",1.0,0,x,y)
    辅助.等待(200)
    if(x>=0)
        辅助.等待(200)
        ts.MoveTo(x,y)
        辅助.等待(100)
        ts.LeftClick()
        辅助.等待(200)
    endif
   
   
    判断=ts.FindPic(0,0,2000,2000,"勾.bmp","202020",1.0,0,x,y)
    辅助.等待(200)
    如果(判断==-1)
    否则
        循环(真)
            判断=ts.FindPic(0,0,2000,2000,"勾.bmp","202020",1.0,0,x,y)
            辅助.等待(200)
            ts.MoveTo(x,y)
            辅助.等待(200)
            ts.LeftClick()
            辅助.等待(200)
            如果(判断==-1)
                辅助.等待(200)
                跳出
            如果结束
        循环结束
        
    如果结束
    //循环结束
   
    辅助.等待(500)
   
    //循环(真)
    ts.FindPic(0,0,2000,2000,"功能设置.bmp","000000",1.0,0,x,y)
    辅助.等待(200)
    if(x>=0)
        辅助.等待(200)
        ts.MoveTo(x,y)
        辅助.等待(100)
        ts.LeftClick()
    endif
   
    辅助.等待(200)
   
    判断=ts.FindPic(0,0,2000,2000,"勾.bmp","202020",1.0,0,x,y)
    辅助.等待(200)
    如果(判断==-1)
    否则
        循环(真)
            判断=ts.FindPic(0,0,2000,2000,"勾.bmp","202020",1.0,0,x,y)
            辅助.等待(200)
            ts.MoveTo(x,y)
            辅助.等待(200)
            ts.LeftClick()
            辅助.等待(200)
            如果(判断==-1)
                辅助.等待(200)
                跳出
            如果结束
        循环结束
        
    如果结束
    //循环结束
   
    ts.FindStr(0,0,2000,2000,"确定","f5f5ab-000000",1.0,x,y)
    辅助.等待(100)
    ts.MoveTo(x+5,y+5)
    辅助.等待(100)
    ts.LeftClick()
   
    辅助.等待(1000)
    //循环(真)
    循环(真)
        判断=ts.FindPic(0,0,2000,2000,"画面设置.bmp","000000",1.0,0,x,y)
        辅助.等待(100)
        如果(判断==-1)
            ts.KeyPress(27)
            辅助.等待(200)
        否则
            
            跳出
        如果结束
    循环结束
    辅助.等待(200)
    ts.FindPic(0,0,2000,2000,"画面设置.bmp","000000",1.0,0,x,y)
    辅助.等待(100)
    ts.MoveTo(x,y)
    help.sleep(200)
    ts.LeftClick()
    //跳出   
   
    //循环结束
   
    辅助.等待(300)
    ts.FindPic(0,0,2000,2000,"低画面.bmp","000000",1.0,0,x,y)
    如果(x>=0)
        辅助.等待(100)
        ts.MoveTo(x+4,y+5)
        辅助.等待(100)
        ts.LeftClick()
        辅助.等待(100)
    如果结束
   
    ts.FindStr(0,0,2000,2000,"确定","f5f5ab-000000",1.0,x,y)
    如果(x>=0)
        辅助.等待(100)
        ts.MoveTo(x+5,y+5)
        辅助.等待(100)
        ts.LeftClick()
    如果结束
   
    ts.FindPic(0,0,2000,2000,"北.bmp","000000",1.0,0,x,y)
    如果(x>=0)
        辅助.等待(100)
        ts.MoveTo(x+4,y+5)
        辅助.等待(100)
        ts.LeftClick()
        辅助.等待(100)
    如果结束
   
   
    ts.FindPic(0,0,2000,2000,"聊.bmp","000000",1.0,0,x,y)
    如果(x>=0)
        ts.FindPic(0,0,2000,2000,"聊天.bmp","000000",1.0,0,x,y)
        辅助.等待(200)
        ts.MoveTo(x,y)
        辅助.等待(100)
        ts.LeftClick()
        辅助.等待(100)
    如果结束
   
   
    ts.KeyPress(123)
   
   
   
    编辑框.设置文本("编辑框2","5.设置完毕!")
   
    御龙在天登陆.家族任务()
   
    编辑框.设置文本("编辑框2","正在开启线程")
   
   
功能结束



功能 解绑1()
    编辑框.设置文本("编辑框2","解绑成功!")
    ts.UnBindWindow()
   
功能结束
功能 解绑()
    编辑框.设置文本("编辑框2","解绑成功!")
    ts.UnBindWindow()  
功能结束
空间结束
回复

使用道具 举报

沙发
 楼主| 发表于 2013-7-6 17:09:31 | 只看该作者
卡死后也解绑不了......关掉软件游戏也会一起被关了
回复 支持 反对

使用道具 举报

板凳
 楼主| 发表于 2013-7-6 17:13:49 | 只看该作者
还有的编码不在这个空间里
回复 支持 反对

使用道具 举报

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

本版积分规则

关闭

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

关闭

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

GMT+8, 2025-10-3 18:30 , Processed in 0.176477 second(s), 24 queries .

Powered by 海安天坑软件科技有限公司

© 2001-2013 Comsenz Inc.

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