安卓按键精灵_随机话术封装函数

Dim 话术1=ReadUIConfig("输入框1")

Dim 话术2=ReadUIConfig("输入框2")

Dim 话术3=ReadUIConfig("输入框3")

/*数组例子

Dim 数组=Array("这里是数组1","这里是数组2","这里是数组3")

TracePrint 数组(0)

TracePrint 数组(1)

TracePrint 数组(2)

*/

Dim 话术数组=Array(话术1,话术2,话术3)

Function 发送话术()

    Delay 1000

    Tap 80, 919

    InputText 随机话术() 

    Delay 2000

    tap 501,920



End Function

Function 随机话术()

    Dim 随机数=生成随机数(0,2)

    随机话术=话术数组(随机数)

End Function

/*x---y为随机数的范围,从小到大*/

Function 生成随机数(x, y)

    生成随机数=Int((y-x+1)*Rnd()+x) 

End Function


 

赞 (0)