#==========================================================================
# 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[GameBaker::FogDisableAuto]
    @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[GameBaker::FogDisable]
  end
end