#============================================================================== # ■ TempsJourNuit # 13/07/08 -- Version 4 # # Script mis dans le domaine public # Aucune licence, aucun crédit requis # #----------------------------------------------------------------------------- # Gérer le jour et la nuit, ainsi que le temps réel (date, heure...) #-----------------------------------------------------------------------------
#----------------------------------------------------------------------------- # ● Indiquer les numéros des Variables # # VarNomJour contient le nom du jour actuel en Français. # VarNuitJour définit le type de journée actuelle. # VarTempsXXXX contient ce qui est demandé avec timesys_time() # SwiExterieur définit si la map est en exterieure (true) ou pas (false) # # Vous devez mettre le numéro de la variable et non pas son contenu ! #-----------------------------------------------------------------------------
VarNomJour = 17 VarNuitJour = 18 VarTempsHeure = 19 VarTempsMinutes = 20 VarTempsSecondes = 21 SwiExterieur = 22
#----------------------------------------------------------------------------- # ● Définition des fonctions #-----------------------------------------------------------------------------
class Interpreter #----------------------------------------------------------------------------- # ● Fonction de définition des nouvelles musiques pour la nuit #----------------------------------------------------------------------------- def timesys_nightmusic(new_music = 0) if $game_variables[VarNuitJour] == "Nuit" Audio.bgm_play("Audio/BGM/" + new_music, 100, 100) end end #----------------------------------------------------------------------------- # ● Fonction d'obtention des heures, minutes, secondes #----------------------------------------------------------------------------- def timesys_time(asked = 0) @clock = Time.new if asked == "heure" $game_variables[VarTempsHeure] = @clock.hour.to_s return $game_variables[VarTempsHeure] end if asked == "minutes" $game_variables[VarTempsMinutes] = @clock.min.to_s return $game_variables[VarTempsMinutes] end if asked == "secondes" $game_variables[VarTempsSecondes] = @clock.sec.to_s return $game_variables[VarTempsSecondes] end end end
#----------------------------------------------------------------------------- # ● Début du Script #-----------------------------------------------------------------------------
class TempsJourNuit < Window_Base def initialize super(440, 420, 200, 60) self.contents = Bitmap.new(width - 32, height - 32) self.opacity = 150 self.visible = false refresh end def refresh @clock = Time.new @seconde = @clock.sec * Graphics.frame_rate self.contents.clear case @clock.strftime("%A") when "Monday" jour = "Lundi" when "Tuesday" jour = "Mardi" when "Wednesday" jour = "Mercredi" when "Thursday" jour = "Jeudi" when "Friday" jour = "Vendredi" when "Saturday" jour = "Samedi" when "Sunday" jour = "Dimanche" end $game_variables[VarNomJour] = jour #self.contents.draw_text(0, 0, 200, 24,@clock.hour.to_s + ":" + @clock.min.to_s + ":" + @clock.sec.to_s + " " +jour) @map = load_data(sprintf("Data/Map%03d.rxdata", $game_map.map_id)) #----------------------------------------------------------------------------- # Nuit : 20h > 6h du mat inclus # Matin : 7h du mat > 10h du mat inclus # Jour : 11h > 16h inclus # Crépuscule : 17h > 19h inclus # # Variable --VarNuitJour-- # "????" = Inconnu # "Matin" = Matin # "Jour" = Jour # "Crépuscule" = Crépuscule # "Nuit" = Nuit #-----------------------------------------------------------------------------
if $game_switches[SwiExterieur] case @clock.hour when 0 @tone = Tone.new(-60, -60, -10, 0) $game_screen.start_tone_change(@tone,5) $game_variables[VarNuitJour] = "Nuit" when 1 @tone = Tone.new(-60, -60, -10, 0) $game_screen.start_tone_change(@tone,5) $game_variables[VarNuitJour] = "Nuit" when 2 @tone = Tone.new(-60, -60, -10, 0) $game_screen.start_tone_change(@tone,5) $game_variables[VarNuitJour] = "Nuit" when 3 @tone = Tone.new(-60, -60, -10, 0) $game_screen.start_tone_change(@tone,5) $game_variables[VarNuitJour] = "Nuit" when 4 @tone = Tone.new(-60, -60, -10, 0) $game_screen.start_tone_change(@tone,5) $game_variables[VarNuitJour] = "Nuit" when 5 @tone = Tone.new(-60, -60, -10, 0) $game_screen.start_tone_change(@tone,5) $game_variables[VarNuitJour] = "Nuit" when 6 @tone = Tone.new(-60, -60, -10, 0) $game_screen.start_tone_change(@tone,5) $game_variables[VarNuitJour] = "Nuit" when 7 @tone = Tone.new(34, -17, -34, 0) $game_screen.start_tone_change(@tone,5) $game_variables[VarNuitJour] = "Matin" when 8 @tone = Tone.new(34, -17, -34, 0) $game_screen.start_tone_change(@tone,5) $game_variables[VarNuitJour] = "Matin" when 9 @tone = Tone.new(34, -17, -34, 0) $game_screen.start_tone_change(@tone,5) $game_variables[VarNuitJour] = "Matin" when 10 @tone = Tone.new(34, -17, -34, 0) $game_screen.start_tone_change(@tone,5) $game_variables[VarNuitJour] = "Matin" when 11 @tone = Tone.new(0, 0, 0, 0) $game_screen.start_tone_change(@tone,5) $game_variables[VarNuitJour] = "Jour" when 12 @tone = Tone.new(0, 0, 0, 0) $game_screen.start_tone_change(@tone,5) $game_variables[VarNuitJour] = "Jour" when 13 @tone = Tone.new(0, 0, 0, 0) $game_screen.start_tone_change(@tone,5) $game_variables[VarNuitJour] = "Jour" when 14 @tone = Tone.new(0, 0, 0, 0) $game_screen.start_tone_change(@tone,5) $game_variables[VarNuitJour] = "Jour" when 15 @tone = Tone.new(0, 0, 0, 0) $game_screen.start_tone_change(@tone,5) $game_variables[VarNuitJour] = "Jour" when 16 @tone = Tone.new(0, 0, 0, 0) $game_screen.start_tone_change(@tone,5) $game_variables[VarNuitJour] = "Jour" when 17 @tone = Tone.new(34, -17, -34, 0) $game_screen.start_tone_change(@tone,5) $game_variables[VarNuitJour] = "Crépuscule" when 18 @tone = Tone.new(34, -17, -34, 0) $game_screen.start_tone_change(@tone,5) $game_variables[VarNuitJour] = "Crépuscule" when 19 @tone = Tone.new(34, -17, -34, 0) $game_screen.start_tone_change(@tone,5) $game_variables[VarNuitJour] = "Crépuscule" when 20 @tone = Tone.new(-60, -60, -10, 0) $game_screen.start_tone_change(@tone,5) $game_variables[VarNuitJour] = "Nuit" when 21 @tone = Tone.new(-60, -60, -10, 0) $game_screen.start_tone_change(@tone,5) $game_variables[VarNuitJour] = "Nuit" when 22 @tone = Tone.new(-60, -60, -10, 0) $game_screen.start_tone_change(@tone,5) $game_variables[VarNuitJour] = "Nuit" when 23 @tone = Tone.new(-60, -60, -10, 0) $game_screen.start_tone_change(@tone,5) $game_variables[VarNuitJour] = "Nuit" end else #@tone = Tone.new(0, 0, 0, 0) #$game_screen.start_tone_change(@tone,5) $game_variables[VarNuitJour] = 0 end end def update refresh end end #----------------------------------------------------------------------------- # ● Application des tons sur la map #-----------------------------------------------------------------------------
class Scene_Map alias old_main main def main @timesys = TempsJourNuit.new old_main if $game_switches[SwiExterieur] @timesys.dispose end end
alias old_update update def update if $game_switches[SwiExterieur] @timesys.update end old_update end
end
|