按键精灵_截图的方式检测卡屏
发布于 2019-12-16
Dim 地址, x1, y1, x2, y2, 连续卡屏次数, 卡屏秒数,卡屏值 For i = 0 to 卡屏秒数 卡屏值 = 卡屏值 + i Next If 地址 = "" Then MessageBox "请设置图片存放路径,这里是绝对路径" End If If x1 = ...
阅读(1029)赞 (0)
发布于 2019-12-16
Dim 地址, x1, y1, x2, y2, 连续卡屏次数, 卡屏秒数,卡屏值 For i = 0 to 卡屏秒数 卡屏值 = 卡屏值 + i Next If 地址 = "" Then MessageBox "请设置图片存放路径,这里是绝对路径" End If If x1 = ...
阅读(1029)赞 (0)
发布于 2019-12-16
Dim imgX,imgY,imgid //必须定义 函数需要的 Dim 找图_测试找图=array(175,232,346,421,"测试找图.png","202020",0,0.85) //30秒内持续的找该图 If 循环找图(找图_测试找图, 30) > -1 The...
阅读(959)赞 (0)
发布于 2019-12-16
/*—————随机数字—————*/ Function 随机数字() 随机数字=int(900*RND()+100) TracePrint 随机...
阅读(1590)赞 (0)
发布于 2019-12-16
1、找图方式智能点击: Dim i=0 Function 智能点击封装函数1() Do Delay 1000 KeepCapture FindPic 1,37,539,339,"Attac...
阅读(1077)赞 (0)
发布于 2019-12-16
//===========================验证码封装=========================== //———-验证 Function 验证验证码 Dim 设备imsi号,机器码 设备imsi号 = CI...
阅读(1083)赞 (0)
发布于 2019-12-16
dim n,分割账号密码,账号,密码 Call 自动换号() Function 自动换号() n = File.ReadLine("/sdcard/misc/1.txt",1) TracePrint "第一行为:"&n 分割...
阅读(1064)赞 (0)
发布于 2019-12-16
/* 横向我们用X代替,最多4张 众向无线 Y 。。。可以添加下拉 (假设也是4张) */ Dim i,ii,xx,yy Function 随机点击图片() //基点57,452 ========199,453 53,584 距离右边 距离下面 xx...
阅读(929)赞 (0)
发布于 2019-12-08
电脑远程控制电脑 Teamviewer: http://www.teamviewer.com/ 免费+收费 5星推荐,最佳远程控制软件 AnyDesk: http://anydesk.com/ 免费 4星推荐,据说是前Teamviewer团队开发 Radmin: http://w...
阅读(1270)赞 (0)
发布于 2019-11-16
CPU:e5 2680v2 主板:华南x79 内存:32g (三星) 显卡:1050/2g以上 机箱:随意 电源:500W ————-本人用的就是这套
阅读(1165)赞 (3)
发布于 2019-11-16
阅读(1001)赞 (1)