• 新浪微博:
  • 微信 :
按键精灵电脑版
立即下载

软件版本:2014.05
软件大小:21.6M
更新时间:07-04

按键精灵安卓版
立即下载

软件版本:3.3.1
软件大小:62.5M
更新时间:5-24

按键精灵iOS版
立即下载

软件版本:1.3.5
软件大小:29.2M
更新时间:06-14

最新企业版UiBot
立即下载

软件版本:2.5
软件大小:181M
更新时间:05-20

快捷导航

登录 后使用快捷导航
没有帐号? 注册

登录 注册
发新话题 回复该主题

[分享源码] 圆形内随机点击 [复制链接]

1#


do
x_y = 圆形随机点(600, 400, 200)
s = Split(x_y, ",")
x0 = clng(s(0)) : y0 = clng(s(1))
Call Plugin.Plug365New.DrawLine(0, x0, y0, x0, y0, 10, "ff00ff")
Delay 20
Loop
Function 圆形随机点(圆心x坐标, 圆心y坐标, r)
    //r为圆形的半径
    //思路是在圆的外接正方形内随机点,如果点在圆内就符合条件,进行点击操作
Do
x_min = 圆心x坐标 - r : x_max = 圆心x坐标 + r
y_min = 圆心y坐标 - r : y_max = 圆心y坐标 + r
x = 随机数(x_min, x_max) : y = 随机数(y_min, y_max)
If (x - 圆心x坐标) ^ 2 + (y - 圆心y坐标) ^ 2 <= r ^ 2 Then
Exit Do
End If
Loop
圆形随机点 = x & "," & y
End Function
Function 随机数(最小值, 最大值)
Randomize
随机数=int((最大值-最小值+1)*rnd+最小值)
End Function
有没有效率高,分布均匀的方法,借来看看。

    已有1评分我要评分查看所有评分

    本主题由 超级版主 n15976906190 于 2016/11/12 11:02:20 执行 主题分类 操作
    2#

    哈哈哈哈哈哈哈哈

    3#

    该用户帖子内容已被屏蔽

    4#

    正在学习随机点击,感谢分享

    5#

    啊都发大水发射点

    6#

    枙 椅自卫队

    7#

    KANKAN

    8#

    rnd会出现等于1的情况么?

    9#

    不会

    10#

    必须顶一下!

    11#


    12#

    oppppppppp

    13#

    ..........

    14#

    挺好的

    15#

    谢谢

    16#

    好的,新来学习

    17#

    学习随机点击

    18#

    RE:圆形内随机点击修改

    19#

    回复浏览

    20#

    我看看

    发新话题 回复该主题