设为首页收藏本站|繁體中文

Project1

 找回密码
 注册会员
搜索
查看: 9835|回复: 29
打印 上一主题 下一主题

[原创发布] 数据库通用备注接口插件 v2.1 增强版(附已发布范例链接)

[复制链接]

Lv5.捕梦者 (版主)

遠航の猫咪

梦石
3
星屑
23186
在线时间
2387 小时
注册时间
2005-10-15
帖子
1166

开拓者

跳转到指定楼层
1
发表于 2017-10-14 21:29:31 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式

加入我们,或者,欢迎回来。

您需要 登录 才可以下载或查看,没有帐号?注册会员

x
本帖最后由 SailCat 于 2017-12-17 23:23 编辑

在不魔改编辑器的情况下,最大限度的利用现有字段,模拟VA、MV数据库的备注功能。
具体使用说明,请见脚本前的注释项
注:该插件只是使你很方便的书写备注调用备注,并未植入任何备注项具体功能在游戏系统中,需要你自己书写,写法可见范例
更新:
v2.1
去掉关于方法前缀(下划线)的配置,为兼容性及后续插件开发考虑,不再支持该字符自定义配置
追加配置合法性检查
允许给游戏事件设定备注,即分页的备注。用Game_Event类作为接口植入,便于制作各种效果。
v2.0
名字空间及依赖检查通用化,便于后期发布插件时更改冲突
增加狂野模式,相当于连数据库数值破限一起搞了……
v1.9
支持INI文件存储备注,如果你真的有这需求的话就用吧(虽然我觉得用公共事件已经很方便了)
v1.8
备注中的标签允许缺省,按默认值(名称)处理
超长备注现在可以设定不在一个公共事件内写完了,避免重名或事件过长带来的麻烦
v1.7
备注中的表达式现在可以用v简写变量,如v[1]指引用1号变量
备注中的字符串现在可以包括分段符(默认为;分号),需要前置反斜杠进行转义
增加了相关注释
v1.6
备注中的标识符现在可以使用大写字母和数字开头(因为加了方法前缀),不再限定为小写字母
更改了部分代码避免被论坛错误转换
v1.5
添加公共事件标签引用备注,备注内容不再受到字段长度的限制,理论上可以如VA、MV一样无限长
(多说两句:超长备注可能有许多解决办法,比如写在F11脚本里(即运行时设定),用外挂文件等等。这里的核心思路是,第一数据库的事要数据库内解决,第二拷贝粘贴数据时备注不能错乱)
v1.4
添加地图和事件备注数据的植入
v1.3
添加respond_to?定义和方法前缀设定,避免与普通字段重名,且制作依赖插件时,便于检查冲突(感谢@taroxd),默认的前缀是单下划线
所有分隔字符全部开放配置(感谢@hyrious的灵感),你现在想写成URL参数的样子都可以……
v1.2
添加define_method方法定义,添加analyze方法,同一对象只解析一次,增加再次调用的效率
允许运行时设定备注,包括个别项设定和整体重写,满足某些黑科技用法需要,现在备注如同普通字段一样
备注书写格式放松:前导符号前可以加空格(不影响原字段),分号后可以跟空格(不影响标识符的识别)
v1.1
使用元编程简化代码(感谢@taroxd的提示)
预设返回false的备注方式,无法识别将返回nil而不是false,未定义的默认值继续有效
增加了表达式的容错配置
增加了注释

范例的链接:
1. 技能名个别设定(原桜雅在土脚本)
2. 技能公式自定义
3. 技能消耗依赖

代码:
RUBY 代码复制
  1. #==============================================================================
  2. # ■ 数据库通用备注接口 v2.1 by SailCat
  3. #------------------------------------------------------------------------------
  4. #   方法:本脚本插入到Main之前使用,且需在所有依赖此脚本的其他插件之前
  5. #   依赖:无
  6. #   版本:v2.1 (Build 171217)
  7. #   效果:给所有数据库项目增加如同VA、MV一样的备注,且备注长度同VA、MV一样无限
  8. #   配置:有大量配置项,见脚本配置区的具体说明,按默认设定可以正常运行
  9. #   冲突:其他的数据库扩展脚本
  10. #   说明:
  11. #
  12. #   1. 备注字段来源:
  13. #      游戏事件页、公共事件数据使用注释(第1条起的连续内容)作为备注(无限)
  14. #      队伍数据使用注释(第1页[不论条件]第1条起的连续内容)作为备注(无限)
  15. #      物品、特技、武器、防具数据,用描述作为备注(最多100字)
  16. #      角色、职业、敌人、状态、动画、图块数据,用名称作为备注(最多40字)
  17. #      地图、事件数据,用名称作为备注(最多100字)
  18. #      所有数据,皆可以引用公共事件中的标签或文件作为备注,因此理论上长度无限
  19. #      用于批量存放备注数据的公共事件编号和文件名,可以在脚本配置中指定
  20. #
  21. #   2. 备注字段写法:
  22. #      标准写法1:#备注项1;备注项2;...备注项n
  23. #      标准写法2:#>公共事件中的超长备注标签名
  24. #      标准写法3:#<配置文件中的超长备注标签名
  25. #      以上标准写法互相排斥,根据需要任选一种
  26. #      符号# (半角井号)用于区分备注与描述/名称正文,以及识别注释事件
  27. #      符号; (半角分号)用于给备注项分段
  28. #      符号#>用于整体引用公共事件中的超长备注标签
  29. #      符号#<用于整体引用配置文件中的超长备注标签
  30. #      上述分隔符可在下方脚本配置中,修改为其他字符
  31. #      非标准写法:#任意备注内容,此种情况下,备注不会自动解析为备注项集的形式
  32. #
  33. #   3. 备注项的写法:
  34. #      标准写法:标识符=表达式
  35. #      由于直接书写空间有限,当表达式为某些特殊情况时,本脚本支持以下简写:
  36. #      当表达式的值为true时,可写作 标识符 或者 标识符+
  37. #      当表达式的值为false时,可写作 标识符-
  38. #      当表达式的值为字符串时,可写作 标识符:字符串
  39. #      当表达式的值为超长备注标签的引用字符串时,可写作 标识符.标签名
  40. #      表达式中可用v 指代游戏变量,如v[8]相当于$game_variables[8]
  41. #      表达式中包括备注分段符号(默认为;)时,用前置反斜杠转义
  42. #
  43. #   4. 标准写法备注的使用:
  44. #      脚本中调用备注项,使用 数据对象._+标识符(默认值) 方法
  45. #      符号_ 为标识符前缀,区分同原有字段的偶然重名,锁定不可修改
  46. #      若调用的标识符无效或未定义,将返回默认值,默认值省略的话返回nil
  47. #      强烈建议在植入备注功能时,用好记的写法和默认值,对标识符进行二次引用定义
  48. #    调用示例:
  49. #      角色1  名称设为:阿尔西斯 #a;b=4;c:5
  50. #      则  $data_actors[1].name       # => "阿尔西斯" 自动区隔备注内容
  51. #          $data_actors[1]._a         # => true
  52. #          $data_actors[1]._b         # => 4
  53. #          $data_actors[1]._c         # => "5"
  54. #          $data_actors[1]._d         # => nil 未定义的标识符,采用nil
  55. #          $data_actors[1]._d(2)      # => 2   未定义的标识符,采用默认值
  56. #      技能1  描述设为:回复己方单体HP。#f:a.atk - b*def / 2;cd=1.5;no_ref-
  57. #      则  $data_skills[1].description# => "回复己方单体HP。"
  58. #          $data_skills[1]._f         # => "a.atk - b.def / 2"
  59. #          $data_skills[1]._cd        # => 1.5
  60. #          $data_skills[1]._no_ref    # => false
  61. #    二次定义示例(采用默认值和好记写法,方便他处脚本的书写,并增强可读性):
  62. #      module RPG
  63. #        class Skill
  64. #          def formula;  _f;       end
  65. #          def cooldown; _cd(0.0); end
  66. #        end
  67. #      end
  68. #
  69. #   5. 非标准写法备注的使用:数据对象.note 方法可取得备注内容(字符串),以上
  70. #
  71. #   6. 狂野模式:
  72. #      如果在脚本配置中将相关选项打开,可以使用狂野模式的备注
  73. #      此时,若标识符写作该类数据的默认字段名称(只能是数值),原定数值会被覆盖
  74. #      该方法可以轻易突破数据库的数值限制,如负数武器攻击力,超过200的能力F值
  75. #      该方法可能破坏数据库的自洽性,因此请谨慎使用该功能
  76. #
  77. #   7. 本脚本只提供数据库内容的备注接口,没有植入关于备注项实装的任何扩展功能
  78. #      备注项的实际应用代码,请自行实现或插入后续发布的依赖插件
  79. #      脚本作者只承诺发布的所有基于本接口的依赖插件之间不会互相冲突
  80. #      如果与非依赖本接口的插件或他人插件冲突,请自行解决
  81. #
  82. #   8. 关于用公共事件实现超长备注:
  83. #      1)公共事件的超长备注,用事件指令书写在指定编号的公共事件中
  84. #         公共事件的编号在脚本配置区指定,默认分开12项,也可合并为1项
  85. #         超长备注可用“显示文章”或“注释”或“脚本”指令书写,具体指令无区别
  86. #         仅提取这三条指令的文字内容,其他的指令会被自动忽略,不会有影响
  87. #      2) 建议在公共事件最开始插入“中断事件处理”指令,避免误执行(不是必须)
  88. #      3)每条超长备注之前,加上标签指令,标签名不得互相重复
  89. #      4)超长备注可以作为备注项的字符串使用,例:
  90. #           阿尔西斯 #pr.c1 # => 将标签c1后文字作为$data_actors[1]._pr的内容
  91. #         也可以作为备注项数据,整体合使用,例:
  92. #           阿尔西斯 #>c1   # => 将标签c1后文字作为阿尔西斯的备注,并自动解析
  93. #         整体使用时,写在公共事件中的备注项需省略前置的#符号(因为已经写过了)
  94. #      5) 不是用配置中的公共事件ID存放时,标签名需指定公共事件ID,如:#>99,c1
  95. #      6) 标签名可以省略不写,用数据的名称和相关标识符作为默认标签名,如:
  96. #           阿尔西斯 #>   # => 系统会查找名为“阿尔西斯”的标签并取值
  97. #           阿尔西斯 #pr. # => 系统会查找名为“阿尔西斯_pr”的标签并取值
  98. #      7) 引用的标签没有定义的情况下,返回空的字符串
  99. #
  100. #   9. 关于备注文件:
  101. #      1) 备注文件的写法须为标准的INI配置文件写法,即标签分段,键值对书写,如:
  102. #           [特萝西]
  103. #           profile=这是特萝西,她是盗贼
  104. #           age=28
  105. #           gender=女
  106. #           height=175
  107. #           weight=60
  108. #           is_dual_wield=false
  109. #      2) 数据库引用的写法为:#<标签名,当标签名与数据名称一样时可以省略,如:
  110. #           特萝西 #<
  111. #         则有:$data_actors[4]._profile="这是特萝西,她是盗贼" 等等
  112. #==============================================================================
  113. #==============================================================================
  114. # ■ SailCat's 插件公用
  115. #==============================================================================
  116. module SailCat
  117.   $sailcat_import ||= {}
  118.   #--------------------------------------------------------------------------
  119.   # ● 脚本配置区
  120.   #--------------------------------------------------------------------------
  121.   module DataNoteCore_Config
  122.     SEPARATOR = "#"               # 备注与正文的分隔符
  123.     DELIMITER = ";"               # 分隔不同备注项的符号
  124.     NOTE_LABEL_CHAR = ?>          # 超长备注(公共事件存储)的识别符
  125.     NOTE_FILE_CHAR = ?<           # 超长备注(文件存储)的识别符
  126.     NOTE_FILE = "Data/Note.ini"   # 超长备注(文件存储)的文件名
  127.     ACTOR_COMMON_EVENT_ID = 1     # 超长备注(角色类)用公共事件ID
  128.     CLASS_COMMON_EVENT_ID = 2     # 超长备注(职业类)用公共事件ID
  129.     SKILL_COMMON_EVENT_ID = 3     # 超长备注(特技类)用公共事件ID
  130.     ITEM_COMMON_EVENT_ID = 4      # 超长备注(物品类)用公共事件ID
  131.     WEAPON_COMMON_EVENT_ID = 5    # 超长备注(武器类)用公共事件ID
  132.     ARMOR_COMMON_EVENT_ID = 6     # 超长备注(防具类)用公共事件ID
  133.     ENEMY_COMMON_EVENT_ID = 7     # 超长备注(敌人类)用公共事件ID
  134.     STATE_COMMON_EVENT_ID = 8     # 超长备注(状态类)用公共事件ID
  135.     ANIMATION_COMMON_EVENT_ID = 9 # 超长备注(动画类)用公共事件ID
  136.     TILESET_COMMON_EVENT_ID = 10  # 超长备注(图块类)用公共事件ID
  137.     MAPINFO_COMMON_EVENT_ID = 11  # 超长备注(地图类)用公共事件ID
  138.     EVENT_COMMON_EVENT_ID = 12    # 超长备注(事件类)用公共事件ID
  139.     NOTE_STRING_LF = "\n"         # 超长备注(字符串引用)的行分隔符号
  140.     NOTE_DATA_LF = DELIMITER      # 超长备注(整体引用)的行分隔符号
  141.     USE_WILD_MODE = true          # 是否开启狂野模式
  142.     #--------------------------------------------------------------------------
  143.     # ● 配置检查,请勿更改
  144.     #--------------------------------------------------------------------------
  145.     raise "备注分隔符与分项分隔符不得一致" if SEPARATOR == DELIMITER
  146.     raise "公共事件标识与文件标识不得一致" if NOTE_LABEL_CHAR == NOTE_FILE_CHAR
  147.   end
  148.   #--------------------------------------------------------------------------
  149.   # ● 植入
  150.   #--------------------------------------------------------------------------
  151.   $sailcat_import[:DataNoteCore] = 2.1
  152. end
  153.  
  154. #==============================================================================
  155. # ■ DataNoteCore
  156. #------------------------------------------------------------------------------
  157. #   数据库内容通用备注接口核心引擎
  158. #==============================================================================
  159. module DataNoteCore
  160.   include SailCat::DataNoteCore_Config
  161.   #--------------------------------------------------------------------------
  162.   # ● 常量
  163.   #--------------------------------------------------------------------------
  164.   SEP_REGEX = /#{SEPARATOR}.+$/  # 切分用正则表达式,请不要修改
  165.   #--------------------------------------------------------------------------
  166.   # ● 获取备注字段
  167.   #--------------------------------------------------------------------------
  168.   def note
  169.     # 如果备注值没有初始化
  170.     if @note.nil?
  171.       # 如果是公共事件,用执行列表前面的注释
  172.       @note = split(get_command_note(list)) if self.is_a?(RPG::CommonEvent)
  173.       # 如果是游戏事件,用执行列表前面的注释
  174.       @note = split(get_command_note(list)) if self.is_a?(Game_Event)
  175.       # 如果是队伍,用第1页执行列表前面的注释
  176.       @note = split(get_command_note(pages[0].list)) if self.is_a?(RPG::Troop)
  177.       # 如果是其他,用描述或者名称来备注
  178.       @note ||= has_description? ? split(@description) : split(@name)
  179.       # 解析备注字符串
  180.       analyze
  181.     end
  182.     # 返回值
  183.     return @note
  184.   end
  185.   #--------------------------------------------------------------------------
  186.   # ● 设置备注字段(运行时改变)
  187.   #      note: 新的备注
  188.   #--------------------------------------------------------------------------
  189.   def note=(note)
  190.     # 设置新值
  191.     @note = note
  192.     # 重新解析备注
  193.     analyze
  194.   end
  195.   #--------------------------------------------------------------------------
  196.   # ● 取得/设置备注值(泛用)
  197.   #--------------------------------------------------------------------------
  198.   def method_missing(param_name, *args, &block)
  199.     return super unless respond_to?(param_name)
  200.     param_str = param_name.to_s.sub!(/^_/, "")
  201.     # 备注赋值的情况下
  202.     if param_str[-1] == 61
  203.       param_key = param_str.chop
  204.       self.class.send :define_method, param_name do |value|
  205.         set_note(param_key, value)
  206.       end
  207.       set_note(param_key, *args)
  208.     # 备注取值的情况下
  209.     else
  210.       self.class.send :define_method, param_name do |value|
  211.         get_note(param_str, value)
  212.       end
  213.       return get_note(param_str, *args)
  214.     end
  215.   end
  216.   #--------------------------------------------------------------------------
  217.   # ● 是否有描述字段(内部使用)
  218.   #--------------------------------------------------------------------------
  219.   def has_description?
  220.     instance_variables.include?("@description")
  221.   end
  222.   #--------------------------------------------------------------------------
  223.   # ● 从事件列表中切取备注(内部使用)
  224.   #--------------------------------------------------------------------------
  225.   def get_command_note(list)
  226.     for index in 0...list.length
  227.       break if list[index].code != 108 and list[index].code != 408
  228.     end
  229.     join_command_note(list[0...index], DELIMITER)
  230.   end
  231.   #--------------------------------------------------------------------------
  232.   # ● 将事件内容转为备注字符串(内部使用)
  233.   #--------------------------------------------------------------------------
  234.   def join_command_note(list, linefeed)
  235.     (list.collect {|x| x.parameters[0]}).join(linefeed)
  236.   end
  237.   #--------------------------------------------------------------------------
  238.   # ● 切分备注用字段(内部使用)
  239.   #--------------------------------------------------------------------------
  240.   def split(text)
  241.     text.slice(SEP_REGEX).to_s
  242.   end
  243.   #--------------------------------------------------------------------------
  244.   # ● 取得备注参数值(内部使用)
  245.   #--------------------------------------------------------------------------
  246.   def get_note(param_name, default = nil)
  247.     return default if self.note == "" or not @note_set.include?(param_name)
  248.     return @note_set[param_name] == nil ? default : @note_set[param_name]
  249.   end
  250.   #--------------------------------------------------------------------------
  251.   # ● 设置备注参数值(内部使用)
  252.   #--------------------------------------------------------------------------
  253.   def set_note(param_name, value)
  254.     @note_set ||= {}
  255.     @note_set[param_name] = value
  256.   end
  257.   #--------------------------------------------------------------------------
  258.   # ● 获取标签备注值(内部使用)
  259.   #--------------------------------------------------------------------------
  260.   def get_label(label, identifier, linefeed)
  261.     # 返回已设置的缓存值
  262.     event_id = label.sub!(/^([0-9]+),/, "") ? $1.to_i : note_event_id
  263.     label = default_label(identifier) if label == ""
  264.     $data_notes ||= {}
  265.     if $data_notes.has_key?([event_id, label])
  266.       return $data_notes[[event_id, label]]
  267.     end
  268.     # 初始化公共事件
  269.     $data_common_events ||= load_data("Data/CommonEvents.rxdata")
  270.     event = $data_common_events[event_id]
  271.     return "" if event.nil? or event.list.length == 1
  272.     # 检索标签
  273.     list = event.list
  274.     start_index = 0
  275.     end_index = list.length
  276.     for index in 0...list.length
  277.       next if list[index].code != 118
  278.       if list[index].parameters[0] == label
  279.         start_index = index + 1
  280.       elsif start_index > 0
  281.         break end_index = index
  282.       end
  283.     end
  284.     # 检索结果
  285.     if start_index == 0
  286.       result = ""
  287.     else
  288.       cmds = list[start_index...end_index]
  289.       cmds.reject! {|x| not [101, 401, 108, 408, 355, 655].include?(x.code)}
  290.       result = join_command_note(cmds, linefeed)
  291.     end
  292.     $data_notes[[event_id, label]] = result
  293.   end
  294.   #--------------------------------------------------------------------------
  295.   # ● 获取文件备注值(内部使用)
  296.   #--------------------------------------------------------------------------
  297.   def read_ini_file(label)
  298.     return unless FileTest.exist?(NOTE_FILE)
  299.     # 初始化标签
  300.     label = default_label(nil) if label == ""
  301.     # 打开备注文件
  302.     File.open(NOTE_FILE, "r") do |f|
  303.       label_key = "[#{label}]\n"
  304.       found = false
  305.       # 循环每一行
  306.       f.each_line do |l|
  307.         # 注释的情况下,继续
  308.         next if l[0] == ?; or l[0] == ?#
  309.         # 标签不符的情况下,继续
  310.         next unless l == label_key or found
  311.         # 跳过下一行
  312.         (found = true; next) unless found
  313.         # 如果已到下一个标签就中断
  314.         break if l[0] == ?[
  315.         # 获得键值对
  316.         pair = l.split("=", 2)
  317.         next if pair.size < 2
  318.         key = pair[0].strip
  319.         value = pair[1].strip
  320.         # 值运行成功为表达式,失败默认为字符串
  321.         result = lambda{|v| eval(value) rescue value}.call($game_variables)
  322.         # 设置备注值
  323.         @note_set[key] = result
  324.       end
  325.     end
  326.   end
  327.   #--------------------------------------------------------------------------
  328.   # ● 获取超长标签的公共事件ID(内部使用)
  329.   #--------------------------------------------------------------------------
  330.   def note_event_id
  331.     class_name = self.class.to_s[5..-1]
  332.     eval(class_name.upcase + "_COMMON_EVENT_ID") rescue 0
  333.   end
  334.   #--------------------------------------------------------------------------
  335.   # ● 获取超长标签默认名称(内部使用)
  336.   #--------------------------------------------------------------------------
  337.   def default_label(id)
  338.     if self.is_a?(RPG::Event)
  339.       sprintf("%03d#%s%s", $game_map.map_id, self.name, id ? "_#{id}" : "")
  340.     else
  341.       self.name + (id ? "_#{id}" : "")
  342.     end
  343.   end
  344.   #--------------------------------------------------------------------------
  345.   # ● 解析备注字符串(该方法每对象通常只会执行一次,除非运行时整体重设备注)
  346.   #--------------------------------------------------------------------------
  347.   def analyze
  348.     @note_set = {}
  349.     # 如果备注为空则返回
  350.     return if @note == nil or @note == ""
  351.     # 如果备注为标签引用
  352.     if @note[1] == NOTE_LABEL_CHAR
  353.       @note = SEPARATOR + get_label(@note[2..-1], nil, NOTE_DATA_LF)
  354.     elsif @note[1] == NOTE_FILE_CHAR
  355.       read_ini_file(@note[2..-1])
  356.       return
  357.     end
  358.     # 解析备注字符串
  359.     param_regex = /^ *([A-Za-z0-9_]+)\b([+:=.\-]?(.*?))$/
  360.     # 转义分隔符
  361.     note_array = @note[1..-1].gsub(/\\#{DELIMITER}/, "\001").split(DELIMITER)
  362.     note_array.each do |x|
  363.       result = nil
  364.       if x[param_regex] != nil
  365.         param_name = $1
  366.         param_value = $2
  367.         param_exp = $3.gsub(/\001/, DELIMITER)
  368.         # 开关型(+)
  369.         if param_value.strip == "" or param_value[0] == ?+
  370.           result = true
  371.         # 开关型(-)
  372.         elsif param_value[0] == ?-
  373.           result = false
  374.         # 数值型
  375.         elsif param_value[0] == ?=
  376.           result = lambda{|v| eval(param_exp) rescue nil}.call($game_variables)
  377.         # 字符型
  378.         elsif param_value[0] == ?:
  379.           result = param_exp
  380.         # 标签型
  381.         elsif param_value[0] == ?.
  382.           result = get_label(param_exp, param_name, NOTE_STRING_LF)
  383.         end
  384.         @note_set[param_name] = result
  385.       end
  386.     end
  387.   end
  388.   #--------------------------------------------------------------------------
  389.   # ● 判断方法名是否合法
  390.   #--------------------------------------------------------------------------
  391.   def respond_to?(method_name, *)
  392.     method_name.to_s[/^_.+/] == nil ? super : true
  393.   end
  394.   #--------------------------------------------------------------------------
  395.   # ● 狂野模式覆盖注入
  396.   #--------------------------------------------------------------------------
  397.   def define_wild_methods
  398.     return unless USE_WILD_MODE
  399.     v = instance_variables.select {|i| instance_variable_get(i).is_a?(Numeric)}
  400.     v.each do |i|
  401.       next if i == "@id"
  402.       var = i[1..-1]
  403.       get_method = var.to_sym; wild_get = "_#{var}".to_sym
  404.       set_method = "#{var}=".to_sym; wild_set = "_#{var}=".to_sym
  405.       self.class.send :define_method, get_method do
  406.         send wild_get, instance_variable_get(i)
  407.       end
  408.       self.class.send :define_method, set_method do |value|
  409.         send wild_set, value
  410.         instance_variable_set(i, value)
  411.       end
  412.     end
  413.   end
  414.   #--------------------------------------------------------------------------
  415.   # ● 工具方法:扁平化数组
  416.   #--------------------------------------------------------------------------
  417.   def flat_array(param)
  418.     param.to_a.map {|f| f.to_a}.flatten
  419.   end
  420. end
  421.  
  422. #==============================================================================
  423. # ■ RPG 模块的植入
  424. #------------------------------------------------------------------------------
  425. #   以下植入14个数据库内容模块(含地图数据和事件数据)
  426. #==============================================================================
  427. module RPG
  428.   [Actor, Class, Enemy, State, Animation, Tileset, MapInfo, Event].each do |c|
  429.     c.send :include, DataNoteCore
  430.     c.send :define_method, :name do
  431.       @name1 ||= (@name.sub(DataNoteCore::SEP_REGEX) {|s| ""}).strip
  432.     end
  433.     c.send :define_method, :name= do |value|
  434.       @name1 = value.strip
  435.       @name = @name1 + DataNoteCore::SEPARATOR + note
  436.     end
  437.     c.new.define_wild_methods unless c == RPG::Event
  438.   end
  439.   [Item, Skill, Weapon, Armor].each do |c|
  440.     c.send :include, DataNoteCore
  441.     c.send :define_method, :description do
  442.       @description1 ||= (@description.sub(DataNoteCore::SEP_REGEX) {|s| ""}).strip
  443.     end
  444.     c.send :define_method, :description= do |value|
  445.       @description1 = value.strip
  446.       @description = @description1 + DataNoteCore::SEPARATOR + note
  447.     end
  448.     c.new.define_wild_methods
  449.   end
  450.   [Troop, CommonEvent].each do |c|
  451.     c.send :include, DataNoteCore
  452.   end
  453. end
  454.  
  455. #==============================================================================
  456. # ■ Game_Event
  457. #==============================================================================
  458. class Game_Event
  459.   include DataNoteCore
  460. end

公共事件的超长备注写法示例:


评分

参与人数 5星屑 +250 +5 收起 理由
灯笼菜刀王 + 1 神之脚本
RyanBern + 250 + 1 精品文章plus
hyrious + 1 塞糖
porlutia + 1 塞糖
张咚咚 + 1 塞糖

查看全部评分

SailCat (小猫子·要开心一点) 共上站 24 次,发表过 11 篇文章 上 次 在: [2006年01月28日11:41:18 星期六] 从 [162.105.120.91] 到本站一游。

Lv4.逐梦者 (版主)

梦石
0
星屑
9532
在线时间
5073 小时
注册时间
2013-6-21
帖子
3580

开拓者贵宾剧作品鉴家

2
发表于 2017-10-14 23:55:43 | 只看该作者
没太想明白为什么要重新定义 description 和 description= 这两个方法。个人认为只定义 description 就足够了(返回 @description 处理后的部分即可)。description= 这个方法调用的场合非常少,正常游戏不应该去调用它(除非在运行时一定要改动数据库)。

然后,建议使用元编程来免去大量重复的篇幅,例如
RUBY 代码复制
  1. class A; end
  2. class B; end
  3. class C; end
  4.  
  5. [A, B, C].each do |i|
  6.   i.send :define_method, :hello do
  7.     puts "hello world"
  8.   end
  9. end
  10.  
  11. A.new.hello  # hello world
  12. B.new.hello  # hello world
  13. C.new.hello  # hello world

点评

也可以用模块的 included 钩子  发表于 2017-10-15 07:45
↓ 见层主的示例代码  发表于 2017-10-15 07:45
后面那里用的是include模块接口,元编程的方法试了不管用。把name重定义在Data_Note里,根本覆盖不掉原来的方法。  发表于 2017-10-15 02:48

评分

参与人数 1星屑 +20 收起 理由
guoxiaomi + 20 友好交流

查看全部评分

回复 支持 反对

使用道具 举报

Lv3.寻梦者 (版主)

…あたしは天使なんかじゃないわ

梦石
0
星屑
2208
在线时间
4033 小时
注册时间
2010-10-4
帖子
10779

开拓者贵宾

3
发表于 2017-10-15 07:47:08 | 只看该作者
本帖最后由 taroxd 于 2017-10-15 07:56 编辑

我建议在脚本里写好可能定义的字段,然后使用 define_method 而不是 method_missing?。method_missing? 是很强力的工具,但这里其实并不是很必要。

理由:
1. 可能定义的字段不会太多
2. typo 时增加 debug 难度,如某个地方手滑写脚本写成了 $data_actors[1].descrition
3. method_missing 不适合自省。比如查方法列表的时候查不到这些方法,并且你也没有重定义 respond_to?
4. 如果一定要用 method_missing 避免在脚本里写出所有字段,请把这类方法加一个前缀(如 xxx_),在方法名不以 xxx_ 开头时,在 method_missing? 中调用 super。同时重定义 respond_to?。在 method_missing? 中调用某一个方法之后,最好使用 define_method 或者 class_eval 真正定义这个方法,无论是从效率还是从自省的角度来说。前缀的必要性还体现在,如果备注里有一个 name 字段和默认的字段重合,emmmm...
5. 觉得第 4 条好麻烦?还是用 define_method 吧。使用 define_method 可以不加前缀,因为在 define_method 的时候就可以检查方法是否已经被定义

@RyanBern :description= 应该是原本数据库自带的方法,覆盖定义后使得该方法正常运行。

点评

预定义字段就不能模拟va mv 了。重名的问题,get_param(name),直接用方法名本来就是设计成语法糖……typo了会返回nil  发表于 2017-10-15 16:34
我其实的是,反正几乎用不到 description=,不正常运行也无所谓(  发表于 2017-10-15 09:12

评分

参与人数 1星屑 +20 收起 理由
RyanBern + 20 提出了醋瞎的建议

查看全部评分

回复 支持 反对

使用道具 举报

Lv5.捕梦者 (版主)

遠航の猫咪

梦石
3
星屑
23186
在线时间
2387 小时
注册时间
2005-10-15
帖子
1166

开拓者

4
 楼主| 发表于 2017-10-15 18:38:46 | 只看该作者
本帖最后由 SailCat 于 2017-10-15 18:43 编辑
taroxd 发表于 2017-10-15 07:47
我建议在脚本里写好可能定义的字段,然后使用 define_method 而不是 method_missing?。method_missing? 是 ...

更新了1.1版本,楼上的几个问题简单说一下:

1. VA和MV的备注字段就是个字符串,理论上可以写任何东西,没有理由非要规定XP的备注只能定义有限的集合。我这里只是数据库内容的扩展插件,具体要扩展什么东西,我不可能预知。
2. 如果不用method_missing而是去定义方法,就无法做到我说的“方便书写备注”的作用了。比如要给技能设定冷却,一共100个技能,85个小招不用冷却,15个大招需要冷却,就没有必要每一个去写#cd=x,只要把大招写上#cd=x,小招留空,最后植入脚本用.cd(0)就可以了。开关式的,理论上也只用定义true的项目就可以了(因为ruby把nil和false都解释为假),当然,我刚修改的新版本显式的加了false的设定。
3. 我是为了备注功能可以方便和通用,不是最大限度的追求代码好看。元编程刚才测试成功了,现在改成元编程方式了,非常感谢。但如果硬要避开method_missing的话,脚本使用者备注的书写方法压力会很大。
4. 没定义respond_to?导致不报错的情况:调用未定义且没有默认值的标识会返回nil,对nil进行大部分常规操作都会报错,这里不报错就那里报错,而且错误都一样(NoMethodError),并不存在调试不便的问题。
5. 加前缀的问题,不魔改编辑器的话,XP内部能用的description只有100个字符,name只有30个字符……既然是备注,我还是给用户留点地方吧,标识符用户想写短我没必要非要让他写长……

点评

↓ 所以我楼下第二段代码也写了 method_missing 的方法  发表于 2017-10-16 14:05
↓实名反对“要求使用者在脚本里面的配置部分加上 "cd"” 这种操作  发表于 2017-10-16 11:19
如果觉得用户配置麻烦,至少把 3L 的 4 做一下吧。另外看你第 4 点,是不是没明白 respond_to? 是做什么用的?虽然是个细节,但是重定义一下没什么坏处  发表于 2017-10-15 20:41
我看你一直在说“备注的书写压力大”;但使用 define_method 代替 method_missing 完全没有影响备注的书写方式。  发表于 2017-10-15 20:39
define_method 唯一比 method_missing? 不便的地方是必须预先知道用户想要定义 "cd" 这个东西,这是可以用脚本中的配置实现的。  发表于 2017-10-15 20:37

评分

参与人数 1星屑 +20 收起 理由
guoxiaomi + 20 塞糖

查看全部评分

SailCat (小猫子·要开心一点) 共上站 24 次,发表过 11 篇文章 上 次 在: [2006年01月28日11:41:18 星期六] 从 [162.105.120.91] 到本站一游。
回复 支持 反对

使用道具 举报

Lv3.寻梦者 (版主)

…あたしは天使なんかじゃないわ

梦石
0
星屑
2208
在线时间
4033 小时
注册时间
2010-10-4
帖子
10779

开拓者贵宾

5
发表于 2017-10-15 20:52:21 | 只看该作者
本帖最后由 taroxd 于 2017-10-15 21:05 编辑
SailCat 发表于 2017-10-15 18:38
更新了1.1版本,楼上的几个问题简单说一下:

1. VA和MV的备注字段就是个字符串,理论上可以写任何东西, ...

具体来说,我想表达的是这个意思(代码未经实际测试,只是用来表达意思)
RUBY 代码复制
  1. # using define_method
  2. module Data_Note
  3.   # for users to configure
  4.   NOTE_TYPE_LIST = ["cd"]
  5.  
  6.   NOTE_TYPE_LIST.each do |prop|
  7.     define_method prop do |default = nil|
  8.       get_note(prop, default)
  9.     end
  10.   end
  11. end


RUBY 代码复制
  1. # using method_missing
  2. module Data_Note
  3.   METHOD_PREFIX = 'xxx_'
  4.   def method_missing(method_name, *args, &block)
  5.     prop = method_name.to_s   
  6.     # when prefix does not match, call super to invoke other handlers or raise an exception
  7.     return super unless prop.sub!(/^#{METHOD_PREFIX}/, '')
  8.     # define the method to improve performance   
  9.     # Also, method calls for introspection, such as Data_Note.instance_methods, will return the correct result
  10.     Data_Note.send :define_method, method_name do |default = nil|
  11.       get_note(prop, default)
  12.     end
  13.     # return the value.
  14.     # When too many arguments are given, an exception will be raised here.
  15.     get_note(prop, *args)
  16.   end
  17.  
  18.   # use respond_to_missing? for RUBY_VERSION >= "1.9"
  19.   def respond_to?(method_name, *)
  20.     method_name.to_s.start_with?(METHOD_PREFIX) || super
  21.   end
  22. end









点评

查到了,default = nil的=nil要去掉……  发表于 2017-10-22 23:42
RGSS1的1.81版下面,上述代码测试失败…… Data_Note.send,报错 Data_Note::send,报错 self.send,报错 self.class.send,报错……我再研究研究  发表于 2017-10-22 23:38
回复 支持 反对

使用道具 举报

Lv5.捕梦者 (版主)

遠航の猫咪

梦石
3
星屑
23186
在线时间
2387 小时
注册时间
2005-10-15
帖子
1166

开拓者

6
 楼主| 发表于 2017-10-23 01:39:32 | 只看该作者
update v1.2自顶,见主楼内容
SailCat (小猫子·要开心一点) 共上站 24 次,发表过 11 篇文章 上 次 在: [2006年01月28日11:41:18 星期六] 从 [162.105.120.91] 到本站一游。
回复 支持 反对

使用道具 举报

Lv4.逐梦者

梦石
0
星屑
9677
在线时间
570 小时
注册时间
2017-9-28
帖子
208
7
发表于 2017-10-23 08:33:19 | 只看该作者
变成 location.search
RUBY 代码复制
  1. SEPARATOR = "?"
  2.   ...
  3.   def analyze
  4.     ...
  5.     note_array ||= @note[1, @note.length - 1].split("&")


点评

哈哈,如果MV没有备注还真可以这么搞……  发表于 2017-10-23 08:40

评分

参与人数 2星屑 +20 +1 收起 理由
RyanBern + 20 醋瞎喵喵喵
SailCat + 1 我很赞同

查看全部评分

喵喵喵
回复 支持 反对

使用道具 举报

Lv5.捕梦者 (版主)

遠航の猫咪

梦石
3
星屑
23186
在线时间
2387 小时
注册时间
2005-10-15
帖子
1166

开拓者

8
 楼主| 发表于 2017-10-23 10:40:06 | 只看该作者
update 1.3 并增补一个范例实装插件
SailCat (小猫子·要开心一点) 共上站 24 次,发表过 11 篇文章 上 次 在: [2006年01月28日11:41:18 星期六] 从 [162.105.120.91] 到本站一游。
回复 支持 反对

使用道具 举报

Lv5.捕梦者 (版主)

遠航の猫咪

梦石
3
星屑
23186
在线时间
2387 小时
注册时间
2005-10-15
帖子
1166

开拓者

9
 楼主| 发表于 2017-10-27 19:34:15 | 只看该作者
update 1.5 备注的长度不再受限
SailCat (小猫子·要开心一点) 共上站 24 次,发表过 11 篇文章 上 次 在: [2006年01月28日11:41:18 星期六] 从 [162.105.120.91] 到本站一游。
回复 支持 反对

使用道具 举报

Lv5.捕梦者 (版主)

遠航の猫咪

梦石
3
星屑
23186
在线时间
2387 小时
注册时间
2005-10-15
帖子
1166

开拓者

10
 楼主| 发表于 2017-10-28 23:56:28 | 只看该作者
update 1.6 并补充第2个范例,以后的实装插件将独立发布
SailCat (小猫子·要开心一点) 共上站 24 次,发表过 11 篇文章 上 次 在: [2006年01月28日11:41:18 星期六] 从 [162.105.120.91] 到本站一游。
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册会员

本版积分规则

拿上你的纸笔,建造一个属于你的梦想世界,加入吧。
 注册会员
找回密码

站长信箱:[email protected]|手机版|小黑屋|无图版|Project1游戏制作

GMT+8, 2024-11-14 13:42

Powered by Discuz! X3.1

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表