按键精灵-常用的几个函数封装
2020-02-28脚本编程教程小沐5098°c
A+ A-Randomize
//多点找色
Function zt(x1,y1,x2,y2,图色,图色1)
Dim X,Y
FindMultiColor 0,0,0,0,图色,图色1,0,0.9,X,Y
If X > -1 And Y > -1 Then
Tap x, y : TracePrint "已点击"
zt=True
Else
zt=False : TracePrint"没找到"
End If
End Function
//zt 284, 277, 444, 428, "1E1EE9-101010", "22|20|FFFFFF-101010,36|9|A1A1A1-101010,28|4|121390-101010,12|-7|08B0FA-101010"
//随机数
Function random(max,min)
random=Int(((max-min+1) * Rnd()) + min)
End Function
//随机话术
Function 随机话术(arr,个数)
随机话术=arr(int(个数*rnd()))
End Function
Dim arr=Array("哈喽！！！！！","你好呀","哈哈哈")
For 5
TracePrint 随机话术(arr,3)
Next
