#=========================================================================



# ** Map Name Popup

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

# Dargor, 2008

# 06/03/08

# Version 1.0

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

# INSTRUCTIONS:

# - Paste this above main

# - Edit the Exclude_Maps array in the Map_Name_Popup module

# VERSION HISTORY:

# - 1.0 (06/03/08), Initial release

#==============================================================================



#==============================================================================

# ** Map Name Popup Configuration

#==============================================================================



module Map_Name_Popup

# These maps will not popup the name window

Exclude_Maps = []

end



#==============================================================================

# ** Game_Map

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

# This class handles maps. It includes scrolling and passage determination

# functions. The instance of this class is referenced by $game_map.

#==============================================================================



class Game_Map

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

# * Public Instance Variables

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

attr_accessor :show_name

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

# Alias Listing

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

alias dargor_map_name_window_setup setup

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

# * Setup

# map_id : map ID

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

def setup(map_id)

dargor_map_name_window_setup(map_id)

@show_name = true

end

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

# * Get Map ID

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

def name

map_infos = load_data("Data/MapInfos.rvdata")

name = map_infos[@map_id].name

name.gsub!(/\N[([0-9] )]/i) { $game_actors[$1.to_i].name }

return name

end

end



#==============================================================================

# ** Spriteset_Map

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

# This class brings together map screen sprites, tilemaps, etc. It's used

# within the Scene_Map class.

#==============================================================================



class Spriteset_Map

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

# Alias Listing

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

alias dargor_spriteset_name_window_initialize initialize

alias dargor_spriteset_name_window_update update

alias dargor_spriteset_name_window_dispose dispose

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

# * Object Initialization

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

def initialize

create_windows

dargor_spriteset_name_window_initialize

update

end

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

# * Create Windows

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

def create_windows

@name_window = Window_MapName.new

if $game_map.show_name

@name_window.show_name($game_map.name, 128)

end

end

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

# * Frame Update

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

def update

dargor_spriteset_name_window_update

@name_window.update

end

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

# * Dispose

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

def dispose

dargor_spriteset_name_window_dispose

@name_window.dispose

end

end



#==============================================================================

# ** Window_MapName

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

# This window shows the map name when the player is transfered.

#==============================================================================



class Window_MapName < Window_Base

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

# * Object Initialization

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

def initialize(name="", count=128)

super(0, 0, 544, 64)

self.visible = false

self.openness = 0

@name = name

@count = count

end

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

# * Refresh

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

def refresh

#return unless $game_map.display_name

self.visible = true

self.contents.clear

self.contents.font.color = normal_color

self.contents.draw_text(0,0,504,32,@name,1)

$game_map.show_name = false

end

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

# * Show Name

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

def show_name(name=@name, count=@count)

return if Map_Name_Popup::Exclude_Maps.include?($game_map.map_id)

@name = name

@count = count

refresh

end

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

# * Frame Update

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

def update

super

unless $scene.is_a?(Scene_Map)

self.visible = false

return

end

if self.visible

if @count == 0

self.openness -= 24

self.visible = false if self.openness == 0

return

end

self.openness = 24

@count -= 1

end

end

end

# Popup pour gain argent, objet, arme et armure !!

# Permet d'afficher une fenêtre de taille différente selon la taille du nom
# des que vous utilisez la commande d'évent " Ajouter " argent, objet, arme, armure.
# Pour éviter les problèmes d'apparition non voulu, le nom de l'évent doit
# contenir ces trois caractères [C] pour que le script se joue.
# Ne fonctionne que pour indiquer un gain !!

class Game_Interpreter
#--------------------------------------------------------------------------
# *Changer l'argent
#--------------------------------------------------------------------------
def command_125
value = operate_value(@params[0], @params[1], @params[2])
$game_party.gain_gold(value)
if $game_map.events[@event_id].name.include?("[C]")
$argent = value
$taille = $argent.to_s.length
$taille *= 15
$taille = 24 60
$scene = Popup_Argent.new
end
return true
end
#--------------------------------------------------------------------------
# * Changer les objets
#--------------------------------------------------------------------------
def command_126
value = operate_value(@params[1], @params[2], @params[3])
$game_party.gain_item($data_items[@params[0]], value)
if $game_map.events[@event_id].name.include?("[C]")
$item = @params[0]
$nombre = value
$taille = $data_items[$item].name.to_s.length
$taille *= 11
$taille = 24 60
$scene = Popup_Objet.new
end
$game_map.need_refresh = true
return true
end
#--------------------------------------------------------------------------
# * Changer les Armes
#--------------------------------------------------------------------------
def command_127
value = operate_value(@params[1], @params[2], @params[3])
$game_party.gain_item($data_weapons[@params[0]], value, @params[4])
if $game_map.events[@event_id].name.include?("[C]")
$arme = @params[0]
$nombre = value
$taille = $data_weapons[$arme].name.to_s.length
$taille *= 12
$taille = 24 60
$scene = Popup_Arme.new
end
return true
end
#--------------------------------------------------------------------------
# * Changer armures
#--------------------------------------------------------------------------
def command_128
value = operate_value(@params[1], @params[2], @params[3])
$game_party.gain_item($data_armors[@params[0]], value, @params[4])
if $game_map.events[@event_id].name.include?("[C]")
$armure = @params[0]
$nombre = value
$taille = $data_armors[$armure].name.to_s.length
$taille *= 12
$taille = 24 50
$scene = Popup_Armure.new
end
return true
end

end # class
#--------------------------------------------------------------------------

class Window_Objet < Window_Base

def initialize(item, nombre, taille)
super(180, 150, taille, 60)
@item = item
@nombre = nombre
@taille = taille
refresh
end

def refresh
self.contents.clear
objet = $data_items[@item]
draw_icon(objet.icon_index, 0, 0)
self.contents.font.color = normal_color
self.contents.font.color.alpha = 255
self.contents.draw_text(24, 0, @taille, 32, objet.name " " @nombre.to_s)
end

end

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

class Popup_Objet

def main
@spriteset = Spriteset_Map.new
@window_objet = Window_Objet.new($item, $nombre, $taille)
Graphics.transition
loop do
Graphics.update
Input.update
update
if $scene != self
break
end
end
Graphics.freeze
@window_objet.dispose
@spriteset.dispose
end

def update
@window_objet.update
@spriteset.update
if Input.trigger?(Input::C)
Sound.play_decision
$scene = Scene_Map.new
return
end
end

end

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

class Window_Argent < Window_Base

def initialize(argent, taille)
super(200, 150, taille, 60)
@argent = argent
@taille = taille
refresh
end

def refresh
self.contents.clear
bitmap = Cache.system("Iconset")
rect = Rect.new(3 * 24, 9 * 24, 24, 24)
self.contents.blt(0, 0, bitmap, rect, 255)
self.contents.draw_text(24, 0, @taille, 32, " " @argent.to_s " " Vocab::gold)
end

end

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

class Popup_Argent

def main
@spriteset = Spriteset_Map.new
@window_argent = Window_Argent.new($argent, $taille)
Graphics.transition
loop do
Graphics.update
Input.update
update
if $scene != self
break
end
end
Graphics.freeze
@window_argent.dispose
@spriteset.dispose
end

def update
@window_argent.update
@spriteset.update
if Input.trigger?(Input::C)
Sound.play_decision
$scene = Scene_Map.new
return
end
end

end

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

class Window_Arme < Window_Base

def initialize(arme, nombre, taille)
super(180, 150, taille, 60)
@arme = arme
@nombre = nombre
@taille = taille
refresh
end

def refresh
self.contents.clear
objet = $data_weapons[@arme]
draw_icon(objet.icon_index, 0, 0)
self.contents.font.color = normal_color
self.contents.font.color.alpha = 255
self.contents.draw_text(24, 0, @taille, 32, objet.name " " @nombre.to_s)
end

end

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

class Popup_Arme

def main
@spriteset = Spriteset_Map.new
@window_arme = Window_Arme.new($arme, $nombre, $taille)
Graphics.transition
loop do
Graphics.update
Input.update
update
if $scene != self
break
end
end
Graphics.freeze
@window_arme.dispose
@spriteset.dispose
end

def update
@window_arme.update
@spriteset.update
if Input.trigger?(Input::C)
Sound.play_decision
$scene = Scene_Map.new
return
end
end

end

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

class Window_Armure < Window_Base

def initialize(armure, nombre, taille)
super(150, 150, taille, 60)
@armure = armure
@nombre = nombre
@taille = taille
refresh
end

def refresh
self.contents.clear
objet = $data_armors[@armure]
draw_icon(objet.icon_index, 0, 0)
self.contents.font.color = normal_color
self.contents.font.color.alpha = 255
self.contents.draw_text(24, 0, @taille, 32, objet.name " " @nombre.to_s)
end

end

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

class Popup_Armure

def main
@spriteset = Spriteset_Map.new
@window_armure = Window_Armure.new($armure, $nombre, $taille)
Graphics.transition
loop do
Graphics.update
Input.update
update
if $scene != self
break
end
end
Graphics.freeze
@window_armure.dispose
@spriteset.dispose
end

def update
@window_armure.update
@spriteset.update
if Input.trigger?(Input::C)
Sound.play_decision
$scene = Scene_Map.new
return
end
end

end

# --------------------------------------------------
class Game_Event < Game_Character

attr_reader :name
attr_reader :trigger # Gachette
attr_reader :list # Liste des évènements des commandes
attr_reader :starting # Commencement

def initialize(map_id, event)
super()
@name = event.name
@map_id = map_id
@event = event
@id = @event.id
@erased = false
@starting = false
@through = true
moveto(@event.x, @event.y) # Déplacer au mouvement initial.
refresh
end
end

#==============================================================================
# ■ Light Effects VX 1.1
# 5.21.2008
#------------------------------------------------------------------------------
# Script by: Kylock (originally for RMXP by Near Fantastica)
# Traduction fr : Blockade
#==============================================================================
# Pour faire un effet de lumiére, inserer un commentaire avec le nom du mode voulu.
# modes.
# The SWITCH setting below will disable light effects from updating with the
# switch is on.
#==============================================================================
# ● Change Log
#------------------------------------------------------------------------------
# 1.0 - Original Release
# 1.1 - New light modes added: LIGHT2, TORCH, TORCH2
# - Changed sprite blend mode to ADD (looks slightly better)
# - Fire-based lights are now red in color
#==============================================================================
# ● Modes :
#------------------------------------------------------------------------------
# GROUND - Lumière blanche, intensité moyenne
# FIRE - Lumière rouge, intensité forte
# LIGHT - Lumière Blanche, intensité petite
# LIGHT2 - Lumière blanche intensité forte
# TORCH - Lumière rouge, intensité forte, ondule
# TORCH2 -Lumière rouge, intensité forte
#==============================================================================

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

#===================================================================
# ● [VX] ◦ Affichage de l'Equipements sur la Map
#---------------------------------------------------------------------------------------------------------------------
# ◦ Par La Meche
# ◦ https://rpg-maker-vx.bbactif.com/forum.htm
# ◦ Crée le 25/03/2009
# ◦ Version 1
#===================================================================

#===================================================================
# * * Module Affichage
#---------------------------------------------------------------------------------------------------------------------
# Personnalisation
#===================================================================
module Affichage

#==================================================
# ID de l'interrupteur pour afficher l'equipemenr
#==================================================
Interrupteur = 20

#==================================================
# Affichage des differents equipements
# Si vous voulez rentre invisible un equipement remplacer par false
# Sinon true
#==================================================
Arme = true
Bouclier = true
Casque = true
Armure = true
Accessoire = true
Objet = true

#==================================================
# Hero dans l'équipe qui se vera afficher ses equipements sur la map
#==================================================
Hero = 1

end
#===================================================================
# * * Window_HUD
#---------------------------------------------------------------------------------------------------------------------
# Création de l'affichage
#===================================================================
class Window_HUD < Window_Base

#--------------------------------------------------------------------------
# * Initialize
#--------------------------------------------------------------------------
def initialize(x, y, n)
@n = n
@x = x
@y = y
super(@x, @y, 72, 72)
self.opacity = 0
refresh
end

#--------------------------------------------------------------------------
# * Refresh
#--------------------------------------------------------------------------
def refresh
self.contents.clear
actor = $game_party.members[AffichageHero-1]
draw_icon(actor.equips[@n].icon_index, 8, 8, true) if actor.equips[@n] != nil
end

#--------------------------------------------------------------------------
# * Cacher
#--------------------------------------------------------------------------
def cacher
self.contents.clear
bitmap = Cache.picture("Equips-Cache")
rect = Rect.new(0, 0, 40, 40)
self.contents.blt(0, 0, bitmap, rect)
end

end
#===================================================================
# * * Scene_Map
#---------------------------------------------------------------------------------------------------------------------
# Affichage sur la map des equipements
#===================================================================
class Scene_Map

#--------------------------------------------------------------------------
# * Alias
#--------------------------------------------------------------------------
alias hud_start start
alias hud_terminate terminate
alias hud_update update


#--------------------------------------------------------------------------
# * Start
#--------------------------------------------------------------------------
def start
@Arme = Window_HUD.new(0, 0, 0)
@Arme.cacher if Affichage::Arme == false
@Bouclier = Window_HUD.new(40, 0, 1)
@Bouclier.cacher if Affichage::Bouclier == false
@Casque = Window_HUD.new(80, 0, 2)
@Casque.cacher if Affichage::Casque == false
@Armure = Window_HUD.new(120, 0, 3)
@Armure.cacher if Affichage::Armure == false
@Accessoire = Window_HUD.new(160, 0, 4)
@Accessoire.cacher if Affichage::Accessoire == false
@Affiche = Sprite.new
@Affiche.bitmap = Cache.picture("Equips")
@Affiche.x = 16
@Affiche.y = 16
if $game_switches[AffichageInterrupteur] == false
@Arme.visible = false
@Bouclier.visible = false
@Casque.visible = false
@Armure.visible = false
@Accessoire.visible = false
@Affiche.visible = false
end
hud_start
end

#--------------------------------------------------------------------------
# * Terminate
#--------------------------------------------------------------------------
def terminate
@Arme.dispose
@Bouclier.dispose
@Casque.dispose
@Armure.dispose
@Accessoire.dispose
@Affiche.dispose
hud_terminate
end

#--------------------------------------------------------------------------
# * Update
#--------------------------------------------------------------------------
def update
if $game_switches[AffichageInterrupteur] == true
@Arme.refresh
@Arme.cacher if Affichage::Arme == false
@Arme.visible = true
@Bouclier.refresh
@Bouclier.cacher if Affichage::Bouclier == false
@Bouclier.visible = true
@Casque.refresh
@Casque.cacher if Affichage::Casque == false
@Casque.visible = true
@Armure.refresh
@Armure.cacher if Affichage::Armure == false
@Armure.visible = true
@Accessoire.refresh
@Accessoire.cacher if Affichage::Accessoire == false
@Accessoire.visible = true
@Affiche.visible = true
end
if $game_switches[AffichageInterrupteur] == false
@Arme.visible = false
@Bouclier.visible = false
@Casque.visible = false
@Armure.visible = false
@Accessoire.visible = false
@Affiche.visible = false
end
hud_update
end

end
#===================================================================
# Fin du script
#===================================================================

#==========================================================================
# Maxhack_Fog
#==========================================================================
# Par Maxhack
# Pour RMVX
# 11 Juillet 2008
#
# Mettre les images "Nuages" et "Brouillard"
# dans le dossier "Graphics/Parallaxes/"
#
# Insérer ces commandes en script dans un évenement en procéssus parallèle :
# Pour choisir le type de brouillard :
# - gb_fogfile ('Nuages')
# ou
# - gb_fogfile ('Brouillard')
# Pour choisir l'opacité :
# - gb_fogopac (#) (remplacer "#" par un chiffre)
# Pour choisir la vitesse de défilement du brouillard :
# - gb_fogsx([#,#]) (remplacer "#" par un chiffre)
#==========================================================================

module GameBaker
FogDir = 'Graphics/Parallaxes/'
FogDisable = 0
FogDisableAuto = 0

Fog = Hash.new('')
FogBlending = Hash.new(0)
FogOpacity = Hash.new(48)
FogSxs = Hash.new([0,0])
FogTone = Hash.new([0,0,0,0])
FogZ = Hash.new(140)
end


def gb_fogblend(num)
$game_map.gb_fog[6] = num
end

def gb_fogfile(num)
$game_map.gb_fog[1] = num
end

def gb_fogopac(num)
$game_map.gb_fog[5] = num
end

def gb_fogsx(num)
$game_map.gb_fogsx = num[0]
$game_map.gb_fogsy = num[1]
end

def gb_fogtone(num)
$game_map.gb_fgtone = Tone.new(num[0],num[1],num[2],num[3])
end

def gb_fogz(num)
$game_map.gb_fog[4] = num
end

module Cache
def self.fog(filename)
load_bitmap(GameBaker::FogDir, filename)
end
end

class Game_Map
attr_accessor :gb_fog, :gb_fogsx, :gb_fogsy, :gb_fgtone

alias gamebaker_fog_setup setup
def setup(map_id)
gamebaker_fog_setup(map_id)
gamebaker_fog_setup2
end

def gamebaker_fog_setup2
@gb_fog = [0, '', 0, 0, 0, 0, 0] if !@gb_fog
return if $game_switches[GameBakerFogDisableAuto]
@gb_fog = [0, GameBaker::Fog[@map_id],
GameBaker::FogSxs[@map_id][0],
GameBaker::FogSxs[@map_id][1],
GameBaker::FogZ[@map_id],
GameBaker::FogOpacity[@map_id],
GameBaker::FogBlending[@map_id]]
@gb_fogsx = GameBaker::FogSxs[@map_id][0]
@gb_fogsy = GameBaker::FogSxs[@map_id][1]
@gb_fgtone = gb_fogtone(GameBaker::FogTone[@map_id])
@gb_fogx = 0
@gb_fogy = 0
end

alias gamebaker_fog_update update
def update
gamebaker_fog_update
gamebaker_fog_update2
end

def gamebaker_fog_update2
@gb_fogx = @gb_fogsx * 2
@gb_fogy = @gb_fogsy * 2
end

alias gamebaker_fog_set_display_pos set_display_pos
def set_display_pos(x, y)
gamebaker_fog_set_display_pos(x, y)
@gb_fogx = x
@gb_fogy = y
end

def calc_fog_x(bitmap)
return bitmap == nil ? 0 : @gb_fogx / 8
end

def calc_fog_y(bitmap)
return bitmap == nil ? 0 : @gb_fogy / 8
end

alias gamebaker_fog_scroll_down scroll_down
def scroll_down(distance)
last_y = @display_y
gamebaker_fog_scroll_down(distance)
if loop_vertical?
@gb_fogy = distance
else
@gb_fogy = @display_y - last_y
end
end

alias gamebaker_fog_scroll_left scroll_left
def scroll_left(distance)
last_x = @display_x
gamebaker_fog_scroll_left(distance)
if loop_horizontal?
@gb_fogx -= distance
else
@gb_fogx = @display_x - last_x
end
end

alias gamebaker_fog_scroll_right scroll_right
def scroll_right(distance)
last_x = @display_x
gamebaker_fog_scroll_right(distance)
if loop_horizontal?
@gb_fogx = distance
else
@gb_fogx = @display_x - last_x
end
end

alias gamebaker_fog_scroll_up scroll_up
def scroll_up(distance)
last_y = @display_y
gamebaker_fog_scroll_up(distance)
if loop_vertical?
@gb_fogy -= distance
else
@gb_fogy = @display_y - last_y
end
end
end

class Spriteset_Map
alias gamebaker_fog_init initialize
def initialize
gamebaker_fog_init
gamebaker_fog_init2
end

def gamebaker_fog_init2
@gb_fog = Plane.new
return if $game_map.gb_fog == nil
@gb_fog.z = $game_map.gb_fog[4]
@gb_fog.opacity = $game_map.gb_fog[5]
@gb_fog.blend_type = $game_map.gb_fog[6]
end

alias gamebaker_fog_dispose dispose
def dispose
gamebaker_fog_dispose
@gb_fog.dispose
end

alias gamebaker_fog_update update
def update
gamebaker_fog_update
gamebaker_fog_update2 if @gb_fog != nil
end

def gamebaker_fog_update2
if @gb_fogname != $game_map.gb_fog[1]
@gb_fogname = $game_map.gb_fog[1]
if @gb_fog.bitmap != nil
@gb_fog.bitmap.dispose
@gb_fog.bitmap = nil
end
@gb_fog.bitmap = Cache.fog(@gb_fogname)
Graphics.frame_reset
end
@gb_fog.tone = $game_map.gb_fgtone if @gb_fog.tone != $game_map.gb_fgtone
@gb_fog.ox = $game_map.calc_fog_x(@gb_fog.bitmap)
@gb_fog.oy = $game_map.calc_fog_y(@gb_fog.bitmap)
@gb_fog.visible = !$game_switches[GameBakerFogDisable]
end
end