按键精灵_读取JSON坐标值并使用

Import "File.lua"
/**********************************************
JSON常用函数封装
***********************************************/
Dim date_path= "/sdcard/Pictures/Aj_Config/date"
Function 读取JSON为坐标(text)
  dim config=File.read(date_path)	//读取配置文件
  Dim name=CStr(text)	
  If UTF8.InStr(1,config, name) > 0 Then //找到指定参数
  Dim table=Encode.JsonToTable(config)
  Dim xy=Split(table[name],  ",")
  读取JSON为坐标=xy
   Else
    TracePrint "没找到坐标"
    End If
End Function

Function 点击(数组)
    Tap 数组(0),数组(1)
End Function

Dim 价格坐标=读取JSON为坐标("价格坐标")

//Tap价格坐标(0),价格坐标(1)
点击(价格坐标)