ТЕМА: [XP]Параллакс - Попиксельное смещение для ивентов

class Game_Character
  attr_accessor :ox
  attr_accessor :oy
  alias some_def initialize
  def initialize
    some_def
    @ox=0
    @oy=0
  end
 
  def moveto(x, y,ox=0,oy=0)
    @x = x
    @y = y
    @ox=ox
    @oy=oy
    @real_x = @x * 128+@ox*4
    @real_y = @y * 128+@oy*4
  end
 
  def moving?
    return (@real_x != @x * 128+@ox*4 or @real_y != @y * 128+@oy*4)
  end
end
 
class Game_Event < Game_Character
  alias old_refresh refresh
  def refresh
    old_refresh
    setup_by_comments
  end
 
  def setup_by_comments
    unless @erased && @list.nil?
      for command in @list
        if command.code == 108
          for i in 0...command.parameters.size
            if command.parameters[i].include?("[ox") or
              command.parameters[i].include?("[oy") then
              if command.parameters[i].scan(/\[ox[\+\-]([0-9]+)\]/)
                @ox=$1.to_i
              end
              if command.parameters[i].scan(/\[oy[\+\-]([0-9]+)\]/)
                @oy=$1.to_i
              end
              moveto(@event.x, @event.y,@ox,@oy)
            end
          end
          return
        end
      end
    end
  end
end

def evmove(pk_evm_x,pk_evm_y,
pk_evm_id = @event_id)
$game_map.events[pk_evm_id].moveto(
$game_map.events[pk_evm_id].x+ 
pk_evm_x*0.03125,
$game_map.events[pk_evm_id].y+ 
pk_evm_y*0.03125)
end

def evmove(pk_evm_x,pk_evm_y,
pk_evm_id = @event_id)
$game_map.events[pk_evm_id].moveto(
$game_map.events[pk_evm_id].x+ 
pk_evm_x*0.03125,
$game_map.events[pk_evm_id].y+ 
pk_evm_y*0.03125)
end