72        @screen.start_tone_change(Night_Tone, 0)

#==============================================================================
#Day and Night  temps reel by grifdail selon  Vampyr
#==============================================================================
###ici regle les ton de l'ecrans pour le jour et la nuit
Day_Tone = Tone.new(0,0,0,0)

Afternoon_Tone = Tone.new(25,0,-25,0)

Night_Tone = Tone.new(-85, -85, -75, 85)
######################################################
class Game_Map
 
  alias vampyr_day_night_setup setup
  alias vampyr_day_night_update update
 
  def setup(map_id)
    vampyr_day_night_setup(map_id)
    reset_screen_tone
  end
 
  def update
    vampyr_day_night_update
    update_day_night
    trouvelheure
  end
 
  #####################################################
 
 
  def update_day_night
    t=Time.new
$game_variables[4]=t.sec  #secondes
$game_variables[5]=t.min  #minutes
$game_variables[6]=t.hour #heures
$game_variables[7]=t.day #jours
$game_variables[8]=t.year #annees
$game_variables[11]=t.month #mois
    #-------------------#
    if map_name.include?("EXT")
      if $game_variables[6] >= 8 and $game_variables[6]  < 18
        screen.start_tone_change(Day_Tone, 60)
      elsif $game_variables[6] >= 18 and $game_variables[6]  < 21
        screen.start_tone_change(Afternoon_Tone, 60)
      elsif $game_variables[6] >= 21 or $game_variables[6]  < 8
        screen.start_tone_change(Night_Tone, 60)
      end
    end
  end
 
  def trouvelheure
  if $game_variables[6] >= 8 and $game_variables[6]  < 18
      $game_switches[4] =true
      $game_switches[5] =false
      $game_switches[6] =false
      elsif $game_variables[6] >= 18 and $game_variables[6]  < 21
      $game_switches[4] =false
      $game_switches[6] =false
      $game_switches[5] =true
      elsif $game_variables[6] >= 21 or $game_variables[6]  < 8
    $game_switches[4] =false
    $game_switches[5] =false
    $game_switches[6] =true
  end
end
 
  def reset_screen_tone
    if map_name.include?("EXT")
      if $game_variables[6] >= 8 and $game_variables[6]  < 18
        screen.start_tone_change(Day_Tone, 0)
      elsif $game_variables[6] >= 18 and $game_variables[6]  < 21
        screen.start_tone_change(Afternoon_Tone, 0)
      elsif $game_variables[6] >= 21 or $game_variables[6]  < 8
        screen.start_tone_change(Night_Tone, 0)
      end
    else
      screen.start_tone_change(Tone.new(0,0,0,0), 0)
    end
  end
 
  #######################################
 
  def map_name
    map = load_data("Data/MapInfos.rvdata")
    return map[@map_id].name
  end
 
end