1.         Wtype = 3-Wtype
  2.         Mystring = "选择[5]"
  3.         如果表达式 (Wtype = 1) 为真,则
  4.             Mystring = Mystring & "[禁用]"
  5.         否则如果(Wtype = 2)为真,则
  6.             Mystring = Mystring & "[启用]"
  7.         条件结束
  8.         Mystring = Mystring & "[更换武器]..."
  9.         调用子程序 说话
  10.         调用子程序 参数设置
  11.     否则如果(AnJian = 83)为真,则
  12.         Mystring = "选择[S][保存设置]..."
  13.         调用子程序 说话
  14.         调用子程序 保存脚本设置
  15.         调用子程序 参数设置
  16.     否则如果(AnJian = 89)为真,则
  17.         Mystring = "选择[Y][启动]..."
  18.         调用子程序 说话
  19.         调用子程序 取得技能使用位置
  20.     否则
  21.         Mystring = "只能在[1]-[5][Y][S]之间选择,请重新输入..."
  22.         调用子程序 说话
  23.         调用子程序 参数设置
  24.     条件结束
  25. 子程序结束,回到调用处
  26. 子程序 取得HP设置
  27.     Mystring = "│[HP 设置]" & vblf
  28.     Mystring = Mystring & "├" & String(11,"─") & vblf
  29.     Mystring = Mystring & "│<1>下限[" & HPlower & "%]" & vblf
  30.     Mystring = Mystring & "│<2>延迟[" & HPdelay & "]秒" & vblf
  31.     Mystring = Mystring & "├" & String(11,"─") & vblf
  32.     Mystring = Mystring & "│<Y>启用 <N>禁用"
  33.     调用子程序 说话
  34.     调用子程序 等待按键
  35.     如果表达式 (AnJian = 49) 为真,则
  36.         SayExpression "请输入HP下限(%): "
  37.         调用子程序 取得数字
  38.         如果表达式 (Numb >= 95) 为真,则
  39.             Mystring = "HP下限不要高于[95%]..."
  40.             调用子程序 说话
  41.             HPlower = 95
  42.         否则如果(Numb <= 14)为真,则
  43.             Mystring = "HP下限不要低于[15%]..."
  44.             调用子程序 说话
  45.             HPlower = 15
  46.         否则
  47.             HPlower =Numb
  48.         条件结束
  49.         Mystring = "HP低于[" & HPlower & "%]喝水..."
  50.         调用子程序 说话
  51.         调用子程序 读取血量色点
  52.         调用子程序 取得HP设置
  53.     否则如果(AnJian = 50)为真,则
  54.         SayExpression "请输入喝水延迟(秒): "
  55.         调用子程序 取得数字
  56.         如果表达式 (Numb > 18) 为真,则
  57.             Mystring = "延迟时间不要超过[18]秒..."
  58.             调用子程序 说话
  59.             HPdelay = 18
  60.         否则
  61.             HPdelay =Numb
  62.         条件结束
  63.         Mystring = "延迟[" & HPdelay & "]秒喝水..."
  64.         调用子程序 说话
  65.         调用子程序 取得HP设置
  66.     否则如果(AnJian = 89)为真,则
  67.         Mystring = "选择[Y][启用][HP设置]..."
  68.         调用子程序 说话
  69.         Htype=1
  70.     否则如果(AnJian = 78)为真,则
  71.         Mystring = "选择[N][禁用][HP设置]..."
  72.         调用子程序 说话
  73.         Htype =2
  74.     否则
  75.         Mystring = "只能在[1][2][Y][N]之间选择,请重新输入..."
  76.         调用子程序 说话
  77.         调用子程序 取得HP设置
  78.     条件结束
  79. 子程序结束,回到调用处
  80. 子程序 取得CP回复
  81.     Mystring = "│[CP 回复]" & vblf
  82.     Mystring = Mystring & "├" & String(11,"─") & vblf
  83.     Mystring = Mystring & "│<1>自然回复"
  84.     如果表达式 (Ctype = 1) 为真,则
  85.         Mystring = Mystring & " @"
  86.     条件结束
  87.     Mystring = Mystring & vblf
  88.     Mystring = Mystring & "│<2>技能回复"
  89.     如果表达式 (Ctype = 2) 为真,则
  90.         Mystring = Mystring & " @"
  91.     条件结束
  92.     Mystring = Mystring & vblf
  93.     Mystring = Mystring & "│<3>CP药剂"
  94.     如果表达式 (Ctype = 3) 为真,则
  95.         Mystring = Mystring & " @"
  96.     条件结束
  97.     调用子程序 说话
  98.     调用子程序 等待按键
  99.     如果表达式 (AnJian = 49) 为真,则
  100.         Mystring = "选择[1][自然回复]..."