1. 子程序结束
  2. 子程序 道具6()
  3.     令 hwnd = WndEx6.GetForegroundFocus()
  4.     标记 C(子程序 道具6)
  5.     BGKM6.LClick(hwnd,415,504)
  6.     延时 20 毫秒
  7.     BGKM6.LClick(hwnd,376,406)
  8.     延时 20 毫秒
  9.     BGKM6.LClick(hwnd,407,497)
  10.     延时 20 毫秒
  11.     跳转到标记 C(子程序 道具6)
  12. 子程序结束
  13. 注释:////////////////////////////////////////////////////////////////
  14. Event(Form1.竞速.Click)
  15. (语句无法识别,可能有错误): 竞速房ID = BeginThread(竞速房)
  16. (语句无法识别,可能有错误): End Event
  17. Event(Form1.道具.Click)
  18. (语句无法识别,可能有错误): 情侣房ID = BeginThread(情侣房)
  19. (语句无法识别,可能有错误): End Event
  20. 子程序 竞速房()
  21.     定义变量 w
  22.     令 w = Window.Find("GAMEAPP",0)
  23.     调用 Window.Move(w,0,0)
  24.     延时 500 毫秒
  25.     标记 J(子程序 竞速房)
  26.     调用 Bkgnd.MoveTo(w,175,25)
  27.     调用 Bkgnd.LeftClick(w,175,25)
  28.     延时 100 毫秒
  29.     调用 Bkgnd.MoveTo(w,460,275)
  30.     调用 Bkgnd.LeftClick(w,460,275)
  31.     延时 100 毫秒
  32.     调用 Bkgnd.MoveTo(w,390,395)
  33.     调用 Bkgnd.LeftClick(w,390,395)
  34.     延时 100 毫秒
  35.     调用 Bkgnd.MoveTo(w,335,312)
  36.     调用 Bkgnd.LeftClick(w,335,312)
  37.     延时 100 毫秒
  38.     调用 Window.SendKeyPress(w,96)
  39.     调用 Bkgnd.MoveTo(w,364,408)
  40.     调用 Bkgnd.LeftClick(w,364,408)
  41.     延时 100 毫秒
  42.     注释:房间内了
  43.     调用 Bkgnd.MoveTo(w,115,160)
  44.     调用 Bkgnd.LeftClick(w,115,160)
  45.     延时 1000 毫秒
  46.     调用 Bkgnd.MoveTo(w,400,140)
  47.     调用 Bkgnd.LeftClick(w,400,140)
  48.     延时 500 毫秒
  49.     调用 Bkgnd.MoveTo(w,702,450)
  50.     调用 Bkgnd.LeftClick(w,702,450)
  51.     延时 500 毫秒
  52.     调用 Bkgnd.MoveTo(w,534,420)
  53.     调用 Bkgnd.LeftClick(w,534,420)
  54.     延时 500 毫秒
  55.     调用 Bkgnd.MoveTo(w,340,500)
  56.     调用 Bkgnd.LeftClick(w,340,500)
  57.     延时 500 毫秒
  58.     调用 Msg.Tips("自动创建房间已完成,进房间密码为0!请检测是否为老接管道!")
  59. 子程序结束
  60. 子程序 情侣房()
  61.     定义变量 w
  62.     令 w = Window.Find("GAMEAPP",0)
  63.     调用 Window.Move(w,0,0)
  64.     延时 500 毫秒
  65.     标记 J(子程序 情侣房)
  66.     调用 Bkgnd.MoveTo(w,175,25)
  67.     调用 Bkgnd.LeftClick(w,175,25)
  68.     延时 100 毫秒
  69.     调用 Bkgnd.MoveTo(w,460,275)
  70.     调用 Bkgnd.LeftClick(w,460,275)
  71.     延时 100 毫秒
  72.     调用 Bkgnd.MoveTo(w,456,273)
  73.     调用 Bkgnd.LeftClick(w,456,273)
  74.     调用 Bkgnd.MoveTo(w,389,394)
  75.     调用 Bkgnd.LeftClick(w,389,394)
  76.     延时 100 毫秒
  77.     延时 100 毫秒
  78.     调用 Bkgnd.MoveTo(w,335,312)
  79.     调用 Bkgnd.LeftClick(w,335,312)
  80.     延时 100 毫秒
  81.     调用 Window.SendKeyPress(w,96)
  82.     调用 Bkgnd.MoveTo(w,364,408)
  83.     调用 Bkgnd.LeftClick(w,364,408)
  84.     延时 100 毫秒
  85.     注释:房间内了
  86.     调用 Bkgnd.MoveTo(w,145,515)
  87.     调用 Bkgnd.LeftClick(w,147,515)
  88.     延时 100 毫秒
  89.     调用 Bkgnd.MoveTo(w,662,85)
  90.     调用 Bkgnd.LeftClick(w,662,85)
  91.     延时 1000 毫秒
  92.     调用 Bkgnd.MoveTo(w,115,160)
  93.     调用 Bkgnd.LeftClick(w,115,160)
  94.     延时 1000 毫秒
  95.     调用 Bkgnd.MoveTo(w,400,140)
  96.     调用 Bkgnd.LeftClick(w,400,140)
  97.     延时 500 毫秒
  98.     调用 Bkgnd.MoveTo(w,702,450)
  99.     调用 Bkgnd.LeftClick(w,702,450)
  100.     延时 500 毫秒