按键精灵系列

技术2023-11-10 90

文章目录

检测空的没检测到的东西卖出比买进多一点钱按键精灵朝着当前鼠标的位置输出数字东方财富对恒生ETF自动交易函数咋用啊大漠插件替代高PID这样运行们就可以获得正确坐标啦！！按键精灵咋找屏幕上某点的位置呢？自动打开我的东方财富录制的视频重新执行的话位置有偏差大漠插件注册大漠插件的时候报错大漠插件咋制作字库在按键精灵里面使用大漠插件识别“东方财富交易”是否会识别到屏幕上两个地方的"东方财富"找到密码这俩个字频繁发百度网盘的验证码大漠插件如何提取数字

检测空的没检测到的东西

卖出比买进多一点钱

add_one_x=292 add_one_y=263 //根据大漠来决定 chicang1_x=382 chicang1_y=868 chicang2_x=533 chicang2_y=908 buy_price1_x=825 buy_price1_y=487 buy_price2_x=903 buy_price2_y=512 buy_mode_x=add_one_x-177 buy_mode_y=add_one_y-182 sell_mode_x=add_one_x-51 sell_mode_y=add_one_y-182 plus_one_x=add_one_x-23 plus_one_y=add_one_y doubleclick_code_x=add_one_x-222 doubleclick_code_y=add_one_y+181 buy_price_x=add_one_y+71 buy_price_y=add_one_y-13 sell_price_x=add_one_x+126 sell_price_y=add_one_y-100 buy_price=0 sell_price=0 buy_x=add_one_x-49//买入按钮的位置 buy_y=add_one_y+66 buy_yes_x=add_one_x-55 buy_yes_y=add_one_y+101 success_commit_x=add_one_x+26//你的啥已提交 success_commit_y=add_one_y+62 refresh_x=add_one_x+383//刷新位置 refresh_y=add_one_y+129 PutAttachment ".\plugin", "RegDll.dll" PutAttachment ".\plugin\dm", "dm.dll" Plugin.RegDll.Reg (Plugin.sys.GetDir(0) + "\plugin\dm\dm.dll") set dm = createobject("dm.dmsoft") dm_ret = dm.SetDict(0,"D:\software\dm31233_202033015524\3.1233\dm_soft.txt") s = dm.Ocr(chicang1_x, chicang1_y, chicang2_x, chicang2_y, "e64343-000000", 1) Do While s = "" Delay 1000 s = dm.Ocr(chicang1_x, chicang1_y, chicang2_x, chicang2_y, "e64343-000000", 1) Loop //MessageBox s //展示是否成功读取现在的持仓量 initial_amount=s+0 call buy() do MoveTo refresh_x, refresh_y LeftDown 1 LeftUp 1 Delay 300 s = dm.Ocr(chicang1_x,chicang1_y,chicang2_x,chicang2_y,"e64343-000000",1) //MessageBox s end_mount=0 Do While s = "" Delay 2000 s = dm.Ocr(chicang1_x, chicang1_y, chicang2_x, chicang2_y, "e64343-000000", 1) Loop //MessageBox s end_amount=s+0 //MessageBox initial_amount //MessageBox end_amount if end_amount=(initial_amount+100) then exit do end if Loop call sell() do MoveTo refresh_x, refresh_y LeftDown 1 LeftUp 1 Delay 300 s = dm.Ocr(chicang1_x,chicang1_y,chicang2_x,chicang2_y,"e64343-000000",1) //MessageBox s end_mount=0 Do While s = "" Delay 2000 s = dm.Ocr(chicang1_x, chicang1_y, chicang2_x, chicang2_y, "e64343-000000", 1) Loop //MessageBox s end_amount=s+0 //MessageBox initial_amount //MessageBox end_amount if end_amount=initial_amount then exit do end if Loop MessageBox "买卖全部完成" EndScript Sub buy() MoveTo buy_mode_x,buy_mode_y LeftDoubleClick 1 Delay 300 MoveTo doubleclick_code_x,doubleclick_code_y LeftDoubleClick 1 Delay 300 temp= dm.Ocr(buy_price1_x,buy_price1_y,buy_price2_x,buy_price2_y,"e64343-000000",1) Do While temp = "" Delay 2000 temp= dm.Ocr(buy_price1_x,buy_price1_y,buy_price2_x,buy_price2_y,"e64343-000000",1) Loop buy_price = temp + 0 buy_price = buy_price/1000 //MessageBox buy_price MoveTo add_one_x-131,add_one_y-55 LeftDoubleClick 2 SayString buy_price Delay 300 //MessageBox buy_price MoveTo plus_one_x,plus_one_y LeftDown 1 LeftUp 1 Delay 500 MoveTo add_one_x,add_one_y LeftDown 1 LeftUp 1 Delay 500 MoveTo buy_x,buy_y LeftDown 1 LeftUp 1 Delay 300 MoveTo buy_yes_x,buy_yes_y LeftDown 1 LeftUp 1 Delay 500 MoveTo success_commit_x,success_commit_y LeftDown 1 LeftUp 1 Delay 300 //MessageBox "买单已经完成，价格是"+temp End Sub Sub sell() MoveTo sell_mode_x,sell_mode_y LeftDoubleClick 1 Delay 100 MoveTo doubleclick_code_x,doubleclick_code_y LeftDoubleClick 1 Delay 100 MoveTo add_one_x-131,add_one_y-55 LeftDoubleClick 2 SayString buy_price+0.001 //MessageBox buy_price+0.001 //MoveTo sell_price_x,sell_price_y //LeftDown 1 //LeftUp 1 //Delay 100 MoveTo plus_one_x,plus_one_y LeftDown 1 LeftUp 1 Delay 500 MoveTo add_one_x,add_one_y LeftDown 1 LeftUp 1 Delay 500 MoveTo buy_x,buy_y LeftDown 1 LeftUp 1 Delay 300 MoveTo buy_yes_x,buy_yes_y LeftDown 1 LeftUp 1 Delay 500 MoveTo success_commit_x,success_commit_y LeftDown 1 LeftUp 1 Delay 1200 End Sub

按键精灵朝着当前鼠标的位置输出数字

东方财富对恒生ETF自动交易

add_one_x=508 add_one_y=287 chicang1_x=828 chicang1_y=913 chicang2_x=973 chicang2_y=961 buy_mode_x=add_one_x-177 buy_mode_y=add_one_y-182 sell_mode_x=add_one_x-51 sell_mode_y=add_one_y-182 plus_one_x=add_one_x-23 plus_one_y=add_one_y doubleclick_code_x=add_one_x-222 doubleclick_code_y=add_one_y+181 buy_price_x=add_one_y+71 buy_price_y=add_one_y-13 sell_price_x=add_one_x+126 sell_price_y=add_one_y-100 buy_x=add_one_x-49//买入按钮的位置 buy_y=add_one_y+66 buy_yes_x=add_one_x-55 buy_yes_y=add_one_y+101 success_commit_x=add_one_x+26//你的啥已提交 success_commit_y=add_one_y+62 refresh_x=add_one_x+383//刷新位置 refresh_y=add_one_y+129 PutAttachment ".\plugin", "RegDll.dll" PutAttachment ".\plugin\dm", "dm.dll" Plugin.RegDll.Reg (Plugin.sys.GetDir(0) + "\plugin\dm\dm.dll") set dm = createobject("dm.dmsoft") dm_ret = dm.SetDict(0,"D:\software\dm31233_202033015524\3.1233\dm_soft.txt") s = dm.Ocr(chicang1_x,chicang1_y,chicang2_x,chicang2_y,"e64343-000000",1) initial_amount=s+0 call buy() do MoveTo refresh_x, refresh_y LeftDown 1 LeftUp 1 Delay 1200 s = dm.Ocr(chicang1_x,chicang1_y,chicang2_x,chicang2_y,"e64343-000000",1) end_amount=s+0 if end_amount=(initial_amount+100) then exit do end if loop call sell() EndScript Sub buy() MoveTo buy_mode_x,buy_mode_y LeftDoubleClick 1 Delay 100 MoveTo doubleclick_code_x,doubleclick_code_y LeftDoubleClick 1 Delay 100 MoveTo buy_price_x,buy_price_y LeftDown 1 LeftUp 1 Delay 100 MoveTo plus_one_x,plus_one_y LeftDown 1 LeftUp 1 Delay 500 MoveTo add_one_x,add_one_y LeftDown 1 LeftUp 1 Delay 500 MoveTo buy_x,buy_y LeftDown 1 LeftUp 1 Delay 300 MoveTo buy_yes_x,buy_yes_y LeftDown 1 LeftUp 1 Delay 500 MoveTo success_commit_x,success_commit_y LeftDown 1 LeftUp 1 Delay 1200 End Sub Sub sell() MoveTo sell_mode_x,sell_mode_y LeftDoubleClick 1 Delay 100 MoveTo doubleclick_code_x,doubleclick_code_y LeftDoubleClick 1 Delay 100 MoveTo sell_price_x,sell_price_y LeftDown 1 LeftUp 1 Delay 100 MoveTo plus_one_x,plus_one_y LeftDown 1 LeftUp 1 Delay 500 MoveTo add_one_x,add_one_y LeftDown 1 LeftUp 1 Delay 500 MoveTo buy_x,buy_y LeftDown 1 LeftUp 1 Delay 300 MoveTo buy_yes_x,buy_yes_y LeftDown 1 LeftUp 1 Delay 500 MoveTo success_commit_x,success_commit_y LeftDown 1 LeftUp 1 Delay 1200 End Sub

函数咋用啊

Call 子程序() EndScript Sub 子程序() Msgbox "我是子程序,被你调用了" End Sub a=1234 Call 子程序() Sub 子程序() Msgbox a End Sub

大漠插件替代高PID这样运行们就可以获得正确坐标啦！！

按键精灵

下载地址

http://mydown.yesky.com/pcsoft/234945.html

网盘地址

链接：https://pan.baidu.com/s/1duFFRqiSkhAycS86Y4d6dg 提取码：3z0a

下载安装后长这样子

咋找屏幕上某点的位置呢？

编辑脚本抓抓啊就是这么高啊！

这个的确是对的但是如果用大漠插件识别数字，那么必须用大漠综合工具搞位置啊

自动打开我的东方财富

MoveTo 185, 138 RightDown 1 RightUp 1 Delay 3000 MoveTo 171, 150 LeftDown 1 LeftUp 1

录制的视频重新执行的话位置有偏差

咋办呢？

大漠插件

链接：https://pan.baidu.com/s/1Eh2BIaLfm2n3haMfx7uGDA 提取码：wug0

下载玩打开长这样子

第一步双击最后的注册大漠插件到系统

注册大漠插件的时候报错

咋办呢呢用管理员打开命令行进入大漠的文件夹在这里进行注册dllregsvr32 **.dll

大漠插件咋制作字库

打开大漠插件

看到没有，字库文件就是往这个字库里面添加字啊，如果一开始没有添加一个字，这个库就是空的看图上，他已经有了两个字了

下面我要识别东方财富的富！

这下文件里就多了一个富字啦！

交易的已易经识别下

在按键精灵里面使用大漠插件

把这两个东西放在这里

然后放这个 PutAttachment ".\plugin", "RegDll.dll" PutAttachment ".\plugin\dm", "dm.dll" Plugin.RegDll.Reg (Plugin.sys.GetDir(0) + "\plugin\dm\dm.dll") set dm = createobject("dm.dmsoft") dm_ret = dm.SetDict(0,"C:\Users\ZTZ\Desktop\dm_soft.txt") s = dm.Ocr(0,0,1878,781,"ffffff-000000",1.0) MessageBox s 他就是别除了桌面上白白的富企富抑啦！

识别“东方财富交易”

虽然是多个字，但是是作为整体啊，我觉得还是要点击提取点阵啊！

他会成功吗

成功识别啊！

是否会识别到屏幕上两个地方的"东方财富"

ok啦！牛逼！！

找到密码这俩个字

频繁发百度网盘的验证码

PutAttachment ".\plugin", "RegDll.dll" PutAttachment ".\plugin\dm", "dm.dll" Plugin.RegDll.Reg (Plugin.sys.GetDir(0) + "\plugin\dm\dm.dll") set dm = createobject("dm.dmsoft") dm_ret = dm.SetDict(0,"D:\software\dm31233_202033015524\3.1233\dm_soft.txt") s = dm.Ocr(0,0,1878,781,"ffffff-000000",1.0) dm_ret = dm.FindStr(0,0,1878,781,"密码","ffffff-000000",1.0,intX,intY) If intX >= 0 and intY >= 0 Then MoveTo intX, intY + 61 LeftClick 1 KeyDown 49, 1 KeyUp 49, 1 KeyDown 55, 1 KeyUp 55, 1 KeyDown 56, 1 KeyUp 56, 1 KeyDown 48, 1 KeyUp 48, 1 KeyDown 49, 1 KeyUp 49, 1 KeyDown 48, 1 KeyUp 48, 1 KeyDown 53, 1 KeyUp 53, 1 KeyDown 53, 1 KeyUp 53, 1 KeyDown 48, 1 KeyUp 48, 1 KeyDown 55, 1 KeyUp 55, 1 KeyDown 52, 1 KeyUp 52, 1 For 10 MoveTo intX, intY+228 LeftClick 1 Delay 62000 Next End If

大漠插件如何提取数字

上图我抓图抓到了跌停两个字为啥二值化区域里没有呢？现在开始点击红色然后出来个小东西然后点击跌停这个字上面的东西那么你就会发现RGB，HSV这些都变了然后出现下面的

牛逼把！！

Processed: 0.019, SQL: 9