#==============================================================================
# ** Sprite Shadow (Sprite_Ombre )
#------------------------------------------------------------------------------
# Based on Genzai Kawakami's shadows
# dynamisme & features by Rataime
# extra features Boushy
# New Edits by DerVVulfman
# Modified for VX by Syvkal
# Fixes by Painhurt
# October 14, 2008
#
#------------------------------------------------------------------------------
#
# Introduction:
#
# This system allows you and all 'prepared' events to generate shadows while
# on the field map. The player can move around a 'light source' event and
# display a shadow. Likewise, events with a special comment within their
# event list can also generate shadows.
#
#------------------------------------------------------------------------------
#
# Instructions:
#
# -- The Light Source
# To create a light source, you need to create a map event that is to be
# used 'as' the light source. Most of the time, these could be events
# that sport 'torch' or 'lantern' charactersets. Just examples
#
# To make one of these events a light source, you need to insert a few
# things into that event's "List of Event Commands". These things are
# nothing more than comments.
#
# The first comment to add is "begin Shadow Source" (without quotes). It
# informs the system that this event is a light source. The remaining
# three values are optional and have default values in the configuration
# section (only just added into the script). They too are added as
# comments.
#
# anglemin 'number' --- Starting position of a lightsource's arc.
# anglemax 'number' --- Ending position of a lightsource's arc.
# distancemax 'number' --- How far away from the 'source' you can go
# self_opacity 'number' --- How dark the shadow will grow.
#
# After that, your characters can now move about and generate shadows.
#
# -- Other Events
# Events do not know that they can generate shadows. To let them gene-
# rate a shadow, all you need to do is add a special comment into their
# "List of Event Commands". This comment needed is merely the phrase
# 'begin Shadow' (again, without quotes).
#
#
# -- Blocking Shadows
# To prevent shadows from passing through solid objects such as doors,
# walls, cabinets or other forms of furniture, you will want to apply a
# priority flag of '1' or higher on these items. Normally, walls in the
# default database do not have a priority flag as they merely block the
# player from passing through.
#
#
#------------------------------------------------------------------------------
#
# Revisions to note:
#
# 1) Added formatted headers and comments throughout the script.
# 2) Encapsulated a comment/parameter code in an XPML module.
# 3) Set the shadow array into an instance value to lower resource costs.
# 4) Compatability with Near Fantastica's Squad Movement systems.
# 5) Compatability with Ccoa's Caterpillar system.
# 6) Compatability with Trickster's Caterpillar system.
# 7) Added default shadow settings into the configuration section.
#
#==============================================================================



#========================================================================
# ** C O N F I G U R A T I O N S Y S T E M ** #
#========================================================================
# Caterpillar Systems
CATERPILLAR_COMPATIBLE = true # Toggle for Fukuyama's original
SQUAD_MOVE_COMPATIBLE = false # Toggle for Near Fantastica's SBABS
CCOA_CATER_COMPATIBLE = false # Toggle for Ccoa's Caterpillar
TRICKSTER_CATER_COMPATIBLE = false # Toggle for Trickster's Caterpillar

# Shadow Specific Systems
SHADOW_WARN = true # Checks for older shadow system
SHADOW_MIN = 0 # Start setting of shadow arc *
SHADOW_MAX = 0 # Ending setting of shadow arc *
SHADOW_OPACITY = 80 # Darkness level of shadow
SHADOW_DISTANCE = 350 # Maximum range in pixels

# * SHADOW ARC: Set in degrees, this controls whether a light source
# can 'force' shadows in certain directions. Useful if
# a light source is hanging on a wall so it cannot make
# a shadow THROUGH a wall.
#
# It may take some practice to set the desired angles
# as it recognizes 90° being the top most part of an
# arc, 180° being the leftmost side and so on... pro-
# ceeding in a counter-clockwise motion.

#========================================================================
# **** E N D O F C O N F I G U R A T I O N S Y S T E M **** #
#========================================================================



#==============================================================================
# ** Game_Temp
#------------------------------------------------------------------------------
# This class handles temporary data that is not included with save data.
# Refer to "$game_temp" for the instance of this class.
#==============================================================================

class Game_Temp
#--------------------------------------------------------------------------
# * Public Instance Variables
#--------------------------------------------------------------------------
attr_accessor :shadow_spriteset # holds shadow spritesets
end



#==============================================================================
# ** Game_Party
#------------------------------------------------------------------------------
# This class handles the party. It includes information on amount of gold
# and items. Refer to "$game_party" for the instance of this class.
#==============================================================================

class Game_Party
#--------------------------------------------------------------------------
# * Public Instance Variables
#--------------------------------------------------------------------------
attr_reader :characters
end



#==============================================================================
# ** Sprite_Shadow
#------------------------------------------------------------------------------
# This sprite is used to display the character's shadow. It observes the
# Game_Character class and automatically changes sprite conditions.
#==============================================================================
class Sprite_Shadow < Sprite_Base
#--------------------------------------------------------------------------
# * Public Instance Variables
#--------------------------------------------------------------------------
attr_accessor :character
#--------------------------------------------------------------------------
# * Object Initialization
# viewport : viewport
# character : character (Game_Character)
# id : id
#--------------------------------------------------------------------------
def initialize(viewport, character = nil, id = 0)
super(viewport)
params = $game_temp.shadow_spriteset.shadows[id]
@source = params[0]
# Default settings
@anglemin = SHADOW_MIN
@anglemax = SHADOW_MAX
@self_opacity = SHADOW_OPACITY
@distancemax = SHADOW_DISTANCE
# Settings changed by parameters
@anglemin = params[1] if params.size > 1
@anglemax = params[2] if params.size > 2
@distancemax = params[3] if params.size > 3
@self_opacity = params[4] if params.size > 4
@character = character
update
end
#--------------------------------------------------------------------------
# * Frame Update
#--------------------------------------------------------------------------
def update
# If shadow not in range of light source
if !in_range?(@character, @source, @distancemax)
self.opacity = 0
return
end
super
# If tile ID, file name, or hue are different from current ones
if @tile_id != @character.tile_id or
@character_name != @character.character_name or
@character_index != @character.character_index
@tile_id = @character.tile_id
@character_name = @character.character_name
@character_index = @character.character_index
if @tile_id > 0
sx = (@tile_id / 128 % 2 * 8 + @tile_id % * 32;
sy = @tile_id % 256 / 8 % 16 * 32;
set_number = @tile_id / 256
self.bitmap = Cache.system("TileB") if set_number == 0
self.bitmap = Cache.system("TileC") if set_number == 1
self.bitmap = Cache.system("TileD") if set_number == 2
self.bitmap = Cache.system("TileE") if set_number == 3
self.src_rect.set(sx, sy, 32, 32)
self.ox = 16
self.oy = 32
else
self.bitmap = Cache.character(@character_name)
sign = @character_name[/^[\!\$]./]
if sign != nil and sign.include?('$')
@cw = bitmap.width / 3
@ch = bitmap.height / 4
else
@cw = bitmap.width / 12
@ch = bitmap.height / 8
end
self.ox = @cw / 2
self.oy = @ch
end
end
# Set visible situation
self.visible = (not @character.transparent)
# If graphic is character
if @tile_id == 0
index = @character.character_index
pattern = @character.pattern < 3 ? @character.pattern : 1
# Set rectangular transfer
sx = (index % 4 * 3 + pattern) * @cw
sy = (index / 4 * 4 + (@character.direction - 2) / 2) * @ch
if self.angle > 90 or angle < -90
sy = ( 4 - 2) / 2 * @ch if @character.direction == 6
sy = ( 6 - 2) / 2 * @ch if @character.direction == 4
sy = ( 8 - 2) / 2 * @ch if @character.direction == 2
sy = ( 2 - 2) / 2 * @ch if @character.direction == 8
end
self.src_rect.set(sx, sy, @cw, @ch)
end
# Set sprite coordinates
self.x = @character.screen_x
self.y = @character.screen_y-5
self.z = 10#@character.screen_z-1
# Set blend method and bush depth
self.blend_type = @character.blend_type
self.bush_depth = @character.bush_depth
# Animation
if @character.animation_id != 0
animation = $data_animations[@character.animation_id]
animation(animation, true)
@character.animation_id = 0
end
@deltax = @source.screen_x - self.x
@deltay = @source.screen_y - self.y
self.color = Color.new(0, 0, 0)
@distance = ((@deltax ** 2) + (@deltay ** 2))
# Set opacity level based on light source distance
self.opacity = @self_opacity * 13000 /
((@distance * 370 / @distancemax) + 6000)
self.angle = 57.3 * Math.atan2(@deltax, @deltay )
@angle_trigo = self.angle+90
if @angle_trigo < 0
@angle_trigo = 360 + @angle_trigo
end
if @anglemin != 0 or @anglemax != 0
if (@angle_trigo < @anglemin or @angle_trigo > @anglemax) and
@anglemin < @anglemax
self.opacity = 0
return
end
if (@angle_trigo < @anglemin and @angle_trigo > @anglemax) and
@anglemin > @anglemax
self.opacity=0
return
end
end
end
#--------------------------------------------------------------------------
# * In Range? (From Near's Anti Lag Script, edited)
# element : element
# object : object
# range : range in tiles
#--------------------------------------------------------------------------
def in_range?(element, object, range)
x = (element.screen_x - object.screen_x) * (element.screen_x - object.screen_x)
y = (element.screen_y - object.screen_y) * (element.screen_y - object.screen_y)
r = x + y
if r <= (range * range)
return true
else
return false
end
end
end



#==============================================================================
# ** Sprite_Character
#------------------------------------------------------------------------------
# This sprite is used to display the character.It observes the Game_Character
# class and automatically changes sprite conditions.
#==============================================================================

class Sprite_Character < Sprite_Base
#--------------------------------------------------------------------------
# * Alias Listings
#--------------------------------------------------------------------------
alias shadow_initialize initialize
alias shadow_update update
#--------------------------------------------------------------------------
# * Object Initialization
# viewport : viewport
# character : character (Game_Character)
#--------------------------------------------------------------------------
def initialize(viewport, character = nil)
@viewport0 = Viewport.new(0, 0, 544, 416)
@viewport0.z = 1
@character = character
super(viewport)
@ombrelist = Array.new
@ombrelist = []
if character.is_a?(Game_Event) and $game_temp.shadow_spriteset.shadows != []
params = XPML.XPML_read("Shadow", @character.id, 5)
if params != nil
for i in 0...$game_temp.shadow_spriteset.shadows.size
@ombrelist.push(Sprite_Shadow.new(@viewport0, @character,i))
end
end
end
if character.is_a?(Game_Player) and $game_temp.shadow_spriteset.shadows != []
for i in 0...$game_temp.shadow_spriteset.shadows.size
@ombrelist.push(Sprite_Shadow.new(@viewport0, $game_player,i))
end
#===================================================
# * Compatibility with Caterpillar Functions
#===================================================
if CATERPILLAR_COMPATIBLE and $game_party.characters != nil
for member in $game_party.characters
for i in 0...$game_temp.shadow_spriteset.shadows.size
@ombrelist.push(Sprite_Shadow.new(@viewport0, member, i))
end
end
end
if SQUAD_MOVE_COMPATIBLE and $game_allies.values != nil
for member in $game_allies.values
for i in 0...$game_temp.shadow_spriteset.shadows.size
@ombrelist.push(Sprite_Shadow.new(@viewport0, member, i))
end
end
end
if CCOA_CATER_COMPATIBLE and $game_train.actors != nil
for member in $game_train.actors
for i in 0...$game_temp.shadow_spriteset.shadows.size
@ombrelist.push(Sprite_Shadow.new(@viewport0, member, i))
end
end
end
if TRICKSTER_CATER_COMPATIBLE and $game_party.followers != nil
for member in $game_party.followers
for i in 0...$game_temp.shadow_spriteset.shadows.size
@ombrelist.push(Sprite_Shadow.new(@viewport0, member, i))
end
end
end
#===================================================
# ** End of the compatibility
#===================================================
end
# Perform the original call
shadow_initialize(viewport, @character)
end
#--------------------------------------------------------------------------
# * Frame Update
#--------------------------------------------------------------------------
def update
shadow_update
if @ombrelist != []
for i in 0...@ombrelist.size
@ombrelist[i].update

end
end
end
end



#==============================================================================
# ** Game_Event
#------------------------------------------------------------------------------
# This class deals with events. It handles functions including event page
# switching via condition determinants, and running parallel process events.
# It's used within the Game_Map class.
#==============================================================================

class Game_Event < Game_Character
#--------------------------------------------------------------------------
# * Public Instance Variables
#--------------------------------------------------------------------------
attr_accessor :id
end



#==============================================================================
# ** Spriteset_Map
#------------------------------------------------------------------------------
# This class brings together map screen sprites, tilemaps, etc.
# It's used within the Scene_Map class.
#==============================================================================

class Spriteset_Map
#--------------------------------------------------------------------------
# * Public Instance Variables
#--------------------------------------------------------------------------
attr_accessor :shadows
#--------------------------------------------------------------------------
# * Alias Listings
#--------------------------------------------------------------------------
alias shadow_initialize initialize
#--------------------------------------------------------------------------
# * Object Initialization
#--------------------------------------------------------------------------
def initialize
$game_temp.shadow_spriteset = self
@shadows = []
warn = false
for k in $game_map.events.keys.sort
if ($game_map.events[k].list != nil and
$game_map.events[k].list[0].code == 108 and
($game_map.events[k].list[0].parameters == ["s"] or
$game_map.events[k].list[0].parameters == ["o"]))
warn = true
end
params = XPML.XPML_read("Shadow Source", k, 5)
if params != nil
$game_temp.shadow_spriteset.shadows.push([$game_map.events[k]] + params)
end
end
if warn == true and SHADOW_WARN
p "Warning : At least one event on this map uses an obsolete way to add shadows"
end
# Perform the original call
shadow_initialize
end
end



#==============================================================================
# ** module XPML
#------------------------------------------------------------------------------
# This module handles the reading and passing of 'comment' parameters
#
# The main XPML method is used to check and read event comments.
# * It returns 'nil' if the markup 'check' text isn't even present.
# * It returns [] if no parameters are passed
# * It returns a parameter list with "int" converted as int.
# eg :
# begin first
# begin second
# param1 1
# param2 two
# begin third
# anything 3
#
# p XPML_read("first", event_id) -> []
# p XPML_read("second", event_id) -> [1,"two"]
# p XPML_read("third", event_id) -> [3]
# p XPML_read("forth", event_id) -> nil
#===================================================

module XPML
module_function
#--------------------------------------------------------------------------
# * XPML_read
# markup : text in event comment to check
# event_id : event ID
# max_param_number : maximum number of parameter/comments to load
#--------------------------------------------------------------------------
def XPML_read(markup, event_id, max_param_number = 0)
parameter_list = nil
event = $game_map.events[event_id]
return if event.list == nil
for i in 0...event.list.size
if event.list[i].code == 108 and
event.list[i].parameters[0].downcase == "begin " + markup.downcase
parameter_list = [] if parameter_list == nil
for j in i + 1...event.list.size
if event.list[j].code == 108
parts = event.list[j].parameters[0].split
if parts.size != 1 and parts[0].downcase != "begin"
if parts[1].to_i != 0 or parts[1] == "0"
parameter_list.push(parts[1].to_i)
else
parameter_list.push(parts[1])
end
else
return parameter_list
end
else
return parameter_list
end
if max_param_number != 0 and j == i + max_param_number
return parameter_list
end
end
end
end
return parameter_list
end
end

#════════════════════════════════════════════════════════════════#
# Script: Lockpick System #
# by Deity [translated to English by modern algebra (rmrk.net)] #
#════════════════════════════════════════════════════════════════#
# Description: #
# This script simulates a lockpicking system similar to that #
# in Oblivion which allows you to set certain chests to only #
# open once successfully picking the lock. Essentially, the #
# system requires the player to successfully push all of the #
# "sticks" into the up position - a failure results in a #
# destroyed lockpick. Once all sticks are up, self-switch A of #
# the particular event is turned on and you can put in the #
# success results #
#════════════════════════════════════════════════════════════════#
# Instructions: #
# First, you must look at all of the constants under the #
# Settings heading and configure the script to your liking. #
# Read all the descriptions before using the script. #
# #
# Now, to create a lock on an event, you must create a #
# comment somewhere in the event. The first line in this #
# comment must be what you have set as SP_WORD at line 70. You #
# must then go down to the second line of the comment and #
# write the positions of the five "sticks". for ones that you #
# want the player to have to unlock, put "down" and for the #
# ones you already want to be unlocked, put "up". Be sure to #
# put spaces between each word #
# #
# EXAMPLE: #
# @>Comment:SP_WORD #
# : :up down up down down #
# #
# This would create a lock where the player would have to #
# push up the 2nd, 4th, and 5th sticks, while the other two #
# are already up. #
# #
# Once the player is successful, Self-Switch A for that event #
# is turned on. #
#▼════════════════════════ Settings ════════════════════════════▼#
# true = yes / false = no #
module Lockpicking
# Picture Resources (Graphics/Pictures) #
# Name of the background image (appears behind sticks and lockpick)
BACKGROUND_IAMGE_NAME = "LockBack"
# Name of the image used for each "stick"
STICK_IMAGE_NAME = "LockStick"
# Name of the image used for the lockpick
LOCKPICK_IMAGE_NAME = "Lockpick"
# Name of the foreground image (appears above sticks and lockpick)
FORGROUND_IMAGE_NAME = "LockFor"
# System Settings #
# Opacity of info and help window (0-255)
OPACITY = 200
# default amount of time stick waits in up position for player to press ENTER
# It is in frames (60 frames = 1 second)
WAIT_TIME = 20
# ID of the variable to add or subtract time from the wait period. This can
# be used to make some locks harder or easier - the value of the variable
# will be added to the WAIT_TIME.
WAIT_MOD_VARIABLE_ID = 1
# ID of the lockpick item.
LOCKPICK_ID = 7
# Lockpicks destroyed upon failure? true => breakable; false => unbreakable
LOCKPICK_BREAKABLE = false
# Text to show in information window
INFO_TEXT = "ESC : Quitter | TOUCHES FLECHES : Controle | ENTRE: Tentative | SHIFT : Info"
# Plural name for lockpicks
LOCKPICK_NAME = "Crochetage:"
# This is the key word which you have to preface you comment with
SP_WORD = "Treasure"
# Sound Effects #
# Sound Effect when succeed in opening lock
SOUND_OPEN = "Close1"
# Sound Effect when attempt fails
SOUND_FAIL = "pinpull"
# Sound Effect when the
SOUND_STICK = "Shotgun Clipin"
# Sound Effect when toggling the visibility of the Info Window
SOUND_INFOSWITCH = "Switch2"
# Do not edit past this point unless you are a scripter and #
# know what you are doing.
#▲═════════════════════════════════════════════════════════════▲#
end
include Lockpicking
class Scene_Lockpick < Scene_Base
def initialize(switches,event_id = 0)
@switches = switches
@controll = switches
@images = []
@sticks = []
@lockpick_index = 1
@animation = 0
@press = false
@sekunde = 0
@event_id = event_id
@normal_stick_y = 0
@wait_for_press = false
end
def start
@help = Window_Help.new
@help.opacity = OPACITY
@help.y = 416 - 56
@help.set_text(INFO_TEXT,1)
@info = Window_Base.new(0,0,544,56)
@info.opacity = OPACITY
@info.contents.draw_text(0,0,512,24,LOCKPICK_NAME,0)
@info.contents.draw_text(0,0,512,24,$game_party.item_number($data_items[LOCKPICK_ID]).to_s,2)
create_menu_background
@menuback_sprite.z -= 1
draw_scene
end
def draw_scene
@background = Sprite.new
@background.bitmap = Cache.picture(BACKGROUND_IAMGE_NAME)
@background.x = (544 - @background.width) / 2
@background.y = (416 - @background.height) / 2
@images.push(@background)
for i in 0...5
stick = Sprite.new
stick.bitmap = Cache.picture (STICK_IMAGE_NAME)
stick.x = ((544 - (stick.width*9)) / 2) + (2 * i * stick.width)
stick.y = (416 - stick.height) / 2
stick.y -= 20 if @switches[i].include? ("up")
@images.push (stick)
@sticks.push (stick)
end
@normal_stick_y = (416 - @sticks[0].height) / 2
@lockpick = Sprite.new
if $game_party.item_number($data_items[LOCKPICK_ID]) > 0
@lockpick.bitmap = Cache.picture(LOCKPICK_IMAGE_NAME)
@lockpick.x = @sticks[0].x - @lockpick.width + (@sticks[0].width / 2)
@lockpick.y = @normal_stick_y + @sticks[0].height + 5
@lockpicky = @lockpick.y
@images.push(@lockpick)
end
@forground = Sprite.new
@forground.bitmap = Cache.picture(FORGROUND_IMAGE_NAME)
@forground.x = (544 - @forground.width) / 2
@forground.y = (416 - @forground.height) / 2
@forground.z = @lockpick.z + 1
@images.push(@forground)
end
def dispose_all
for i in @images
i.dispose if i != nil
end
@help.dispose
@info.dispose
dispose_menu_background
end
def update_lockpick
@lockpick.x = @sticks[0].x - @lockpick.width + (@sticks[0].width * (2*@lockpick_index - 1.5))
end
def start_lockpick_animation
if @press == true && @switches[@lockpick_index - 1] == "down"
if @animation <= 5
@lockpick.y -= 1
@animation += 1
end
if @animation > 5 && @animation <= 10
@sticks[@lockpick_index - 1].y -= 1
@lockpick.y -= 1 if @animation <= 10
@animation += 1
end
wait_time = WAIT_TIME
wait_time += $game_variables[WAIT_MOD_VARIABLE_ID] unless WAIT_MOD_VARIABLE_ID < 1
wait_time = 1 if wait_time < 1
if @animation > 10 && @animation <= 25
@lockpick.y += 1 if @animation <= 21
if @switches[@lockpick_index - 1].include?("down")
@sticks[@lockpick_index - 1].y -= 1
end
@animation += 1
elsif @animation > 25 && @sekunde == 0
@wait_for_press = true
elsif @sekunde >= wait_time
@animation = 0
@sekunde = 0
@press = false
@wait_for_press = false
return_to_normal
end
else
@press = false
end
end
def set_variables_standart
@animation = 0
@sekunde = 0
@press = false
@wait_for_press = false
end
def return_to_normal
set_variables_standart
@sticks[@lockpick_index - 1].y = @normal_stick_y
@lockpick.y = @normal_stick_y + @sticks[0].height + 5
end
def stick_is_at_top
return true if @sticks[@lockpick_index - 1].y == @normal_stick_y - 20
end
def check_chest
for i in @controll
if i == "down"
return false
end
end
return true
end
def update
if $game_party.item_number($data_items[LOCKPICK_ID]) < 1
@lockpick.visible = false
end
if Input.trigger?(Input::A)
Audio.se_play("Audio/SE/"+SOUND_INFOSWITCH, 100, 150)
@info.visible = !@info.visible
@help.visible = !@help.visible
end
if @info.visible == true
@info.contents.clear
@info.contents.draw_text(0,0,512,24,LOCKPICK_NAME,0)
@info.contents.draw_text(0,0,512,24,$game_party.item_number($data_items[LOCKPICK_ID]),2)
end
if check_chest
Audio.se_play("Audio/SE/"+SOUND_OPEN, 100, 150)
$game_map.events[@event_id].open=(true)
key = [$game_map.events[@event_id].map_id, @event_id, "A"]
$game_self_switches[key] = true
$scene = Scene_Map.new
dispose_all
end
@sekunde += 1 if @wait_for_press == true
if Input.trigger?(Input::LEFT) && @press == false && $game_party.item_number($data_items[LOCKPICK_ID]) > 0
@lockpick_index -= 1
if @lockpick_index < 1
@lockpick_index = 1
end
update_lockpick
end
if Input.trigger?(Input::RIGHT) && @press == false && $game_party.item_number($data_items[LOCKPICK_ID]) > 0
@lockpick_index += 1
if @lockpick_index > 5
@lockpick_index = 5
end
update_lockpick
end
if Input.trigger?(Input::UP) && @press == false && $game_party.item_number($data_items[LOCKPICK_ID]) > 0
@press = true
Audio.se_play("Audio/SE/"+SOUND_STICK, 100, 100) if @switches[@lockpick_index - 1] != "up"
end
start_lockpick_animation if @press == true && $game_party.item_number($data_items[LOCKPICK_ID]) > 0
if Input.trigger?(Input::C) && $game_party.item_number($data_items[LOCKPICK_ID]) > 0
if stick_is_at_top && @wait_for_press == true
set_variables_standart
@switches[@lockpick_index - 1] = "up"
@controll[@lockpick_index - 1] = "up" if @controll[@lockpick_index - 1].include?("down")
else
@sticks[@lockpick_index - 1].y = @normal_stick_y if @switches[@lockpick_index - 1] == "down"
Audio.se_play("Audio/SE/"+SOUND_FAIL, 100, 100) if @switches[@lockpick_index - 1] == "down"
return_to_normal if @switches[@lockpick_index - 1] == "down"
$game_party.lose_item($data_items[LOCKPICK_ID], 1, true) if LOCKPICK_BREAKABLE == true
end
@animation = 0
@press = false
@wait_for_press = false
end
if Input.trigger?(Input::B)
Sound.play_cancel
dispose_all
return_scene
end
end
def return_scene
$scene = Scene_Map.new
end
end
class Game_Event
attr_accessor :open
attr_reader :map_id
alias initialize_lockpick initialize
def initialize(map_id, event)
initialize_lockpick(map_id, event)
@open = false if $game_self_switches[[map_id, event.id, "A"]] == false
end
alias refresh_lockpick refresh
def refresh
refresh_lockpick
if @open == true
key = [@map_id, @event.id, "A"]
$game_self_switches[key] = true
end
end
end
class Game_Interpreter
alias execute_command_lockpick execute_command
def execute_command (*args)
if @index < @list.size-1 && @list[@index].code == 108 && @list[@index].parameters[0].include?(SP_WORD)
sticks = @list[@index + 1].parameters[0].split
$scene = Scene_Lockpick.new (sticks, @event_id)
@index += 1
return false
end
return execute_command_lockpick (*args)
end
end

#==============================================================================
# ■ Light Effects VX 1.1
# 5.21.2008
#------------------------------------------------------------------------------
# Script: Kylock (à l'origine pour RMXP Near Fantastica)
# Tradução por Equipe Gemstone
# Traduit Par Douk => Français => http://rpgmakervx.1fr1.net/
#================================================= =============================
# Pour faire briller un événement, écrire un commentaire: avec un des
# Modes de lumière ci-dessous.
#================================================
#===============================================================
#
# www.rpgmakervx-fr.com
#
#===============================================================
# ● des news :
#------------------------------------------------- -----------------------------
# 1,0 - sortie d'origine
# 1,1 - Des nouvelles façons de lumière ajoutée: LIGHT2 TORCHE, TORCH2.
# - Changement de la façon de mélanger le sprite à ajouter (semble un peu mieux).
# - Les Feux d'incendie sont maintenant teinte de rouge.
#================================================= =============================
# ● modes d'éclairage :
#------------------------------------------------- -----------------------------
# Ground - Moyen-portée et de la lumière blanche.
# FIRE - Le feu rouge varie légèrement.
# LUMIERE - Portée courte et à la lumière blanche.
# LIGHT2 - à longue distance et une lumière blanche.
# TORCHE - Grosse lumière rouge avec une grande emprise.
# TORCH2 - Grosse lumière qui varie légèrement.
#==============================================================================

class Spriteset_Map
alias les_spriteset_map_initalize initialize
alias les_spriteset_map_dispose dispose
alias les_spriteset_map_update update
def initialize
@light_effects = []
setup_lights
les_spriteset_map_initalize
update
end
def dispose
les_spriteset_map_dispose
for effect in @light_effects
effect.light.dispose
end
@light_effects = []
end
def update
les_spriteset_map_update
update_light_effects
end
def setup_lights
for event in $game_map.events.values
next if event.list == nil
for i in 0...event.list.size
if event.list[i].code == 108 and event.list[i].parameters == ["GROUND"]
type = "GROUND"
light_effects = Light_Effect.new(event,type)
light_effects.light.zoom_x = 2
light_effects.light.zoom_y = 2
light_effects.light.opacity = 100
@light_effects.push(light_effects)
end
if event.list[i].code == 108 and event.list[i].parameters == ["FIRE"]
type = "FIRE"
light_effects = Light_Effect.new(event,type)
light_effects.light.zoom_x = 300 / 100.0
light_effects.light.zoom_y = 300 / 100.0
light_effects.light.opacity = 100
@light_effects.push(light_effects)
end
if event.list[i].code == 108 and event.list[i].parameters == ["LIGHT"]
type = "LIGHT"
light_effects = Light_Effect.new(event,type)
light_effects.light.zoom_x = 1
light_effects.light.zoom_y = 1
light_effects.light.opacity = 150
@light_effects.push(light_effects)
end
if event.list[i].code == 108 and event.list[i].parameters == ["LIGHT2"]
type = "LIGHT2"
light_effects = Light_Effect.new(event,type)
light_effects.light.zoom_x = 6
light_effects.light.zoom_y = 6
light_effects.light.opacity = 150
@light_effects.push(light_effects)
end
if event.list[i].code == 108 and event.list[i].parameters == ["TORCH"]
type = "TORCH"
light_effects = Light_Effect.new(event,type)
light_effects.light.zoom_x = 6
light_effects.light.zoom_y = 6
light_effects.light.opacity = 150
@light_effects.push(light_effects)
end
if event.list[i].code == 108 and event.list[i].parameters == ["TORCH2"]
type = "TORCH2"
light_effects = Light_Effect.new(event,type)
light_effects.light.zoom_x = 6
light_effects.light.zoom_y = 6
light_effects.light.opacity = 150
@light_effects.push(light_effects)
end
end
end
for effect in @light_effects
case effect.type
when "GROUND"
effect.light.x = (effect.event.real_x - 400 - $game_map.display_x) / 8
effect.light.y = (effect.event.real_y - 400 - $game_map.display_y) / 8
effect.light.blend_type = 1
when "FIRE"
effect.light.x = (effect.event.real_x - 600 - $game_map.display_x) / 8 + rand(6) - 3
effect.light.y = (effect.event.real_y - 600 - $game_map.display_y) / 8 + rand(6) - 3
effect.light.tone = Tone.new(255,-100,-255, 0)
effect.light.blend_type = 1
when "LIGHT"
effect.light.x = (-0.25 / 2 * $game_map.display_x) + (effect.event.x * 32) - 15
effect.light.y = (-0.25 / 2 * $game_map.display_y) + (effect.event.y * 32) - 15
effect.light.blend_type = 1
when "LIGHT2"
effect.light.x = (effect.event.real_x - 1200 - $game_map.display_x) / 8 - 20
effect.light.y = (effect.event.real_y - 1200 - $game_map.display_y) / 8
effect.light.blend_type = 1
when "TORCH"
effect.light.x = (effect.event.real_x - 1200 - $game_map.display_x) / 8 - 20
effect.light.y = (effect.event.real_y - 1200 - $game_map.display_y) / 8
effect.light.tone = Tone.new(255,-100,-255, 0)
effect.light.blend_type = 1
when "TORCH2"
effect.light.x = (effect.event.real_x - 1200 - $game_map.display_x) / 8 - 20
effect.light.y = (effect.event.real_y - 1200 - $game_map.display_y) / 8
effect.light.tone = Tone.new(255,-100,-255, 0)
effect.light.blend_type = 1
end
end
end
def update_light_effects
if $game_switches[1]
for effect in @light_effects
next if effect.type == "FIRE" || effect.type == "TORCH"
effect.light.visible = false
end
else
for effect in @light_effects
next if effect.type == "FIRE" || effect.type == "TORCH"
effect.light.visible = true
end
end
for effect in @light_effects
case effect.type
when "GROUND"
effect.light.x = (effect.event.real_x - 400 - $game_map.display_x) / 8
effect.light.y = (effect.event.real_y - 400 - $game_map.display_y) / 8
when "FIRE"
effect.light.x = (effect.event.real_x - 600 - $game_map.display_x) / 8 + rand(6) - 3
effect.light.y = (effect.event.real_y - 600 - $game_map.display_y) / 8 + rand(6) - 3
effect.light.opacity = rand(10) + 90
when "LIGHT"
effect.light.x = (-0.25 / 2 * $game_map.display_x) + (effect.event.x * 32) - 15
effect.light.y = (-0.25 / 2 * $game_map.display_y) + (effect.event.y * 32) - 15
when "LIGHT2"
effect.light.x = (effect.event.real_x - 1200 - $game_map.display_x) / 8 - 20
effect.light.y = (effect.event.real_y - 1200 - $game_map.display_y) / 8
when "TORCH"
effect.light.x = (effect.event.real_x - 1200 - $game_map.display_x) / 8 - 20 + rand(20) - 10
effect.light.y = (effect.event.real_y - 1200 - $game_map.display_y) / 8 + rand(20) - 10
effect.light.opacity = rand(30) + 70
when "TORCH2"
effect.light.x = (effect.event.real_x - 1200 - $game_map.display_x) / 8 - 20
effect.light.y = (effect.event.real_y - 1200 - $game_map.display_y) / 8
effect.light.opacity = rand(10) + 90
end
end
end
end

class Light_Effect
attr_accessor :light
attr_accessor :event
attr_accessor :type
def initialize(event, type)
@light = Sprite.new
@light.bitmap = Cache.picture("le.png")
@light.visible = true
@light.z = 1000
@event = event
@type = type
end
end