求按键精灵在游戏窗找鼠标特征的判断命令

发布网友发布时间：2024-09-28 00:15

共1个回答

热心网友时间：2024-10-01 04:53

有啊，按键精灵中有鼠标渐开线的代码，设置好参数，里面在加个if判断鼠标特征码就好了追问怎么弄啊，大哥，做个简单的脚本看看，我自已修改。

追答Sub 圆形渐开线(中心点x坐标,中心点y坐标,两点间距离,递增半径,圈数)
    Dim x0, y0, rr, l, n, r, x, y
    //设置圆心坐标
    x0 = 中心点x坐标 : y0 = 中心点y坐标
    //设置递增半径
    rr = 递增半径
    //设置点间距
    l = 两点间距离
    //初始化角度
    n = 0
    //设置第一圈半径
    r = 30
    //设置画圆圈数
    For 圈数
        While n < 3.1415926 * 2
            //画圆公式
            x = x0 + r * cos(n)
            y = y0 - r * sin(n)
            MoveTo x, y
            Delay 10
            //判断鼠标特征码
            shape = GetCursorShape(0)
            If shape = xxxxxx Then
                Exit Sub
            End If
            //LeftClick 1
            //l/r：点距除以半径，取得2点间相对圆心的角度
            //能有效控制扫描点的密度，2点间的距离就比较平均
            n=n+l/r
        Wend
        //画完一圈后重置角度
        n=0
        //画完一圈后半径递增rr
        r=r+rr
    Next
End Sub