1.         调用子程序 卖体
  2.         jn4m=jn4m+1
  3.         jn4m=jn4m+1
  4.     循环结束
  5. 循环结束
  6. dhp=0
  7. dhp=0
  8. 如果表达式 (dhp<5) 为真,则循环执行
  9.     如果表达式 (dhp<5) 为真,则循环执行
  10.         调用外部VBScript子程序 在屏幕区域里查找图形(0,0,640,480,"c:\gujias\fangyan.bmp",0.8,x,y)
  11.         调用外部VBScript子程序 在屏幕区域里查找图形(0,0,640,480,"c:\gujias\fangyan.bmp",0.8,x,y)
  12.         如果表达式 (x>0 and y>0) 为真,则
  13.             如果表达式 (x>0 and y>0) 为真,则
  14.                 dhp=5
  15.                 dhp=5
  16.             否则
  17.             否则
  18.                 zx=148
  19.                 zx=148
  20.                 zy=387
  21.                 zy=387
  22.                 调用子程序 天鼠
  23.                 调用子程序 天鼠
  24.                 左键单击
  25.                 左键单击
  26.                 延时2000毫秒
  27.                 延时2000毫秒
  28.                 dhp=dhp+1
  29.                 dhp=dhp+1
  30.             条件结束
  31.         条件结束
  32.     循环结束
  33. 循环结束
  34. 调用子程序 等级
  35. 调用子程序 等级
  36. 如果表达式 (tx>30) 为真,则
  37.     如果表达式 (tx>30) 为真,则
  38.         thn=0
  39.         thn=0
  40.         循环 kyu 遍
  41.             循环 kyu 遍
  42.                 调用插件命令 Window.Active(jianfei(thn))
  43.                 调用插件命令 Window.Active(jianfei(thn))
  44.                 延时500毫秒
  45.                 延时500毫秒
  46.                 调用子程序 彪局
  47.                 调用子程序 彪局
  48.                 thn=thn+1
  49.                 thn=thn+1
  50.             循环结束
  51.         循环结束
  52.     条件结束
  53. 条件结束
  54. 如果表达式 (tx=30) 为真,则
  55.     如果表达式 (tx=30) 为真,则
  56.         thyn=0
  57.         thyn=0
  58.         循环 kyu 遍
  59.             循环 kyu 遍
  60.                 调用插件命令 Window.Active(jianfei(thyn))
  61.                 调用插件命令 Window.Active(jianfei(thyn))
  62.                 延时500毫秒
  63.                 延时500毫秒
  64.                 调用子程序 小兔
  65.                 调用子程序 小兔
  66.                 thyn=thyn+1
  67.                 thyn=thyn+1
  68.             循环结束
  69.         循环结束
  70.     条件结束
  71. 条件结束
  72. 如果表达式 (bj=0) 为真,则
  73.     如果表达式 (bj=0) 为真,则
  74.         调用子程序 报警
  75.         调用子程序 报警
  76.     条件结束
  77. 条件结束
  78. 脚本停止运行
  79. 脚本停止运行
  80. 子程序 OnScriptExit
  81.     子程序 OnScriptExit
  82.         调用插件命令 FindPicture5.FreeBMP(xiahaa)
  83.         调用插件命令 FindPicture5.FreeBMP(xiahaa)
  84.     子程序结束,回到调用处
  85. 子程序结束,回到调用处
  86. 子程序 小兔
  87.     子程序 小兔
  88.         按键 <Tab>
  89.         按键 <Tab>
  90.         延时500毫秒
  91.         延时500毫秒
  92.         调用外部VBScript子程序 在屏幕区域里查找图形(0,0,640,480,"c:\gujias\fangyan.bmp",0.8,x,y)
  93.         调用外部VBScript子程序 在屏幕区域里查找图形(0,0,640,480,"c:\gujias\fangyan.bmp",0.8,x,y)
  94.         如果表达式 (xud>0 and yud>0) 为真,则
  95.             如果表达式 (xud>0 and yud>0) 为真,则
  96.                 zx=xud-146
  97.                 zx=xud-146
  98.                 zy=yud+179
  99.                 zy=yud+179
  100.                 调用子程序 天鼠