| 
 | 
	
 
 本帖最后由 chentaotest 于 2014-2-18 21:24 编辑  
 
这是我第一次发源码帖,主要看的还是脚本思路吧,思路不好的地方还希望指正,我也好学习下你们的脚本思路. 
可能某些插件代码不知道什么意思,没关系,大家互相学习下思路就OK.辅助截图: 
 
//************************************************************ 
空间 测试者AID收货 
//默认空间 
变量 ct=数组[5],窗口句柄=数组[5],多开区分=数组[5],线程数组=数组[5],总金额=数组[5],曾经时间=数组[5],喊话=数组[5] 
变量 小20级=数组[5],小35级=数组[5],小45级=数组[5],小65级=数组[5],小85级=数组[5],大85级=数组[5] 
变量 下20级=数组[5],下35级=数组[5],下45级=数组[5],下65级=数组[5],下85级=数组[5],上85级=数组[5] 
变量 间隔=数组[5],世界一=数组[5],世界二=数组[5] 
 
功能 自动关机(参数) 
    t=编辑框.获得文本("编辑框15") 
    辅助.等待(t*60*1000) 
    ct[参数].ExitOs(1) 
功能结束 
 
功能 获取当前时间(参数) 
    at = 日期时间.当前日期() 
    时=日期时间.时(at) 
    分=日期时间.分(at) 
    秒=日期时间.秒(at) 
    曾经时间[参数]=时*60*60*1000+分*60*1000+秒*1000 
功能结束 
 
功能 判断是否超时(参数) 
    变量 规定时间 
    规定时间=3*60*1000 
    at = 日期时间.当前日期() 
    当前时=日期时间.时(at) 
    当前分=日期时间.分(at) 
    当前秒=日期时间.秒(at) 
    现在时间=当前时*60*60*1000+当前分*60*1000+当前秒*1000 
    调试输出(现在时间) 
    调试输出(曾经时间[参数]) 
    调试输出(规定时间) 
    如果(现在时间 - 曾经时间[参数] >= 规定时间) 
        返回 真 
    如果结束 
功能结束 
 
功能 是否交易中(参数) 
    变量 x,y 
    ct[参数].FindPic(431,49,633,143,"交易标题.bmp","000000",0.8,0,x,y) 
    辅助.等待(100) 
    如果(x>=0) 
         
        返回 真 
    否则 
         
        返回 假 
    如果结束 
功能结束 
 
 
 
 
功能 判断第一格(参数) 
    变量 x,y,X,Y 
    总金额[参数]=0 
    ct[参数].chentaomt(460+辅助.随机数(1,10),200+辅助.随机数(1,10)) 
    辅助.等待(辅助.随机数(50,100)) 
    ct[参数].LeftClick() 
    辅助.等待(辅助.随机数(200,210)) 
    ct[参数].FindPic(0,0,1024,768,"宠物信息.bmp","000000",0.7,0,x,y) 
    如果(x>0) 
        调试输出("宠物信息已打开") 
        辅助.等待(辅助.随机数(190,210)) 
         
        ct[参数].FindStr(189,356,392,432,"宝宝","ffffff-000000",1.0,X,Y) 
        如果(X>0) 
            调试输出("是BB") 
            返回 真 
        否则 
            调试输出("放入的是野生或变异") 
            返回 假 
        如果结束 
    否则 
        调试输出("宠物信息未打开") 
    如果结束 
功能结束 
 
功能 判断第二格(参数) 
    变量 x,y,X,Y 
    ct[参数].chentaomt(460+辅助.随机数(1,10),250+辅助.随机数(1,10)) 
    辅助.等待(辅助.随机数(50,100)) 
    ct[参数].LeftClick() 
    辅助.等待(辅助.随机数(200,210)) 
    ct[参数].FindPic(0,0,1024,768,"宠物信息.bmp","000000",0.7,0,x,y) 
    如果(x>0) 
        调试输出("宠物信息已打开") 
        辅助.等待(辅助.随机数(190,210)) 
        ct[参数].FindStr(189,356,392,432,"宝宝","ffffff-000000",1.0,X,Y) 
        如果(X>0) 
            调试输出("是BB") 
            返回 真 
        否则 
            调试输出("放入的是野生或变异") 
            返回 假 
        如果结束 
    否则 
        调试输出("宠物信息未打开") 
    如果结束 
     
功能结束 
 
功能 计算价钱(参数) 
    辅助.等待(辅助.随机数(190,210)) 
    携带等级=ct[参数].Ocr(471,346,579,371,"ffffff-000000",1.0) 
    如果(携带等级!="") 
        调试输出("获取到等级") 
        如果(携带等级<=20) 
            返回 小20级[参数] 
        否则 
            如果(携带等级>20&&携带等级<=35) 
                返回 小35级[参数] 
            否则 
                如果(携带等级>35&&携带等级<=45) 
                    返回 小45级[参数] 
                否则 
                    如果(携带等级>45&&携带等级<=65) 
                        返回 小65级[参数] 
                    否则 
                        如果(携带等级>65&&携带等级<=85) 
                            返回 小85级[参数] 
                        否则 
                            如果(携带等级>85) 
                                返回 大85级[参数] 
                            如果结束 
                        如果结束 
                    如果结束 
                如果结束 
            如果结束 
        如果结束 
    否则 
        调试输出("获取等级失败") 
    如果结束 
功能结束 
 
功能 再次确认货物价格(参数) 
    已给金钱=类型.转整型(ct[参数].Ocr(333,344,476,378,"00ff00-000000|ffffff-000000|ff00ff-000000",1.0)) 
    调试输出(已给金钱) 
    已给金钱=已给金钱*10000 
    调试输出("已给金钱="&已给金钱&"总金额[参数]="&总金额[参数]) 
    如果(总金额[参数]==已给金钱) 
        返回 真 
         
    否则 
         
    如果结束 
     
功能结束 
 
 
功能 给钱(参数) 
    变量 x,y 
    辅助.等待(辅助.随机数(180,200)) 
    ct[参数].FindPic(680,299,843,392,"铜钱.bmp","000000",0.8,0,x,y) 
    如果(x>0) 
        调试输出("找到铜钱位置") 
        ct[参数].chentaomt(x+辅助.随机数(2,5),y+辅助.随机数(2,5)) 
        辅助.等待(辅助.随机数(5,15)) 
        ct[参数].LeftClick() 
        辅助.等待(辅助.随机数(90,110)) 
        ct[参数].chentaokpsr(总金额[参数],辅助.随机数(5,15)) 
        辅助.等待(1000) 
        辅助.等待(辅助.随机数(20,50)) 
        ct[参数].KeyPress(13) 
        辅助.等待(辅助.随机数(190,210)) 
        ct[参数].FindStr(0,0,1024,768,"给予金","ffffff-000000",1.0,x,y) 
        如果(x>0) 
            调试输出("回车失败") 
            ct[参数].KeyPress(13) 
            辅助.等待(辅助.随机数(20,50)) 
            ct[参数].KeyPress(13) 
            辅助.等待(辅助.随机数(20,50)) 
            返回 真 
        否则 
            调试输出("给予成功") 
             
            返回 真 
        如果结束 
         
         
    否则 
        调试输出("未找到铜钱位置") 
    如果结束 
     
功能结束 
 
功能 锁定交易(参数) 
    变量 锁定x,锁定y 
    ct[参数].FindPic(0,0,1024,768,"锁定.bmp","000000",0.9,0,锁定x,锁定y) 
    如果(锁定x>0) 
        ct[参数].chentaomt(锁定x+辅助.随机数(3,8),锁定y+辅助.随机数(2,5)) 
        辅助.等待(辅助.随机数(50,100)) 
        ct[参数].LeftClick() 
        辅助.等待(辅助.随机数(50,100)) 
        ct[参数].FindPic(0,0,1024,768,"已锁定.bmp","000000",0.9,0,锁定x,锁定y) 
        如果(锁定x>0) 
            调试输出("锁定成功") 
            返回 真 
        否则 
            辅助.等待(辅助.随机数(50,100)) 
            ct[参数].LeftClick() 
            辅助.等待(辅助.随机数(50,100)) 
            返回 真 
        如果结束 
    否则 
        调试输出("未找到锁定按钮位置") 
    如果结束 
功能结束 
 
功能 点击交易(参数) 
    变量 交易x,交易y,交易1x,交易1y 
    ct[参数].FindPic(0,0,1024,768,"点完交易.bmp","000000",0.9,0,交易x,交易y) 
    如果(交易x>0) 
        调试输出("已点击过,无需重复点击") 
    否则 
        ct[参数].FindPic(0,0,1024,768,"交易1.bmp|交易2.bmp","000000",0.8,0,交易1x,交易1y) 
        如果(交易1x>0) 
            ct[参数].chentaomt(交易1x+辅助.随机数(2,5),交易1y+辅助.随机数(1,3)) 
            辅助.等待(辅助.随机数(10,30)) 
            ct[参数].LeftClick() 
            辅助.等待(辅助.随机数(10,30)) 
        否则 
            调试输出("本次未找到交易按钮") 
        如果结束 
    如果结束 
功能结束 
 
功能 重置鼠标位置(参数) 
    辅助.等待(辅助.随机数(30,90)) 
    ct[参数].chentaomt(349+辅助.随机数(1,10),513+辅助.随机数(1,10)) 
    辅助.等待(辅助.随机数(80,100)) 
功能结束 
 
功能 取消交易(参数) 
    变量 取消x,取消y,x,y 
    ct[参数].FindPic(0,0,1024,768,"取消.bmp","000000",0.8,0,取消x,取消y) 
    如果(取消x>0) 
        ct[参数].chentaomt(取消x+辅助.随机数(3,8),取消y+辅助.随机数(2,5)) 
        辅助.等待(辅助.随机数(50,100)) 
        ct[参数].LeftClick() 
        辅助.等待(200) 
        ct[参数].FindPic(0,0,1024,768,"交易标题.bmp","000000",0.8,0,x,y) 
        如果(x<0) 
            调试输出("交易取消成功") 
             
            返回 真 
        如果结束 
    否则 
        调试输出("未找到取消按钮") 
    如果结束 
功能结束 
 
功能 对方是否锁定(参数) 
    变量 对方锁定x,对方锁定y 
    ct[参数].FindPic(132,83,628,339,"对方锁定.bmp","000000",0.8,0,对方锁定x,对方锁定y) 
    如果(对方锁定x>0) 
        调试输出("对方已锁定") 
        返回 真 
    否则 
        调试输出("对方未锁定") 
    如果结束 
功能结束 
 
功能 清洁窗口(参数) 
    变量 清洁x,清洁y 
    辅助.等待(辅助.随机数(1,15)) 
    ct[参数].KeyPress(27) 
    辅助.等待(辅助.随机数(120,145)) 
    ct[参数].FindStr(178,202,391,354,"今日收益","ffff00-000000",1.0,清洁x,清洁y) 
    辅助.等待(150) 
    如果(清洁x>0) 
        调试输出("ESC窗口打开") 
        辅助.等待(辅助.随机数(50,85)) 
        ct[参数].KeyPress(27) 
        辅助.等待(辅助.随机数(50,85)) 
         
    否则 
        调试输出("ESC窗口未打开")   
    如果结束 
    返回 假 
功能结束 
 
功能 打开店铺(参数) 
    变量 i,x,y,X,Y,店铺x,店铺y 
    遍历(i=0;i<2;i++) 
        辅助.等待(222) 
        ct[参数].FindStr(0,0,1024,768,"商会会长","edda36-000000",1.0,x,y) 
        如果(x>0) 
            调试输出("看到商会会长") 
            ct[参数].chentaomt(x+辅助.随机数(25,30),y-辅助.随机数(46,52)) 
            辅助.等待(辅助.随机数(30,60)) 
            ct[参数].LeftClick() 
            辅助.等待(辅助.随机数(150,170)) 
            ct[参数].FindStr(0,0,1024,768,"查看我的店铺","05f933-000000",1.0,X,Y) 
            如果(X>0) 
                ct[参数].chentaomt(X+辅助.随机数(5,15),Y+辅助.随机数(2,6)) 
                辅助.等待(辅助.随机数(30,60)) 
                ct[参数].LeftClick() 
                辅助.等待(200) 
                ct[参数].FindPic(0,0,1024,768,"店铺管理.bmp","000000",0.8,0,店铺x,店铺y) 
                如果(店铺x>0) 
                    返回 真 
                    跳出 
                如果结束 
            如果结束 
        否则 
            调试输出("未看到商会会长") 
            辅助.等待(辅助.随机数(10,30)) 
            ct[参数].KeyDown(164) 
            辅助.等待(辅助.随机数(30,60)) 
            ct[参数].KeyDown(49) 
            辅助.等待(辅助.随机数(30,60)) 
            ct[参数].KeyUp(49) 
            辅助.等待(辅助.随机数(30,60)) 
            ct[参数].KeyUp(164) 
            辅助.等待(辅助.随机数(200,300)) 
        如果结束 
    遍历结束 
功能结束 
 
功能 选中查看BB(参数) 
    变量 X,Y,x,y,信息x,信息y 
    辅助.等待(200) 
    ct[参数].FindStr(542,145,703,342,"宝宝","ffffff-000000",1.0,X,Y) 
    如果(X>0) 
        ct[参数].chentaomt(X+辅助.随机数(1,6),Y+辅助.随机数(3,7)) 
        辅助.等待(辅助.随机数(30,60)) 
        ct[参数].LeftClick() 
        辅助.等待(辅助.随机数(30,60)) 
        辅助.等待(200) 
        ct[参数].FindPic(676,278,871,383,"查看.bmp","000000",0.8,0,x,y) 
        如果(x>0) 
            调试输出("找到查看按钮") 
            ct[参数].chentaomt(x+辅助.随机数(1,5),y+辅助.随机数(2,5)) 
            辅助.等待(辅助.随机数(30,60)) 
            ct[参数].LeftClick() 
            辅助.等待(200) 
            ct[参数].FindPic(0,0,1024,768,"宠物信息.bmp","000000",0.8,0,信息x,信息y) 
            如果(信息x>0) 
                调试输出("宠物信息栏打开") 
                返回 真 
            否则 
                调试输出("宠物信息栏未打开") 
            如果结束 
        否则 
            调试输出("未找到查看按钮") 
        如果结束 
    否则 
        调试输出("此宠物不是BB") 
        返回 假 
    如果结束 
功能结束 
 
功能 上货价钱(参数) 
    辅助.等待(200) 
    携带等级=ct[参数].Ocr(471,347,576,377,"ffffff-000000",1.0) 
    如果(携带等级!="") 
        调试输出("上货中获取到等级") 
        如果(携带等级<=20) 
            返回 下20级[参数] 
        否则 
            如果(携带等级>20&&携带等级<=35) 
                返回 下35级[参数] 
            否则 
                如果(携带等级>35&&携带等级<=45) 
                    返回 下45级[参数] 
                否则 
                    如果(携带等级>45&&携带等级<=65) 
                        返回 下65级[参数] 
                    否则 
                        如果(携带等级>65&&携带等级<=85) 
                            返回 下85级[参数] 
                        否则 
                            如果(携带等级>85) 
                                返回 上85级[参数] 
                            如果结束 
                        如果结束 
                    如果结束 
                如果结束 
            如果结束 
        如果结束 
    否则 
        调试输出("上货中获取等级失败") 
    如果结束 
功能结束 
 
功能 提交录入出货金额(参数,单价) 
    变量 x,y,X,Y 
    ct[参数].chentaomt(455+辅助.随机数(1,15),290+辅助.随机数(1,15)) 
    辅助.等待(辅助.随机数(50,90)) 
    ct[参数].RightClick() 
    辅助.等待(辅助.随机数(190,220)) 
    ct[参数].FindPic(0,0,1024,768,"提交.bmp","000000",0.8,0,x,y) 
    如果(x>0) 
        调试输出("找到提交按钮") 
        ct[参数].chentaomt(x+辅助.随机数(1,5),y+辅助.随机数(2,5)) 
        辅助.等待(辅助.随机数(30,60)) 
        ct[参数].LeftClick() 
        辅助.等待(辅助.随机数(180,210)) 
        ct[参数].FindStr(340,284,684,424,"的单价","ffffff-000000",1.0,X,Y) 
        如果(X>0) 
            调试输出("录入金钱中") 
            ct[参数].chentaokpsr(单价,辅助.随机数(5,15)) 
            辅助.等待(1000) 
            ct[参数].KeyPress(13) 
            辅助.等待(辅助.随机数(30,60)) 
            ct[参数].KeyPress(13) 
            辅助.等待(辅助.随机数(30,60)) 
            ct[参数].KeyPress(13) 
            辅助.等待(辅助.随机数(30,60)) 
            返回 真 
        否则 
            调试输出("点击提交失败") 
        如果结束 
    否则 
        调试输出("未找到提交按钮") 
    如果结束 
功能结束 
 
功能 上货中否(参数) 
    变量 x,y 
    辅助.等待(100) 
    ct[参数].FindPic(0,0,1024,768,"店铺管理.bmp","000000",0.8,0,x,y) 
    如果(x>0) 
        返回 真 
    否则 
        调试输出("店铺管理已关闭") 
    如果结束 
功能结束 
 
功能 自动上货(参数) 
    变量 i 
     
    打开店铺=测试者AID收货.打开店铺(参数) 
    如果(打开店铺==真) 
        遍历(i=0;i<8;i++) 
            选中查看BB=测试者AID收货.选中查看BB(参数) 
            如果(测试者AID收货.是否交易中(参数)==真) 
                跳出 
            如果结束 
            如果(选中查看BB==真) 
                价钱=测试者AID收货.上货价钱(参数) 
                如果(测试者AID收货.是否交易中(参数)==真) 
                    跳出 
                如果结束 
                如果(价钱!="") 
                    上货中=测试者AID收货.上货中否(参数) 
                    如果(测试者AID收货.是否交易中(参数)==真) 
                        跳出 
                    如果结束 
                    如果(上货中==真) 
                         
                        测试者AID收货.提交录入出货金额(参数,价钱) 
                        调试输出("第"&i&"只BB上货成功") 
                        如果(测试者AID收货.是否交易中(参数)==真) 
                            跳出 
                        如果结束 
                    否则 
                        调试输出("店铺管理已关闭") 
                        跳出 
                    如果结束 
                否则 
                    调试输出("获取携带等级失败") 
                如果结束 
            否则 
                如果(选中查看BB==假) 
                    调试输出("身上已无BB") 
                    跳出 
                如果结束 
            如果结束 
        遍历结束 
    如果结束 
     
功能结束 
 
 
 
功能 注册收费(参数) 
    ct[参数]=com("cht.taotao") 
    收费=ct[参数].chentaogg("dfsf3453563322","" 
    如果(收费!=1) 
        辅助.消息框("注功能失败!") 
        错误码=ct[参数].GetLastError() 
        辅助.消息框(错误码) 
        辅助.退出() 
    如果结束 
功能结束 
 
功能 绑定窗口(参数) 
    ct[参数].chentaosph(辅助.获取资源路径("rc:")) 
    系统类型=ct[参数].GetOsType() 
    //窗口.激活(窗口句柄[参数]) 
    如果(系统类型==1||系统类型==2) 
        调试输出("该系统为XP系统!") 
        绑定=ct[参数].chentaobwdex(窗口句柄[参数],"dx","dx.mouse.position.lock.api|dx.mouse.position.lock.message|dx.mouse.clip.lock.api|dx.mouse.input.lock.api|dx.mouse.state.api|dx.mouse.api|dx.mouse.cursor","windows",101) 
         
        辅助.等待(2000) 
        如果(绑定==0) 
            辅助.消息框("绑定窗口失败!") 
            //辅助.退出() 
            绑定=ct[参数].GetLastError() 
            辅助.消息框("失败错误码"&绑定) 
        否则 
            调试输出("XP下绑定成功!") 
            ctpath=ct[参数].chentaosph(辅助.获取资源路径("rc:xp")) 
            如果(ctpath!=1) 
                辅助.消息框("设置路径失败!") 
                辅助.退出() 
            如果结束 
        如果结束 
    否则 
        如果(系统类型==3) 
            调试输出("该系统为WIN7系统!") 
            //绑定 = ct[参数].chentaobwdex(窗口句柄[参数],"dx2","dx.mouse.position.lock.api|dx.mouse.position.lock.message|dx.mouse.clip.lock.api|dx.mouse.input.lock.api|dx.mouse.state.api|dx.mouse.api|dx.mouse.cursor","dx.keypad.input.lock.api|dx.keypad.state.api|dx.keypad.api","",101) 
            绑定 = ct[参数].chentaobwdex(窗口句柄[参数],"dx2","dx.mouse.position.lock.api|dx.mouse.position.lock.message|dx.mouse.clip.lock.api|dx.mouse.input.lock.api|dx.mouse.state.api|dx.mouse.api|dx.mouse.cursor","dx.keypad.input.lock.api|dx.keypad.state.api|dx.keypad.api","",101) 
            辅助.等待(2000) 
            如果(绑定==0) 
                辅助.消息框("绑定窗口失败!") 
                //辅助.退出() 
                绑定=ct[参数].GetLastError() 
                辅助.消息框("失败错误码"&绑定) 
            否则 
                调试输出("WIN7下绑定成功!") 
                ctpath=ct[参数].chentaosph(辅助.获取资源路径("rc:")) 
                如果(ctpath!=1) 
                    辅助.消息框("设置路径失败!") 
                    辅助.退出() 
                如果结束 
            如果结束 
        如果结束 
    如果结束 
    窗口.激活(窗口句柄[参数]) 
功能结束 
 
 
功能 设置字库(参数) 
    字库设置=ct[参数].SetDict(0,"收BIBI.txt") 
    辅助.等待(123) 
    如果(字库设置!=1) 
        辅助.消息框("字库设置失败") 
    如果结束 
功能结束 
 
 
功能 解绑窗口(参数) 
    ct[参数].chentaoubwow() 
    辅助.等待(100) 
    绑定值=ct[参数].chentaoibd(窗口句柄[参数]) 
    如果(绑定值==1) 
        ct[参数].chentaoubwow()  
        //辅助.消息框("窗口"&参数&"解绑成功!") 
    否则 
        //辅助.消息框("该窗口"&参数&"未绑定!") 
    如果结束   
    ct[参数]=null 
    窗口句柄[参数]=null 
    多开区分[参数]=null 
    线程数组[参数]=null 
功能结束 
 
 
 
功能 切换频道(参数,频道) 
    变量 频道x,频道y 
    //1为当前频道,2为世界频道 
    如果(频道==1) 
        调试输出("频道为1") 
        循环(真) 
            ct[参数].FindPic(0,0,1024,768,"当前.bmp","000000",0.8,0,频道x,频道y) 
            如果(频道x>=0) 
                调试输出("已设为当前频道") 
                返回 真 
                跳出 
            否则 
                ct[参数].KeyDown(164) 
                辅助.等待(辅助.随机数(30,60)) 
                ct[参数].KeyPress(190) 
                辅助.等待(辅助.随机数(30,60)) 
                ct[参数].KeyUp(164) 
                辅助.等待(辅助.随机数(30,60)) 
            如果结束 
        循环结束 
    如果结束 
    如果(频道==2) 
        调试输出("频道为2") 
        循环(真) 
            ct[参数].FindPic(0,0,1024,768,"世界.bmp","000000",0.8,0,频道x,频道y) 
            如果(频道x>=0) 
                调试输出("已设为当前频道") 
                返回 真 
                跳出 
            否则 
                ct[参数].KeyDown(164) 
                辅助.等待(辅助.随机数(30,60)) 
                ct[参数].KeyPress(188) 
                辅助.等待(辅助.随机数(30,60)) 
                ct[参数].KeyUp(164) 
                辅助.等待(辅助.随机数(30,60)) 
            如果结束 
        循环结束 
         
         
    如果结束 
功能结束 
 
功能 喊话(参数) 
    辅助.等待(辅助.随机数(10,500)) 
    如果(单选框.获得状态("单选框0")==真) 
         
        随机=辅助.随机数(1,2) 
         
        选择(随机) 
            条件 1: 
            ct[参数].chentaossg(窗口句柄[参数],世界一[参数]) 
            辅助.等待(辅助.随机数(100,500)) 
            ct[参数].KeyPress(13) 
            辅助.等待(辅助.随机数(100,500)) 
            条件 2: 
            ct[参数].chentaossg(窗口句柄[参数],世界二[参数]) 
            辅助.等待(辅助.随机数(100,500)) 
            ct[参数].KeyPress(13) 
            辅助.等待(辅助.随机数(100,500)) 
        选择结束 
    否则 
        如果(单选框.获得状态("单选框1")==真) 
             
            如果(复选框.获得状态("复选框2")==真) 
                频道=辅助.随机数(1,2) 
                测试者AID收货.切换频道(参数,频道) 
            否则 
                如果(复选框.获得状态("复选框0")==真) 
                    频道=1 
                    测试者AID收货.切换频道(参数,频道) 
                否则 
                    如果(复选框.获得状态("复选框1")==真) 
                        频道=2 
                        测试者AID收货.切换频道(参数,频道)  
                    如果结束 
                如果结束 
            如果结束 
            ct[参数].KeyPress(38) 
            辅助.等待(辅助.随机数(30,60)) 
            ct[参数].KeyPress(13) 
            辅助.等待(辅助.随机数(30,60)) 
        如果结束 
    如果结束 
功能结束 
 
 
功能 纠正站位(参数) 
    变量 x,y,X,Y 
    ct[参数].FindPic(0,0,177,176,"寻路精灵.bmp","000000",0.8,0,x,y) 
    如果(x>0) 
        调试输出("找到寻路精灵按钮") 
        辅助.等待(辅助.随机数(30,60)) 
        ct[参数].chentaomt(x+辅助.随机数(1,3),y+辅助.随机数(1,3)) 
        辅助.等待(辅助.随机数(30,60)) 
        ct[参数].LeftClick() 
        辅助.等待(辅助.随机数(100,150)) 
        ct[参数].FindStr(0,0,1024,768,"大唐南","00ff00-000000",1.0,X,Y) 
        如果(X>0) 
            ct[参数].chentaossg(窗口句柄[参数],"商会会长") 
            辅助.等待(辅助.随机数(150,200)) 
            ct[参数].KeyPress(13) 
            辅助.等待(辅助.随机数(30,60)) 
            ct[参数].RightClick() 
            辅助.等待(辅助.随机数(30,60)) 
             
            返回 真 
        如果结束 
    如果结束 
功能结束 
 
 
功能 主线程(参数) 
    测试者AID收货.注册收费(参数) 
    测试者AID收货.绑定窗口(参数) 
    测试者AID收货.设置字库(参数) 
     
    变量 i,X,Y 
    //************************************新收货功能****************************************** 
     
    //**************循环判断是否有人来交易***************************** 
    循环(真) 
         
标记1: 
         
        测试者AID收货.清洁窗口(参数) 
        遍历(i=0;i<间隔[参数];i++) 
            如果(i==间隔[参数]-2) 
                测试者AID收货.喊话(参数) 
                i=0 
            如果结束 
            //上面判断是否到喊话时间 
            如果(测试者AID收货.上货中否(参数)==真) 
                ct[参数].FindStr(542,145,703,342,"宝宝","ffffff-000000",1.0,X,Y) 
                如果(X>0&&Y>0) 
                    调试输出("身上有BB") 
                    跳转 标记2 
                     
                如果结束 
            否则 
                打开店铺=测试者AID收货.打开店铺(参数) 
                如果(打开店铺!=真) 
                    测试者AID收货.纠正站位(参数) 
                    辅助.等待(辅助.随机数(130,160)) 
                    测试者AID收货.清洁窗口(参数) 
                如果结束 
            如果结束 
            //维持商户一直是打开状态 
            交易状态=测试者AID收货.是否交易中(参数) 
            如果(交易状态==真) 
                调试输出("主线程检测到开始交易") 
                 
                跳出 
            否则 
                调试输出("无人交易,继续循环检测") 
                 
            如果结束 
            //检测是否有人交易 
            辅助.等待(辅助.随机数(888,1111)) 
        遍历结束 
        测试者AID收货.获取当前时间(参数) 
         
        //****************************如果有人来交易的话,执行下面*********************** 
        //******************************先循环判断第一个是否有物品*********************** 
        遍历(i=0;i<40;i++) 
            如果(i==39) 
                测试者AID收货.取消交易(参数) 
                跳转 标记1 
            如果结束 
            交易状态=测试者AID收货.是否交易中(参数) 
            如果(交易状态==真) 
                第一格=测试者AID收货.判断第一格(参数) 
                如果(第一格==真) 
                    调试输出("第一格放入BB") 
                    跳出 
                否则 
                    如果(第一格==假) 
                        测试者AID收货.取消交易(参数) 
                         
                        跳转 标记1 
                        跳出 
                    否则 
                        如果(第一格=="") 
                            ct[参数].RightClick() 
                            辅助.等待(辅助.随机数(30,60)) 
                        如果结束 
                    如果结束 
                如果结束 
                辅助.等待(500) 
            否则 
                跳转 标记1 
                跳出 
            如果结束 
            超时=测试者AID收货.判断是否超时(参数) 
            如果(超时==真) 
                交易中=测试者AID收货.是否交易中(参数) 
                如果(交易中==真) 
                    测试者AID收货.取消交易(参数) 
                如果结束 
                跳转 标记1 
                跳出 
            如果结束 
        遍历结束 
        交易状态=测试者AID收货.是否交易中(参数) 
        如果(交易状态==真) 
            价钱=测试者AID收货.计算价钱(参数) 
            如果(价钱!="") 
                调试输出("主线程收到返回价钱="&价钱) 
                总金额[参数]=价钱*10000 
            如果结束 
        否则 
            跳转 标记1 
        如果结束 
        测试者AID收货.清洁窗口(参数) 
        //***********************开始判断第二格******************** 
        遍历(i=0;i<5;i++) 
            交易状态=测试者AID收货.是否交易中(参数) 
            如果(交易状态==真) 
                第二格=测试者AID收货.判断第二格(参数) 
                如果(第二格==真) 
                    调试输出("第二格放入BB") 
                    交易状态=测试者AID收货.是否交易中(参数) 
                    如果(交易状态==真) 
                        价钱=测试者AID收货.计算价钱(参数) 
                        如果(价钱!="") 
                            调试输出("主线程收到返回价钱="&价钱) 
                            总金额[参数]=价钱*10000+总金额[参数] 
                            跳出 
                        如果结束 
                         
                    否则 
                        跳转 标记1 
                    如果结束 
                     
                否则 
                    如果(第二格==假) 
                        测试者AID收货.取消交易(参数) 
                        跳转 标记1 
                        跳出 
                    如果结束 
                如果结束 
                辅助.等待(600) 
            如果结束 
        遍历结束 
        测试者AID收货.清洁窗口(参数) 
        //*******************全部货物判断完毕************************* 
        //*****************开始算钱给钱******************************* 
        是否交易=测试者AID收货.是否交易中(参数) 
        如果(是否交易==真) 
            如果(总金额[参数]>0) 
                给钱=测试者AID收货.给钱(参数) 
                如果(给钱==真) 
                    调试输出("给钱成功") 
                否则 
                    调试输出("给钱失败") 
                如果结束 
            否则 
                调试输出("货物计算金额<=0") 
            如果结束 
        否则 
            跳转 标记1 
        如果结束 
        //**********************************给钱完毕,锁定交易******************* 
        //**********************锁定交易,循环等待对方锁定************************************************ 
        循环(真) 
            是否交易=测试者AID收货.是否交易中(参数) 
            如果(是否交易==真) 
                锁定=测试者AID收货.锁定交易(参数)  
                如果(锁定==真) 
                    调试输出("我方锁定成功") 
                    跳出 
                如果结束 
            否则 
                跳转 标记1 
            如果结束 
        循环结束 
        循环(真) 
            是否交易=测试者AID收货.是否交易中(参数) 
            如果(是否交易==真) 
                对方锁定=测试者AID收货.对方是否锁定(参数) 
                如果(对方锁定==真) 
                    调试输出("对方已锁定交易") 
                    跳出 
                如果结束 
            否则 
                跳转 标记1 
            如果结束 
             
            超时=测试者AID收货.判断是否超时(参数) 
            如果(超时==真) 
                交易中=测试者AID收货.是否交易中(参数) 
                如果(交易中==真) 
                    测试者AID收货.取消交易(参数) 
                如果结束 
                跳转 标记1 
                跳出 
            如果结束 
        循环结束 
        //*********************双方锁定交易成功,再次核对物品价值与金钱匹配*************** 
         
        //***********************第一格货物判断******************** 
        循环(真) 
            交易状态=测试者AID收货.是否交易中(参数) 
            如果(交易状态==真) 
                第一格=测试者AID收货.判断第一格(参数) 
                如果(第一格==真) 
                    调试输出("第一格放入BB") 
                     
                    跳出 
                如果结束 
                辅助.等待(500) 
            否则 
                跳转 标记1 
            如果结束 
            超时=测试者AID收货.判断是否超时(参数) 
            如果(超时==真) 
                交易中=测试者AID收货.是否交易中(参数) 
                如果(交易中==真) 
                    测试者AID收货.取消交易(参数) 
                如果结束 
                跳转 标记1 
                跳出 
            如果结束 
        循环结束 
        交易状态=测试者AID收货.是否交易中(参数) 
        如果(交易状态==真) 
            价钱=测试者AID收货.计算价钱(参数) 
            如果(价钱!="") 
                调试输出("主线程收到返回价钱="&价钱) 
                总金额[参数]=价钱*10000 
                 
            如果结束 
        否则 
            跳转 标记1 
        如果结束 
        测试者AID收货.清洁窗口(参数) 
        //***********************开始判断第二格******************** 
        遍历(i=0;i<2;i++) 
            交易状态=测试者AID收货.是否交易中(参数) 
            如果(交易状态==真) 
                第二格=测试者AID收货.判断第二格(参数) 
                如果(第二格==真) 
                    调试输出("第二格放入BB") 
                    交易状态=测试者AID收货.是否交易中(参数) 
                    如果(交易状态==真) 
                        价钱=测试者AID收货.计算价钱(参数) 
                        如果(价钱!="") 
                            调试输出("主线程收到返回价钱="&价钱) 
                            总金额[参数]=价钱*10000+总金额[参数] 
                            跳出 
                        如果结束 
                    否则 
                        跳转 标记1 
                    如果结束 
                     
                如果结束 
                辅助.等待(600) 
            如果结束 
        遍历结束 
        测试者AID收货.清洁窗口(参数) 
        //再次获取物品价值成功,下面开始再次对比货物价格是否匹配 
        测试者AID收货.重置鼠标位置(参数) 
        是否交易=测试者AID收货.是否交易中(参数) 
        如果(是否交易==真) 
            再次确认=测试者AID收货.再次确认货物价格(参数) 
            如果(再次确认==真) 
                测试者AID收货.点击交易(参数) 
            否则 
                测试者AID收货.取消交易(参数) 
            如果结束 
        否则 
            跳转 标记1 
        如果结束 
         
        //等待对方点击交易 
        循环(真) 
            是否交易=测试者AID收货.是否交易中(参数) 
            如果(是否交易==真) 
                测试者AID收货.点击交易(参数) 
                辅助.等待(辅助.随机数(30,60)) 
                ct[参数].KeyPress(13) 
                辅助.等待(辅助.随机数(30,60)) 
            否则 
                如果(是否交易==假) 
                    调试输出("本次交易执行完毕") 
                    跳出 
                如果结束 
            如果结束 
            超时=测试者AID收货.判断是否超时(参数) 
            如果(超时==真) 
                交易中=测试者AID收货.是否交易中(参数) 
                如果(交易中==真) 
                    测试者AID收货.取消交易(参数) 
                如果结束 
                跳转 标记1 
                跳出 
            如果结束 
        循环结束 
        //开始判断有无人交易,是否要上货 
        //开始上货 
        遍历(i=0;i<4;i++) 
            是否交易=测试者AID收货.是否交易中(参数) 
            如果(是否交易==真) 
                调试输出("有人来交易,跳转标记1") 
                跳转 标记1 
                跳出 
            如果结束 
            辅助.等待(888) 
        遍历结束 
        //*************遍历上货****************** 
标记2: 
         
        如果(测试者AID收货.上货中否(参数)==真) 
        否则 
            测试者AID收货.打开店铺(参数) 
             
        如果结束 
        //已打开店铺 
        遍历(i=0;i<8;i++) 
            如果(测试者AID收货.上货中否(参数)==真) 
                如果(测试者AID收货.上货中否(参数)==真) 
                否则 
                    跳转 标记1 
                    跳出 
                如果结束 
                如果(测试者AID收货.选中查看BB(参数)==真) 
                    如果(测试者AID收货.上货中否(参数)==真) 
                    否则 
                        跳转 标记1 
                        跳出 
                    如果结束 
                    上货价=测试者AID收货.上货价钱(参数)   
                    如果(上货价!="") 
                        如果(测试者AID收货.上货中否(参数)==真) 
                        否则 
                            跳转 标记1 
                            跳出 
                        如果结束 
                        如果(测试者AID收货.提交录入出货金额(参数,上货价)==真) 
                            调试输出("第"&i&"只BB上货成功") 
                        如果结束 
                    否则 
                        跳转 标记1 
                        跳出 
                    如果结束  
                否则 
                    跳转 标记1 
                    跳出 
                如果结束 
            否则 
                跳转 标记1 
                跳出 
            如果结束 
        遍历结束 
    循环结束 
功能结束 
 
//*******************热键********************************************************************* 
功能 热键0_热键()//F5 
    //这里添加你要执行的代码 
     
    变量 i,参数 
    //获取页面元素 
    遍历(i=0;i<10;i++) 
        参数=i 
        如果(ct[参数]==null) 
            跳出 
        如果结束 
    遍历结束 
    如果(复选框.获得状态("复选框3")==真&&参数==0) 
        如果(编辑框.获得文本("编辑框15")!="") 
            线程.开启("测试者AID收货.自动关机",参数) 
        否则 
            辅助.消息框("如果您想设置自动关机,则必须输入关机时间") 
            辅助.退出() 
        如果结束 
    如果结束 
    窗口句柄[参数]=窗口.顶层窗口句柄()  
    辅助.等待(100) 
    窗口.激活(窗口句柄[参数]) 
    多开区分[参数]=窗口句柄[参数]&参数 
    线程数组[参数]=线程.扩展开启("测试者AID收货.主线程",参数,"测试者AID收货.解绑窗口",参数) 
    小20级[参数]=编辑框.获得文本("编辑框0") 
    小35级[参数]=编辑框.获得文本("编辑框1") 
    小45级[参数]=编辑框.获得文本("编辑框2") 
    小65级[参数]=编辑框.获得文本("编辑框6") 
    小85级[参数]=编辑框.获得文本("编辑框11") 
    大85级[参数]=编辑框.获得文本("编辑框13") 
    //收购价格 
    下20级[参数]=编辑框.获得文本("编辑框7") 
    下35级[参数]=编辑框.获得文本("编辑框8") 
    下45级[参数]=编辑框.获得文本("编辑框9") 
    下65级[参数]=编辑框.获得文本("编辑框10") 
    下85级[参数]=编辑框.获得文本("编辑框12") 
    上85级[参数]=编辑框.获得文本("编辑框14") 
    //上货价 
    间隔[参数]=编辑框.获得文本("编辑框5") 
    世界一[参数]=编辑框.获得文本("编辑框3") 
    世界二[参数]=编辑框.获得文本("编辑框4") 
    //喊话参数 
     
功能结束 
 
 
功能 热键1_热键()//F6 
    //这里添加你要执行的代码 
    变量 i,参数 
    顶层句柄=窗口.顶层窗口句柄() 
    遍历(i=0;i<5;i++) 
        参数=i 
        如果(多开区分[参数]==null) 
             
        否则 
             
            如果(顶层句柄==字符串.截取(多开区分[参数],0,字符串.长度(多开区分[参数])-1)) 
                线程.关闭(喊话[参数]) 
                辅助.等待(50) 
                线程.关闭(线程数组[参数]) 
                跳出     
            如果结束 
        如果结束 
    遍历结束 
功能结束 
 
空间结束 
//空间结束语句 
 
 
 |   
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?立即注册  
 
x
 
 
 
 
 |