Большие события (XP)

# 0 for normal large # X0 | X00 # 00 | 000 ETC # | 000 # 1 for reverse large # 00 | 000 # X0 | 000 ETC # | X00 # 2 for flood based large ( cases 1 and 2 size shown below ) # 0 | 0 # 0X0 | 000 # 0 | 00X00 ETC # | 000 # | 0 #

# BIG events script # автор: caveman # версия 1.2.0 Добавлено задание Bounding Box в комментах события # версия 1.2.1. Исправлено несрабатывание события, когда оно лежит на непроходимом участке карты # Скрипт считает большие по размеру евенты как маленькие и позволяет # сталкиваться и взаимодействовать с ними адекватно class Game_Character # новые параметры - сдвиги относительно клетки события, # исходя из которых надо расчитывать столкновения # # [] # []E[] # [] # attr_accessor :x_sub attr_accessor :x_add attr_accessor :y_sub attr_accessor :y_add alias bigevent_initialize initialize def initialize @x_sub=0 @x_add=0 @y_sub=0 @y_add=0 bigevent_initialize end def setup_boxes(dispose) unless dispose && @list.nil? for command in @list if command.code == 108 && command.parameters[0].include?("[bbox") command.parameters[0].gsub(/\[[Bb][Bb][Oo][Xx]\|(.+?)\|(.+?)\|(.+?)\|(.+?)\]/) do @x_sub = $1.to_s.to_i @x_add = $2.to_s.to_i @y_sub = $3.to_s.to_i @y_add = $4.to_s.to_i end end end end end def set_touch_shifts(x_sub, x_add, y_sub, y_add) @x_sub=x_sub @x_add=x_add @y_sub=y_sub @y_add=y_add return end def event_touch(x, y) for i in @x - x_sub..@x + x_add for j in @y - y_sub..@y + y_add if x == i && y == j return true end end end return false end # так как положение события не всегда совпадает с местом столкновения - # то передадим координаты столкновения def over_trigger1?(x,y) if @character_name != "" and not @through return false end unless $game_map.passable?(x, y, 0) return false end return true end alias bigevent_passable? passable? def passable?(x, y, d) # 21 4 new_x = x + (d == 6 ? 1 : d == 4 ? -1 : 0) new_y = y + (d == 2 ? 1 : d == 8 ? -1 : 0) unless $game_map.valid?(new_x, new_y) return false end if @through return true end unless $game_map.passable?(x, y, d, self) return false end unless $game_map.passable?(new_x, new_y, 10 - d) return false end for event in $game_map.events.values if event.event_touch(new_x, new_y) unless event.through if self != $game_player return false end if event.character_name != "" return false end end end end if $game_player.x == new_x and $game_player.y == new_y unless $game_player.through if @character_name != "" return false end end end return true end end # ===================================================================== # class Game_Player #-------------------------------------------------------------------------- alias big_event_check_event_trigger_here check_event_trigger_here def check_event_trigger_here(triggers) result = false if $game_system.map_interpreter.running? return result end for event in $game_map.events.values if event.event_touch(@x, @y) and triggers.include?(event.trigger) if not event.jumping? and event.over_trigger1?(@x,@y) event.start result = true end end end return result end #-------------------------------------------------------------------------- alias big_event_check_event_trigger_there check_event_trigger_there def check_event_trigger_there(triggers) result = false if $game_system.map_interpreter.running? return result end new_x = @x + (@direction == 6 ? 1 : @direction == 4 ? -1 : 0) new_y = @y + (@direction == 2 ? 1 : @direction == 8 ? -1 : 0) for event in $game_map.events.values if event.event_touch(new_x, new_y) and triggers.include?(event.trigger) if not event.jumping? and not event.over_trigger1?(@x,@y) event.start result = true end end end if result == false if $game_map.counter?(new_x, new_y) new_x += (@direction == 6 ? 1 : @direction == 4 ? -1 : 0) new_y += (@direction == 2 ? 1 : @direction == 8 ? -1 : 0) for event in $game_map.events.values if event.event_touch(new_x, new_y) and triggers.include?(event.trigger) if not event.jumping? and not event.over_trigger1?(@x,@y) event.start result = true end end end end end return result end #-------------------------------------------------------------------------- alias big_event_check_event_trigger_touch check_event_trigger_touch def check_event_trigger_touch(x, y) result = false if $game_system.map_interpreter.running? return result end for event in $game_map.events.values if event.event_touch(x, y) and [1,2].include?(event.trigger) if not event.jumping? and not event.over_trigger? event.start result = true end end end return result end end # ===================================================================== # class Game_Map alias bigevent_passable? passable? def passable?(x, y, d, self_event = nil) unless valid?(x, y) return false end bit = (1 << (d / 2 - 1)) & 0x0f for event in events.values if event.tile_id >= 0 and event != self_event and event.event_touch(x, y) and not event.through if @passages[event.tile_id] & bit != 0 return false elsif @passages[event.tile_id] & 0x0f == 0x0f return false elsif @priorities[event.tile_id] == 0 return true end end end for i in [2, 1, 0] tile_id = data[x, y, i] if tile_id == nil return false elsif @passages[tile_id] & bit != 0 return false elsif @passages[tile_id] & 0x0f == 0x0f return false elsif @priorities[tile_id] == 0 return true end end return true end #-------------------------------------------------------------------------- alias bigevent_check_event check_event def check_event(x, y) for event in $game_map.events.values if event.event_touch(x, y) return event.id end end end # Метод для назначения сдвигов столкновений def set_touch_shifts(ev_id, x_sub, x_add, y_sub, y_add) events[ev_id].set_touch_shifts(x_sub, x_add, y_sub, y_add) return end end