Lumières dynamiques qui se sont carapatées

#==============================================================================
# ** Dynamic Lights
#------------------------------------------------------------------------------
# by kellessdee
# Version: 1.00
# Date: 23/05/2011
#------------------------------------------------------------------------------
# Version History:
#
#  1.00 - First release
#------------------------------------------------------------------------------
# Description:
#
#  Allows the user to set up dynamic lights on the game map
#------------------------------------------------------------------------------
# Compatibility:
#
#------------------------------------------------------------------------------
# Instructions:
#
#  To create an event as a light source, create an event and set the first
#  command as a comment. The syntax is as follows:
#      render_light filename
#      radius
#      tone_red tone_green tone_blue
#      flicker
#      glow
#      brightness
#------------------------------------------------------------------------------
# Parameters:
#
#  filename      :the light picture file
#  radius        :radius in pixels
#  tone_red      :tone red value to be mixed (0 - 255)
#  tone_green    :tone green value to be mixed (0 - 255)
#  tone_blue    :tone blue value to be mixed (0 - 255)
#  flicker      :type true if you want the lights to flicker
#  glow          :type true if you want the lights to glow
#  brightness    :the brightness of the light source (0 - 255)
#------------------------------------------------------------------------------
# Notes:
#
#  Any questions, comments or issues you may reach me at:
#
#    kellessdee@gmail.com
#    http://www.rmxpunlimited.com/forums (look for kellessdee)
#    http://wakingdreams.weebly.com/
#
#==============================================================================

#==============================================================================
# ** Sprite_Light_Source
#------------------------------------------------------------------------------
#  Displays the light on the screen
#==============================================================================
class Light_Source < Sprite
  #----------------------------------------------------------------------------
  # * Constants
  #----------------------------------------------------------------------------
  DEFAULT = 'light'
  #----------------------------------------------------------------------------
  # * Public Instance Variables
  #----------------------------------------------------------------------------
  attr_accessor :event
  #----------------------------------------------------------------------------
  # * Object Initialization
  #----------------------------------------------------------------------------
  def initialize(event, radius, tone, flicker, glow, brightness, filename)
    super()
    self.z = 1000
    self.tone = tone
    self.opacity = brightness
    self.x = (event.real_x - radius * 2 - $game_map.display_x) / 4 + 12
    self.y = (event.real_y - radius * 2 - $game_map.display_y) / 4 + 6
    bmp = filename == nil ? RPG::Cache.picture(DEFAULT) : RPG::Cache.picture(filename)
    self.bitmap = Bitmap.new(radius, radius)
    self.bitmap.stretch_blt(Rect.new(0, 0, radius, radius), bmp, bmp.rect)
    @radius = radius
    @brightness = brightness
    @event = event
    @flicker = flicker
    @glow = glow
    @step = 0.001
    @flicker_count = -1
    @count = 0
  end
  #----------------------------------------------------------------------------
  # * Update Frame
  #----------------------------------------------------------------------------
  def update
    # Update flicker effect
    if @flicker
      self.opacity += rand(5) * @flicker_count
      @flicker_count = -@flicker_count if self.opacity >= @brightness || self.opacity <= 0
    end
    # Update Glow effect
    if @glow
      self.zoom_x += @step
      self.zoom_y += @step
      @count += 1
      if @count == 220
        @step = -@step
        @count = 0
      end
    end
    self.x = (@event.real_x - (@radius * 2).to_f * self.zoom_x - $game_map.display_x) / 4 + 12
    self.y = (@event.real_y - (@radius * 2).to_f * self.zoom_y - $game_map.display_y) / 4 + 6
  end
end
#==============================================================================
# ** Spriteset_Map
#------------------------------------------------------------------------------
#  Redefine initialization to create light array
#  Redefine update to update light array
#  Redefine dispose to destroy light array
#  Added render light method to set up light array
#==============================================================================
class Spriteset_Map
  #----------------------------------------------------------------------------
  # * Method Aliases
  #----------------------------------------------------------------------------
  unless self.method_defined?(:new_light_render_init)
    alias :new_light_render_init :initialize
  end
  unless self.method_defined?(:new_light_render_updt)
    alias :new_light_render_updt :update
  end
  unless self.method_defined?(:new_light_render_disp)
    alias :new_light_render_disp :dispose
  end
  #----------------------------------------------------------------------------
  # * Object Initialization
  #----------------------------------------------------------------------------
  def initialize
    @light_source = []
    render_light_source
    new_light_render_init
  end
  #----------------------------------------------------------------------------
  # * Update Frame
  #----------------------------------------------------------------------------
  def update
    @light_source.each {|light| light.update } unless @light_source == []
    new_light_render_updt
  end
  #----------------------------------------------------------------------------
  # * Dispose Object
  #----------------------------------------------------------------------------
  def dispose
    new_light_render_disp
    @light_source.each {|light| light.dispose }
    @light_source = []
  end
  #----------------------------------------------------------------------------
  # * Render Light Source
  #----------------------------------------------------------------------------
  def render_light_source
    $game_map.events.values.each {|event|
      next if event.list == nil
      if event.list[0].code == 108 && event.list[0].parameters[0].split[0] == 'render_light'
        # Get file name
        filename = event.list[0].parameters[0].split[1]
        parms = []
        (1..5).each {|i|
          if event.list[i].code == 108
            parms << event.list[i].parameters
          end
        }
        5.times {|i| parms[i] = [0] if parms[i] == [nil] }
        # Get Radius
        rad = parms[0][0].to_i
        t = parms[1][0].split
        ton = Tone.new(-t[0].to_i, -t[1].to_i, -t[2].to_i)
        fli = (parms[2] == ['true'])
        glo = (parms[3] == ['true'])
        bri = parms[4][0].to_i
        @light_source << Light_Source.new(event, rad, ton, fli, glo, bri, filename)
        @light_source << Light_Source.new(event, rad + 50, ton, fli, glo, bri - 25, filename)
        @light_source << Light_Source.new(event, rad + 100, ton, fli, glo, bri - 50, filename)
      end
    }
  end
end