影安安的个人资料

[源码分享]----安卓对接飞浆识别(支持远程服务器) 文章作者：瑞祥幽冥狼飞浆识别端下载地址: 链接：http://tieba.baidu.com/mo/q/checkurl?url=https%3A%2F%2Fshare.weiyun.com%2FXD91o5ar&urlrefer=9473c895f4160a7662d02032e945f47f 密码：8he3nq 识别效果一览: 源码下载: For Each k , v In talbeV["addleOCR"] Dim 返回值,talbeV,分割 SnapShot "/sdcard/test.png" Import "zm.luae" //导入插件,只需执行一次 zm.Init //初始化插件,只需执行一次 Dim b64 = zm.FileReadBinaryBase64("/sdcard/test.png") TracePrint b64 For 2 返回值= Url.HttpPost({"url":"http://tieba.baidu.com/mo/q/checkurl?url=http%3A%2F%2F120.79.180.223%3A19811%2Focr_data_2&urlrefer=0a66793ec8bf14a08b9500294c4ce535","data":b64,"code":"gbk" }) 分割=split(返回值,"ttxt") TracePrint UBOUND(分割)-1 TracePrint 返回值 talbeV = Encode.JsonToTable(返回值) Dim k, v For i = 1 To UBOUND(分割) - 1 TracePrint k TracePrint v Next Next If 返回值 <>"" Then Exit For End If Next

[安卓按键]本地数据库的初步学习文章作者：郭立员今天给大家介绍一下本地非加密数据库，这里有两个关键词：本地、非加密。首先我们来了解一下什么是数据库啊 “是一个长期存储在计算机内的、有组织的、可共享的、统一管理的大量数据的集合。” 上面是百度百科查的，简单点理解就是存数据的表格。数据库文件的后缀名是 .db 数据库的组成部分：一个数据库包含：数据库名，表名，列名，表数据我以截图为例：数据库名：my.db 表名：sms，一个数据库可以有多张表列名：有3列数据，data1，data2，data3，对于表的列是没有上限的表数据：一共1行3列，支持多行数据如果你对办公软件比较熟悉的话，是不是觉得数据库和Excel表格很像，可以把数据存入到表格当中。了解完数据库构成以后，我们对于数据库基本要完成以下这么几个操作： ①新建数据库 ②添加数据 ③删除数据 ④读取数据 ⑤修改数据对于到我们安卓按键插件的命令如下图：接下来是这篇文章的重点，就是在安卓按键里面怎么操作数据库：注：代码区均可向右滑动查看完整代码。【一】新建数据库 TracePrint sqlite3.SQLCreate(数据库路径, 表名, 列名) 新建完数据库以后会得到一个不含数据只有表头的空表：举个例子，在雷电模拟器的共享文件夹中新建一个名字叫my.db的数据库，数据库中有一个表叫sms，表中有3列，分别是data1，data2，data3 Import "sqlite3.lua" TracePrint sqlite3.SQLCreate("/sdcard/pictures/my.db", "sms", {"data1","data2","data3"}) 当然你可以像命令介绍里面那样把数据库路径、列名都单独定义一个变量，这里为了让大家看得明白，我就直接把参数写进命令里面了。【二】添加数据建好数据库就需要往里面放数据了，怎么操作呢？这里用一个词形容叫“对号入座”，你要把数据放到哪个数据库，哪个表，哪一列？ TracePrint sqlite3.SQLInsert(数据库名, 表名, {列名：内容}) 还是截图那个例子：我们有三个数据，分别是"这是第1条新记录"，"这是第2条新记录"，"这是第3条新记录"。按照刚刚说的对号入座~ 放到数据库是"/sdcard/pictures/my.db" 放的表是 "sms" 放的列是，{"data1","data2","data3"}这三列。 TracePrint sqlite3.SQLInsert("/sdcard/pictures/my.db", "sms", {"data1":"这是第1条新记录","data2":"这是第2条新记录","data3":"这是第3条新记录"}) 这里需要注意一点，这个添加数据，是以追加的形式，就是在原有数据的下一行添加内容，而且是整行添加，没有的数据添加的列空白。【三】读取数据读取数据也就是查询数据库sqlite3.SQLSelect，这是一个有难度的命令，难点在于“查询的过滤条件”这个参数，因为需要SQLite语法，不过好在它是一个可选填的参数，对于这类参数，我们初学时的态度就是可选填就是不填。看一下命令介绍一共4个参数，去掉2个选填的，就剩2个了。 Dim ret = sqlite3.SQLSelect(数据库路径, 表名) 这里ret是用来存储查询结果的变量，它存储内容的格式很关键，看命令介绍返回值是键值表，那具体什么格式的键值表呢，这里姑且卖个关子，下面用例子说明。还是读取刚刚新建的数据库my.db中的sms表 Import "sqlite3.lua" Dim ret = sqlite3.SQLSelect("/sdcard/pictures/my.db","sms") Dim json=encode.TableToJson(ret) TracePrint json 我把返回值用命令转成了json格式，可以直接调试输出，放入文本给大家截图看一下。这是一个二维键值表，也可以理解为二维数组，知道它的格式以后，稍微有点json提取经验的朋友应该就知道怎么提取了。对比这个表的截图，可以看到返回值的格式，是按行存储的，第一行3个内容存入到表的第一个内容，第二行存入到表的第二个内容，第三行存入到表的第三个内容。比方说我想要提取，第2行的data3对应的数据，该怎么写代码？ Import "sqlite3.lua" Dim ret = sqlite3.SQLSelect("/sdcard/pictures/my.db","sms") TracePrint ret[2]["data3"] 看代码找关系： [2]代码第2行 ["data3"]代表列名叫data3的列讲完上面这些，还有2个命令“删除数据库记录”和“修改数据库内容”，这两个就不讲了，“删除数据库记录”不讲的原因是我不会SQLite语法，所以没法讲。“修改数据库内容”和“添加数据”是差不多的，唯一不同点也是SQLite语法那个选填的参数，所以也是没法讲。虽然我不讲，但是如果你想深入学习数据库，SQLite语法也是要去学的。最后说一下我为啥写这篇文章，昨天有朋友问我怎么读取通讯录的号码，查了一下号码存储的位置，发现是一个数据库，所以就研究了一下，才有了今天的文章。通讯录的数据路径是 "/data/data/com.android.providers.contacts/databases/contacts2.db" 想研究的朋友可以自己试试看。

用按键精灵手助的时候连接有时候会断开，是什么原因？手机是VIVO的，root权限也都给了

按键精灵吧吧主竞选：NO.0003号候选人

[实用资源分享]----PC本地文字识别（支持模拟器）软件并非本人原创，也是我收集来的，有需要的同学跟帖即可，我发私信给你哈~

给新手的后台脚本范例源代码这个是送给新手的后台脚本范例源代码，鼠标坐标直接转换成了相对坐标，新手只需要把图片换成你需要的图就可以了。新手写后台脚本可以参考以下源代码，只是给出1个框架，高手大神可以飘过。 dim MyArray,L,T,R,B,x,y //下面这句是得到鼠标指向的窗口句柄 Hwnd = Plugin.Window.MousePoint() Delay 100 //下面这句是得到窗口句柄的客户区大小 sRect = Plugin.Window.GetClientRect(Hwnd) //下面这句用于分割字符串,将横坐标和纵坐标分成两个字符串 MyArray = Split(sRect, "|") //下面这句将字符串转换成数值，获得窗口坐标：左上角（L，T），右下角（R，B） L = Clng(MyArray(0)): T = Clng(MyArray(1)) R = Clng(MyArray(2)) : B = Clng(MyArray(3)) Rem 开始 FindPic L,T,R,B,"Attachment:\图片.bmp",0.9,intX,intY If intX > 0 And intY > 0 Then THwnden //x,y是鼠标相对坐标,下面这句是换算出鼠标相对坐标 x = intX - L y = intY - T //下面这句是：鼠标在你找到的图片左上角左击1次 Call Plugin.Bkgnd.LeftDown(Hwnd, x, y) Delay 300 Else //下面这句是输出:没有找到图片 MessageBox "没有找到图片" //下面这句是程序停止运行 EndScript End If Goto 开始

用按键精灵可以自动识别验证码吗？比较简单的那种感觉验证码识别一直是比较头疼的课题，如果验证码是纯4位数字的话，靠按键精灵能实现吗？还是直接找个打码平台算了？

{编程技巧] 一起交流交流，有哪些值得借鉴的编程习惯写出优秀的代码是一门艺，要想如此，就必须在一开始就养成良好的编程习惯，这不仅有助于脚本初期的设计（如模块化），还可以使你编写的代码更易于理解，从而使脚本的维护工作更轻松、更省力。不好的编程习惯则会造成代码 bug，并且会使以后的维护工作困难重重。那么，如何才能写出一手规范的、让人一看就觉得像是出自高手之手的脚本呢？

找图插件找不到图怎么办？？找不到图的可能原因有几种： 1、代码写错 2、找图范围不对 3、图片路径写错 4、图片格式不是.BMP格式 5、图片确实不存在当前画面 6、图片被部分遮挡或者发生变化 7、图片是在其他电脑上做的其他，欢迎补充…… 各路大神，关于这些问题，有什么应对策略吗？

分享一些常用的调试技巧不管是自己写代码还是学习他人代码总有用到调试功能的时候，如果此时知道一些代码调试上的技巧那么将节省很多时间~下边介绍两种常用的调试方法，希望对新手有帮助，我也是新手，一起进步！

用这个方法可以将程序添加开机自启动希望对你有帮助哈 call 设置开机自启动() //把这一句放进小精灵的Form1.Load里面 Declare Function GetModuleFileName Lib "kernel32" Alias "GetModuleFileNameA" (ByVal hModule As Long, ByVal lpFileName As String, ByVal nSize As Long) As Long Sub 设置开机自启动() Dim FileName,ExePath,StartingPath,fso,LinkPath,FolderPath Set fso = CreateObject("Scripting.FileSystemObject") Set WshShell=CreateObject("WScript.Shell") a0a= space(260):GetModuleFileName NULL,a0a, 260'当前软件全路径 ExePath= fso.GetFile(a0a).path FolderPath=WshShell.CurrentDirectory'当前文件夹路径 StartingPath=WshShell.SpecialFolders("startup")'获取自启动路径 FileName=fso.GetFile(ExePath).name'获取文件名 If (InStr(FileName, "按键精灵")>0) Then Exit Sub LinkPath=StartingPath&"\"&FileName&".lnk" If (fso.fileexists(LinkPath)=0 or WshShell.CreateShortcut(LinkPath).TargetPath

网游自动寻路中断设计思想目标停止后处理事件并调整方向 l = dm.GetColor(891, 265)//设置一个需要停止的坐标点 For i=0 to 100 color = dm.GetColor(891, 265)//开始按照以下程序执行 If color = l Then dm.KeyDown 37//举个例子 Else dm.KeyUp 37//当目标移动到需要停止的坐标时，当前程序停止执行并退出循环 Exit For End If Delay 100 Next 目标停止后处理事件并调整方向

安卓版怎么多线程定时执行某一段代码？代码A,B,C一直在循环运行，然后每到30秒,就运行一次 D代码, 能否有哪位大佬能解惑一下,？

小精灵的数量上限是按什么来计的？打包的安卓小精灵，不在线的设备会算在内吗？

按键论坛接单的板块还会开放吗？之前听说年后就开，还要等多久？谁知道

速游玩辅助出问题还能去哪里反馈？求大神指点

找个会写剑灵脚本的作者可以私信联系

签到打卡签到处

找个会写剑灵脚本的作者私信联系

网易的游戏怎么防封？比如梦幻西游这款

还有哪家辅助平台比较靠谱的？

哪里能找个靠谱的辅助作者

最近什么新游戏比较火的新人求带

签到帖签到！曾在阳光下幻想着云游四海，浪迹天涯。

贴吧签到岁月静好，牵一片光阴于流年中，聆听花开的声音;携一缕馨香在生命的路口，芬芳过往。给时光一份浅浅的回眸;给心灵寻一份安暖。始终相信生命中的某些东西，深藏在心中，永远不会老去。

打卡签到顺便说一句，想用脚本的可以考虑按键精灵

觉得学写脚本有困难？看看别人的经验分享学习按键精灵的方法：

虽然按键精灵可以直接插入命令，但是手动写代码还是很重要的直接插入代码虽然简单方便，但是不利于我们编辑大型脚本，更不利于我们更好的熟悉和认识脚本代码

如何用按键精灵写qq群发的脚本？比如，我想通过按键精灵在QQ上依次发“1”，“2”，“3”……

按键精灵很像VB 按键精灵很像VB,也像易语言,如果你熟悉vb6.0那个时代的编程,可以很快的掌握,如果用惯了面向对象的语言,那大家要好好习惯一下

第一次如何用按键精灵做脚本？对新手来说，是不是觉得写脚本很复杂

哪个文字识别插件适合新手学，给新手些指点吧

适合新手，获取后台坐标并保存到剪切版 Call get() EndScript Sub get() Dim Hwnd,sRect,MyArray Hwnd = Plugin.Window.MousePoint() sRect = Plugin.Window.GetClientRect(Hwnd) MyArray = Split(sRect, "|") //下面这句将字符串转换成数值 L = Clng(MyArray(0)): T = Clng(MyArray(1)) R = Clng(MyArray(2)): B = Clng(MyArray(3)) GetCursorPos x, y x=x-L:y=y-T Call Plugin.Sys.SetCLB(""& x &","& y) End sub

【教程分享】获取后台坐标并保存到剪切版按键账号：小歌。新手通常都不理解后台和前台坐标的区别，以下代码可以直接获取后台坐标到剪切版，粘贴就可以得到。高手为了方便也可以使用哦。启动时将鼠标对准需要获取的点 Call get() EndScript Sub get() Dim Hwnd,sRect,MyArray Hwnd = Plugin.Window.MousePoint() sRect = Plugin.Window.GetClientRect(Hwnd) MyArray = Split(sRect, "|") //下面这句将字符串转换成数值 L = Clng(MyArray(0)): T = Clng(MyArray(1)) R = Clng(MyArray(2)): B = Clng(MyArray(3)) GetCursorPos x, y x=x-L:y=y-T Call Plugin.Sys.SetCLB(""& x &","& y) End sub

学习视频里跳出的验证怎么处理写了个脚本微信小程序里的线上课程挂时长，但它每隔几十分钟会跳出个验证，这种怎么处理

学起来，这招好用界面上要设置的东西太多啦，不同的号要用不同的功能，每次都得单独去调，怎么办？思路： 1、把当前的界面上的值保存到uservar.ini配置文件里 2、把uservar.ini复制到其他的文件夹并进行重命名 3、加载配置的时候把对应的配置文件重新复制覆盖掉原有的uservar.ini文件

免root小精灵支持安卓10了吗？免root小精灵支持安卓10了吗？

电脑端的按键精灵最新版就是2014吗什么时候会更新？

报个道报个道！

这边有使用按键精灵的大佬吗冒个泡

吧里全是水吧里全是水

小精灵跑起来有时候自己消失了是怎么回事？哪位大神知道

新吧落成，留个名！希望吧里多些交流，别都是广告

请问天籁有座椅记忆和后视镜记忆这两个功能吗？入手的是2021天籁智行版，谢谢解答！

不懂就问，大佬们，同部位的不同专属配件之间怎么转移经验呀？不懂就问，大佬们，同部位的不同专属配件之间怎么转移经验呀？

大佬们，解除同居后，之前种在室友家里的作物会寄回吗？大佬们，解除同居后，之前种在室友家里的作物会寄回吗？

大佬们，喷气背包可以隐藏，但不影响效果吗？我看有人没背包跳很大佬们，喷气背包可以隐藏，但不影响效果吗？我看有人没背包跳很高，怎么做到的？

【默默蹲图】小伙伴们可否分享下你们的室内壁纸搭配呀？哭了，实在是搭配无能！感觉自己配出来的效果根本体现不出它的美感！目前有这几种：怎么组合比较好看呢？再买什么图案的跟他们搭配效果更好呢？求助啊！！！

无人机消耗功率76，输出功率仅78，会有什么影响吗？无人机小白，所以买的整机，一只小鹰，拆开才知道用的高级核心，输出功率仅78，只比消耗功率高两点，请问输出功率这么低的话，会不会有啥不好的影响呀？

被屠夫挂气球后，用按键精灵点挣扎，可以成功逃脱吗？目前匹配胜率只有33%，还有救吗？

新人，手机一定要root才能用按键吗新人，手机一定要root才能用按键吗

多人对战的时候，能锁定目标攻击吗？现在似乎是不同目标轮流攻击的，能不能锁定一个打？

为什么看不到自已拍卖行里正上架的商品呢？在拍卖行挂了个长生玉出售，但在出售列表里却看不到它，让朋友看，也找不到。谁知道这是什么原理？

请问百度统计上可以查看网站上的用户留存数据吗？请问百度统计上可以查看网站上的用户留存数据吗？如果可以，怎么查看呢？

抽奖是要有的，万一中了呢？这个活动很给力，小伙伴们不要错过哦！

同个页面，为什么广告管家每天得到的IP数总比百度统计得来的少？如题，我们有个页面，页面上已经加了百度统计。此页面上有条广告，所以又添加了广告管家。两种统计都有提供IP查询，但广告管家查询到的IP数每天都比百度统计的少个几百至两千不等的量。不知道是什么原因呢？大家有遇到类似情况吗？也求吧主帮忙解答下，谢谢！@百度广告管家

百度统计页面点击量里显示的点击数据时有异常是什么原因我们有个页面，上面总共四个入口，入口一的点击数据有时会没有显示，此时入口二、入口三和入口四的点击量相加，总数与页面顶部显示的“页面点击”的量也不相符，会少挺多的。所以怀疑这部分少了的量会不会正是入口一的点击量？除了有时候点击量会缺失，偶尔还会出现暴涨情况，比如一个入口平常点击大概在两百左右，突然有一天点击有两万多，但同天这个页面的流量和其他入口的点击数据是正常的。想问问大家有没碰到我说的这两种异常，谁知道原因吗？