1. Event(Form1.Button1.Click)
  2. 令 Form1.InputBox1.Text = "自动加血开始运行了....."
  3. 如果点 (89,189) 的颜色不等于 "90B6E" 则
  4.     (键盘)按 "R" 键, 1次
  5. 条件结束
  6. (语句无法识别,可能有错误): End Event
  7. Event(Form1.Button2.Click)
  8. 令 Form1.InputBox1.Text = "你关闭了自动加血....."
  9. MsgBox(Form1.InputBox1,Button2,Button3.Text)
  10. (语句无法识别,可能有错误): Exit Event
  11. (语句无法识别,可能有错误): End Event
  12. 注释:變數ax:範圍左上角的X軸座標
  13. 令 ax = 529
  14. 注释:變數ay:範圍左上角的Y軸座標
  15. 令 ay = 345
  16. 注释:變數bx:範圍右下角的X軸座標
  17. 令 bx = 885
  18. 注释:變數by:範圍右下角的Y軸座標
  19. 令 by = 572
  20. 循环当 ax = ax 时
  21.     Randomize
  22.     令 x = bx * Rnd
  23.     令 y = by * Rnd
  24.     如果 x >= ax 并且 y >= ay 则
  25.         (鼠标)移动到 (x, y)
  26.         (键盘)按 "0" 键, 1次
  27.         注释:若需要延遲,可調整延遲時間
  28.         延时 0 毫秒
  29.     条件结束
  30. 循环结束