按键精灵PC端脚本
定义变量的时候不需要定义类型 ,由于是易语言,变量名可以是中文
文本路径 = "C:\Users\Administrator\Desktop\1.txt"//改成自己的文本路径
Text = Plugin.File.ReadFileEx(文本路径)
MyArray = Split(Text, "|")//以行为单位分拆,已数组形式存放
//RunApp "电脑的文件路径" 如下面的打开浏览器
call RunApp ("C:\Users\Administrator\Desktop\2345加速浏览器.lnk")
Delay 200
Hwnd = Plugin.Window.Foreground() //获得当前窗口的句柄
//Hwnd = Plugin.Window.MousePoint()//获得鼠标指向窗口句柄
delay 200
Call Plugin.Window.Max(Hwnd) //最大化窗口
Delay 200
Dim a //创建一个新变量
a = 0
//UBOUND 函数返回一个数组的最大下标
If UBound(MyArray)>=0 Then //then前面if的条件
For i=0 to UBound(MyArray)-1
//下面这句是得到文本内容
TracePrint "第 " & i + 1 & " 行文本内容为:" & Cstr(MyArray(i))
MoveTo 550,74//点击网页某个地方.自己获取坐标
Delay 10
LeftClick 1
Delay 1000
MoveTo 805,642 //弹出对话窗,输入框的坐标.自己获取
Delay 10
LeftClick 1
Delay 500
KeyDown 17, 1
KeyPress 65, 1
KeyUp 17, 1
SayString MyArray(i)//输入
Delay 500
KeyPress 9,2
Delay 10
KeyPress 13,1
Delay 1000
If i - a >= 20 Then
MoveTo 29,1056 //点击网页某个地方.自己获取坐标
Delay 10
LeftClick 1
Delay 1000
MoveTo 111,551//弹出对话窗,输入框的坐标.自己获取
Delay 10
LeftClick 1
Delay 1500
a = i
End If //结束if语句
//i Mod 80表示:i模80取余数(i%80=i/80的余数)
If i Mod 80 = 0 and i<>0 Then //i<>0 表示:i 不等于 0
Delay 5500000
Call Lib.系统.结束进程("2345Explorer.exe") //关闭所有关于这个的进程
Delay 3000
RunApp "C:\Users\Administrator\Desktop\2345加速浏览器.lnk"
End If
Next
End If
---------------------------------
Text1 = Plugin.File.ReadFileEx("C:\Users\Administrator\Desktop\1.txt")
Text2 = Plugin.File.ReadFileEx("C:\Users\Administrator\Desktop\2.txt")
MyArray1 = Split(Text1, "|")//以行为单位分拆
MyArray2 = Split(Text2, "|")//以行为单位分拆
//RunApp "电脑的文件路径"
call RunApp ("C:\Users\Administrator\AppData\Local\Google\Chrome\Application\chrome.exe")
Delay 200
Hwnd = Plugin.Window.Foreground() //获得当前窗口的句柄
//Hwnd = Plugin.Window.MousePoint()//获得鼠标指向窗口句柄
delay 200
Call Plugin.Window.Max(Hwnd) //最大化窗口
Delay 200
For i = 0 To 19
KeyDown 17, 1
KeyPress 84, 1
KeyUp 17, 1
Delay 500
SayString MyArray1(i) & "/dadadadada"
KeyPress "Enter", 1
Delay 4000
KeyPress "Tab", 2
Delay 10
SayString"admin"//输入账号
Delay 500
KeyPress "Tab", 1
Delay 500
SayString"ckxytea!@"//输入密码
//遇到waitkey暂停指令 需要任意按一下键盘 才继续执行
key = 0
Do Until key = 13 //循环必须找到 key=回车键 才继续执行
key = WaitKey()
Loop
KeyPress "Enter", 1
Delay 8000
MoveTo 16,222//模块位置 自己获取
Delay 500
LeftClick 1
Delay 2000
KeyPress 9, 7
Delay 500
KeyDown 13, 1
Delay 3000
For i1 = 0 To 19
If i1 = i Then
i1=i+1
End If
MoveTo 1500,160
Delay 500
LeftClick 1
Delay 500
KeyPress 9, 1
Delay 500
KeyDown 13, 1
Delay 3000
KeyPress 9, 2
Delay 500
SayString "http://"& MyArray1(i1)
Delay 500
KeyPress 9, 1
Delay 500
SayString MyArray2(i1)
Delay 500
KeyPress 9, 7
Delay 500
KeyPress 39, 1
Delay 500
KeyPress 13, 1
Delay 3000
Next
Next
按键精灵PC端脚本的更多相关文章
- 按键精灵PC版<末日王者>
更新模式[强制] 更新版本[1.28] 更新链接[https://yunfei-1256035889.cos.ap-beijing.myqcloud.com/%E6%9C%AB%E6%97%A5%E4 ...
- Ionic进行PC端Web开发时通过脚本压缩提高第一次加载效率
1. 问题 1.1. 问题上下文描述: 基于Ionic进行PC端的Web应用开发: 使用Tomcat作为最终服务发布容器. 1.2. 问题描述: 编译后main.js的大小为4-6MByte.(集成第 ...
- 网易云音乐PC端刷曲快捷键
文章首发于szhshp的第三边境研究所(szhshp.org), 转载请注明 网易云音乐PC端刷曲快捷键 好吧我承认我特别懒 云音乐其实做的还不错,FM推荐的算法明显比虾米好. 虾米可以听的曲子都 ...
- 【按键精灵篇】如何做一个自动打开APP进入注册页面自动输入自己手机号
按键精灵,虽然很早听过,但是一直没有真正使用过,所以最近有点时间也简单试一下,通过脚本自动清理APP缓存,打开百家号并自动进入注册页面输入自己的手机号. 软件清单 1. 雷电手机模拟器:https:/ ...
- pywinauto之PC端windows自动化测试
pywinauto是一个用纯Python编写的GUI自动化库,并为Windows GUI精心开发.最简单的是,它允许您将鼠标和键盘操作发送到Windows和Linux上的对话框和控件,而到目前为止,仅 ...
- 阻止pc端浏览器缩放js代码
阻止pc端浏览器缩放js代码 众所周知:移动端页面禁止用户缩放界面只需加上<meta name="viewport" content="user-scalable= ...
- Macaca自动化测试之PC端测试
Macaca是一套完整的自动化测试解决方案.由阿里巴巴公司开源: http://macacajs.github.io/macaca/ 特点: 同时支持PC端和移动端(Android.iOS)自动化测试 ...
- pygame开发PC端微信打飞机游戏
pygame开发PC端微信打飞机游戏 一.项目简介 1. 介绍 本项目类似曾经火爆的微信打飞机游戏.游戏将使用Python语言开发,主要用到pygame的API.游戏最终将会以python源文件gam ...
- 移动端穿插着PC端自动化-Python基础(干货)
1.前面已经把所有前期工作完成了 下面进行一些简单的小脚本来更好的了解Python.对Python有一些基础的童鞋理解起来会比较容易,我刚接触的时候也会有点懵的,现在简单的也是没问题了. 大牛请不要喷 ...
随机推荐
- 【C++】继承和组合的概念?什么时候用继承?什么时候用组合?
继承:通过扩展已有的类来获得新功能的代码重用方法 组合:新类由现有类的对象合并而成的类的构造方式 何时用继承?何时用组合? 1.如果二者间存在一个"是"的关系,并且一个类要对另外一 ...
- .whl文件安装cuda10.0版本的pytorch1.3.0+torchvision0.4.1
$ python3 -m venv env3$ source env3/bin/activate$ cd env3/share/python-wheels 在此找到对应的版本:https://down ...
- 袁新生《LINGO和Excel在数学建模中的应用》
内容介绍 本书深入浅出地介绍了LINGO的基础知识.用LINGO语言描述现实问题的方法和用Excel处理数据的方法,重点是这两种软件在解决各种优化问题以及在数学建模中的应用,通过丰富的实例介绍了把实际 ...
- c# EF中equal的用法注意
Entity FreamWork 无法创建“System.Object”类型的常量值.此上下文仅支持基元类型或枚举类型错误解决: 最近在开发中把我原来抄的架构里面的主键由固定的Guid改成了可以泛型指 ...
- 20、Outer Apply 和 Cross Apply
1.場合 select...caseが複雑の時 2.運用方法 SELECT * FROM stu CROSS APPLY ( --like inner join * FROM score WHERE ...
- redis - redis安装与启动
redis安装 下载redis安装包 wget http://download.redis.io/releases/redis-5.0.7.tar.gz 解压缩 tar -xzf redis-5.0. ...
- 关于Html中的title属性内容换行,以及Bootstrap的tooltip的使用
1.HTML中的title属性的内容换行: 鼠标经过悬停于对象时提示内容(title属性内容)换行排版方法,html title 换行方法总结. html的title属性默认是显示一行的.如何换行呢? ...
- prometheus2.0 联邦的配置
参考:https://blog.51cto.com/lee90/2062252 官网对于联邦的介绍:https://prometheus.io/docs/prometheus/latest/feder ...
- 【imx6ul应用开发】如何修改串口?
4.1如何修改串口?答:开发板已经调好了串口驱动,调试串口,只需要修改dts文件即可,客户可以根据实际需要,确定硬件管脚具体用哪一个. 打开内核源代码/arch/arm/boot/dts/myb-y6 ...
- python3基础之“术语表(2)”
51.编程: 让计算机执行的指令. 52.代码: 让计算机执行的命令. 53.底层编程语言: 与高级语言相比,更接近二进制的语言. 54.高级编程语言: 读起来像英语的易于理解的语言. 55.汇编语言 ...