[按键精灵] 纯文本查看 复制代码
Import "zm.luae" //导入插件,只需执行一次
zm.Init //初始化插件,只需执行一次
Dim 坐标数组 = {"100,100", "200,200", "300,300", "400,400","500,500","600,600","700,700","800,800","900,900","1000,1000"}
Dim 不重复随机数量 = 5
Dim 下标数组 = zm.RndUniqueArr(0,Ubound(坐标数组), 不重复随机数量)
For i = 0 To Ubound(下标数组)
TracePrint "本次点击坐标为", 坐标数组(下标数组(i))
zm.Tap 坐标数组(下标数组(i))
Delay 1000
Next
|