Project1

标题: Autolight腳本在遊戲加密後讀取不到Picture的文件 [打印本页]

---

作者: 冷徹心扉    时间: 2013-1-5 16:48
标题: Autolight腳本在遊戲加密後讀取不到Picture的文件


如题，我们知道Autolight自动光源脚本是读取Picture的自制图片
但游戏封包加密后随着Picture的隐藏，Autolight也失去图片来源
这该怎么办？
请别说另行加入Picture活页夹
那样当玩家删掉它，游戏里就原形毕露了

---

作者: Password    时间: 2013-1-5 16:51


有这个问题吗？貌似没听说过……我去试验下啥的……

结果：用RM的封包加密完全不会有问题……

LZ用了别的加密？

其实按照这个逻辑来讲，那么LZ为什么没先想到DATA文件夹也没了→游戏数据也没了→游戏就玩不了了……→orz

---

作者: 冷徹心扉    时间: 2013-1-5 18:00

Password 发表于 2013-1-5 16:51
有这个问题吗？貌似没听说过……我去试验下啥的……

结果：用RM的封包加密完全不会有问题……{:5 ...

首先十分感謝您的協助，在這裡詳細說明一下測試結果

測試1：加密+修改過Autolight腳本
結果：無法顯示圖片、即便手動加入PICTURE也一樣

測試2：加密+原版Autolight腳本
結果：無法顯示圖片、但手動加入PICTURE就可以讀取並顯示

已經將該腳本移至MAIN上方，也就是最下層
所以共同的問題在於
加密後PICTURE被隱藏，該腳本依然照原路徑抓圖片而無法顯示

---

作者: Password    时间: 2013-1-5 18:28

冷徹心扉 发表于 2013-1-5 18:00
首先十分感謝您的協助，在這裡詳細說明一下測試結果

測試1：加密+修改過Autolight腳本

RUBY 代码复制

#------------------------------------------------------------------------------#
# Name:     Auto/Event-Light Reborn                                            #
# By:       SojaBird                                                           #
# Version:  Reborn 4.1                                                         #
#                                                                              #
# Date:     30-08-09                                                           #
#------------------------------------------------------------------------------#
 
$imported = {} if $imported == nil
$imported["SojaBird_AutoLight"] = true
 
#------------------------------------------------------------------------------#
# Call Script                                                                  #
#------------------------------------------------------------------------------#
# - AL.mode(val)                 #                                             #
# - AL.light(parm, val)          # parm: name, opacity, blend, visible         #
# - AL.shadow(parm, val)         # parm: name, opacity, blend, visible         #
# - AL.spot(parm, val)           # parm: name, opacity, blend, visible         #
# - AL.flicker(parm, val)        # parm: opacity, width, height, x, y          #
#                                #                                             #
# - EL.bitmap(val, index = nil)  #                                             #
# - EL.color(val, index = nil)   #                                             #
# - EL.opacity(val, index = nil) #                                             #
# - EL.blend(val, index = nil)   #                                             #
# - EL.visible(val, index = nil) #                                             #
# - EL.zoom(val, index = nil)    #                                             #
#------------------------------------------------------------------------------#
 
#------------------------------------------------------------------------------#
# How to use                                                                   #
#------------------------------------------------------------------------------#
# *AutoLight                                                                   #
#  MODE 0/2                                                                    #
#   To use autolights, put a light- and/or shadow-map picture in the           #
#   folder ../Graphics/Pictures/                                               #
#   Name to picture correct! Start with the, by you set, light- and/or         #
#   shadow-map name, followed by the corresponding map-ID.                     #
#   Put the AutoLight mode to 0 or 2 to show light- and/or shadow-maps.        #
#                                                                              #
#  MODE 1/2                                                                    #
#   To use the spot, put your spotpicture in the folder ../Graphics/Pictures/  #
#   and set the name correct!                                                  #
#   Put the AutoLight mode to 1 or 2 to show the spot.                         #
#                                                                              #
#                                                                              #
# *EventLight                                                                  #
#   To make a event cast a light, give it a comment with the following code:   #
#     cast(*picture, *color, *opacity, *blend_type, *zoom)                     #
#   All the parameters are optional. Default they are set to:                  #
#     picture:    Default, set in the module                                   #
#     color:      White                                                        #
#     opacity:    255                                                          #
#     blend_type: 1                                                            #
#     zoom:       100                                                          #
#   For the color you can choose:                                              #
#    - white                                                                   #
#    - red                                                                     #
#    - green                                                                   #
#    - blue                                                                    #
#    - yellow                                                                  #
#    - orange                                                                  #
#    - purple                                                                  #
#    - random (one of above, but not the same as it is at the moment (if set)) #
#                                                                              #
#------------------------------------------------------------------------------#
 
#--------------------------#
# Customization AutoLights #
#--------------------------#
module AL
 
  #0 = Light and/or Shadow
  #1 = Spot
  #2 = Both
  Mode = 0
 
  module Light
    Name    = "Light"
    Opacity = 150
    Blend   = 1
    Visible = true
 
  end
  module Shadow
    Name    = "Shadow"
    Opacity = 150
    Blend   = 2
    Visible = true
 
  end
  module Spot
    Name    = "Spot"
    Opacity = 255
    Blend   = 2
    Visible = true
 
    module Flicker
      Opacity = 2 #Random opacity change
      Width   = 2 #Random horizontal zoom
      Height  = 2 #Random vertical zoom
      X       = 2 #Random horizontal movement
      Y       = 2 #Random vertical movement
    end
 
  end
 
end
 
 
#---------------------------#
# Customization EventLights #
#---------------------------#
module EL
 
  Default = "EventLight"
 
  module Flicker
    Opacity = 2 #Random opacity change
    Width   = 2 #Random horizontal zoom
    Height  = 2 #Random vertical zoom
    X       = 2 #Random horizontal movement
    Y       = 2 #Random vertical movement
  end
 
end
 
 
#\####/\####/\####/\####/\##------------------------##/\####/\####/\####/\####/#
##\##/##\##/##\##/##\##/##\# DON'T CROSS THIS LINE! #/##\##/##\##/##\##/##\##/##
###\/####\/####\/####\/####\------------------------/####\/####\/####\/####\/###
 
 
#---------------------------#
# Script playerlight engine #
#---------------------------#
class AutoLight
 
  include AL
 
  def initialize
    @map_id = $game_map.map_id
    @light_exist = check_existence("#{Light::Name}#{@map_id}")
    @shadow_exist = check_existence("#{Shadow::Name}#{@map_id}")
    @spot_exist = check_existence("#{Spot::Name}")
    create_lights
  end
 
  def check_existence(file)
    format_list = [".png", ".jpeg", ".jpg"]
    format_list.each do |format|
      return true if FileTest.exist?("Graphics/Pictures/#{file}#{format}")
    end
    return false
  end
 
  def create_lights
    @viewport = Viewport.new(0, 0, 640, 480)
    case Mode
    when 0
      draw_light
      draw_shadow
    when 1
      draw_spot
    when 2
      draw_light
      draw_shadow
      draw_spot
    end
    update
  end
 
  def draw_light
    return if !@light_exist
    [url=home.php?mod=space&uid=22469]@light[/url] = Sprite.new(@viewport)
    @light.bitmap = Cache.picture("#{Light::Name}#{@map_id}")
    @light.z = 9998
    @light.opacity = Light::Opacity
    @light.blend_type = Light::Blend
    @light.visible = Light::Visible
  end
 
  def draw_shadow
    return if !@shadow_exist
    [url=home.php?mod=space&uid=31758]@Shadow[/url] = Sprite.new(@viewport)
    @shadow.bitmap = Cache.picture("#{Shadow::Name}#{@map_id}")
    @shadow.z = 9997
    @shadow.opacity = Shadow::Opacity
    @shadow.blend_type = Shadow::Blend
    @shadow.visible = Shadow::Visible
  end
 
  def draw_spot
    return if !@spot_exist
    @spot = Sprite.new(@viewport)
    @spot.bitmap = Cache.picture("#{Spot::Name}")
    @spot.z = 9999
    @spot.opacity = Spot::Opacity
    @spot.blend_type = Spot::Blend
    @spot.visible = Spot::Visible
  end
 
  def update
    @map_x = $game_map.display_x    / 8
    @map_y = $game_map.display_y    / 8
    @player_x = $game_player.real_x / 8
    @player_y = $game_player.real_y / 8
    case Mode
    when 0
      update_light
      update_shadow
    when 1
      update_spot
    when 2
      update_light
      update_shadow
      update_spot
    end
  end
 
  def update_light
    return if !(@light_exist and !@light.nil?)
    @light.visible = Light::Visible
    return if !(@light.x == 0 or
                @light.y == 0 or
                @light.x != @map_x / 256 or
                @light.y != @map_y / 256)
    @light.x = -@map_x
    @light.y = -@map_y
  end
 
  def update_shadow
    return if !(@shadow_exist and !@shadow.nil?)
    @shadow.visible = Shadow::Visible
    return if !(@shadow.x == 0 or
                @shadow.y == 0 or
                @shadow.x != @map_x / 256 or
                @shadow.y != @map_y / 256)
    @shadow.x = -@map_x
    @shadow.y = -@map_y
  end
 
  def update_spot
    return if !(@spot_exist and !@spot.nil?)
    @spot.visible = Spot::Visible
    @spot.opacity = Spot::Opacity + rand(Spot::Flicker::Opacity) -
                                    rand(Spot::Flicker::Opacity)
    @spot.zoom_x = 1 + (rand(Spot::Flicker::Width)  / 100.0) -
                       (rand(Spot::Flicker::Width)  / 100.0)
    @spot.x = @player_x - @map_x - (@spot.width / 2) + 16 +
                        rand(Spot::Flicker::X) - rand(Spot::Flicker::X)
    @spot.zoom_y = 1 + (rand(Spot::Flicker::Height) / 100.0) -
                       (rand(Spot::Flicker::Height) / 100.0)
    @spot.y = @player_y - @map_y - (@spot.height / 2) + 16 +
                        rand(Spot::Flicker::Y) - rand(Spot::Flicker::Y)
  end
 
  def dispose
    case Mode
    when 0
      dispose_light
      dispose_shadow
    when 1
      dispose_spot
    when 2
      dispose_light
      dispose_shadow
      dispose_spot
    end
    @viewport.dispose
  end
 
  def dispose_light
    return if !(@light_exist and !@light.nil?)
    @light.dispose
  end
 
  def dispose_shadow
    return if !(@shadow_exist and !@shadow.nil?)
    @shadow.dispose
  end
 
  def dispose_spot
    return if !(@spot_exist and !@spot.nil?)
    @spot.dispose
  end
 
end
 
 
#--------------------------#
# Script eventlight engine #
#--------------------------#
class EventLight
 
  attr_reader :event_lights
 
  def initialize
    create_autolights
  end
 
  def create_autolights
    @event_lights = {}
    $game_map.events.values.each do |event|
      next if event.list == nil
      event.list.each do |list|
        if (list.code == 108 or list.code == 408) and
        list.parameters[0].include?("cast")
          data = eval(list.parameters[0])
          el = Event_LightHolder.new(event, data)
          settings(el, data)
          @event_lights[event.id] = el
          update
        end
      end
    end
  end
 
  def cast(pic = EL::Default,
           color = "white",
           opacity = 255,
           blend_type = 1,
           zoom = 100,
           range = 0)
    return [pic, color, opacity, blend_type, zoom, range]
  end
 
  def settings(event_light, data)
    event_light.el.tone       = pick_color(data[1])
    event_light.el.opacity    = data[2]
    event_light.el.blend_type = data[3]
    event_light.el.zoom_x     = event_light.el.zoom_y = data[4] / 100.0
  end
 
  def dispose
    @event_lights.each_value do |light|
      light.el.dispose
    end
    @event_lights.clear
  end
 
  def update
    @event_lights.each_value do |light|
      light.el.opacity = light.el.opacity + rand(EL::Flicker::Opacity) -
                                            rand(EL::Flicker::Opacity)
      x_zoom = light.el.zoom_x
      y_zoom = light.el.zoom_y
      light.el.zoom_x = x_zoom + (rand(EL::Flicker::Width)  / 100.0) -
                                 (rand(EL::Flicker::Width)  / 100.0)
      light.el.zoom_y = y_zoom + (rand(EL::Flicker::Height) / 100.0) - 
                                 (rand(EL::Flicker::Height) / 100.0)
      light.el.x = (light.event.real_x - $game_map.display_x) / 8 -
                   ((light.el.width * x_zoom) / 2) + 16 +
                    rand(EL::Flicker::X) - rand(EL::Flicker::X)
      light.el.y = (light.event.real_y - $game_map.display_y) / 8 -
                   ((light.el.height * y_zoom) / 2) + 16 +
                    rand(EL::Flicker::Y) - rand(EL::Flicker::Y)
    end
  end
 
end
 
 
#-----------------#
# Event lightdata #
#-----------------#
class Event_LightHolder
 
  attr_reader   :event
        attr_accessor :el
  attr_accessor :range
 
        def initialize(event, data)
    @event = event
                @el = Sprite.new
    @el.visible = true
                settings(data)
        end
 
  def settings(data)
    @el.bitmap = Cache.picture(data[0])
    @el.tone = pick_color(data[1])
    @el.opacity = data[2]
    @el.blend_type = data[3]
    @el.zoom_x = @el.zoom_y = data[4]
    @range = data[5]
  end
 
end
 
 
#--------------#
# Color picker #
#--------------#
def pick_color(color, old_value = Tone.new(0, 0, 0, 0))
  [url=home.php?mod=space&uid=10453]@color[/url] = color
  colors = {"white"   =>  Tone.new(255, 255, 255, 255),
            "red"     =>  Tone.new(255, -255, -255, 255),
            "green"   =>  Tone.new(-255, 255, -255, 255),
            "blue"    =>  Tone.new(-255, -255, 255, 255),
            "yellow"  =>  Tone.new(255, 255, -255, 255),
            "orange"  =>  Tone.new(255, -128, -255, 255),
            "purple"  =>  Tone.new(255, -255, 255, 255)
            }
  if @color == "random"
    @color = colors.keys[rand(colors.size)]
    until colors[@color] != old_value
      @color = colors.keys[rand(colors.size)]
    end
  end
  return colors[@color]
end
 
 
#----------------#
# On map display #
#----------------#
class Scene_Map < Scene_Base
 
  alias autolight_start start
  alias autolight_terminate terminate
  alias autolight_update update
  alias autolight_fadein fadein
 
  def start
    autolight_start
    light_start
  end
 
  def light_start
    $AutoLight = AutoLight.new
    $EventLight = EventLight.new
  end
 
  def terminate
    autolight_terminate
    light_terminate
  end
 
  def light_terminate
    $AutoLight.dispose
    $EventLight.dispose
  end
 
  def update
    light_update
    autolight_update
  end
 
  def light_update
    $AutoLight.update
    $EventLight.update
  end
 
  def fadein(duration)
    light_fade
    autolight_fadein(duration)
  end
 
  def light_fade
    $AutoLight.dispose
    $AutoLight = AutoLight.new
    $EventLight.dispose
    $EventLight = EventLight.new
  end
 
end
 
 
#---------------#
# Read event_id #
#---------------#
class Game_Interpreter
 
  attr_reader :event_id
 
end
 
 
#---------------------#
# Change Functions AL #
#---------------------#
module AL
 
  def self.mode(val)
    @val = val
    return if !fixnum?(@val)
    eval("AL::Mode = #{@val}")
    $AutoLight.dispose
    $AutoLight = AutoLight.new
  end
 
  def self.light(parm, val)
    @val = val
    case parm.capitalize
    when "Name";    @val.to_s!
    when "Visible"; return if !boolean?(@val)
    else;           return if !fixnum?(@val)
    end
    eval("AL::Light::#{parm.capitalize} = #{@val}")
    $AutoLight.dispose
    $AutoLight = AutoLight.new
  end
 
  def self.shadow(parm, val)
    @val = val
    case parm.capitalize
    when "Name";    @val.to_s!
    when "Visible"; return if !boolean?(@val)
    else;           return if !fixnum?(@val)
    end
    eval("AL::Shadow::#{parm.capitalize} = #{@val}")
    $AutoLight.dispose
    $AutoLight = AutoLight.new
  end
 
  def self.spot(parm, val)
    @val = val
    case parm.capitalize
    when "Name";    @val.to_s!
    when "Visible"; return if !boolean?(@val)
    else;           return if !fixnum?(@val)
    end
    eval("AL::Spot::#{parm.capitalize} = #{@val}")
    $AutoLight.dispose
    $AutoLight = AutoLight.new
  end
 
  def self.flicker(parm, val)
    @val = val
    return if !fixnum?(@val)
    eval("AL::Spot::Flicker::#{parm.capitalize} = #{@val}")
    $AutoLight.dispose
    $AutoLight = AutoLight.new
  end
 
end
 
 
#---------------------#
# Change Functions EL #
#---------------------#
module EL
 
  def self.bitmap(val, index = nil)
    @val = val
    index = $game_map.interpreter.event_id if index == nil
    $EventLight.event_lights[index].el.bitmap = Cache.picture(@val)
  end
 
  def self.color(val, index = nil)
    @val = val
    index = $game_map.interpreter.event_id if index == nil
    old_value = $EventLight.event_lights[index].el.tone
    $EventLight.event_lights[index].el.tone = pick_color(@val, old_value)
  end
 
  def self.opacity(val, index = nil)
    @val = val
    return if !fixnum?(@val)
    index = $game_map.interpreter.event_id if index == nil
    $EventLight.event_lights[index].el.opacity = @val
  end
 
  def self.blend(val, index = nil)
    @val = val
    return if !fixnum?(@val)
    index = $game_map.interpreter.event_id if index == nil
    $EventLight.event_lights[index].el.blend_type = @val
  end
 
  def self.visible(val, index = nil)
    @val = val
    return if !boolean?(@val)
    index = $game_map.interpreter.event_id if index == nil
    $EventLight.event_lights[index].el.visible = @val
  end
 
  def self.zoom(val, index = nil)
    @val = val
    return if !fixnum?(@val)
    index = $game_map.interpreter.event_id if index == nil
    $EventLight.event_lights[index].el.zoom_x = @val / 100.0
    $EventLight.event_lights[index].el.zoom_y = @val / 100.0
  end
 
  def self.range(val, index = nil)
    @val = val
    return if !fixnum?(@val)
    index = $game_map.interpreter.event_id if index == nil
    $EventLight.event_lights[index].range = @val
  end
 
end
 
 
#-----------------#
# Wrong input fix #
#-----------------#
 
# String/Fixnum -> Boolean
def boolean?(val)
  return false if !(val.is_a? FalseClass or
                    val.is_a? TrueClass  or
                    val.is_a? String     or
                    val.is_a? Fixnum)
  @val = eval(val) if val.is_a? String
  if val.is_a? Fixnum or @val.is_a? Fixnum
    val = @val if @val.is_a? Fixnum
    if val == -1 or val == 1; @val = true
    elsif val == 0;           @val = false
    else;                     return false
    end
  end
  return true
end
 
# String -> Fixnum
def fixnum?(val)
  return false if !(val.is_a? Fixnum or val.is_a? String)
  @val = val.to_i if val.is_a? String
  return true
end

#------------------------------------------------------------------------------#


# Name:     Auto/Event-Light Reborn                                            #


# By:       SojaBird                                                           #


# Version:  Reborn 4.1                                                         #


#                                                                              #


# Date:     30-08-09                                                           #


#------------------------------------------------------------------------------#


 


$imported = {} if $imported == nil


$imported["SojaBird_AutoLight"] = true


 


#------------------------------------------------------------------------------#


# Call Script                                                                  #


#------------------------------------------------------------------------------#


# - AL.mode(val)                 #                                             #


# - AL.light(parm, val)          # parm: name, opacity, blend, visible         #


# - AL.shadow(parm, val)         # parm: name, opacity, blend, visible         #


# - AL.spot(parm, val)           # parm: name, opacity, blend, visible         #


# - AL.flicker(parm, val)        # parm: opacity, width, height, x, y          #


#                                #                                             #


# - EL.bitmap(val, index = nil)  #                                             #


# - EL.color(val, index = nil)   #                                             #


# - EL.opacity(val, index = nil) #                                             #


# - EL.blend(val, index = nil)   #                                             #


# - EL.visible(val, index = nil) #                                             #


# - EL.zoom(val, index = nil)    #                                             #


#------------------------------------------------------------------------------#


 


#------------------------------------------------------------------------------#


# How to use                                                                   #


#------------------------------------------------------------------------------#


# *AutoLight                                                                   #


#  MODE 0/2                                                                    #


#   To use autolights, put a light- and/or shadow-map picture in the           #


#   folder ../Graphics/Pictures/                                               #


#   Name to picture correct! Start with the, by you set, light- and/or         #


#   shadow-map name, followed by the corresponding map-ID.                     #


#   Put the AutoLight mode to 0 or 2 to show light- and/or shadow-maps.        #


#                                                                              #


#  MODE 1/2                                                                    #


#   To use the spot, put your spotpicture in the folder ../Graphics/Pictures/  #


#   and set the name correct!                                                  #


#   Put the AutoLight mode to 1 or 2 to show the spot.                         #


#                                                                              #


#                                                                              #


# *EventLight                                                                  #


#   To make a event cast a light, give it a comment with the following code:   #


#     cast(*picture, *color, *opacity, *blend_type, *zoom)                     #


#   All the parameters are optional. Default they are set to:                  #


#     picture:    Default, set in the module                                   #


#     color:      White                                                        #


#     opacity:    255                                                          #


#     blend_type: 1                                                            #


#     zoom:       100                                                          #


#   For the color you can choose:                                              #


#    - white                                                                   #


#    - red                                                                     #


#    - green                                                                   #


#    - blue                                                                    #


#    - yellow                                                                  #


#    - orange                                                                  #


#    - purple                                                                  #


#    - random (one of above, but not the same as it is at the moment (if set)) #


#                                                                              #


#------------------------------------------------------------------------------#


 


#--------------------------#


# Customization AutoLights #


#--------------------------#


module AL


 


  #0 = Light and/or Shadow


  #1 = Spot


  #2 = Both


  Mode = 0


 


  module Light


    Name    = "Light"


    Opacity = 150


    Blend   = 1


    Visible = true


 


  end


  module Shadow


    Name    = "Shadow"


    Opacity = 150


    Blend   = 2


    Visible = true


 


  end


  module Spot


    Name    = "Spot"


    Opacity = 255


    Blend   = 2


    Visible = true


 


    module Flicker


      Opacity = 2 #Random opacity change


      Width   = 2 #Random horizontal zoom


      Height  = 2 #Random vertical zoom


      X       = 2 #Random horizontal movement


      Y       = 2 #Random vertical movement


    end


 


  end


 


end


 


 


#---------------------------#


# Customization EventLights #


#---------------------------#


module EL


 


  Default = "EventLight"


 


  module Flicker


    Opacity = 2 #Random opacity change


    Width   = 2 #Random horizontal zoom


    Height  = 2 #Random vertical zoom


    X       = 2 #Random horizontal movement


    Y       = 2 #Random vertical movement


  end


 


end


 


 


#\####/\####/\####/\####/\##------------------------##/\####/\####/\####/\####/#


##\##/##\##/##\##/##\##/##\# DON'T CROSS THIS LINE! #/##\##/##\##/##\##/##\##/##


###\/####\/####\/####\/####\------------------------/####\/####\/####\/####\/###


 


 


#---------------------------#


# Script playerlight engine #


#---------------------------#


class AutoLight


 


  include AL


 


  def initialize


    @map_id = $game_map.map_id


    @light_exist = check_existence("#{Light::Name}#{@map_id}")


    @shadow_exist = check_existence("#{Shadow::Name}#{@map_id}")


    @spot_exist = check_existence("#{Spot::Name}")


    create_lights


  end


 


  def check_existence(file)


    format_list = [".png", ".jpeg", ".jpg"]


    format_list.each do |format|


      return true if FileTest.exist?("Graphics/Pictures/#{file}#{format}")


    end


    return false


  end


 


  def create_lights


    @viewport = Viewport.new(0, 0, 640, 480)


    case Mode


    when 0


      draw_light


      draw_shadow


    when 1


      draw_spot


    when 2


      draw_light


      draw_shadow


      draw_spot


    end


    update


  end


 


  def draw_light


    return if !@light_exist


    [url=home.php?mod=space&uid=22469]@light[/url] = Sprite.new(@viewport)


    @light.bitmap = Cache.picture("#{Light::Name}#{@map_id}")


    @light.z = 9998


    @light.opacity = Light::Opacity


    @light.blend_type = Light::Blend


    @light.visible = Light::Visible


  end


 


  def draw_shadow


    return if !@shadow_exist


    [url=home.php?mod=space&uid=31758]@Shadow[/url] = Sprite.new(@viewport)


    @shadow.bitmap = Cache.picture("#{Shadow::Name}#{@map_id}")


    @shadow.z = 9997


    @shadow.opacity = Shadow::Opacity


    @shadow.blend_type = Shadow::Blend


    @shadow.visible = Shadow::Visible


  end


 


  def draw_spot


    return if !@spot_exist


    @spot = Sprite.new(@viewport)


    @spot.bitmap = Cache.picture("#{Spot::Name}")


    @spot.z = 9999


    @spot.opacity = Spot::Opacity


    @spot.blend_type = Spot::Blend


    @spot.visible = Spot::Visible


  end


 


  def update


    @map_x = $game_map.display_x    / 8


    @map_y = $game_map.display_y    / 8


    @player_x = $game_player.real_x / 8


    @player_y = $game_player.real_y / 8


    case Mode


    when 0


      update_light


      update_shadow


    when 1


      update_spot


    when 2


      update_light


      update_shadow


      update_spot


    end


  end


 


  def update_light


    return if !(@light_exist and !@light.nil?)


    @light.visible = Light::Visible


    return if !(@light.x == 0 or


                @light.y == 0 or


                @light.x != @map_x / 256 or


                @light.y != @map_y / 256)


    @light.x = -@map_x


    @light.y = -@map_y


  end


 


  def update_shadow


    return if !(@shadow_exist and !@shadow.nil?)


    @shadow.visible = Shadow::Visible


    return if !(@shadow.x == 0 or


                @shadow.y == 0 or


                @shadow.x != @map_x / 256 or


                @shadow.y != @map_y / 256)


    @shadow.x = -@map_x


    @shadow.y = -@map_y


  end


 


  def update_spot


    return if !(@spot_exist and !@spot.nil?)


    @spot.visible = Spot::Visible


    @spot.opacity = Spot::Opacity + rand(Spot::Flicker::Opacity) -


                                    rand(Spot::Flicker::Opacity)


    @spot.zoom_x = 1 + (rand(Spot::Flicker::Width)  / 100.0) -


                       (rand(Spot::Flicker::Width)  / 100.0)


    @spot.x = @player_x - @map_x - (@spot.width / 2) + 16 +


                        rand(Spot::Flicker::X) - rand(Spot::Flicker::X)


    @spot.zoom_y = 1 + (rand(Spot::Flicker::Height) / 100.0) -


                       (rand(Spot::Flicker::Height) / 100.0)


    @spot.y = @player_y - @map_y - (@spot.height / 2) + 16 +


                        rand(Spot::Flicker::Y) - rand(Spot::Flicker::Y)


  end


 


  def dispose


    case Mode


    when 0


      dispose_light


      dispose_shadow


    when 1


      dispose_spot


    when 2


      dispose_light


      dispose_shadow


      dispose_spot


    end


    @viewport.dispose


  end


 


  def dispose_light


    return if !(@light_exist and !@light.nil?)


    @light.dispose


  end


 


  def dispose_shadow


    return if !(@shadow_exist and !@shadow.nil?)


    @shadow.dispose


  end


 


  def dispose_spot


    return if !(@spot_exist and !@spot.nil?)


    @spot.dispose


  end


 


end


 


 


#--------------------------#


# Script eventlight engine #


#--------------------------#


class EventLight


 


  attr_reader :event_lights


 


  def initialize


    create_autolights


  end


 


  def create_autolights


    @event_lights = {}


    $game_map.events.values.each do |event|


      next if event.list == nil


      event.list.each do |list|


        if (list.code == 108 or list.code == 408) and


        list.parameters[0].include?("cast")


          data = eval(list.parameters[0])


          el = Event_LightHolder.new(event, data)


          settings(el, data)


          @event_lights[event.id] = el


          update


        end


      end


    end


  end


 


  def cast(pic = EL::Default,


           color = "white",


           opacity = 255,


           blend_type = 1,


           zoom = 100,


           range = 0)


    return [pic, color, opacity, blend_type, zoom, range]


  end


 


  def settings(event_light, data)


    event_light.el.tone       = pick_color(data[1])


    event_light.el.opacity    = data[2]


    event_light.el.blend_type = data[3]


    event_light.el.zoom_x     = event_light.el.zoom_y = data[4] / 100.0


  end


 


  def dispose


    @event_lights.each_value do |light|


      light.el.dispose


    end


    @event_lights.clear


  end


 


  def update


    @event_lights.each_value do |light|


      light.el.opacity = light.el.opacity + rand(EL::Flicker::Opacity) -


                                            rand(EL::Flicker::Opacity)


      x_zoom = light.el.zoom_x


      y_zoom = light.el.zoom_y


      light.el.zoom_x = x_zoom + (rand(EL::Flicker::Width)  / 100.0) -


                                 (rand(EL::Flicker::Width)  / 100.0)


      light.el.zoom_y = y_zoom + (rand(EL::Flicker::Height) / 100.0) - 


                                 (rand(EL::Flicker::Height) / 100.0)


      light.el.x = (light.event.real_x - $game_map.display_x) / 8 -


                   ((light.el.width * x_zoom) / 2) + 16 +


                    rand(EL::Flicker::X) - rand(EL::Flicker::X)


      light.el.y = (light.event.real_y - $game_map.display_y) / 8 -


                   ((light.el.height * y_zoom) / 2) + 16 +


                    rand(EL::Flicker::Y) - rand(EL::Flicker::Y)


    end


  end


 


end


 


 


#-----------------#


# Event lightdata #


#-----------------#


class Event_LightHolder


 


  attr_reader   :event


        attr_accessor :el


  attr_accessor :range


 


        def initialize(event, data)


    @event = event


                @el = Sprite.new


    @el.visible = true


                settings(data)


        end


 


  def settings(data)


    @el.bitmap = Cache.picture(data[0])


    @el.tone = pick_color(data[1])


    @el.opacity = data[2]


    @el.blend_type = data[3]


    @el.zoom_x = @el.zoom_y = data[4]


    @range = data[5]


  end


 


end


 


 


#--------------#


# Color picker #


#--------------#


def pick_color(color, old_value = Tone.new(0, 0, 0, 0))


  [url=home.php?mod=space&uid=10453]@color[/url] = color


  colors = {"white"   =>  Tone.new(255, 255, 255, 255),


            "red"     =>  Tone.new(255, -255, -255, 255),


            "green"   =>  Tone.new(-255, 255, -255, 255),


            "blue"    =>  Tone.new(-255, -255, 255, 255),


            "yellow"  =>  Tone.new(255, 255, -255, 255),


            "orange"  =>  Tone.new(255, -128, -255, 255),


            "purple"  =>  Tone.new(255, -255, 255, 255)


            }


  if @color == "random"


    @color = colors.keys[rand(colors.size)]


    until colors[@color] != old_value


      @color = colors.keys[rand(colors.size)]


    end


  end


  return colors[@color]


end


 


 


#----------------#


# On map display #


#----------------#


class Scene_Map < Scene_Base


 


  alias autolight_start start


  alias autolight_terminate terminate


  alias autolight_update update


  alias autolight_fadein fadein


 


  def start


    autolight_start


    light_start


  end


 


  def light_start


    $AutoLight = AutoLight.new


    $EventLight = EventLight.new


  end


 


  def terminate


    autolight_terminate


    light_terminate


  end


 


  def light_terminate


    $AutoLight.dispose


    $EventLight.dispose


  end


 


  def update


    light_update


    autolight_update


  end


 


  def light_update


    $AutoLight.update


    $EventLight.update


  end


 


  def fadein(duration)


    light_fade


    autolight_fadein(duration)


  end


 


  def light_fade


    $AutoLight.dispose


    $AutoLight = AutoLight.new


    $EventLight.dispose


    $EventLight = EventLight.new


  end


 


end


 


 


#---------------#


# Read event_id #


#---------------#


class Game_Interpreter


 


  attr_reader :event_id


 


end


 


 


#---------------------#


# Change Functions AL #


#---------------------#


module AL


 


  def self.mode(val)


    @val = val


    return if !fixnum?(@val)


    eval("AL::Mode = #{@val}")


    $AutoLight.dispose


    $AutoLight = AutoLight.new


  end


 


  def self.light(parm, val)


    @val = val


    case parm.capitalize


    when "Name";    @val.to_s!


    when "Visible"; return if !boolean?(@val)


    else;           return if !fixnum?(@val)


    end


    eval("AL::Light::#{parm.capitalize} = #{@val}")


    $AutoLight.dispose


    $AutoLight = AutoLight.new


  end


 


  def self.shadow(parm, val)


    @val = val


    case parm.capitalize


    when "Name";    @val.to_s!


    when "Visible"; return if !boolean?(@val)


    else;           return if !fixnum?(@val)


    end


    eval("AL::Shadow::#{parm.capitalize} = #{@val}")


    $AutoLight.dispose


    $AutoLight = AutoLight.new


  end


 


  def self.spot(parm, val)


    @val = val


    case parm.capitalize


    when "Name";    @val.to_s!


    when "Visible"; return if !boolean?(@val)


    else;           return if !fixnum?(@val)


    end


    eval("AL::Spot::#{parm.capitalize} = #{@val}")


    $AutoLight.dispose


    $AutoLight = AutoLight.new


  end


 


  def self.flicker(parm, val)


    @val = val


    return if !fixnum?(@val)


    eval("AL::Spot::Flicker::#{parm.capitalize} = #{@val}")


    $AutoLight.dispose


    $AutoLight = AutoLight.new


  end


 


end


 


 


#---------------------#


# Change Functions EL #


#---------------------#


module EL


 


  def self.bitmap(val, index = nil)


    @val = val


    index = $game_map.interpreter.event_id if index == nil


    $EventLight.event_lights[index].el.bitmap = Cache.picture(@val)


  end


 


  def self.color(val, index = nil)


    @val = val


    index = $game_map.interpreter.event_id if index == nil


    old_value = $EventLight.event_lights[index].el.tone


    $EventLight.event_lights[index].el.tone = pick_color(@val, old_value)


  end


 


  def self.opacity(val, index = nil)


    @val = val


    return if !fixnum?(@val)


    index = $game_map.interpreter.event_id if index == nil


    $EventLight.event_lights[index].el.opacity = @val


  end


 


  def self.blend(val, index = nil)


    @val = val


    return if !fixnum?(@val)


    index = $game_map.interpreter.event_id if index == nil


    $EventLight.event_lights[index].el.blend_type = @val


  end


 


  def self.visible(val, index = nil)


    @val = val


    return if !boolean?(@val)


    index = $game_map.interpreter.event_id if index == nil


    $EventLight.event_lights[index].el.visible = @val


  end


 


  def self.zoom(val, index = nil)


    @val = val


    return if !fixnum?(@val)


    index = $game_map.interpreter.event_id if index == nil


    $EventLight.event_lights[index].el.zoom_x = @val / 100.0


    $EventLight.event_lights[index].el.zoom_y = @val / 100.0


  end


 


  def self.range(val, index = nil)


    @val = val


    return if !fixnum?(@val)


    index = $game_map.interpreter.event_id if index == nil


    $EventLight.event_lights[index].range = @val


  end


 


end


 


 


#-----------------#


# Wrong input fix #


#-----------------#


 


# String/Fixnum -> Boolean


def boolean?(val)


  return false if !(val.is_a? FalseClass or


                    val.is_a? TrueClass  or


                    val.is_a? String     or


                    val.is_a? Fixnum)


  @val = eval(val) if val.is_a? String


  if val.is_a? Fixnum or @val.is_a? Fixnum


    val = @val if @val.is_a? Fixnum


    if val == -1 or val == 1; @val = true


    elsif val == 0;           @val = false


    else;                     return false


    end


  end


  return true


end


 


# String -> Fixnum


def fixnum?(val)


  return false if !(val.is_a? Fixnum or val.is_a? String)


  @val = val.to_i if val.is_a? String


  return true


end

---

欢迎光临 Project1 (https://rpg.blue/)

Powered by Discuz! X3.1