Event Form1.Button1.Click
Form1.InputBox1.Text = "自动加血开始运行了....."
IfColor 89,189,"90B6E",1 Then
KeyPress "R", 1
End If
End Event
Event Form1.Button2.Click
    Form1.InputBox1.Text = "你关闭了自动加血....."
    MsgBox Form1.InputBox1,Button2,Button3.Text
    Exit Event
    End Event
//變數ax：範圍左上角的X軸座標
VBS ax=529
//變數ay：範圍左上角的Y軸座標
VBS ay=345
//變數bx：範圍右下角的X軸座標
VBS bx=885
//變數by：範圍右下角的Y軸座標
VBS by=572
While ax=ax
    VBS Randomize
    VBS x=bx*Rnd
    VBS y=by*Rnd
    If x>=ax and y>=ay
        MoveTo x,y
        KeyPress "0", 1
        //若需要延遲，可調整延遲時間
        Delay 0
    EndIf 
EndWhile