TC官方合作论坛

标题: 我想知道我错在那里？ [打印本页]

作者: hu863063648 时间: 2013-8-14 11:08
标题: 我想知道我错在那里？
空间 AD
//默认空间
线程句柄=数组[5],线程句柄1=数组[5]
窗口句柄=数组[5],s,i
//开始按钮_点击操作
功能开始_点击()
窗口句柄集=系统.枚举("King GEngine",1)
字符串.分割(窗口句柄集,"|",窗口句柄)
数组空间.大小(窗口句柄,s)

如果(窗口句柄集<1)
      列表框.增加文本("列表框0","游戏窗口未找到")
      返回假
否则
      列表框.增加文本("列表框0","游戏窗口已找到")
如果结束
辅助.等待(1000+辅助.随机数(-100,100))
如果(复选框.获得状态("复选框1"))
      遍历(i=0;i<s;i++)
         线程句柄=线程.开启("AD.开始运行",窗口句柄)
      遍历结束
      列表框.增加文本("列表框0","打怪1线程开启")
如果结束
如果(复选框.获得状态("复选框2"))
      遍历(i=0;i<s;i++)
         线程句柄1=线程.开启("AD.开始运行1",窗口句柄)
      遍历结束
      列表框.增加文本("列表框0","打怪2线程开启")
如果结束

功能结束
功能开始运行1(句柄)
rCX,rCY,返回宽,返回高,x,y,图像序号
窗口.获取客户区大小(句柄,rCX,rCY,返回宽,返回高)
辅助.等待(100+辅助.随机数(-10,100))
循环(真)
      //图像序号=图像.找图(rCX,rCY,rCX+871,rCY+255,"rc:1111.bmp",#102030,0.9,0,x,y)
      是否找到=图像.模糊找色(rCX,rCY,rCX+871,rCY+255,#ff0000,0.8,1,x,y)//0,0,871,255//1,261,1014,620
      如果(是否找到)
         列表框.增加文本("列表框0","怪找到")
         辅助.等待(100+辅助.随机数(-10,100))
         窗口.鼠标左键单击(句柄,x-rCX,y-rCY+20)
         辅助.等待(200+辅助.随机数(-10,100))
         窗口.鼠标左键单击(句柄,x-rCX,y-rCY+20)
         辅助.等待(2000+辅助.随机数(-10,100))
      否则

         //图像序号=图像.找图(rCX,rCY+261,rCX+1014,rCY+620,"rc:1111.bmp",#102030,0.9,0,x,y)
         是否找到=图像.模糊找色(rCX,rCY+261,rCX+1014,rCY+620,#ff0000,0.8,1,x,y)
         如果(是否找到)
            列表框.增加文本("列表框0","怪找到")
            辅助.等待(100+辅助.随机数(-10,100))
            窗口.鼠标左键单击(句柄,x+rCX,y-rCY+20)
            辅助.等待(200+辅助.随机数(-10,100))
            窗口.鼠标左键单击(句柄,x-rCX,y-rCY+20)
            辅助.等待(2000+辅助.随机数(-10,100))
         如果结束
      如果结束
循环结束

功能结束
功能开始运行(句柄)
终点x,终点y,rCX,rCY,返回宽,返回高
初始极径 = 15
倍数 = 1
系数=2
圆周率 = 3.1415926
半径,极角
起始x=500,起始y=330
极角=圆周率/2
辅助.等待(1000)
///////移动到起点
标志:
窗口.获取客户区大小(句柄,rCX,rCY,返回宽,返回高)
G=0
循环(G<2000)
      辅助.等待(100+辅助.随机数(-10,100))
标记:

      窗口.鼠标移动(句柄,起始x,起始y+倍数*初始极径+系数*极角)
      辅助.等待(2+辅助.随机数(1,2))
      遍历(i=0;i<3000;i++)
         半径 = 初始极径+系数*极角
         终点x = 起始x+类型.转整型(倍数*半径*数学.余弦值(极角))
         终点y = 起始y+类型.转整型(倍数*半径*数学.正弦值(极角))
         极角 = 极角 + 0.04
         窗口.鼠标移动(句柄,终点x,终点y)
         辅助.等待(3+辅助.随机数(1,2))
         窗口.鼠标左键单击(句柄,终点x,终点y)
         辅助.等待(1+辅助.随机数(1,2))
         窗口.鼠标左键单击(句柄,终点x,终点y)
         辅助.等待(1+辅助.随机数(1,2))
         图像值=图像.坐标点取色(rCX+57,rCY+17)
         //图像值=图像.坐标点取色(rCX+647,rCY+748)
         //列表框.增加文本("列表框0","txz1:"&图像值)
         //辅助.等待(3+辅助.随机数(1,2))
         //**************************************************647.748 57.17  X=X+4,Y=Y+30
         如果(图像值==编辑框.获得文本("编辑框3"))//16711680  16777215
            列表框.增加文本("列表框0","怪找到")
            //窗口.鼠标左键单击(句柄,终点x,终点y)
            辅助.等待(100+辅助.随机数(-10,200))
            //图像值=图像.坐标点取色(rCX+57,rCY+17)
            //列表框.增加文本("列表框0","txz2:"&图像值)//
            //辅助.等待(100+辅助.随机数(-10,200))
            循环(图像值==编辑框.获得文本("编辑框3"))//打怪65280
                  列表框.增加文本("列表框0","怪找到开始打怪")
                  是否选中=复选框.获得状态("复选框0")
                  如果(是否选中)
                     窗口.鼠标左键单击(句柄,终点x,终点y)
                     窗口.发送按键(句柄,编辑框.获得文本("编辑框0"))
                     辅助.等待(100+辅助.随机数(-10,200))
                     窗口.鼠标左键单击(句柄,终点x,终点y)
                     窗口.发送按键(句柄,编辑框.获得文本("编辑框1"))
                     辅助.等待(100+辅助.随机数(-10,200))
                     窗口.鼠标左键单击(句柄,终点x,终点y)
                     窗口.发送按键(句柄,编辑框.获得文本("编辑框2"))
                  否则
                     辅助.等待(100+辅助.随机数(-10,200))
                     //窗口.鼠标左键单击(句柄,终点x,终点y)
                     图像值=图像.坐标点取色(rCX+57,rCY+17)
                  如果结束

            循环结束
            跳转标记
         如果结束

      遍历结束
      Y=辅助.随机数(10,800)
      U=辅助.随机数(10,600)
      辅助.等待(20)
      窗口.鼠标左键双击(句柄,Y,U)
      G++
循环结束
AD.买药(句柄)

跳转标志
功能结束
功能买药(参数)
//D 214.135;84.93;254.219;字符串"1000";452.403;356.192
辅助.等待(1000)
窗口.发送字符(参数,68)
辅助.等待(1000+辅助.随机数(+100,260))
窗口.鼠标左键单击(参数,214,135)
辅助.等待(1000+辅助.随机数(+100,260))
窗口.鼠标左键单击(参数,84,93)
辅助.等待(1000+辅助.随机数(+100,260))
窗口.鼠标左键单击(参数,254,219)
辅助.等待(1000+辅助.随机数(+100,260))
窗口.发送字符串(参数,"1000",1)
辅助.等待(1000+辅助.随机数(+100,260))
窗口.鼠标左键单击(参数,452,403)
辅助.等待(1000+辅助.随机数(+100,260))
窗口.鼠标左键单击(参数,356,192)
辅助.等待(1000+辅助.随机数(+100,260))
功能结束
功能随机文字()

窗口句柄,rCX,rCY,返回宽,返回高
窗口句柄=窗口.找到窗口("","King GEngine")

窗口.获取客户区大小(窗口句柄,rCX,rCY,返回宽,返回高)

图像值=图像.坐标点取色(rCX+57,rCY+17)

返回结果=辅助.对话框(图像值,"是否写入",2,真)
如果(返回结果==7)
      编辑框.设置文本("编辑框3",图像值)
如果结束

功能结束
功能初始化()
//这里添加你要执行的代码
A=日期时间.当前日期()
A=日期时间.日(A)
如果(A>13)
      辅助.消息框("测试时间过期","提示")

      AD.退出_点击()
如果结束
辅助.等待(100)
功能结束

功能编辑框0_获得焦点()
//这里添加你要执行的代码
循环(真)
      键值=键盘.等待按键()
      编辑框.设置文本("编辑框0",键值)
循环结束
功能结束

功能编辑框1_获得焦点()
//这里添加你要执行的代码
循环(真)
      键值=键盘.等待按键()
      编辑框.设置文本("编辑框1",键值)
循环结束
功能结束

功能编辑框2_获得焦点()
//这里添加你要执行的代码
循环(真)
      键值=键盘.等待按键()
      编辑框.设置文本("编辑框2",键值)
循环结束
功能结束

功能热键0_热键()
//这里添加你要执行的代码

遍历(i=0;i<s;i++)
      如果(标签.获得文本("标签3")=="暂停")
         线程.暂停(线程句柄)
         标签.设置文本("标签3","恢复")
         列表框.增加文本("列表框0","线程暂停")
      否则
         线程.恢复(线程句柄)
         标签.设置文本("标签3","暂停")
         列表框.增加文本("列表框0","线程恢复")
      如果结束

遍历结束

功能结束
功能退出_点击()
遍历(i=0;i<s;i++)
      线程.关闭(线程句柄)
      列表框.增加文本("列表框0","线程关闭")
      辅助.等待(500)
遍历结束
遍历(i=0;i<s;i++)
      线程.关闭(线程句柄1)
      列表框.增加文本("列表框0","线程关闭")
      辅助.等待(500)
遍历结束
辅助.退出()
功能结束

功能热键1_热键()
//这里添加你要执行的代码
AD.随机文字()
功能结束

空间结束
大家能不能不吝指点

作者: sugar987009 时间: 2013-8-14 11:37
观看一下欣赏  睡午觉去哈
作者: 舍我其谁 时间: 2013-8-14 11:55
已经看出来了
作者: hu863063648 时间: 2013-8-14 13:26
回复 3楼舍我其谁的帖子

看出来？。可以说下嘛
作者: jianqiumy 时间: 2013-8-14 14:50
看到眼都花!!!!就看前面一点!
这代码!!!!!!做什么用的?
你是那方面不行!!你自己都不知道!!
什么样的情况下不行?
作者: hu863063648 时间: 2013-8-14 18:34
回复 5楼jianqiumy的帖子

这是一个私服的自动打怪。。算是半成品把..就是不明白，效率不高

欢迎光临 TC官方合作论坛 (http://bbs.52tc.co/) Powered by Discuz! X3.1