1.     否则如果(txt_record = "用户密码")为真,则
  2.         X01=435:Y01=161:time01=500
  3.         调用子程序 CX.直接点击
  4.         //下面这句用于向后台窗口句柄(变量：Hwnd)发送一个文本消息(内容："用户名")到客户区
  5.         调用插件命令 Bkgnd.SendString(Hwnd, user_name(var_user))
  6.         X01=435:Y01=191:time01=500
  7.         调用子程序 CX.直接点击
  8.         //下面这句用于向后台窗口句柄(变量：Hwnd)发送一个文本消息(内容："密码")到客户区
  9.         调用插件命令 Bkgnd.SendString(Hwnd, user_pass_word(var_user))
  10.         X01=451:Y01=303:time01=3500
  11.         调用子程序 CX.直接点击
  12.     否则如果(txt_record = "密码错误")为真,则
  13.         X01=448:Y01=318:time01=500
  14.         调用子程序 CX.直接点击
  15.     条件结束
  16. 循环结束
  17. 标记 持续攻击
  18. txt_record = "持续攻击"
  19. 调用子程序 CX.日志.记录
  20. 循环 50000 遍
  21.     如果表达式 (txt_record = "0") 为真,则
  22.     否则如果(buxue = 0)为真,则
  23.         调用子程序 CX.精灵恢复
  24.     否则如果(txt_record = "挑战平台")为真,则
  25.         调用子程序 CX.选择技能
  26.     否则如果(txt_record = "传送仓" or txt_record = "机械室" or txt_record = "地球仪")为真,则
  27.         调用子程序 CX.目的地
  28.         如果表达式 (KKK = 1) 为真,则
  29.             跳转到标记 打开页面
  30.         条件结束
  31.     否则如果(txt_record = "精灵太空站左翼")为真,则
  32.         调用子程序 CX.精灵恢复
  33.         标记 进入塔内
  34.         调用子程序 CX.选择楼层
  35.     否则如果(txt_record = "勇者塔内")为真,则
  36.         如果表达式 (Var1114_temp = "0") 为真,则
  37.             调用子程序 CX.精灵恢复
  38.         条件结束
  39.         X00= 489 : Y00= 280
  40.         //X01= X00 : Y01= Y00 : COL01 = "526163" : time01=200
  41.         //X01= 46 : Y01= 532 : COL01 = "526163" : time01=100 : xiaosh=1
  42.         X01= 40 : Y01= 180 : COL01 = "0004F7" : time01=100
  43.         xiaosh=1 : wucha = 0
  44.         调用子程序 CX.选中精灵然后缩小
  45.     否则如果(txt_record = "火星一层")为真,则
  46.         Color_N = "100CFF" : X_n=0 : Y_n=0
  47.         a1 = 86 : a2 = 162 : b1 = 180 : b2 = 220
  48.         A = 96 : B = 122 : C = 708 : D = 432 : COL01 = "63B27F" : COL02 = "4204B5"
  49.         COL02 = "4204B5" : COL01 = "FFF7AD"
  50.         调用子程序 CX.找到精灵
  51.     否则如果(txt_record = "云霄星一层")为真,则
  52.         Color_N = "8C6984" : X_n=0 : Y_n=0
  53.         a1 = 77 : a2 = 161 : b1 = 179 : b2 = 214
  54.         A = 19 : B = 124 : C = 605 : D = 467 : COL01 = "63B27F" : COL02 = "4204B5"
  55.         COL01 = "00AAFF" : COL02 = "FF9A9C"
  56.         COL01 = "00AAFF" : COL02 = "FFF7AD"
  57.         调用子程序 CX.找到精灵
  58.     否则如果(txt_record = "海洋星一层")为真,则
  59.         Color_N = "9C929C" : X_n=0 : Y_n=0
  60.         A = 390 : B = 252 : C = 880 : D = 500 : COL01 = "5AA28C" : COL02 = "63E7BD"
  61.         调用子程序 CX.找到精灵
  62.     否则如果(txt_record = "云霄星二层")为真,则
  63.         Color_N = "DECFBD" : X_n=0 : Y_n=0
  64.         a1 = 0 : a2 = 0 : b1 = 0 : b2 = 0
  65.         A = 55 : B = 165 : C = 840 : D = 450 : COL01 = "633000" : COL02 = "6B3408"
  66.         调用子程序 CX.找到精灵
  67.     否则如果(txt_record = "精灵太空站")为真,则
  68.         弹出窗口 "精灵太空站"
  69.     否则如果(txt_record = "火星二层")为真,则
  70.         Color_N = "003073" : X_n=0 : Y_n=0
  71.         a1 = 221 : a2 = 318 : b1 = 325 : b2 = 405
  72.         A = 260 : B = 120 : C = 680 : D = 460 : COL01 = "005DFF" : COL02 = "0061FF"
  73.         调用子程序 CX.找到精灵
  74.     否则如果(txt_record = "挑战平台")为真,则
  75.     否则如果(txt_record = "挑战平台")为真,则
  76.     否则如果(txt_record = "挑战平台")为真,则
  77.     否则如果(txt_record = "挑战平台")为真,则
  78.     否则如果(txt_record = "挑战平台")为真,则
  79.     否则如果(txt_record = "挑战平台")为真,则
  80.     否则如果(txt_record = "挑战平台")为真,则
  81.     否则如果(txt_record = "挑战平台")为真,则
  82.     否则如果(txt_record = "挑战平台")为真,则
  83.     否则如果(txt_record = "开始")为真,则
  84.         跳转到标记 STAR
  85.     否则如果(txt_record = "选择其他用户")为真,则
  86.         跳转到标记 STAR
  87.     否则如果(txt_record = "用户密码")为真,则
  88.         跳转到标记 STAR
  89.     否则如果(txt_record = "密码错误")为真,则
  90.         跳转到标记 STAR
  91.     条件结束
  92.     标记 需要位置判断
  93.     调用子程序 CX.位置判断
  94. 循环结束
  95. 脚本停止运行
  96. 子程序 CX.句柄_02
  97.     （VBScript语句） dim fso,file,filename
  98.     （VBScript语句） Set fso=CreateObject("Scripting.FileSystemObject")
  99.     如果表达式 (fso.FileExists(filename)=0) 为真,则
  100.         （VBScript语句） Set file =fso.CreateTextFile(filename,2)