首页
关于
友链
留言
Search
1
安装Docker Desktop报错WSL 2 installation is incomplete
76 阅读
2
震惊!杭州应届生工作免费领2w元
31 阅读
3
我的世界紫禁之巅纯净生存服务器
25 阅读
4
python3网络爬虫开发实战pdf
23 阅读
5
火车头采集问题:Void Proc(System.Net.HttpWebRequest)
20 阅读
技术分享
日常学习
我的世界
Search
标签搜索
python
博客
javascript
ce
web
织梦
html
按键精灵
php
游戏
css
typescript
jquery
日常
数据库
vue
ubuntu
Datehoer
累计撰写
178
篇文章
累计收到
10
条评论
首页
栏目
技术分享
日常学习
我的世界
页面
关于
友链
留言
搜索到
10
篇与
按键精灵
的结果
2021-03-17
按键精灵等脚本 如何制作卡密
目前简单的完成了卡密的制作,加密原则其实就是先随机生成数字,然后传入加密api获取加密后得内容。通过python写的,不过其实现在有一些小问题没有解决,比如说重复。这个其实可以将生成的数字先储存在一个列表里,然后进行比对,最后再转化。亦或者可以将生成的所有数字先放起来,然后每次生成的时候进行对比,如果不存在就是可以用的,存在就跳过。import random import re import requests import json m = "157894" sz = 5 # m = input("请输入加密密钥---1-6位数字: ") # print(type(m)) # if 7> len(m) >0 : # print("储存成功") # else: # m = input("请输入加密密钥---1-6位数字: ") # sz = input("请输入你所需要的卡密数量: ") for i in range(0, int(sz)): a = random.randint(1000000000000000, 9999999999999999) a = str(hex(a)) b = re.findall(r"0x(.*)", a) c = b.pop() with open("sz.txt", "a")as nr: nr.write(c+"\n") d = requests.get("https://api.vvhan.com/api/jm?key="+m+"&string="+c+"&type=en") d = d.text jmnr = json.loads(d) print(jmnr["enmissString"]) jmnr = re.findall("(.*)==", jmnr["enmissString"]) print(jmnr) with open("jm.txt", "a")as jm: jm.write(jmnr.pop()+"\n")首先是随机数获取一个16位的数字,然后进行16位进制转换,然后通过re将0x去掉,之后再通过request传入加密的网址进行加密,最后用re进行筛选数据,把内容写入文本。之后卡密其实可以是中间数字也可以是最后加密出来的内容。比如说我卡密是16位进制的内容,然后按键进行比对的是将它加密后产生的加密内容。也可以将加密的内容当作卡密,然后进行解密。不过这个还是会产生报错的,特别是在请求很多卡密的时候会报错,解决方法其实可以是设置延迟,或者设置ip代理。
2021年03月17日
11 阅读
1 评论
0 点赞
2021-03-07
按键精灵 带色文字识别
现在文章也不是天天更新了,看哪天像更新就哪天更新了,或者说哪天收获比较大,就那天更新一下。如果说有看前面文章的兄弟可能会知道我写的就要强国脚本。然后就在研究怎么搞答题里面的填空题,填空题就要识别提示的红字。比如说我们识别这个斗争,我的思路是识别红色的范围,然后进行文字识别。不过当时其实对如何识别颜色范围有很大的疑惑。因为自带的识别会出现许多问题,不过后来发现通过使用紫猫插件可以达到还算可以的效果。Import "zm.luae" //导入插件,只需执行一次 zm.Init //初始化插件,只需执行一次 Dim ret, t() Dim 返回数组1(),返回数组2() ret = zm.FindColor(31,525,679,1254, "0000FF", 0.8, 2000, "上左", "显示", "@怪物1", 返回数组1, "_19") ret = zm.FindColor(31,525,679,1254, "0000FF", 0.8, 2000, "下右", "显示", "@怪物1", 返回数组2, "_19") If ret Then TracePrint "找到了" Else TracePrint "没有找到" End If通过紫猫的这个找色命令可以很轻松的识别到这个范围,之后传入到我们的百度ocr识别里就能获取这个不争了,不过其实有的时候还是有些错误的,不是很智能。不过比起之前填a跳过还是有很大的提升了。
2021年03月07日
3 阅读
0 评论
0 点赞
2021-03-03
按键精灵 对版本进行对比强制更新
按键精灵脚本如果不花钱买vip的话,那么打包出来的软件是没有官方加持的,而我们如果前期发布的软件后期想要进行推广更新之类的话,用户完全可以不更新用旧版软件。那么我们如果进行强制更新呢?简单看一个代码//https://zjzdmc.top/banbenhao.txt TracePrint url.get("https://zjzdmc.top/banbenhao.txt") Dim 版本号,最新版本号 版本号 = 1.2 最新版本号=CStr(URL.Get("https://zjzdmc.top/banbenhao.txt")) TracePrint 版本号=url.get("https://zjzdmc.top/banbenhao.txt") If CStr(版本号) <> 最新版本号 Then Delay 1500 ShowMessage "请更新版本" Delay 3000 EndScript End If我这个是在服务器储存了一个文件,然后进行对比,如果版本号不一样那么就结束脚本并提示需要更新。而我们没服务器呢?这就可以找个那种没人看的网站,帖子之类的发个帖子。然后获取源码之后进行对比,当然这个是比较难的,因为我们获取到的源码是有头文件的,所以如果要这么做的话就需要比对很长一段代码,所以其实最好还是买一个服务器来进行对比,而且其实有那种便宜的云主机,也可以用GitHub或者gitee之类的库来上传版本进行对比,不过还是比较长啦,最好还是买个自己的服务器,云服务器虚拟主机之类的,我买的是阿里的学生机,做的网站,如果只是做网络版本对比,进行强制更新的话,可以买个那种几块钱的服务器来进行对比,亦或者跟我说一下我可以给你传个,但是还是很麻烦的,所以还是最好买个自己的!
2021年03月03日
7 阅读
1 评论
0 点赞
2021-02-28
按键精灵实战-强国积分
其实类似的文章我已经在csdn上发表过一篇了,现在在博客上也简单发一下吧。具体的思路其实很简单,就是通过按键精灵来模拟人手操作,比如说我阅读文章需要向下滑动才算是有效阅读,那么我们通过swipe来模拟滑动,然后在比说答题,这个其实我没写好,只是一个简单的答题而已,就是我们填空题通过查找来进行点击,然后输入a来答题,并不能输入答案,不过这个其实是想的做一个词库来进行识别的,但是发现还是找色比较容易,但是技术有限就没有写。简单分享一下这个视频学习的代码吧,就是通过点击跳转,然后再点击百灵,之后点击视频等待时间即可。之所以只需要等待是因为他的视频会自动刷新,所以非常的方便。当然其实也可以找个长视频来看,这样时长就够了。Function 视频学习 TracePrint "视频学习" 查看积分 Do KeepCapture FindPic 0,0,0,0,"Attachment:视频学习.png","000000",0,0.9,intX,intY If intX > -1 And intY > -1 Then Tap intX + 480, intY Delay 1000 Exit Do Else For 3 Swipe 364, 735, 364, 1161 Delay 1500 Next End If ReleaseCapture Loop KeepCapture FindPic 0,0,0,0,"Attachment:百灵.png","000000",0,0.8,intX,intY If intX > -1 And intY > -1 Then Tap intX, intY Delay 3000 End If ReleaseCapture Tap 349, 446 Delay 400000 Tap 48, 103 Delay 500 Tap 48, 103 Delay 500 End Function下载连接在http://datehoer.ys168.com/ 密码666666
2021年02月28日
3 阅读
0 评论
0 点赞
2021-02-27
按键精灵 离线打包
过年期间还是很懒的,所以一直没更新,现在逐步回复更新了,请见谅。用按键精灵写完脚本后,我们要用的话肯定不能通过调试来使用,所以我们就需要将它打包出来,但是呢,如果使用按键精灵手机版的发布需要花钱购买,而我们的脚本一般都是自己使用或者小范围进行传播,所以并不是很划得来,所以呢,现在就有了一种免费打包的方法,利用的是一款exe文件,我们只需要将它解压出来然后将脚本进行调试就可以打包了。双击打开之后选择免费版即可。最重要的是我们要将脚本进行调试https://pan.baid河蟹u.com/s/1Vz_nEGGLEOB98河蟹QRXe4MTZA 5z9a如果链接失效请进行评论!否则使用不了的!
2021年02月27日
4 阅读
0 评论
0 点赞
2021-02-06
按键精灵 读取字符串内的内容
我们经常会储存一些数据,比如说账号密码,比如说游戏昵称,有的时候为了偷懒或者别的种种原因,其实大多数还是因为数据比较少,我们直接将它储存在了字符串中,那么接下来我们应该怎么提取呢?这里我们就要用到split这个命令了 命令名称: Split 分割数组 命令功能: 分隔数据返回基于0的一维数组 语法格式: Split(expression,delimiter) 参数说明: expression:字符串表达式,待分隔的数据 delimiter:分隔符,以分隔符将数据分开保存到数组的各个元素中 返回值: 返回一个数组 脚本例子: Dim MyString, MyArray MyString = Split("VBScriptXisXfun!","X") TracePrint MyString(0) TracePrint MyString(1) TracePrint MyString(2) 复制代码 备注: 无 我们首先先将密码储存在一个数组里,之后再通过split命令进行分割,当然一定要记得我们的每一个数据的间隔符是一定要一样的。然后我们的数据就会变成数组,再通过下标进行提取即可。是不是很简单呢,毕竟其实有编程基础的话,学习别的也是非常快速的,一生万物!
2021年02月06日
7 阅读
0 评论
0 点赞
2021-02-05
按键精灵 UI多选框应该怎么读取?
写完脚本之后,就是要写ui界面了,而我们既然想要写按键精灵脚本,那么大多都是拥有许多功能的。比如说刷金币,刷点卷,刷钞票等等,我们让用户可以通过勾选相应的按钮来达到想要的效果。那么我们应该怎么读取这个配置呢?多选框:{注释:"文字大小、高度、宽度是可选属性,如需使用默认值,可保持值为0或直接删除此属性",名称:"多选框1",提示内容:"提示用户的文字内容",点击响应:"函数名1",选中:false,文字大小:0,高度:0,宽度:0}, 首先也就是一个多选框,虽然说是多选实际上就是一个单选框而已。简单看一下数据,注释,名称以及提示内容都不需要多说了吧,然后选中这个其实就是ui按钮的默认样式,设置为false就是默认不选中,true则是选中。也就是这个提示用户的文字是我们的重点。可能许多人会说这不很简单么,用readuiconfig就可以了啊,但是可能有的人测试的数据为null,或者别的什么,这是为什么呢?之所以这样是因为你没有在ui预览的时候进行报错,如果我们先点击ui预览,然后勾选报错,之后再回到代码页进行测试的话,就会得到我们想要的内容了。 Delay 5000Dim a,ba = ReadUIConfig("输入框1", 10000)Delay 1500If ReadUIConfig("多选框1", False) = True Then TracePrint 123456 ShowMessage 123456ElseIf ReadUIConfig("多选框1", False) = False ThenTracePrint 789End IfShowMessage aDelay 1500Delay 10000
2021年02月05日
7 阅读
0 评论
0 点赞
2021-02-04
按键精灵 引流脚本如何写?引流脚本思路
其实说到引流还是非常容易操作的,比起游戏脚本来说更容易通过按键精灵来实现。我写的哪个软件就不说了,只是简单的提供一下思路而已.首先最重要的就是要熟悉这个软件是如何操作的,比如说是左滑还是右滑,点击几次才会出现聊天以及发送消息是怎么发送的,这些都需要进行了解。当然其实最重要的就是软件是否会出现弹窗之类的提示信息,我们将这些信息储存起来放到函数里,然后哦进行循环检测即可,当然如果有什么规律之类的我们也可以加上延迟然后进行检测。不过其实引流的话,一般就是找人聊天->发送信息->返回下一个这样的重复操作,所以其实可以直接写一个if判断比色然后如果是true的话就点击确定之类的按钮上即可。一般来说我们下滑换人的时候都是需要进行精密的计算,争取一次只滑一个人,然后如果有那种上限之类的,或者什么上拉获取更多的话,还是需要增加判断的,比如说出现了这个字然后加上比色判断,就能知道是要多拉一下了。最后简单上一下一个代码,抖音的引流脚本,不过是好早以前的了,现在肯定不能用了,只是提供一个思路给大家,让大家有一个借鉴的方向,另外如果有什么问题可以直接在评论区留言或者点击主页下方的联系我来寻求帮助。话语这个东西要不就百度查,要不就自己编。。没有什么好的方法,然后颜色之类的一定要找好分辨率,因为好多问题都出现在了分辨率上,比如说你做的是400*800的然后你在1080*1920上用是肯定不行的。dim cz_intx,cz_inty,startx,starty, endx,endy,count,结果,首次,话术1,话术2,话术3,临时路径,延迟时间Dim 关注,发消息,话术私聊,随机字符前缀,随机字符后缀,话术,话术发送完毕,完成操作,点击之后,intX,intY,错误信息 临时路径 = GetTempDir() PutAttachment 临时路径 & "Misaki_douyin1.0/", "*.luae" PutAttachment 临时路径 & "Misaki_douyin1.0/", "*.png" 首次 = 0 话术1 = ReadUIConfig("话术1", "text1.text2.text3") 话术2 = ReadUIConfig("话术2", "text1.text2.text3") 话术3 = ReadUIConfig("话术3", "text1.text2.text3") Dim a = {话术1, 话术2, 话术3} Dim img="Attachment:aixin.png" If ReadUIConfig("延迟时间") = 0 Then 延迟时间 = 800 ElseIf ReadUIConfig("延迟时间") = 1 Then 延迟时间 = 2500 ElseIf ReadUIConfig("延迟时间") = 2 Then 延迟时间 = 9500 End If //ShowMessage "延时时间:"&延迟时间 TracePrint "延时时间:"&延迟时间 Import "zm.luae" //导入插件,只需执行一次 zm.Init //初始化插件,只需执行一次 zm.Swipe 358,1222, 312, -10, 300 //滑动 Do Call 重置起点() TracePrint "按顺序输出所有坐标" 结果 = Split(结果, "|") For i = 首次 To UBOUND(结果) - 1 TracePrint 结果(i)'按顺序输出所有坐标 zm.Tap 结果(i),1000'点击 关注 = 0 发消息 = 0 完成操作 = 0 点击之后 = 0 错误信息 = 0 Do While 完成操作 = 0 //查找关注坐标 If 关注 = 0 Then If CmpColorEx("552|119|341E6F,652|119|331D6E,552|160|4827C8,651|160|552CFE,589|138|552CFE,589|137|D5CBFF,621|150|6C48FE,621|149|F8F6FF,621|148|B8A7FF", 0.9) = 1 Then TracePrint "关注" Tap 605, 145 关注 = 1 End If Else 错误信息 = 错误信息 + 1 If 错误信息 > 6 Then Tap 24,58 完成操作 = 1 End If TracePrint "错误信息次数:"&错误信息 End If //查找发送消息 If 关注 = 1 or 话术发送完毕 = 1 Then If CmpColorEx("502|118|211715,602|119|2E2423,602|161|2E2423,524|133|4D4644,525|133|8E8988,526|133|6B6564,581|149|948F8E,582|149|7B7574",0.9) = 1 Then If 关注 = 1 Then TracePrint "发消息" Tap 552,141 关注 = 0 发消息 = 1 ElseIf 话术发送完毕 = 1 Then Tap 24,58 完成操作 = 1 End If End If End If //发送消息界面 If 发消息 = 1 or 点击之后 = 0 Then If CmpColorEx("650|1245|655E5C,640|1256|372D2B,650|1266|655E5C,661|1255|655D5B,646|1251|605857,646|1250|231816,652|1251|362C2A,651|1251|231816,646|1258|645C5B,653|1258|655E5C",0.9) = 1 Then TracePrint "发送消息界面" Tap 52, 1259 发消息 = 0 话术私聊 = 1 End If End If If 话术私聊 = 1 Then 随机字符前缀 = zm.RndStr(3, 4 + 8, true) 随机字符后缀 = zm.RndStr(3, 1 + 4 + 8, true) 话术 = zm.RndArrElement(a) // 话术 = " 你好,我非常喜欢你的作品,我的 V 123456 交个朋友吧!" InputText 随机字符前缀 & " " & 话术 & " " & 随机字符后缀 话术私聊 = 0 话术发送完毕 = 1 Delay 延迟时间 Tap 700, 1260 Delay 200 Tap 24,58 End If Delay 2000 Loop Next zm.Swipe 358,1222, 312, -10, 300 //滑动 Loop Sub 重置起点() Do startx = 1 : starty = 1 : endx = 720 : endy = 1280 : count = 0 结果 = "" Do FindPic startx, starty, endx, endy, img,"000000",0,0.9, cz_intx, cz_inty'一图多坐标写法 If cz_intx = -1 Then Exit do Else //startx = cz_intx + 60 starty = cz_inty + 5 count = count + 1 结果 = 结果 & cz_intx - 258 & "," & cz_inty + 12 & "|" TracePrint cz_intx, cz_inty TracePrint "x:"&cz_intx&"y:"&cz_inty&"几张:"&count&" "&结果 // Tap cz_intx - 258, cz_inty + 12 End If If 结果 = "" Then '说明没有找到 End If // Delay 5000 Loop Exit Do loop End Sub //
2021年02月04日
5 阅读
0 评论
0 点赞
2021-02-03
按键精灵 随机输出一段话
今天在写学习强国脚本的时候,发现有一个评论的积分的地方,然后呢。我们既然想要的积分那么这个任务肯定是要办的,但是呢,如果我们评论的都是一句话肯定是不行的,所以我当时的想法是写几个变量,然后整个随机数,每次运行的时候随机抽取。然后呢,其实按键精灵我也不是很熟悉。写几个变量储存要评论的话,稍加思索就能明白应该是用到了数组,然后从数组里随机提取数据。辛亏是有的,我们简单定义一个数组即可。如果用官方的例子就是i = Array("xxxx","wwww","sadda")然后呢提取数据其实跟其他的都一样,是利用下标提取的。i(0),i(1)之后呢,既然数组已经找好了,那么随机数呢?自然也是找好的了,我们首先要定义一个变量用于接受这个随机数,然后输入Randomize这个大概率是声明下面用的是随机数,当然这是我瞎编的。之后其实就是根据上面的注释就能写出来了,然后我们的MyValue就会产生我们设置的随机数的范围内的数,之后再通过i(MyVaule)来获取数组内的元素即可。
2021年02月03日
2 阅读
0 评论
0 点赞
2021-02-02
按键精灵 如何滑动状态栏?
玩手游玩的有点上瘾 ,然后呢他这个游戏是开局多久可以5连抽,基本上能决定你后期玩的是否舒服。所以呢就想写个脚本然后去5连抽。所以就在研究一下按键精灵,其实我发现这个还是很好学的,当然是基础部分。首先我们需要一个按键精灵手机助手,然后再需要一个模拟器,用来调试。首先简单说一下按键精灵中的滑动,一个是swipe,一个是touch。这两个有什么区别呢?swipe是直接滑动,比较常用的地方是在滑屏过程。而touch则是可以设置按下以及抬起,举个例子,卸载软件,我们要先长按然后滑动再卸载,可以用touch来实现。TouchDown 123, 424, 1 Delay 1000 TouchMove 109,182, 1, 50 TouchUp 1这是一个简单的卸载例子,可以把down里的坐标换成软件的,然后讲move里的坐标换成卸载的位置。然后再说一下滑动状态栏吧,其实这个就涉及到位置以及速度了,我们知道如果滑的慢了会将状态栏内的wifi之类的给划出来,而我们将延迟设置为50就可以很轻松的实现这个功能了,当然起点在状态栏上,重点最好在屏幕的一半以上,这样效果会很好的。
2021年02月02日
3 阅读
0 评论
0 点赞