1.     注释:多开5
  2.     如果 h >= 5 则
  3.         调用 Window.Active(JB5)
  4.         延时 200 毫秒
  5.         (键盘)按 "Num -" 键, 2次
  6.         延时 5 毫秒
  7.         (键盘)按 "F12" 键, 1次
  8.         延时 5 毫秒
  9.         (键盘)按 "F2" 键, 1次
  10.         延时 200 毫秒
  11.     条件结束
  12.     注释:多开6
  13.     如果 h >= 6 则
  14.         调用 Window.Active(JB6)
  15.         延时 200 毫秒
  16.         (键盘)按 "Num -" 键, 2次
  17.         延时 5 毫秒
  18.         (键盘)按 "F12" 键, 1次
  19.         延时 5 毫秒
  20.         (键盘)按 "F2" 键, 1次
  21.         延时 200 毫秒
  22.     条件结束
  23.     注释:返回大号
  24.     延时 500 毫秒
  25.     调用 Window.Active(JB1)
  26.     延时 500 毫秒
  27.     如果 Form1.baojing.Value = 1 则
  28.         调用 掉线检测x()
  29.     条件结束
  30.     注释:模式=============================================模式太鼓
  31.     如果 Form1.moshitaigu.Value = 1 则
  32.         注释:房主动作
  33.         如果 Form1.djy.ListIndex = 1 则
  34.             注释:开局后房主蹦15秒
  35.             定义变量 t1
  36.             令 t1 = time
  37.             标记 房主按键(子程序 游戏中x)
  38.             (键盘)按 "J" 键, 1次
  39.             (键盘)按 "J" 键, 1次
  40.             令 t1_2 = time
  41.             令 mytime_diff = DateDiff("s",t1,t1_2)
  42.             如果 mytime_diff > 15 则
  43.                 跳转到标记 对局按键结束(子程序 游戏中x)
  44.             否则
  45.                 跳转到标记 房主按键(子程序 游戏中x)
  46.             条件结束
  47.         条件结束
  48.         注释:房员动作
  49.         如果 Form1.djy.ListIndex = 2 则
  50.             注释:开局后房员蹦8秒
  51.             定义变量 t2
  52.             令 t2 = time
  53.             标记 房员按键(子程序 游戏中x)
  54.             (键盘)按 "J" 键, 1次
  55.             (键盘)按 "J" 键, 1次
  56.             令 t2_2 = time
  57.             令 mytime_diff = DateDiff("s",t2,t2_2)
  58.             如果 mytime_diff > 8 则
  59.                 跳转到标记 对局按键结束(子程序 游戏中x)
  60.             否则
  61.                 跳转到标记 房员按键(子程序 游戏中x)
  62.             条件结束
  63.         条件结束
  64.     条件结束
  65.     注释:===================================================模式太鼓结束
  66.     标记 对局按键结束(子程序 游戏中x)
  67.     延时 130000 毫秒
  68.     如果 Form1.baojing.Value = 1 则
  69.         调用 掉线检测x()
  70.     条件结束
  71.     调用 Window.Active(Jubing)
  72.     标记 fh(子程序 游戏中x)
  73.     如果点 (210 + Ux,151 + Uy) 的颜色等于 "F7FF" 则
  74.         调用 返回x()
  75.     否则
  76.         延时 2000 毫秒
  77.         跳转到标记 fh(子程序 游戏中x)
  78.     条件结束
  79. 子程序结束
  80. 子程序 房间中x()
  81.     注释:贡献框
  82.     如果点 (516 + Ux,207 + Uy) 的颜色等于 "FFFAE5" 则
  83.         延时 100 毫秒
  84.         (鼠标)移动到 (516 + Ux, 207 + Uy)
  85.         延时 80 毫秒
  86.         (鼠标)左键单击, 1次
  87.         延时 80 毫秒
  88.         (鼠标)移动到 (Ux, Uy)
  89.     否则
  90.     条件结束
  91.     注释:点开始
  92.     如果点 (686 + Ux,529 + Uy) 的颜色等于 "FFFAE7" 则
  93.         (键盘)按 "F5" 键, 1次
  94.         延时 1000 毫秒
  95.     否则
  96.     条件结束
  97.     注释:检测准备框
  98.     如果点 (515 + Ux,237 + Uy) 的颜色等于 "FFFAE5" 则
  99.         (鼠标)移动到 (515 + Ux, 237 + Uy)
  100.         延时 200 毫秒