1.     注释: Plugin.BGKM6.KeyClick hwndEEa,119
  2.     注释: End If
  3.     注释: Delay 100
  4.     注释: Wend
  5.     调用 bgkms5.FakeWindowState(hwndEEa,1)
  6.     BGKM6.LClick(hwndEEa,380,447)
  7.     延时 100 毫秒
  8.     BGKM6.LClick(hwndEEa,204,446)
  9.     延时 100 毫秒
  10.     循环当 EE开关 = 1 时
  11.         调用 Bkgnd.SendString(hwndEEa,"/C01【The use of permanent free】" & 内容EE)
  12.         BGKM6.KeyClick(hwndEEa,13)
  13.         调用 Bkgnd.SendString(hwndEEa,"/C02【The use of permanent free】" & 内容EE)
  14.         BGKM6.KeyClick(hwndEEa,13)
  15.         调用 Bkgnd.SendString(hwndEEa,"/C03【The use of permanent free】" & 内容EE)
  16.         BGKM6.KeyClick(hwndEEa,13)
  17.         调用 Bkgnd.SendString(hwndEEa,"/C04【The use of permanent free】" & 内容EE)
  18.         BGKM6.KeyClick(hwndEEa,13)
  19.         调用 Bkgnd.SendString(hwndEEa,"/C05【The use of permanent free】" & 内容EE)
  20.         BGKM6.KeyClick(hwndEEa,13)
  21.         调用 Bkgnd.SendString(hwndEEa,"/C06【The use of permanent free】" & 内容EE)
  22.         BGKM6.KeyClick(hwndEEa,13)
  23.         调用 Bkgnd.SendString(hwndEEa,"/C07【The use of permanent free】" & 内容EE)
  24.         BGKM6.KeyClick(hwndEEa,13)
  25.         调用 Bkgnd.SendString(hwndEEa,"/C08【The use of permanent free】" & 内容EE)
  26.         BGKM6.KeyClick(hwndEEa,13)
  27.         调用 Bkgnd.SendString(hwndEEa,"/C09【The use of permanent free】" & 内容EE)
  28.         BGKM6.KeyClick(hwndEEa,13)
  29.         调用 Bkgnd.SendString(hwndEEa,"/C10【The use of permanent free】" & 内容EE)
  30.         BGKM6.KeyClick(hwndEEa,13)
  31.     循环结束
  32. 子程序结束
  33. Event(Form1.EE开始.Click)
  34. 如果 hwndEEa > 0 则
  35.     令 Form1.EE开始.Visible = 0
  36.     令 Form1.EE停止.Visible = 1
  37.     令 EE开关 = 1
  38.     令 内容AA = Form1.角色EE内容.Text
  39.     启动线程 EE开始刷喇叭
  40. 否则
  41.     MsgBox("请输入飞车昵称")
  42. 条件结束
  43. (语句无法识别,可能有错误): End Event
  44. Event(Form1.EE停止.Click)
  45. 令 Form1.EE开始.Visible = 1
  46. 令 Form1.EE停止.Visible = 0
  47. 令 EE开关 = 0
  48. (语句无法识别,可能有错误): End Event
  49. 子程序 FF开始刷喇叭()
  50.     注释: Call Plugin.Window.Restore(hwndFFa)
  51.     注释: FFckdx = 0
  52.     注释: While FFckdx = 0
  53.     注释: WinRectFF = Plugin.WndEx6.GetWindowInfo(hwndFFa,3)
  54.     注释: FF宽 = WinRectFF(2) - WinRectFF(0)
  55.     注释: FF高 = WinRectFF(3) - WinRectFF(1)
  56.     注释: // If FF宽 = 800 and FF高 = 600 Then
  57.     注释: FFckdx = 1
  58.     注释: Else
  59.     注释: FFckdx = 0
  60.     延时 1000 毫秒
  61.     注释: Plugin.BGKM6.KeyClick hwndFFa,119
  62.     注释: End If
  63.     注释: Delay 100
  64.     注释: Wend
  65.     调用 bgkms5.FakeWindowState(hwndFFa,1)
  66.     BGKM6.LClick(hwndFFa,380,447)
  67.     延时 100 毫秒
  68.     BGKM6.LClick(hwndFFa,204,446)
  69.     延时 100 毫秒
  70.     循环当 FF开关 = 1 时
  71.         调用 Bkgnd.SendString(hwndFFa,"/C01【The use of permanent free】" & 内容FF)
  72.         BGKM6.KeyClick(hwndFFa,13)
  73.         调用 Bkgnd.SendString(hwndFFa,"/C02【The use of permanent free】" & 内容FF)
  74.         BGKM6.KeyClick(hwndFFa,13)
  75.         调用 Bkgnd.SendString(hwndFFa,"/C03【The use of permanent free】" & 内容FF)
  76.         BGKM6.KeyClick(hwndFFa,13)
  77.         调用 Bkgnd.SendString(hwndFFa,"/C04【The use of permanent free】" & 内容FF)
  78.         BGKM6.KeyClick(hwndFFa,13)
  79.         调用 Bkgnd.SendString(hwndFFa,"/C05【The use of permanent free】" & 内容FF)
  80.         BGKM6.KeyClick(hwndFFa,13)
  81.         调用 Bkgnd.SendString(hwndFFa,"/C06【The use of permanent free】" & 内容FF)
  82.         BGKM6.KeyClick(hwndFFa,13)
  83.         调用 Bkgnd.SendString(hwndFFa,"/C07【The use of permanent free】" & 内容FF)
  84.         BGKM6.KeyClick(hwndFFa,13)
  85.         调用 Bkgnd.SendString(hwndFFa,"/C08【The use of permanent free】" & 内容FF)
  86.         BGKM6.KeyClick(hwndFFa,13)
  87.         调用 Bkgnd.SendString(hwndFFa,"/C09【The use of permanent free】" & 内容FF)
  88.         BGKM6.KeyClick(hwndFFa,13)
  89.         调用 Bkgnd.SendString(hwndFFa,"/C10【The use of permanent free】" & 内容FF)
  90.         BGKM6.KeyClick(hwndFFa,13)
  91.     循环结束
  92. 子程序结束
  93. Event(Form1.FF开始.Click)
  94. 如果 hwndFFa > 0 则
  95.     令 Form1.FF开始.Visible = 0
  96.     令 Form1.FF停止.Visible = 1
  97.     令 FF开关 = 1
  98.     令 内容FF = Form1.角色FF内容.Text
  99.     启动线程 FF开始刷喇叭
  100. 否则