Import "ShanHai.lua" Import "zm.luae" Dim 数字坐标=Array("402,1726","136,1171","388,1185","676,1184","136,1356","400,1364","658,1385","135,1539","408,1529","674,1541") //手动获取数字坐标 Function 输入价格() Dim 价格=shanhai.RndEx(100,200) //随机价格 TracePrint "输入价格.."&价格 zm.Delay(300,600) 价格=Cstr(价格) //整数型转换成字符串 for i = 1 To UTF8.Len(价格) //取字符串长度 dim d = UTF8.StrGetAt(价格, i) //获取指定位置字符 zm.Delay(300,600) Dim 数字xy坐标()=Split (数字坐标(d),",")//第几个数字 第几个数组 TracePrint 数字xy坐标(0), 数字xy坐标(1) Tap 数字xy坐标(0), 数字xy坐标(1) zm.Delay(300,600) Next End Function Call 输入价格()