按键精灵_坐标太多存起来一个一个点

'导入自己写的插件
import "xin.lua"
dim s
'格式  坐标名称|x|y
s="苹果|600|700,香蕉|350|300,梨|300|400,火龙果|500|877"
'提取梨的坐标 
' 自己编一个插件ExtractCoordinate，插件返回梨的坐标数组使用的时候直接添加(0),(1)下标即可
'再编写一个点击函数，使编写更直观简短。
sub 点击水果(水果名字)
dim t
t=xin.ExtractCoordinate(s,水果名字)
tap(int(t(0)),int(t(1)))
delay 800
end sub
delay 2000
点击水果("梨")
点击水果("火龙果")
点击水果("苹果")

xin.lua

--提取字符串中的坐标，存为数组
function QMPlugin.ExtractCoordinate(s,name)
local t={}
local k=1
pcall(
function()
local s1=string.match(s,name.."|%d+|%d+")
for v in string.gmatch(s1,"%d+") do
t[k]=v
k=k+1
end
end)
return t
end

办法2

Dim RndZb=array("600,400","600,540","600,680","600,1141","619,1297")

Function 随机坐标(RndZb)
dim RndXb = zm.RndNum(0, UBOUND(RndZb))
Dim 坐标= RndZb(RndXb)
Dim RndZb2()=Split (坐标,",")
TracePrint RndZb2(0),RndZb2(1)	
Tap RndZb2(0),RndZb2(1)
End Function