• 按键公众号 :
按键精灵电脑版
立即下载

软件版本:2014.06
软件大小:22.9M
更新时间:2021-12-03

按键精灵安卓版
立即下载

软件版本:3.7.2
软件大小:46.2M
更新时间:2023-05-10

按键精灵iOS版
立即下载

软件版本:1.8.0
软件大小:29.2M
更新时间:2023-03-21

按键手机助手
立即下载

软件版本:3.8.0
软件大小:262M
更新时间:2023-05-30

快捷导航

登录 后使用快捷导航
没有帐号? 注册

发新话题 回复该主题

[紫猫] [紫猫学院][手机]震惊!!!按键手机版的Function函数支持可选参数... [复制链接]

1#
标题党? No, 通过紫猫插件手机版, 真的可以实现Function函数的可选参数功能, 而且还是免填写的可选参数!
下面有请 zm.PCall() 命令登场!!

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
Import "zm.luae" //导入插件,只需执行一次
zm.Init  //初始化插件,只需执行一次
 
TracePrint zm.PCall(求周长, 1) '求圆形
TracePrint zm.PCall(求周长, 1, 2) '求方形
TracePrint zm.PCall(求周长, 1, 2, 4) '求三角形
 
'彩蛋: PCall还有保护功能, 避免函数意外错误导致脚本停止
TracePrint zm.PCall(求周长, "函数内部出错也不会导致脚本异常停止")
TracePrint "PCall后我还在"
Call 求周长("a", 2, 3)
TracePrint "普通调用出错后, 这句代码不会输出了"
 
 
'功能: 实现求圆形(1个参数), 求方形(2个参数), 求三角形(3个参数)三种周长
'返回: 根据不同的参数返回对应形状的周长
'x: 代表园的半径, 或方形的宽, 或三角形的第1边
'y: 代表方形的长, 或三角形的第2边
'z: 代表三角形的第3边
Function 求周长(x, y, z)
  '当参数被省略不填时, 参数默认值为Null
  If IsNull(z) = False Then
    TracePrint "求三角形周长""x=", x, ", y=", y, ", z=", z
    求周长 = x + y + z
  ElseIf IsNull(y) = False Then
    TracePrint "求方形周长""x=", x, ", y=", y, ", z=", z
    求周长 = (x + y) * 2
  ElseIf IsNull(x) = False Then
    TracePrint "求圆形周长""x=", x, ", y=", y, ", z=", z
    求周长 = 2 * 3.14 * x
  Else
    TracePrint "请至少填写一个参数"
  End If
End Function

点评

果壳王子  震惊四座  发表于 2021/11/18 7:25:51

    已有3评分我要评分查看所有评分

    最后编辑紫猫 最后编辑于 2021-11-16 18:08:23

    【紫猫编程学院】火热招生中

    教学涉及按键精灵(电脑版与手机版)、网页、游戏、办公、插件等。

    报名咨询QQ: 345911220 微信:zimaoxy

    紫猫学院免费教程

    加入交流QQ群: 7333555


    2#

    老师威武

    喜欢学习
    3#

    支持紫猫老师

    承接各类游戏脚本制作,post,手游,端游,办公,自动化

    有偿解决任何按键基础问题(可远程讲解、教会为止)

    如果我的回答能帮助了你,大家可以加个好友互相了解
    QQ : 262832680
    4#

    紫猫大大YYDS~

    5#

    支持紫猫老师

    6#

    没必要,传递一个表,不就可以了吗
    1. Function 点击(位置信息)
    2.     If IsNumeric(位置信息[1]) Then
    3.         Delay 1200
    4.         Tap 位置信息[1], 位置信息[2]
    5.     Else
    6.         Dim 坐标
    7.         
    8.         坐标 = 坐标字典[位置信息[1]]
    9.         
    10.         If 坐标 = Null Then
    11.             If 位置信息[2] = Null Then
    12.                 坐标 = 获取图片坐标(位置信息[1], 60)
    13.             Else
    14.                 坐标 = 获取图片坐标(位置信息[1], 位置信息[2])
    15.             End If
    16.         End If
    17.         
    18.         
    19.         If not 坐标 = Null Then
    20.             点击 坐标
    21.         End If
    22.     End If
    23. End Function
    复制代码

    7#

    没必要,传递一个表,不就可以了吗
    1. Function 点击(位置信息)
    2.     If IsNumeric(位置信息[1]) Then
    3.         Delay 1200
    4.         Tap 位置信息[1], 位置信息[2]
    5.     Else
    6.         Dim 坐标
    7.         
    8.         坐标 = 坐标字典[位置信息[1]]
    9.         
    10.         If 坐标 = Null Then
    11.             If 位置信息[2] = Null Then
    12.                 坐标 = 获取图片坐标(位置信息[1], 60)
    13.             Else
    14.                 坐标 = 获取图片坐标(位置信息[1], 位置信息[2])
    15.             End If
    16.         End If
    17.         
    18.         
    19.         If not 坐标 = Null Then
    20.             点击 坐标
    21.         End If
    22.     End If
    23. End Function
    复制代码

    发新话题 回复该主题