Скрипт Простой Лампочки (TheoAllen - Light Effect)

**Темный** · 02.03.2015, 12:49

Есть не мало скриптов освещение и создание подсветки лампочек свечей итд.
Вопрос почему я решил добавить еще один скрипт световых эффектов?
Ответ прост объясню на примере:
Остановимся на двух системах : Система освещение от Виктора и система освещение от KHas
обе эти системы имеют один маленький изъян. Он состоит в том что свет лампочек в этих системах накладывается
на затемненный слой всей карты. По этому надо долго мучатся с подбором цветовой гаммы карты учитывая этот
момент. А данный скрипт не создает теневой слой но делает одну лишь лампочку или свечку при
этом он легко редактируется и не требует сложных настроек.

Спойлер Скрипт:

Код:

# =============================================================================
# TheoAllen - Light Effect
# Version : 1.1
# Contact : www.rpgmakerid.com (or) http://theolized.blogspot.com
# (This script documentation is written in informal indonesian language)
# =============================================================================
($imported ||= {})[:Theo_LightFX] = true
# =============================================================================
# CHANGE LOGS:
# -----------------------------------------------------------------------------
# 2013.08.03 - Bugfix at event page condition
#            - Added fading funtion
# 2013.07.25 - Finished script
# =============================================================================
=begin

  Pembukaan :
  Berlatar belakang dari keluhan beberapa orang tentang script light effect
  untuk RGSS3 yang terkadang kelewat susah konfignya. Seperti punyanya Victor
  (Walo gw belom coba seh). Dan kelewat ngelag, (punya e Khas). 
  
  Beberapa orang pengen script light effect yang simple aja, kayak script
  Thomas Edison VX buatan BulletXT & Kylock. Akhirnya gw putusin, gw bikin 
  script yang serupa.
  
  Oh iya, disini gw bukan port script T.Edison VX ke Ace. Ane cuman ngambil
  idenya doank ama cara nyetingnya. Sisanya gw bikin dari 0 tanpa nyontek
  sedikitpun.
  
  Cara penggunaan :
  Pasang script ini dibawah material namun diatas main
  Sisanya bisa diliat di konfigurasi script
  
  Terms of Use :
  Credit gw, TheoAllen. Kalo semisal u bisa ngedit2 script gw trus jadi lebih
  keren, terserah. Ane bebasin. Asal ngga ngeklaim aja. Kalo semisal mau
  dipake buat komersil, jangan lupa, gw dibagi gratisannya.

  Note :
  Karena ini inspirasi dari BulletXT, alangkah baiknya kalo kamu juga credit
  dia.

=end
# =============================================================================
# Konfigurasi :
# =============================================================================
module THEO
  module Lights
    # ------------------------------------------------------------------------
    # General Setting (Settingan umum)
    # ------------------------------------------------------------------------
    DefaultName = "le" # Nama file yang harus ada di folder Graphics/Picture
    DefaultRate = 3    # Refresh rate. Makin kecil, makin sering refresh
    # ------------------------------------------------------------------------
    # Switch ID untuk tipe2 light effect. Kamu juga bisa nambahin tipe switch
    # kamu sendiri. Dengan syarat, huruf awal harus besar. 
    # ------------------------------------------------------------------------
    Fire  = 1
    Torch = 2
    Light = 3
    # ------------------------------------------------------------------------
    # Konfigurasi mode Simple :
    # ------------------------------------------------------------------------
    # Paduan Konfig :
    # - Keyword >> Nama light effect yang nanti digunakan dalam comment
    # - RGB     >> Nilai Red,Green,Blue. Antara -255 s.d 255
    # - Zoom    >> Nilai zoom light effectnya. 1.0 = normal
    # - Opacity >> Opacity light effectnya
    # - Var     >> Makin gede, makin bervariasi nilai opacitynya
    # - Offset  >> Jarak perpindahan dari posisi original
    # - Blend   >> Tipe blend. Pilih antara 0 - 2
    # - Switch  >> Switch ID untuk disable.
    #
    # Penggunaan dalam comment :
    # Gunakan comment pada event <light: keyword>
    # Contohnya <light: Fire>
    # Inget, besar kecil hurufnya harus sama :v
    # ------------------------------------------------------------------------
    Database = {
    # Keyword => [  R,   G,   B, Zoom, Opacity, Var, Offset, Blend, Switch]
      "Fire"  => [128, -50,  -50, 2.0,     200,  50,      2,     0,   Fire],
      "Light" => [  0,   -50,    0, 2.0,     200,   25,      2,     0,  Light],
    
    # Tambahin sendiri kalo perlu
    }
    # ------------------------------------------------------------------------
    # Konfigurasi mode Lanjut / Advanced
    # ------------------------------------------------------------------------
    # Bagian sini adalah konfigurasi yang lebih lanjut jika kamu masi tidak
    # puas dengan konfigurasi simple diatas. Tidak disarankan ngedit bagian 
    # sini kalo ngga ngerti 
    #
    # Paduan konfig :
    # Gunakan awalan seperti ini
    # light = $data_lights["keyword"]
    #
    # Lalu tambahkan variable yang akan diubah. Misalnya gini
    # light.name = "le"
    # light.red = 100
    # light.offset = 1
    #
    # Variable2 yang dapat diubah :
    # - light.name          = ngubah nama default gambar cahaynya
    # - light.red           = unsur merah (default : 0)
    # - light.green         = unsur hijau (default : 0)
    # - light.blue          = unsur biru (default : 0)
    # - light.gray          = unsur gray (default : 0)
    # - light.blink         = jika true, maka cahaya akan ngeblink 
    # - light.blink_rate    = blink refresh rate (default : DefaultRate)
    # - light.opacity       = nilai opacity (default : 255)
    # - light.opacity_var   = opacity variance (default : 0)
    # - light.opacity_rate  = opacity refresh rate (default : DefaultRate)
    # - light.offset        = nilai offset (default : 0)
    # - light.offset_rate   = offset refresh rate (default : DefaultRate)
    # - light.zoom          = nilai zoom (default : 1.0)
    # - light.switch        = switch id (default : 0)
    # - light.buffer_x      = Jarak X dari event (default : 0)
    # - light.buffer_y      = Jarak Y dari event (default : -15)
    # - light.fading_speed  = Kecepatan ilang muncul (default : 0)
    # - light.blend_type    = Tipe blending. Pilih antara 0 - 2 (default : 0)
    # ------------------------------------------------------------------------
    def self.load_custom_database
      
      light = $data_lights["Orb"]
      light.red = -120
      light.green = -20
      light.blue = 150
      light.zoom = 2.0
      light.buffer_y = 5
      light.opacity = 150
      light.fading_speed = 2
      
      light = $data_lights["Lamp"]
      light.name = "le"
      light.opacity = 100
      light.buffer_y = -19
      light.buffer_x = 0
      light.zoom = 1.2
      light.switch = 999
      light.opacity_var = 30
      light.opacity_rate = 1
       
      light = $data_lights["Lamp2"]
      light.name = "le2"
      light.buffer_y = 5
      light.opacity = 150
      light.opacity_var = 50
      light.opacity_rate = 1
      light.switch = 2
      
      light = $data_lights["Fire"]
      light.name = "le"
      light.opacity = 100
      light.zoom = 1.2
      light.buffer_y = -19
      light.buffer_x = 0
      light.red = 0        
      light.green = -125
      light.blue = -125
      
      light = $data_lights["Fire1"]
      light.name = "le"
      light.opacity = 100
      light.zoom = 1.5
      light.buffer_y = -19
      light.buffer_x = 0
      light.red = 0        
      light.green = -125
      light.blue = -125
      
      light = $data_lights["Orb3"]
      light.name = "le"
      light.opacity = 125
      light.zoom = 2.5
      light.buffer_y = -19
      light.buffer_x = 0
      light.red = -200       
      light.green = -200
      light.opacity_var = 50
      light.opacity_rate = 2
      
      light = $data_lights["Orb2"]
      light.red = -50
      light.green = 150
      light.blue = 20
      light.blink = true
      light.blink_rate = 30
      
     light = $data_lights["Orb4"]
      light.opacity = 150
      light.zoom = 1.5
      light.buffer_y = -13
      light.buffer_x = 0
      light.red = 50
      light.green = -200
      light.blue = -200
      light.blink = true
      light.blink_rate = 30 
    end
  end
end
# =============================================================================
# Akhir dari konfigurasi
# =============================================================================
module THEO
  module Lights
    def self.load_database
      Database.each do |key,data|
        light = $data_lights[key]
        light.red = data[0]
        light.green = data[1]
        light.blue = data[2]
        light.zoom = data[3]
        light.opacity = data[4]
        light.opacity_var = data[5]
        light.offset = data[6]
        light.blend_type = data[7]
        light.switch = data[8]
        light.offset_rate = light.opacity_rate = light.blink_rate = DefaultRate
        light.name = DefaultName
      end
    end
  end
end

module Math
  def self.radian(degree)
    return (degree.to_f/180) * Math::PI
  end
end

class Data_Light
  attr_reader :key
  attr_accessor :name
  attr_accessor :red
  attr_accessor :green
  attr_accessor :gray
  attr_accessor :blue
  attr_accessor :blink
  attr_accessor :blink_rate
  attr_accessor :opacity
  attr_accessor :opacity_rate
  attr_accessor :opacity_var
  attr_accessor :offset
  attr_accessor :offset_rate
  attr_accessor :blend_type
  attr_accessor :zoom
  attr_accessor :switch
  attr_accessor :buffer_x
  attr_accessor :buffer_y
  attr_accessor :fading_speed
  
  def initialize(key)
    @key = key
    @name = THEO::Lights::DefaultName
    @red = @green = @blue = @gray = 0
    @blink = false
    @blink_rate = 0
    @opacity = 255
    @opacity_rate = 0
    @opacity_var = 0
    @offset = 0
    @offset_rate = 0
    @blend_type = 0
    @zoom = 1.0
    @switch = 0
    @buffer_x = 0
    @buffer_y = -15
    @fading_speed = 0
  end
  
  def tone
    Tone.new(red,green,blue,gray)
  end
  
end

class << DataManager
  
  alias theo_le_load_db load_database
  def load_database
    theo_le_load_db
    load_le_database
  end
  
  def load_le_database
    $data_lights = Data_Lights.new
    THEO::Lights.load_database
    THEO::Lights.load_custom_database
  end
  
end

class Data_Lights
  
  def initialize
    @data = {}
  end
  
  def [](key)
    @data[key] ||= Data_Light.new(key)
  end
  
end

class Game_Event < Game_Character
  attr_accessor :light_key
  attr_writer :light_start_count
  
  alias theo_sle_page_settings setup_page_settings
  def setup_page_settings
    theo_sle_page_settings
    setup_light_key
  end
  
  def setup_light_key
    @light_key = ""
    @light_start_count = 0
    return unless list
    list.each do |command|
      next unless command.code == 108 || command.code == 408
      case command.parameters[0]
      when /<(?:LIGHT|light): (.*)>/i
        @light_key = $1.to_s
      when /<(?:LIGHT_START_COUNT|light start count): [ ]*(\d+)>/i
        @light_start_count = $1.to_i
      when /<(?:LIGHT_RAND_COUNT|light rand count): [ ]*(\d+)>/i
        @light_start_count = rand($1.to_i)
      end
    end
  end
  
  def light_start_count
    @light_start_count ||= 0
  end
  
end
# ----------------------------------------------------------------------------
# Unique Names for compatibility purposes :P
# ----------------------------------------------------------------------------
class Theolized_Light_Effect < Sprite
  
  def initialize(char, viewport = nil)
    super(viewport)
    @char = char
    setup(@char.light_key)
  end
  
  def setup(key)
    @key = key.nil? ? "" : key
    init_members
    return if @key.empty?
    setup_database(key)
    self.ox = self.width/2
    self.oy = self.height/2
  end
  
  def init_members
    self.bitmap = nil
    @offset = @offset_x = @offset_y = @buffer_x = @buffer_y = @opacity_var = 0
    @switch = 0
    @blink = false
    @blink_rate = @opacity_rate = @offset_rate = THEO::Lights::DefaultRate
    @op_count = @count = @char.light_start_count
    @op_fade = 0
    @ori_opacity = 255
    @opacity_offset = 0
    @show_light = true
  end
  
  def setup_database(key)
    le = $data_lights[key]
    self.bitmap = Cache.picture(le.name)
    self.tone = le.tone
    @ori_opacity=self.opacity=le.fading_speed > 0 ? le.opacity/2.0 : le.opacity
    self.blend_type = le.blend_type
    @blink = le.blink
    @blink_rate = le.blink_rate
    @opacity_rate = le.opacity_rate
    @opacity_var = le.opacity_var
    @offset = le.offset
    @offset_rate = le.offset_rate
    self.zoom_x = self.zoom_y = le.zoom
    @switch = le.switch
    @buffer_x = le.buffer_x
    @buffer_y = le.buffer_y
    @op_fade = le.fading_speed > 0 ? @ori_opacity : 0
    update_placement
    check_blink
    update_op_fade
    update_opacity
  end
  
  def check_blink
    return if @blink_rate == 0 || !@blink
    @show_light = !@show_light if (@count/@blink_rate) % 2 == 0
  end
  
  def update
    super
    setup(@char.light_key) if light_changed?
    @count += 1
    update_offset
    update_placement
    update_visibility
    update_blink
    update_op_fade
    update_opacity    
  end
  
  def update_placement
    self.x = @char.screen_x + @buffer_x + @offset_x
    self.y = @char.screen_y + @buffer_y + @offset_y
  end
  
  def update_offset
    return unless refresh_count?(@offset_rate)
    return if @offset <= 0
    @offset_x = -@offset + rand(@offset*2)
    @offset_y = -@offset + rand(@offset*2)
  end
  
  def update_visibility
    self.visible = !$game_switches[@switch] && @show_light
  end
  
  def update_blink
    return unless @blink
    return unless refresh_count?(@blink_rate)
    @show_light = !@show_light
  end
  
  def update_opacity
    self.opacity = @ori_opacity + @opacity_offset + @op_fade
    return unless refresh_count?(@opacity_rate)
    @opacity_offset = -@opacity_var + rand(@opacity_var*2)
  end
  
  def update_op_fade
    return unless $data_lights[@key].fading_speed > 0
    @op_count += $data_lights[@key].fading_speed
    @op_fade = Math.cos(Math.radian(@count)) * @ori_opacity
  end
  
  def refresh_count?(rate)
    return false if rate <= 0
    return @count % rate == 0
  end  
  
  def light_changed?
    @key != @char.light_key
  end
  
end

class Spriteset_Map
  
  alias theo_le_create_char create_characters
  def create_characters
    theo_le_create_char
    @simple_lights = []
    $game_map.events.values.each do |char|
      @simple_lights.push(Theolized_Light_Effect.new(char,@viewport2))
    end
  end
  
  alias theo_le_update update
  def update
    theo_le_update
    update_simple_lights
  end
  
  def update_simple_lights
    @simple_lights.each do |light|
      light.update
    end
  end
  
  alias theo_sle_dispose_char dispose_characters
  def dispose_characters
    theo_sle_dispose_char
    @simple_lights.each {|light| light.dispose}
  end
  
end

Инструкция к скрипту:
После того как вы вставили скрипт в свой проект
Надо создать в папке Graphics\ папку Lights
После этого поместить в нее изображение лампочки
по умолчанию это файл "le.png"
Теперь можно в секции скрипта "def self.load_custom_database"
создать или посмотреть готовые эффекты.
Чтоб добавить световой эффект в свою игру достаточно прописать
его в комментариях события например так:<light: Lamp>
Если у вас еще остались вопросы обращайтесь.
Демо:https://yadi.sk/d/iuV9P8ZfeyLcc

**Eviald** · 02.03.2015, 14:14

Сообщение от Темный

Есть не мало скриптов освещение и создание подсветки лампочек свечей итд.
Вопрос почему я решил добавить еще один скрипт световых эффектов?
Ответ прост объясню на примере:
Остановимся на двух системах : Система освещение от Виктора и система освещение от KHas
обе эти системы имеют один маленький изъян. Он состоит в том что свет лампочек в этих системах накладывается
на затемненный слой всей карты. По этому надо долго мучатся с подбором цветовой гаммы карты учитывая этот
момент. А данный скрипт не создает теневой слой но делает одну лишь лампочку или свечку при
этом он легко редактируется и не требует сложных настроек.

Спойлер Скрипт:

Код:

# =============================================================================
# TheoAllen - Light Effect
# Version : 1.1
# Contact : www.rpgmakerid.com (or) http://theolized.blogspot.com
# (This script documentation is written in informal indonesian language)
# =============================================================================
($imported ||= {})[:Theo_LightFX] = true
# =============================================================================
# CHANGE LOGS:
# -----------------------------------------------------------------------------
# 2013.08.03 - Bugfix at event page condition
#            - Added fading funtion
# 2013.07.25 - Finished script
# =============================================================================
=begin

  Pembukaan :
  Berlatar belakang dari keluhan beberapa orang tentang script light effect
  untuk RGSS3 yang terkadang kelewat susah konfignya. Seperti punyanya Victor
  (Walo gw belom coba seh). Dan kelewat ngelag, (punya e Khas). 
  
  Beberapa orang pengen script light effect yang simple aja, kayak script
  Thomas Edison VX buatan BulletXT & Kylock. Akhirnya gw putusin, gw bikin 
  script yang serupa.
  
  Oh iya, disini gw bukan port script T.Edison VX ke Ace. Ane cuman ngambil
  idenya doank ama cara nyetingnya. Sisanya gw bikin dari 0 tanpa nyontek
  sedikitpun.
  
  Cara penggunaan :
  Pasang script ini dibawah material namun diatas main
  Sisanya bisa diliat di konfigurasi script
  
  Terms of Use :
  Credit gw, TheoAllen. Kalo semisal u bisa ngedit2 script gw trus jadi lebih
  keren, terserah. Ane bebasin. Asal ngga ngeklaim aja. Kalo semisal mau
  dipake buat komersil, jangan lupa, gw dibagi gratisannya.

  Note :
  Karena ini inspirasi dari BulletXT, alangkah baiknya kalo kamu juga credit
  dia.

=end
# =============================================================================
# Konfigurasi :
# =============================================================================
module THEO
  module Lights
    # ------------------------------------------------------------------------
    # General Setting (Settingan umum)
    # ------------------------------------------------------------------------
    DefaultName = "le" # Nama file yang harus ada di folder Graphics/Picture
    DefaultRate = 3    # Refresh rate. Makin kecil, makin sering refresh
    # ------------------------------------------------------------------------
    # Switch ID untuk tipe2 light effect. Kamu juga bisa nambahin tipe switch
    # kamu sendiri. Dengan syarat, huruf awal harus besar. 
    # ------------------------------------------------------------------------
    Fire  = 1
    Torch = 2
    Light = 3
    # ------------------------------------------------------------------------
    # Konfigurasi mode Simple :
    # ------------------------------------------------------------------------
    # Paduan Konfig :
    # - Keyword >> Nama light effect yang nanti digunakan dalam comment
    # - RGB     >> Nilai Red,Green,Blue. Antara -255 s.d 255
    # - Zoom    >> Nilai zoom light effectnya. 1.0 = normal
    # - Opacity >> Opacity light effectnya
    # - Var     >> Makin gede, makin bervariasi nilai opacitynya
    # - Offset  >> Jarak perpindahan dari posisi original
    # - Blend   >> Tipe blend. Pilih antara 0 - 2
    # - Switch  >> Switch ID untuk disable.
    #
    # Penggunaan dalam comment :
    # Gunakan comment pada event <light: keyword>
    # Contohnya <light: Fire>
    # Inget, besar kecil hurufnya harus sama :v
    # ------------------------------------------------------------------------
    Database = {
    # Keyword => [  R,   G,   B, Zoom, Opacity, Var, Offset, Blend, Switch]
      "Fire"  => [128, -50,  -50, 2.0,     200,  50,      2,     0,   Fire],
      "Light" => [  0,   -50,    0, 2.0,     200,   25,      2,     0,  Light],
    
    # Tambahin sendiri kalo perlu
    }
    # ------------------------------------------------------------------------
    # Konfigurasi mode Lanjut / Advanced
    # ------------------------------------------------------------------------
    # Bagian sini adalah konfigurasi yang lebih lanjut jika kamu masi tidak
    # puas dengan konfigurasi simple diatas. Tidak disarankan ngedit bagian 
    # sini kalo ngga ngerti 
    #
    # Paduan konfig :
    # Gunakan awalan seperti ini
    # light = $data_lights["keyword"]
    #
    # Lalu tambahkan variable yang akan diubah. Misalnya gini
    # light.name = "le"
    # light.red = 100
    # light.offset = 1
    #
    # Variable2 yang dapat diubah :
    # - light.name          = ngubah nama default gambar cahaynya
    # - light.red           = unsur merah (default : 0)
    # - light.green         = unsur hijau (default : 0)
    # - light.blue          = unsur biru (default : 0)
    # - light.gray          = unsur gray (default : 0)
    # - light.blink         = jika true, maka cahaya akan ngeblink 
    # - light.blink_rate    = blink refresh rate (default : DefaultRate)
    # - light.opacity       = nilai opacity (default : 255)
    # - light.opacity_var   = opacity variance (default : 0)
    # - light.opacity_rate  = opacity refresh rate (default : DefaultRate)
    # - light.offset        = nilai offset (default : 0)
    # - light.offset_rate   = offset refresh rate (default : DefaultRate)
    # - light.zoom          = nilai zoom (default : 1.0)
    # - light.switch        = switch id (default : 0)
    # - light.buffer_x      = Jarak X dari event (default : 0)
    # - light.buffer_y      = Jarak Y dari event (default : -15)
    # - light.fading_speed  = Kecepatan ilang muncul (default : 0)
    # - light.blend_type    = Tipe blending. Pilih antara 0 - 2 (default : 0)
    # ------------------------------------------------------------------------
    def self.load_custom_database
      
      light = $data_lights["Orb"]
      light.red = -120
      light.green = -20
      light.blue = 150
      light.zoom = 2.0
      light.buffer_y = 5
      light.opacity = 150
      light.fading_speed = 2
      
      light = $data_lights["Lamp"]
      light.name = "le"
      light.opacity = 100
      light.buffer_y = -19
      light.buffer_x = 0
      light.zoom = 1.2
      light.switch = 999
      light.opacity_var = 30
      light.opacity_rate = 1
       
      light = $data_lights["Lamp2"]
      light.name = "le2"
      light.buffer_y = 5
      light.opacity = 150
      light.opacity_var = 50
      light.opacity_rate = 1
      light.switch = 2
      
      light = $data_lights["Fire"]
      light.name = "le"
      light.opacity = 100
      light.zoom = 1.2
      light.buffer_y = -19
      light.buffer_x = 0
      light.red = 0        
      light.green = -125
      light.blue = -125
      
      light = $data_lights["Fire1"]
      light.name = "le"
      light.opacity = 100
      light.zoom = 1.5
      light.buffer_y = -19
      light.buffer_x = 0
      light.red = 0        
      light.green = -125
      light.blue = -125
      
      light = $data_lights["Orb3"]
      light.name = "le"
      light.opacity = 125
      light.zoom = 2.5
      light.buffer_y = -19
      light.buffer_x = 0
      light.red = -200       
      light.green = -200
      light.opacity_var = 50
      light.opacity_rate = 2
      
      light = $data_lights["Orb2"]
      light.red = -50
      light.green = 150
      light.blue = 20
      light.blink = true
      light.blink_rate = 30
      
     light = $data_lights["Orb4"]
      light.opacity = 150
      light.zoom = 1.5
      light.buffer_y = -13
      light.buffer_x = 0
      light.red = 50
      light.green = -200
      light.blue = -200
      light.blink = true
      light.blink_rate = 30 
    end
  end
end
# =============================================================================
# Akhir dari konfigurasi
# =============================================================================
module THEO
  module Lights
    def self.load_database
      Database.each do |key,data|
        light = $data_lights[key]
        light.red = data[0]
        light.green = data[1]
        light.blue = data[2]
        light.zoom = data[3]
        light.opacity = data[4]
        light.opacity_var = data[5]
        light.offset = data[6]
        light.blend_type = data[7]
        light.switch = data[8]
        light.offset_rate = light.opacity_rate = light.blink_rate = DefaultRate
        light.name = DefaultName
      end
    end
  end
end

module Math
  def self.radian(degree)
    return (degree.to_f/180) * Math::PI
  end
end

class Data_Light
  attr_reader :key
  attr_accessor :name
  attr_accessor :red
  attr_accessor :green
  attr_accessor :gray
  attr_accessor :blue
  attr_accessor :blink
  attr_accessor :blink_rate
  attr_accessor :opacity
  attr_accessor :opacity_rate
  attr_accessor :opacity_var
  attr_accessor :offset
  attr_accessor :offset_rate
  attr_accessor :blend_type
  attr_accessor :zoom
  attr_accessor :switch
  attr_accessor :buffer_x
  attr_accessor :buffer_y
  attr_accessor :fading_speed
  
  def initialize(key)
    @key = key
    @name = THEO::Lights::DefaultName
    @red = @green = @blue = @gray = 0
    @blink = false
    @blink_rate = 0
    @opacity = 255
    @opacity_rate = 0
    @opacity_var = 0
    @offset = 0
    @offset_rate = 0
    @blend_type = 0
    @zoom = 1.0
    @switch = 0
    @buffer_x = 0
    @buffer_y = -15
    @fading_speed = 0
  end
  
  def tone
    Tone.new(red,green,blue,gray)
  end
  
end

class << DataManager
  
  alias theo_le_load_db load_database
  def load_database
    theo_le_load_db
    load_le_database
  end
  
  def load_le_database
    $data_lights = Data_Lights.new
    THEO::Lights.load_database
    THEO::Lights.load_custom_database
  end
  
end

class Data_Lights
  
  def initialize
    @data = {}
  end
  
  def [](key)
    @data[key] ||= Data_Light.new(key)
  end
  
end

class Game_Event < Game_Character
  attr_accessor :light_key
  attr_writer :light_start_count
  
  alias theo_sle_page_settings setup_page_settings
  def setup_page_settings
    theo_sle_page_settings
    setup_light_key
  end
  
  def setup_light_key
    @light_key = ""
    @light_start_count = 0
    return unless list
    list.each do |command|
      next unless command.code == 108 || command.code == 408
      case command.parameters[0]
      when /<(?:LIGHT|light): (.*)>/i
        @light_key = $1.to_s
      when /<(?:LIGHT_START_COUNT|light start count): [ ]*(\d+)>/i
        @light_start_count = $1.to_i
      when /<(?:LIGHT_RAND_COUNT|light rand count): [ ]*(\d+)>/i
        @light_start_count = rand($1.to_i)
      end
    end
  end
  
  def light_start_count
    @light_start_count ||= 0
  end
  
end
# ----------------------------------------------------------------------------
# Unique Names for compatibility purposes :P
# ----------------------------------------------------------------------------
class Theolized_Light_Effect < Sprite
  
  def initialize(char, viewport = nil)
    super(viewport)
    @char = char
    setup(@char.light_key)
  end
  
  def setup(key)
    @key = key.nil? ? "" : key
    init_members
    return if @key.empty?
    setup_database(key)
    self.ox = self.width/2
    self.oy = self.height/2
  end
  
  def init_members
    self.bitmap = nil
    @offset = @offset_x = @offset_y = @buffer_x = @buffer_y = @opacity_var = 0
    @switch = 0
    @blink = false
    @blink_rate = @opacity_rate = @offset_rate = THEO::Lights::DefaultRate
    @op_count = @count = @char.light_start_count
    @op_fade = 0
    @ori_opacity = 255
    @opacity_offset = 0
    @show_light = true
  end
  
  def setup_database(key)
    le = $data_lights[key]
    self.bitmap = Cache.picture(le.name)
    self.tone = le.tone
    @ori_opacity=self.opacity=le.fading_speed > 0 ? le.opacity/2.0 : le.opacity
    self.blend_type = le.blend_type
    @blink = le.blink
    @blink_rate = le.blink_rate
    @opacity_rate = le.opacity_rate
    @opacity_var = le.opacity_var
    @offset = le.offset
    @offset_rate = le.offset_rate
    self.zoom_x = self.zoom_y = le.zoom
    @switch = le.switch
    @buffer_x = le.buffer_x
    @buffer_y = le.buffer_y
    @op_fade = le.fading_speed > 0 ? @ori_opacity : 0
    update_placement
    check_blink
    update_op_fade
    update_opacity
  end
  
  def check_blink
    return if @blink_rate == 0 || !@blink
    @show_light = !@show_light if (@count/@blink_rate) % 2 == 0
  end
  
  def update
    super
    setup(@char.light_key) if light_changed?
    @count += 1
    update_offset
    update_placement
    update_visibility
    update_blink
    update_op_fade
    update_opacity    
  end
  
  def update_placement
    self.x = @char.screen_x + @buffer_x + @offset_x
    self.y = @char.screen_y + @buffer_y + @offset_y
  end
  
  def update_offset
    return unless refresh_count?(@offset_rate)
    return if @offset <= 0
    @offset_x = -@offset + rand(@offset*2)
    @offset_y = -@offset + rand(@offset*2)
  end
  
  def update_visibility
    self.visible = !$game_switches[@switch] && @show_light
  end
  
  def update_blink
    return unless @blink
    return unless refresh_count?(@blink_rate)
    @show_light = !@show_light
  end
  
  def update_opacity
    self.opacity = @ori_opacity + @opacity_offset + @op_fade
    return unless refresh_count?(@opacity_rate)
    @opacity_offset = -@opacity_var + rand(@opacity_var*2)
  end
  
  def update_op_fade
    return unless $data_lights[@key].fading_speed > 0
    @op_count += $data_lights[@key].fading_speed
    @op_fade = Math.cos(Math.radian(@count)) * @ori_opacity
  end
  
  def refresh_count?(rate)
    return false if rate <= 0
    return @count % rate == 0
  end  
  
  def light_changed?
    @key != @char.light_key
  end
  
end

class Spriteset_Map
  
  alias theo_le_create_char create_characters
  def create_characters
    theo_le_create_char
    @simple_lights = []
    $game_map.events.values.each do |char|
      @simple_lights.push(Theolized_Light_Effect.new(char,@viewport2))
    end
  end
  
  alias theo_le_update update
  def update
    theo_le_update
    update_simple_lights
  end
  
  def update_simple_lights
    @simple_lights.each do |light|
      light.update
    end
  end
  
  alias theo_sle_dispose_char dispose_characters
  def dispose_characters
    theo_sle_dispose_char
    @simple_lights.each {|light| light.dispose}
  end
  
end

Инструкция к скрипту:
После того как вы вставили скрипт в свой проект
Надо создать в папке Graphics\ папку Lights
После этого поместить в нее изображение лампочки
по умолчанию это файл "le.png"
Теперь можно в секции скрипта "def self.load_custom_database"
создать или посмотреть готовые эффекты.
Чтоб добавить световой эффект в свою игру достаточно прописать
его в комментариях события например так:<light: Lamp>
Если у вас еще остались вопросы обращайтесь.

Заманчиво и интересно, но нельзя ли выложить демку? А то ведь чтобы положить в папку Graphics\Lights файл лампочки, его сперва надо иметь, плюс также непонятно каким образом создается эффект ночи/вечера/темноты в подвалах, пещерах и.т.д ?

**Темный** · 02.03.2015, 14:20

Хорошо через минут 15 сделаю демку

**Amur_87** · 02.03.2015, 14:26

Надо создать в папке Graphics\ папку Lights

Он берет из папки Pictures файл "le.png", а не из Lights

**Eviald** · 02.03.2015, 15:04

Сообщение от Темный

Хорошо через минут 15 сделаю демку

Вот спасибо, ждемс.

**Темный** · 02.03.2015, 15:06

Добавлена демка

**Eviald** · 02.03.2015, 15:37

Сообщение от Темный

Добавлена демка

Докладываю: посмотрел, опробовал. В целом ничего так, но по сравнению с системой освещения от KHas'а, тоже есть минусы:

1. Настенные светильники хоть и сияют сквозь тьму, но не освещают стен (в радиусе свечения) на которых висят и часть пола.
На полу ты поставил подсвечник, но он также не освещает пол, а лишь меняет цвет экрана, не создавая эффекта освещенности в своем радиусе.
Вот если бы этот скрипт мог в разных областях стандартно-измененного оттенка экрана, изменять сам оттенок... т.е допустим на всей карте стандартный оттенок экрана, изменен до эффекта ночи, и если где то имеются светильники и прочие освещающие предметы на карте, то им следует светить так, что в радиусе создаваемого ими освещения, менялся бы и стандартный оттенок экрана.

2. У KHas'а, (посредством его скрипта) верхняя часть стен затемнена (имеется в виду вид в разрезе, без потолка), видимость есть лишь внутренней части, что само по себе более реалистично, а при стандартно-измененном оттенке экрана увы, все наоборот, и скрипт TheoAllen'а не помогает осветить стен и прочего...

Вот бегу я по темному подземелью, а надписи, знаки или узоры на стенах увидеть не могу, хотя вдруг что то из них, будет к примеру являться подсказкой для игрока? Хотя конечно, эту область можно заранее подсветить... но это уже не то... может я хочу, чтоб игрок сам подошел, осветил и обнаружил.

В любом случае, Темный, спасибо тебе, ведь это тоже еще один из вариантов для создания освещения.

**Темный** · 02.03.2015, 16:01

Я вот не люблю использовать не кнах не виктора системы освещения. Но часто люблю расставлять в комнатах свечи и лампочки.
Стандартной анимации что они горят как то мало. а этот простенький скрипт дает такую возможность. Я вроде не писал в шапке что
это новая система освещение которая исправляет все недостатки других. Это простенький скрипт для подсветки отдельных предметов.

**Eviald** · 02.03.2015, 16:27

Сообщение от Темный

Я вроде не писал в шапке что
это новая система освещение которая исправляет все недостатки других. Это простенький скрипт для подсветки отдельных предметов.

Значит, это моя невнимательность, извиняй