按键精灵-随机图片封装函数

/*

横向我们用X代替，最多4张 

众向无线 Y  。。。可以添加下拉 （假设也是4张）

*/

Dim i,ii,xx,yy

Function 随机点击图片()   //基点57,452     ========199,453   53,584    距离右边  距离下面

 xx = 57 + 142 * 生成随机数(0, 3)

 yy = 452 + 132 * 生成随机数(0,3)

 Tap xx,yy 

End Function



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

Function 生成随机数(i, ii)

    生成随机数=Int((ii-i+1)*Rnd()+i) 

End Function