Project1

标题: 事件脚本快捷方式 [打印本页]
作者: taroxd    时间: 2014-7-5 13:12
标题: 事件脚本快捷方式
本帖最后由 taroxd 于 2014-12-29 12:46 编辑

与 “事件转译器” 可能会有冲突，故停止维护


  3. #----------------------------------------------------------------------------
  4. # ● require Taroxd基础设置
  5. #----------------------------------------------------------------------------

  7. module Taroxd::Eval
  8.   #--------------------------------------------------------------------------
  9.   # ● 脚本中的简称列表
  10.   #--------------------------------------------------------------------------
  11.   SCRIPT_ABBR_LIST = {
  12.     'V' => '$game_variables',
  13.     'S' => '$game_switches',
  14.     'N' => '$game_actors',
  15.     'A' => '$game_actors',
  16.     'P' => '$game_party',
  17.     'G' => '$game_party.gold',
  18.     'E' => '$game_troop'
  19.   }
  20.   #--------------------------------------------------------------------------
  21.   # ● 处理脚本用的正则表达式
  22.   #--------------------------------------------------------------------------
  23.   words = SCRIPT_ABBR_LIST.keys.join('|')
  24.   SCRIPT_ABBR_RE = /(?<!::|['"\\\.])\b(?:#{words})\b(?! *[(@$\w'"])/
  25.   #--------------------------------------------------------------------------
  26.   module_function
  27.   #--------------------------------------------------------------------------
  28.   # ● 对脚本的处理
  29.   #--------------------------------------------------------------------------
  30.   def process_script(script)
  31.     script.gsub(SCRIPT_ABBR_RE, SCRIPT_ABBR_LIST)
  32.   end
  33.   #--------------------------------------------------------------------------
  34.   # ● 执行脚本
  35.   #--------------------------------------------------------------------------
  36.   def eval(script, *args)
  37.     v = $game_variables
  38.     s = $game_switches
  39.     n = $game_actors
  40.     a = $game_actors
  41.     p = $game_party
  42.     g = $game_party.gold
  43.     e = $game_troop
  44.     script = process_script(script)
  45.     if args.empty?
  46.       instance_eval(script, __FILE__, __LINE__)
  47.     else
  48.       Kernel.eval(script, *args)
  49.     end
  50.   end
  51.   #--------------------------------------------------------------------------
  52.   # ● 混入模块
  53.   #--------------------------------------------------------------------------
  54.   Game_Character.send   :include, self
  55.   Game_Interpreter.send :include, self
  56. end
  57.   
  58. class RPG::UsableItem::Damage
  59.   #--------------------------------------------------------------------------
  60.   # ● 根据参数执行计算公式
  61.   #--------------------------------------------------------------------------
  62.   def eval(a, b, v)
  63.     value = Taroxd::Eval.eval(@formula, b.formula_binding(a, b, v))
  64.     value > 0 ? value * sign : 0
  65.   end
  66. end

  68. class Game_BattlerBase
  69.   #--------------------------------------------------------------------------
  70.   # ● 执行计算公式的环境
  71.   #--------------------------------------------------------------------------
  72.   def formula_binding(a, b, v)
  73.     s = $game_switches
  74.     n = $game_actors
  75.     p = $game_party
  76.     g = $game_party.gold
  77.     e = $game_troop
  78.     binding
  79.   end
  80. end

  82. class Window_Base < Window
  83.   #--------------------------------------------------------------------------
  84.   # ● 对 #{} 的处理
  85.   #--------------------------------------------------------------------------
  86.   process_expression = Proc.new do |old|
  87.     old.gsub(/\e?#(?<brace>\{([^{}]|\g<brace>)*\})/) do |code|
  88.       next code if code.slice!(0) == "\e"
  89.       Taroxd::Eval.eval code[1..-2]
  90.     end
  91.   end
  92.   def_with :convert_escape_characters, process_expression
  93. end
复制代码




欢迎光临 Project1 (https://rpg.blue/) Powered by Discuz! X3.1