Project1

标题: 区域扩充 [打印本页]

作者: feizhaodan    时间: 2012-3-1 18:12
标题: 区域扩充
本帖最后由 feizhaodan 于 2012-10-8 17:32 编辑

因为在RMVA里面地图也有了备注栏,所以试着活用了一下。
所有的功能都与区域有关。
  1. #==============================================================================
  2. # ■ Game_Map
  3. #------------------------------------------------------------------------------
  4. #  管理地图的类。拥有卷动地图以及判断通行度的功能。
  5. #   本类的实例请参考 $game_map 。
  6. #    添加内容:添加读取地图备注内容并更改一部分通行判定。alias:2个,新定义:2个
  7. #==============================================================================

  8. class Game_Map
  9.   #--------------------------------------------------------------------------
  10.   # ● セットアップ
  11.   #     map_id : マップ ID
  12.   #     enable : 所属レイヤーの変更
  13.   #--------------------------------------------------------------------------
  14.   alias region_effect_setup setup
  15.   def setup(map_id)
  16.     @encountwalk_region = {}
  17.     @passagechange_region = {}
  18.     @canjump_region = {}
  19.     @region_switch = {}
  20.     @forcemove_region = {}
  21.     @move_diag_region = {}
  22.     region_effect_setup(map_id)
  23.     @map.note.each_line{|line|
  24.     case line
  25.     when /\<(?:遇敌步数更改|ENCOUNTWALK_REGION)[ ]**(\d+)(?:\,(\d+))*\>/
  26.       @encountwalk_region[$1.to_i] = $2 == nil ? 0 : $2.to_i
  27.     when /\<(?:更改通行区域|PASSAGECHANGE_REGION)[ ]*(\d+)(?:\,(\d+))*\>/
  28.       push_passage_region($1.to_i,$2)
  29.     when /\<(?:可跳跃区域|JUMP_REGION)[ ]*(\d+)(?:\,([2468]+))*\>/
  30.       push_jump_region($1.to_i,$2)
  31.     when /\<(?:区域开关|REGION_SWITCH)[ ]*(\d+)(?:\,(\d+))*\>/
  32.       @region_switch[$1.to_i] = $2.to_i
  33.     when /\<(?:强制移动区域|FORCEMOVE_REGION)[ ]*(\d+)(?:\,([2468]+))*\>/
  34.       @forcemove_region[$1.to_i] = $2.to_i
  35.     when /\<(?:斜向移动|MOVE_DIAG)[ ]*(\d+)(?:\,([28]+))\>/
  36.       @move_diag_region[$1.to_i] = $2.to_i
  37.     end
  38.     }
  39.   end
  40.   #--------------------------------------------------------------------------
  41.   # ● 添加通行区域
  42.   #--------------------------------------------------------------------------
  43.   def push_passage_region(region_id,direction)
  44.     directions = []
  45.     if direction
  46.       direction.scan(/./){|d|
  47.       case d
  48.       when /2/
  49.         directions.push(0x0001)
  50.       when /4/
  51.         directions.push(0x0002)
  52.       when /6/
  53.         directions.push(0x0004)
  54.       when /8/
  55.         directions.push(0x0008)
  56.       end
  57.       }
  58.     end
  59.     @passagechange_region[region_id] = directions
  60.   end
  61.   #--------------------------------------------------------------------------
  62.   # ● 添加跳跃区域
  63.   #--------------------------------------------------------------------------
  64.   def push_jump_region(region_id,direction)
  65.     directions = []
  66.     if direction
  67.       direction.scan(/./){|d|
  68.       case d
  69.       when /2/
  70.         directions.push(2)
  71.       when /4/
  72.         directions.push(4)
  73.       when /6/
  74.         directions.push(6)
  75.       when /8/
  76.         directions.push(8)
  77.       end
  78.       }
  79.     else
  80.       directions = [2,4,6,8]
  81.     end
  82.     @canjump_region[region_id] = directions
  83.   end
  84.   alias region_change_check_passage check_passage
  85.   #--------------------------------------------------------------------------
  86.   # ● 通行检查
  87.   #     alias:添加区域通行判定
  88.   #--------------------------------------------------------------------------
  89.   def check_passage(x, y, bit)
  90.     change = @passagechange_region[region_id(x,y)]
  91.     return change.include?(bit) if change
  92.     return region_change_check_passage(x,y,bit)
  93.   end
  94.   attr_reader :encountwalk_region
  95.   attr_reader :canjump_region
  96.   attr_reader :region_switch
  97.   attr_reader :forcemove_region
  98.   attr_reader :move_diag_region
  99. end
  100. #==============================================================================
  101. # ■ Game_Player
  102. #------------------------------------------------------------------------------
  103. #  处理玩家人物的类。拥有事件启动的判定、地图的卷动等功能。
  104. #   本类的实例请参考 $game_player 。
  105. #    添加内容:添加有关移动的处理内容。 alias:3个 新定义:3个
  106. #==============================================================================

  107. class Game_Player < Game_Character
  108.   alias _Kine_no_encount_region_encounter_progress_value encounter_progress_value
  109.   #--------------------------------------------------------------------------
  110.   # ● 获取遇敌进行值
  111.   #     alias:在结果添加区域遇敌值
  112.   #--------------------------------------------------------------------------
  113.   def encounter_progress_value
  114.     value = _Kine_no_encount_region_encounter_progress_value
  115.     v2 = $game_map.encountwalk_region[region_id]
  116.     value = v2 if v2
  117.     value
  118.   end
  119.   alias jump_move_by_input move_by_input
  120.   #--------------------------------------------------------------------------
  121.   # ● 由方向键移动
  122.   #     alias:添加强制移动区域与跳跃处理
  123.   #--------------------------------------------------------------------------
  124.   def move_by_input
  125.     @input_jump = false
  126.     return if force_move_by_region
  127.     jump_move_by_input
  128.     unless @move_succeed
  129.       jump_by_input(Input.dir4)
  130.     end
  131.   end
  132.   #--------------------------------------------------------------------------
  133.   # ● 由方向键跳跃
  134.   #--------------------------------------------------------------------------
  135.   def jump_by_input(d)
  136.     return if d == 0
  137.     x1 = $game_map.x_with_direction(@x,d)
  138.     y1 = $game_map.y_with_direction(@y,d)
  139.     x2 = $game_map.x_with_direction(x1,d)
  140.     y2 = $game_map.y_with_direction(y1,d)
  141.     if can_jump?(x1,x2,y1,y2,d)
  142.       jump(x2 - @x,y2 - @y)
  143.       @input_jump = true
  144.       @move_succeed = true
  145.     end
  146.   end
  147.   #--------------------------------------------------------------------------
  148.   # ● 可以跳跃?
  149.   #--------------------------------------------------------------------------
  150.   def can_jump?(x1,x2,y1,y2,d)
  151.     return false unless movable?
  152.     return false unless [2,4,6,8].any?{|di| map_passable?(x2,y2,di)}
  153.     return false if $game_map.canjump_region[$game_map.region_id(x1,y1)] == nil
  154.     return false unless $game_map.canjump_region[$game_map.region_id(x1,y1)].include?(d)
  155.     return true
  156.   end
  157.   #--------------------------------------------------------------------------
  158.   # ● 由区域强制移动
  159.   #--------------------------------------------------------------------------
  160.   def force_move_by_region
  161.     return false if !movable? || $game_map.interpreter.running?
  162.     if $game_map.forcemove_region.include?(region_id)
  163.       move_straight($game_map.forcemove_region[region_id])
  164.       return true
  165.     end
  166.     return false
  167.   end
  168.   alias region_switch_update update
  169.   #--------------------------------------------------------------------------
  170.   # ● 更新画面
  171.   #     alias:添加区域开关控制内容
  172.   #--------------------------------------------------------------------------
  173.   def update
  174.     last_region_id = region_id
  175.     region_switch_update
  176.     if last_region_id != region_id
  177.       $game_map.region_switch.each{|k,v|
  178.         $game_switches[v] = region_id == k
  179.       }
  180.     end
  181.   end
  182. end
  183. #==============================================================================
  184. # ■ Game_CharacterBase
  185. #------------------------------------------------------------------------------
  186. #  管理地图人物的基本类。是所有地图人物类的共通父类。拥有坐标、图片等基本信息。
  187. #==============================================================================

  188. class Game_CharacterBase
  189.   #--------------------------------------------------------------------------
  190.   # ● 径向移动
  191.   #     d       : 方向(2,4,6,8)
  192.   #     turn_ok : 是否可以改变方向
  193.   #--------------------------------------------------------------------------
  194.   alias move_diag_region_move_straight move_straight
  195.   def move_straight(d, turn_ok = true)
  196.     if $game_map.move_diag_region.keys.include?(region_id)
  197.       if [4,6].include?(d)
  198.         x2 = $game_map.round_x_with_direction(@x,d)
  199.         d2 = $game_map.move_diag_region[region_id]
  200.         [d2,10-d2].collect{|yd| $game_map.round_y_with_direction(@y,yd)}.each do |y2|
  201.           if $game_map.region_id(x2,y2) == region_id
  202.             vert = d
  203.             horz = y2 - @y > 0 ? 2 : 8
  204.             return move_diagonal(vert,horz)
  205.           end
  206.         end
  207.       end
  208.     end
  209.     move_diag_region_move_straight(d,turn_ok)
  210.   end
  211. end
复制代码
现在有六个功能。
1:更改特定区域内的遇敌步数增加量。
使用方法:
在地图的备注栏内输入
  1. <遇敌步数更改 区域ID,更改后的增加量>
复制代码
在区域ID输入要使生效的区域ID,更改后的增加量如说明。
比如,本来走一步+1的位置,设置了这个区域后,将会增加你设置的量。
可以省略为:
  1. <遇敌步数更改 区域ID>
复制代码
这个则将该区域内的遇敌步数改为0。

2,更改放置了区域的图块的通行度
在地图的备注栏内输入
  1. <更改通行区域 区域ID,方向>
复制代码
区域ID如上,方向可以输入的数字为2468
2代表向下,4代表向左,6代表向右,8代表向上,可以同时输入多个。若什么数字也没有输入默认为全方向通行。若想要让该图块无法行走请输入2468以外的数字。
比如,你想让放置区域2的图块可以向上向左走,则输入
  1. <更改通行区域 2,86>
复制代码
3,设置特定区域可以跳过
这个比较像雪流星前辈发布的飞檐走壁 - 仿黄金太阳中跳格子 VA 版
不同的是,雪流星前辈的是自动判定,而这个是手动设置。
在想要生效的地图的备注栏内输入
  1. <可跳跃区域 区域ID,方向>
复制代码
区域ID,方向都和上一项相同。
放置位置为你想要可以跳过的位置。如宽为一个河,想要可以跳过则放在河上,而不是两岸。

4,进入特定区域打开特定开关。
在想要生效的地图的备注栏内输入
  1. <区域开关 区域ID,开关ID>
复制代码
区域ID如上,开关ID则是在玩家进入该区域时打开的开关的ID。
在玩家离开该区域时自动关闭。

5,进入特定区域时强制时玩家向特定方向移动
在想要生效的地图的备注栏输入
  1. <强制移动区域 区域ID,方向>
复制代码
区域ID,方向如上。不同的是,方向只能够输入一个。再多就无效。

6,使特定格子成为斜向通行 New!
在想要生效的地图的备注栏输入
  1. <斜向移动 区域ID,方向>
复制代码
区域ID如上,方向只可以使用2和8,分别代表从右向左移动时的默认上下移动量。
说明:

若如图配置,则当尝试从右向左通行1号区域的最左边的图块时,则会向下移动,而通行2号区域则会向上移动。反而从左向右移动时,因为只有一个方向有区域,所以会向那个区域移动。
作者: 仲秋启明    时间: 2012-3-1 18:25
附加:区域控制事件
  1. class Game_Player < Game_Character

  2. #--------------------------------------------------------------------------
  3.   # ● 获取区域 ID
  4.   #--------------------------------------------------------------------------
  5.   def region_id
  6.     $game_map.region_id(@x, @y)
  7.   end
  8. end
复制代码
调用方式:
  1. area = $game_player.region_id
  2. $game_map.events[X].start if area == M    #X代表地图上事件编号 M代表区域编号
复制代码

作者: xuzhengchi    时间: 2012-3-1 18:28
非常实用的脚本~弱弱的问句题外话:帮助文档汉化的怎么样了?
作者: 诗人的眼泪    时间: 2012-3-25 14:03
找到好东东。哈哈哈哈


‘‘──诗人的眼泪于2012-3-26 22:22补充以下内容

怎么才能让区域任何方向都无法通行呢?2468都不输按理来说不是无法通行。可是为什么变成任何方向都可以通行
’’
作者: wangzhihui    时间: 2012-11-2 11:50
好神奇。。。。。
作者: badtea    时间: 2023-9-2 20:49
功能更复杂了,也更有用了




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