利用按键精灵在画图工具中画圆

RunApp "mspaint.exe"
Delay 1000
MoveTo 269, 75
LeftClick 1
Delay 1000
//MoveTo 200, 200
Call 画圆()

Sub 画圆()
    r=100:x0=512:y0=384:x=0:y=0:n=0      //r为半径，x0  y0为圆心位置
    While n<3.1415926*2
        x=x0+r*cos(n)
        y=y0-r*sin(n)
        MoveTo x, y
        LeftDown 1
        Delay 20
        n=n+0.03
    Wend 
End Sub