By:周密
本教程由本人(周密)独自完成,难免会有错别字。遇问题 ,留言即会更正。网上喷子多,开源免费的东西,不喜勿喷。
教程为基础入门教程,仅作抛砖引玉不可能面面俱到,如有错误请指正
综合 按键精灵手机版零基础入门系列教程v2019和v2019 VIP教程 课件源码本期打算以源码的方式整个讲解
如不习惯可以查看按键精灵手机版零基础入门系列教程v2019课程进行对比可以给予我反馈
由我先做好课件,以源码的方式讲解是为了节省大家的时间,算是一种尝试,如果效果不错可以后期如此
如果觉得不错并且有帮助的话请给我点赞收藏转发把~
按键精灵是最简单最好学的脚本语言
本教程只用于学习交流用途,禁止作为非本人以外的商业用途
版权声明
本教程的版权归周密的所有。
您可以随意转载和传播,但必须注明来源。来源请声明:《按键精灵手机版零基础入门系列教程v2020》。
保留最终追究的权力。
学会按键可以提高生产效率,下面会带你了解到或者你已经了解到,简单的一句话就是让你赚钱、赚钱、赚钱。重要的事情说三遍。学没用东西还不如一场游戏或者饭局痛痛快快。
恭喜你已经进入编程的大门,可以了解更多的语言,因为你已经有了基础的逻辑思维。
学习按键前很多人担心按键是不是能真的学会。
学习按键学历要求不高,数学水平要求也不高,只需要会下面这些,你就可以跟着我,开始愉快的学习之旅:
一个人
会打字(不会可以学)
有电脑(没有可以买)
只要你是个人,你就可以行!!!
为什么使用雷电,他没给我推广费~
因为雷电方便安装,相比其他几款模拟器我觉得雷电不错,适合安装和讲解,简单一点来说就是我习惯了
每个游戏或APP针对的检测不同,在此大家可以多安装几款模拟器如,夜神.逍遥.天天.等等
如果出现失败的情况重启
雷电模拟器方便调试,测试坏了直接删除然后新建一个就可以了,学习必备
不要怕做好备份之后,每个功能研究一下,你的电脑不会坏掉! 强烈推荐
学习工具:
百度等各大论坛 强烈推荐
QQ群:822188104
公众号:周密日记
小额费用的VIP群或者教程 节约查找时间,众多资源,强烈推荐
当然也找我1对1远程讲解 富哥儿通道,成型快
手机大家比较熟悉我就不介绍了,前提是你得ROOT才行
下面就是模拟器的操作了,仅作了解
脚本分辨率问题
同一分辨率 系统和手机型号 才可以保证稳定,不是说必须如此
多分辨率图色写法
通过布局控件的写法 比如JSD XML 不适合游戏 适合商业的营销脚本
时间允许的话后面会讲到 JSD 和 XML 或者参考往期的v2019的VIP视频
我不想学那么深奥,我只想用一些简单的功能,我该怎么做
第4条如果达不到你的要求
接着我们快速熟悉一下按键精灵的界面必要的功能
来一段所有程序的第一步 恭喜大家从负基础到入门的第一步
Traceprint "hello world"
电脑的快捷键
全选:Ctrl+A
剪切:Ctrl+X
复制:Ctrl+C
粘贴:Ctrl+V
撤销:Ctrl+Z
恢复:Ctrl+Y
向右缩进:Tab
向左缩进:Shift+Tab
快速打开运行:Win+R
命令提示符:cmd
远程桌面连接命令:mstsc
ping本地ip:ipconfig
按键的快捷健
注释:Ctrl+/
取消注释:Ctrl+\
保存:Ctrl+S
QQ群:822188104
加入你将得到
你需要注意的是
请阅读群规,违法暴力色情博彩等内容均不得群内出现,热爱国家热爱党。
由于本群是免费的公益的,素质参差不齐,交易需谨慎,可以找群主担保,避免货财两失
再注意他人素质的时候也需要注意您的素质,请勿嘲讽辱骂他人。
提问需注意提问方式,是否条理足够清晰,你发之前是否明白自己所要表达的意思
不明白第四条如何提问的朋友的可以在我的CSDN或者公众号查看另外一篇文章,
不看第五条的朋友,可能会出现如下结果
基于还是提问方面,我为何详细介绍因为在群的一年里这个问题让我又气又无奈
QQVIP群:754888398 更多学习资源实战教程源码学习工具和群内我的解答问题
公众号:周密日记
QQ :2044618788 主要使用联系方式
VX :zhoumi0729 微信一般仅作收款 因为不方便学习交流
接脚本\游戏\办公\营销脚本 |PC\网页填表\POST查询软件|网站|小程序
违法不接 比如 外挂或者破解入侵攻击等等等等
变量名可以由 字母,数组,_ 3者组成, 且不能用数字开头
3age //错
_1=6 //正确
*p = 30 //不可以
下面是代码块
命令名称: Dim 定义变量
命令功能: 定义一个或多个变量,数组
语法格式: Dim 变量[, 数组(), ...]
参数说明: 参数:变量名或者数组名,支持多个变量或者数组
返回值: 无
脚本例子: 复制代码
Dim a, b(), c
a = 123
b(0) = "按键精灵"
c = True
TracePrint a, b(0), c
/*
按键变量的命名规则,如有遗漏欢迎私信
*/
Dim _A=1
Dim a=1
Dim A=2
Dim 周密="2044618788"
Dim 日记=2044618788
Dim " "="2044618788"
Dim 1234=1234
TracePrint _A
TracePrint a
TracePrint 周密
TracePrint 日记
/*
算数运算符
*/
// + 加法运算 用于计算两个数之和
Dim 结果
结果 = 10 + 20
TracePrint "加法计算结果为:" & 结果 //结果为30
// - 减法运算/负号
结果 = 20 - 10
TracePrint "减法计算结果为:" & 结果 //结果为10
// * 乘法运算 用于计算两个数相乘
结果 = 10 * 20
TracePrint "乘法计算结果为:" & 结果 //结果为200
// / 除法运算 用于计算两个数相除并返回以小数表示的结果
结果 = 10 / 20
TracePrint "除法计算结果为:" & 结果 //结果为0.5
// \ 整除运算 用于计算两个数相除并返回结果的整数部分
结果 = 9 \ 4
TracePrint "整除计算结果为:" & 结果 //结果为2
// ^ 求幂运算 用于计算数的指数次方
结果 = 2 ^ 3
TracePrint "求幂计算结果为:" & 结果 //结果为8
// Mod 取余运算 用于计算两个数相除并返回其余数
结果 = 15 Mod 4
TracePrint "计算结果为:" & 结果 //结果为3
/*
连接运算符
*/
// & 强制连接 用于强制两个表达式进行字符串连接
Dim s1, s
s1 = "您好,"
s = s1 & "按键精灵欢迎您"
TracePrint "s = " & s //输出:s = 您好,按键精灵欢迎您
/*
关系运算符
*/
// = 等于/赋值 对变量赋值或在表达式内部表示判断等于
Dim a, b, c, d, e
a = 0
b = 0
c = (a = b)
TracePrint "c =" , c //输出:c = true
//分析1:在"c="这里的等于号表示赋值,将右边的结果赋值给左边变量c
//分析2:在"(a = b)"这里的等于表示判断,结果为布尔值
// <> 不等于 对左右两边判断是否相等,返回布尔值 c
a = 0
b = "0"
c = (a <> b)
TracePrint "c =" , c //输出:c = true
// > 大于 判断左边是否大于右边,返回布尔值
a = 10
b = 100
c = (a > b)
TracePrint "c =" , c //输出:c = false
// < 小于 判断左边是否小于右边,返回布尔值
a = 0
b = "0"
c = (a < b)
TracePrint "c =" , c//输出:c = true //这个例子是错的
// >= 大于等于/不小于 判断左边是否大于或等于(即不小于)右边,返回布尔值
a = 10
b = 100
c = (a >= b)
TracePrint "c =" , c //输出:c = false
// <= 小于等于/不大于 判断左边是否小于或等于(即不大于)右边,返回布尔值
a = 10
b = 100
c = (a <= b)
TracePrint "c =" , c //输出:c = true
/*
逻辑运算符
*/
// And 逻辑与 用于对两个表达式进行逻辑与运算
a = 10 : b = 100
c = 20 : d = 200
e = (a < b And c < d)
TracePrint "e =" , e //输出:e = true
// Not 逻辑非 用于对表达式进行逻辑非运算
a = 10 : b = 100
c = Not(a < b)
TracePrint "c =" , c //输出:c = false
// Or 逻辑或 //于对两个表达式进行逻辑或运算
a = 10 : b = 100
c = 20 : d = 200
e = (a < b Or c > d)
TracePrint "e =" , e ////输出:e = true
Dim name = "周密"
Dim gender = "男"
Dim age = 18
Dim height = 178
Dim weight = 68
traceprint "姓名:" & name
traceprint "年龄:" & age &"岁"
traceprint "身高:" & height & "厘米"
traceprint "体重:" & weight & "公斤"
Dim num = "3.1415926" //定义一个字符串变量
traceprint "将字符串型数据转化为整型的结果是:" & CDbl(num) //使用Cint
Dim s = 200 //距离
Dim v = 80 //速度
Dim h = s / v //时间
traceprint "需要花费" & h & "小时"
/** 转化为"×小时×分"格式 **/
Dim h1 = Cint(h) //时间取整
Dim m = (h - h1) * 60 //将小数部分转化为分钟
traceprint "转化为时/分格式后为:" & h1 & "小时" & m & "分钟"
num = 10
num = num+1
traceprint num
num = 10
num = num-1
traceprint num
num = 10
num = num*2
traceprint num
num = 10
num = num/2
traceprint num
顺序结构
选择结构
循环结构
/*
1.程序三种最基本的控制结构
- 顺序结构
- 选择结构 分支结构
- 循环结构
*/
For 5
Next
If False = 0 Then
TracePrint "false等于0"
Else
TracePrint "false不等于0"
End If
Do
Loop
For i = 1 To 10
//这里的脚本可以循环10次
TracePrinti
Next
Dim 次数=5
Do
If 次数=5 Then //如果 次数=5
TracePrint "条件判断符合被通过!!退出循环"
Exit DO
Else //否则
TracePrint "次数>>>",次数
次数 = 次数 + 1
End If
Loop
Dim 次数=1
For 999
If 次数=5 Then //如果 次数=5
TracePrint "条件判断符合被通过!!"
Exit For
Else //否则
TracePrint "次数",次数
次数 = 次数 + 1
End If
Next
Dim 选择条件=0
Select Case 选择条件
Case 0
//情况1
Case 1
//情况2
Case Else
//否则
End Select
- 什么时候用sub 什么时候用function
- 他们之间的区别
- 函数内和函数外的关系
- 返回值
/*
1.简单的的来讲函数就是一个类似复制粘贴的快捷键
2.我们不使用函数行不行? 可以
3.用函数300行,不用3W行
4.为什么非得学,你不用别人要用,你不能阻止别人
5.function和sun 的区别
6.看下面例子
-- 这是官方的例子我懒的打了.先打的练习后来发现函数和练习放一起太长了 就分开了..顺手拿一下
*/
//例子1:自定义函数调用
Call 自定义函数()
Function 自定义函数()
TracePrint "我是自定义函数,被你调用了"
End Function
//例子2:自定义函数调用并传入参数,参数可支持多个。
Dim 变量1,变量2
变量1="我是字符串信息"
变量2=123
Call 子程序(变量1,变量2,"第三个参数",456)
//定义一个过程,可以在脚本中调用这个过程
Function 自定义函数(参数1,参数2,参数3,参数4)
TracePrint "我是自定义函数,被你调用了"
TracePrint "参数1=" & 参数1
TracePrint "参数2=" & 参数2
TracePrint "参数3=" & 参数3
TracePrint "参数4=" & 参数4
End Function
//支持Exit Function 命令直接退出子程序过程
//例子3:Function与Sub的区别,支持返回值
Dim 返回值
返回值=自定义函数()
TracePrint 返回值
Function 自定义函数()
TracePrint "我是自定义函数,被你调用了"
自定义函数="把过程中想要返回的信息写这里"
End Function
//例子4:自定义函数加法运算
Dim 返回值
返回值=加法运算(1,2)
TracePrint 返回值
Function 加法运算(参数1,参数2)
TracePrint "我是自定义函数,被你调用了"
Dim 计算结果
计算结果=参数1+参数2
加法运算=计算结果
End Function
//定义total()函数,计算商品总价
Function total(price, number)
total = price * number
End Function
Sub sub_total(price, number)
total = price * number
End Sub
Dim sum = 0
Dim phoneX = total(5000, 2) //调用函数,计算手机价格
Dim computer = total(8000, 10) //调用函数,计算电脑价格
Dim sum = phoneX + computer
TracePrint "合计"&sum&"元"
Dim example = "在……函数外" //声明全局变量
Function exampleX()
Dim exampleX="……在函数内……" //声明局部变量
TracePrint "在函数内输出的内容是: example" //输出局部变量
End Function
example() //调用函数,输出变量值
TracePrint "在函数外输出的内容是:Dim example." //输出全局变量
Function RandNum(m, n)
Dim max = (m > n) and m or n
Dim min = (m < n) and m or n
RandNum = Int((max - min + 1) * Rnd() + min)
End Function
Dim num = RandNum(1,20) //使用rand()函数生成一个随机数
TracePrint "num = ",num //输出随机数
If num Mod 2 = 0 Then //判断变量Dim num是否为偶数
traceprint " num 是偶数。"
else
traceprint " num 不是偶数。"
End If
Dim monthX = DateTime.Month() //设置月份变量 month
Dim todayX = DateTime.Day() //设置日期变量 today
if todayX >= 1 and todayX <= 10 Then //判断日期变量是否在1~10之间
traceprint "今天是"&monthX&"月"&todayX&"日,是本月上旬" //如果是,说明是上旬
elseif todayX > 10 and todayX <= 20 Then //否则判断日期变量是否在11~20之间
traceprint "今天是"&monthX&"月"&todayX&"日,是本月中旬" //如果是,说明是中旬
else //如果上面两个判断都不符合要求,则输出默认值
traceprint "今天是"&monthX&"月"&todayX&"日,是本月下旬" //说明是本月的下旬
End If
Dim AAA,BBB,CCC
Dim a, b, c, d, e
a = 10 : b = 100
c = 20 : d = 200
e = (a < b And c < d)
TracePrint "e =" , e
//输出:e = true
AAA= e
a = 10 : b = 100
c = Not(a < b)
TracePrint "c =" , c
//输出:c = false
BBB = c
a = 10 : b = 100
c = 20 : d = 200
e = (a < b Or c > d)
TracePrint "e =" , e
////输出:e = true
CCC = e
TracePrint AAA = BBB or BBB = CCC or AAA = CCC
TracePrint AAA = BBB or BBB = CCC And AAA = CCC
TracePrint not(AAA = BBB or BBB = CCC) And AAA = CCC
//接收传递的参数
Dim type = "qq"
//根据参数值,执行不同的操作
//不支持判断语句 如:Case a>0
//<>---------------------------------------------以下是选择条件结结构判断
Select Case type
Case 0,1 //可支持判断多个值,中间以逗号隔开
TracePrint "你输入的数字为:0或者1"
Case "qq"
TracePrint "你执行的事:qq"
Case "wechat"
TracePrint "你输入的数字为:wechat"
Case "weibo"
TracePrint "你输入的数字为:weibo"
Case Else
TracePrint "你输入的不正确,执行普通登录流程!"
End Select
Dim sum = 1 //声明整型变量 sum
For i = 1 To 100
sum = sum * i //当sum小于或等于100时,计算阶乘
Next
traceprint "100的阶乘是", sum
Dim num = 1 //定义一个整型变量Dim num
Dim str = "10以内的偶数为:" //定义一个字符变量Dim str
While num <= 10 //判断变量Dim num是否小于或等于10
If num mod 2 = 0 Then //如果小于或等于10,则判断Dim num是否为偶数
str= str&num&" " //如果当前变量为偶数,则添加到字符变量Dim str的后面
End If
num = num + 1 //变量 num加1
Wend
TracePrint str //循环结束后,输出字符串 str
Function randNum(m, n)
Dim max = (m > n) and m or n
Dim min = (m < n) and m or n
randNum = Int((max - min + 1) * Rnd() + min)
End Function
While (true) //使用while循环
Dim tmp = randNum(1,20) //声明一个随机数变量tmp
TracePrint tmp //输出随机数,使用空格分隔
If (tmp = 10) Then //判断随机数是否等于10
TracePrint "变量等于10,终止循环"
exit while //如果等于10,使用break语句跳出循环
End If
Wend
/*
1,CTRL + 1 CTRL+C是复制,CTRL+V,粘贴 抓抓的取点方法
2,鼠标右键单击选择点1 抓抓的取点方法
3,怎么快速的缩小放大抓抓,方便取点,Ctrl+滚轮上下划动
4.调试或者F5都可以运行脚本
1080*1920(dpi480)的雷电模拟器上的339,538表示
第一个点和第二个点
这个不是脚本的休息时间,这个相当于QQ应用的等待时间
*/
/*
点击
Tap 字面意思---模拟人的手指按下这个坐标点
滑动
Swipe 字面意思 - --模拟人的手指从的第一个点滑动到第二个
滑动2 强烈推荐大家使用这个 好处他更灵活, 照着官方的参数 动动你的脑子自己封装一个函数把
TouchDown 按下某个点不放
TouchMove 滑动
TouchUp 弹起
*/
/* 2019经典案例 点周密的头
Swipe 555,1426, 575, 900
Tap 339,538//点击QQ
Delay 1000 //等于1秒 单位是毫秒1000=1秒 //休息时间
Tap 91,1038 //点周密的头像
Delay 1000 //休息一秒
Tap 1016,613 //点赞
Delay 200
Tap 1016,613 //点赞
Delay 200
Tap 1016,613 //点赞
Delay 200
Tap 1016,613 //点赞
Delay 200
Tap 1016,613 //点赞
Delay 200
Tap 1016,613 //点赞
Delay 200
Tap 1016,613 //点赞
Delay 200
Tap 1016,613 //点赞
Delay 200
Tap 1016,613 //点赞
Delay 200
Tap 1016,613 //点赞
Delay 200
Tap 1016,613 //点赞
Delay 200
*/
1. 本章是一个按键精灵的核心命令
2. 这个必须学会,学不会怎么办...不行这个必须学会
3. 还是学不会怎么办.花钱找人写把.这不不学会真的不行
4. 下面正式来说明图色命令
2.图色提高速度小了解
KeepCapture 截图到内存
ReleaseCapture 释放(即删除)内存中的截图
需注意他的用法,下面有实例
3.NO.1 FindPic 找图命令
这个命令简单好用,但是很多新手也容易出错
4.好了大家已经初步的了解他了,我们来把他封装成一个函数方便使用吧
5.多点找色
6.多点比色
7.区域找色
8.简单说一下颜色的关系
9.制作透明图 -为什么要做透明图 防止背景色干扰
/*
1.前言
1. 本章是一个按键精灵的核心命令
2. 这个必须学会,学不会怎么办...不行这个必须学会
3. 还是学不会怎么办.花钱找人写把.这不不学会真的不行
4. 下面正式来说明图色命令
2.图色提高速度小了解
KeepCapture 截图到内存
ReleaseCapture 释放(即删除)内存中的截图
需注意他的用法,下面有实例
3.NO.1 FindPic 找图命令
这个命令简单好用,但是很多新手也容易出错
此刻我们上我们的案例小游戏
声明:
该游戏仅作案例,没有其他任何传播的意思 只
是该游戏颜色丰富简单适合做一个example
4.好了大家已经初步的了解他了,我们来把他封装成一个函数方便使用吧
5.多点找色
6.多点比色
7.区域找色
8.简单说一下颜色的关系
9.制作透明图 -为什么要做透明图 防止背景色干扰
*/
/*
x1:整数型,查找区域左上X坐标
y1:整数型,查找区域左上Y坐标
x2:整数型,查找区域右下X坐标
y2:整数型,查找区域右下Y坐标
pic_name:字符串,要找的图片名字,多个图片用“|”号分隔
delta_color:16进制字符串,偏色
sim:双精度浮点数,相似度,取值范围0-1
dir:整数型,查找方向:
0:表示从左上向右下查找;
1:表示从中心往四周查找;
2:表示从右下向左上查找;
3:表示从左下向右上查找;
4:表示从右上向左下查找;
intX:变参指针,返回找到的X坐标
intY:变参指针,返回找到的Y坐标
*/
//x1,y1,x2,y2,pic_name,delta_color,sim,dir,intX,intY
Dim intX, intY
FindPic 0, 0, 0, 0, "Attachment:1.png","000000",0, 0.8, intX, intY
If intX >-1 then
TracePrint "找到啦,坐标是"&intX&","&intY
Else
TracePrint "没找到"
End If
Dim intX, intY,返回值
返回值=FindPic(0, 0, 0, 0, "Attachment:1.png|Attachment:2.png","000000",0, 0.8, intX, intY)
'需要用函数返回值时要加个括号
If 返回值>-1 then
TracePrint "找到的图片序号为"&返回值&",坐标为"&intX&","&intY
Else
TracePrint "全部没找到"
End If
1. 扩充 知识 UI界面的功能
2. 扩充 知识 制作一个简单的脚本后台,防止个别客户存在侥幸心里,拿到脚本之后跑路
3. 此刻我们上我们的案例小游戏
声明:
该游戏仅作案例,没有其他任何传播的意思 只
是该游戏颜色丰富简单适合做一个example
相信学习完第十课后相信大家对脚本和编程的逻辑结构已经有一个基础的认知了,本期教程仅作抛砖引玉。
更多的详细课程可以参考我2019年录制的基础入门教程35课和2019VIP全套命令64课。
搜索公众号周密日记可以找到我或添加我的QQ
大家如果觉得还不错的话,给我一个点赞收藏转发把
如果脚本能够给你感觉到耳目一新提高你的生产效率的话,你有不错的商业模式可以找我合作哦.
觉得还不错并且觉得有意思的话,可以关注我的更多视频并且 公众号和CSDN 会陆续更新更多小技巧。
最后如果有往期的朋友,觉得哪种模式方便大家观看呢? 大家可以给我反馈一下哦
本教程除帮助感兴趣的新手入门以外,和以往2019年免费教程不同,本期教程为商业目的性,希望更多的人可以认识到我,有需求定制或者有不错项目朋友可以联系我,目前水平不害臊来讲完全可以胜任商业需求。制作十余款成品商业脚本,并对前后端POST等有一定了解可以满足部分需求,也有各行各业其他认识的朋友。
为什么找我呢?
有打算花小额费用学习,或者高额快速学习的都可以找我。
以上视频中如有冒犯还请见谅, 完全是属于本人无意,如有错误也请指正。
技术不够如果无法入大佬的眼望海涵,本教程完全以帮助新手和推广自身为目的,完全无意贬低他人。