1. 注释:====================================================================子程序
  2. 子程序 游戏中()
  3.     注释:检测背景
  4.     如果点 (1 + Ux,765 + Uy) 的颜色等于 "0" 则
  5.     否则
  6.         延时 200 毫秒
  7.         (键盘)按 "F12" 键, 1次
  8.         (键盘)按 "F2" 键, 1次
  9.         延时 200 毫秒
  10.         (键盘)按 "-" 键, 2次
  11.     条件结束
  12.     注释:多开2
  13.     如果 duokai > 1 则
  14.         调用 Window.Active(Jubing2)
  15.         延时 200 毫秒
  16.         (键盘)按 "F12" 键, 1次
  17.         (键盘)按 "F2" 键, 1次
  18.     条件结束
  19.     注释:多开3
  20.     如果 duokai > 2 则
  21.         调用 Window.Active(Jubing3)
  22.         延时 200 毫秒
  23.         (键盘)按 "F12" 键, 1次
  24.         (键盘)按 "F2" 键, 1次
  25.     条件结束
  26.     注释:多开4
  27.     如果 duokai > 3 则
  28.         调用 Window.Active(Jubing4)
  29.         延时 200 毫秒
  30.         (键盘)按 "F12" 键, 1次
  31.         (键盘)按 "F2" 键, 1次
  32.     条件结束
  33.     注释:多开5
  34.     如果 duokai > 4 则
  35.         调用 Window.Active(Jubing5)
  36.         延时 200 毫秒
  37.         (键盘)按 "F12" 键, 1次
  38.         (键盘)按 "F2" 键, 1次
  39.     条件结束
  40.     注释:多开6
  41.     如果 duokai > 5 则
  42.         调用 Window.Active(Jubing6)
  43.         延时 200 毫秒
  44.         (键盘)按 "F12" 键, 1次
  45.         (键盘)按 "F2" 键, 1次
  46.     条件结束
  47.     注释:返回大号
  48.     调用 Window.Active(Jubing)
  49.     延时 500 毫秒
  50.     注释:模式=============================================模式太鼓
  51.     如果 moshitaigu = 1 则
  52.         注释:房主动作
  53.         如果 djy = 1 则
  54.             注释:开局后房主蹦15秒
  55.             定义变量 t1
  56.             令 t1 = time
  57.             标记 房主按键(子程序 游戏中)
  58.             (键盘)按 "J" 键, 1次
  59.             (键盘)按 "J" 键, 1次
  60.             令 t1_2 = time
  61.             令 mytime_diff = DateDiff("s",t1,t1_2)
  62.             如果 mytime_diff > 15 则
  63.                 跳转到标记 对局按键结束(子程序 游戏中)
  64.             否则
  65.                 跳转到标记 房主按键(子程序 游戏中)
  66.             条件结束
  67.         条件结束
  68.         注释:房员动作
  69.         如果 djy = 2 则
  70.             注释:开局后房员蹦8秒
  71.             定义变量 t2
  72.             令 t2 = time
  73.             标记 房员按键(子程序 游戏中)
  74.             (键盘)按 "J" 键, 1次
  75.             (键盘)按 "J" 键, 1次
  76.             令 t2_2 = time
  77.             令 mytime_diff = DateDiff("s",t2,t2_2)
  78.             如果 mytime_diff > 8 则
  79.                 跳转到标记 对局按键结束(子程序 游戏中)
  80.             否则
  81.                 跳转到标记 房员按键(子程序 游戏中)
  82.             条件结束
  83.         条件结束
  84.         注释:==========================================模式太鼓结束
  85.     条件结束
  86.     标记 对局按键结束(子程序 游戏中)
  87.     延时 130000 毫秒
  88.     调用 Window.Active(Jubing)
  89.     注释:检测返回(太鼓)
  90.     标记 fh(子程序 游戏中)
  91.     如果点 (268 + Ux,207 + Uy) 的颜色等于 "90FF" 则
  92.         调用 返回()
  93.     否则
  94.         延时 1000 毫秒
  95.         如果点 (332 + Ux,178 + Uy) 的颜色等于 "F7FF" 则
  96.             调用 返回浪漫()
  97.         否则
  98.             延时 2000 毫秒
  99.             跳转到标记 fh(子程序 游戏中)
  100.         条件结束