马上加入TC
您需要 登录 才可以下载或查看,没有帐号?立即注册  
 
x
 
功能 摆摊喊话(下标) 
    变量 intX,intY 
    循环(真) 
        大漠[下标].FindStr(310,614,513,695,"在线","dfdfdf-202020",1.0,intX,intY) 
        如果(intX>=0) 
            大漠[下标].MoveTo(intX,intY) 
            辅助.等待(300) 
            大漠[下标].LeftClick()//鼠标左键 
            辅助.等待(200) 
            大漠[下标].KeyPress(80)//键盘按一下P 
        如果结束 
        大漠[下标].FindStr(462,411,581,475,"确定","dfdfdf-202020",1.0,intX,intY) 
        如果(intX>=0) 
            大漠[下标].MoveTo(intX,intY) 
            辅助.等待(300) 
            大漠[下标].LeftClick()//鼠标左键 
            辅助.等待(1500) 
        如果结束 
        返回值=大漠[下标].FindStr(284,594,537,701,"结束摆摊","dfdfdf-202020",1.0,intX,intY)//可以|正在00ff00-202020 
        如果(返回值>=0) 
            大漠[下标].KeyPress(80)//键盘按一下P 
            辅助.等待(2000) 
            跳出 
        否则 
            //大漠[下标].MoveTo(231,565) 
            //辅助.等待(1500) 
            大漠[下标].FindStr(269,536,342,603,"发送","8c7b66-303030",0.95,intX,intY) 
            如果(intX>=0) 
                大漠[下标].MoveTo(intX+3,intY+3) 
                辅助.等待(200) 
                大漠[下标].LeftClick()//鼠标左键 
                辅助.等待(200) 
                大漠[下标].MoveTo(1000,700) 
                辅助.等待(200) 
            如果结束 
            大漠[下标].KeyPress(80)//键盘按一下P 
            辅助.等待(1000) 
            大漠[下标].FindStr(555,148,635,278,"Z","c1190c-101010|a4251a-101010",1.0,intX,intY)//拔刀状态 
            如果(intX>=0) 
                大漠[下标].KeyPress(90)//键盘按一下Z 
                辅助.等待(3000) 
            如果结束 
        如果结束 
        辅助.等待(100) 
    循环结束 
    喊话内容=辅助.读配置(下标,"编辑框7","D:\\9y配置\\9y配置.ini") 
    如果(喊话内容=="") 
        辅助.等待(300000) 
        返回 假 
    如果结束 
    间隔=辅助.读配置(下标,"编辑框8","D:\\9y配置\\9y配置.ini") 
    如果(间隔=="") 
        间隔=30 
    如果结束 
    句柄=窗口数组[下标] 
    遍历(i=0;i<300/间隔;i++) 
        返回值=大漠[下标].FindStr(284,594,537,701,"结束摆摊","dfdfdf-202020",1.0,intX,intY) 
        如果(返回值>=0) 
            //大漠[下标].MoveTo(231,565) 
            //辅助.等待(1500) 
            大漠[下标].FindStr(269,536,342,603,"发送","8c7b66-303030",0.95,intX,intY) 
            如果(intX>=0) 
                大漠[下标].MoveTo(intX+3,intY+3) 
                辅助.等待(200) 
                大漠[下标].LeftClick()//鼠标左键 
                辅助.等待(200) 
                大漠[下标].MoveTo(1000,700) 
                辅助.等待(200) 
            如果结束 
            大漠[下标].KeyPress(80)//键盘按一下P 
            辅助.等待(1000) 
        如果结束 
        大漠[下标].FindStr(739,391,885,510,"修|炼","dfdfdf-202020",0.98,intX,intY) 
        如果(intX>=0) 
            大漠[下标].MoveTo(intX,intY) 
            辅助.等待(200) 
            大漠[下标].LeftClick()//鼠标左键点击 
            辅助.等待(200) 
        如果结束 
        大漠[下标].MoveTo(102,567) 
        辅助.等待(1000) 
        大漠[下标].LeftClick()//鼠标左键 
        辅助.等待(500) 
        大漠[下标].SendString(句柄,喊话内容) 
        辅助.等待(1000) 
        大漠[下标].MoveTo(306,567) 
        辅助.等待(200) 
        大漠[下标].LeftClick()//鼠标左键 
        辅助.等待(200) 
        大漠[下标].MoveTo(1000,700) 
        辅助.等待(间隔*1000) 
    遍历结束 
功能结束 
 
 
写的是一个自动摆摊脚本,大概思路是  
①区域找字 
如果找到 字 
则鼠标移动到坐标 
鼠标左键单击 
②区域找字 
如果找到  字 
则鼠标移动到坐标 
鼠标单击 
 
现在的主要问题是,我想在①和②之间加个一 按键P,按完P后,在区域找①中的字,如果找到则进行②,如果找不到则进行① 
这个困扰我好几天了,求大神告知啊!在线等,万分感谢! |