VarNomJour = id #variable des jour de la semaine VarNuitJour = id #variable de jour/nuit/crépuscuel SwiExterieur = id #pour activez et desactiver jour/nuit
class Jour_heure def initialize $exterieur = true refresh end def refresh @horloge = Time.new @minute = @horloge.min * Graphics.frame_rate case @horloge.strftime("%A") when "Monday" $game_variables[VarNomJour] = "Lundi" when "Tuesday" $game_variables[VarNomJour] = "Mardi" when "Wednesday" $game_variables[VarNomJour] = "Mercredi" when "Thursday" $game_variables[VarNomJour] = "Jeudi" when "Friday" $game_variables[VarNomJour] = "Vendredi" when "Saturday" $game_variables[VarNomJour] = "Samdi" when "Sunday" $game_variables[VarNomJour] = "Dimanche" end def update refresh end @horloge = Time.new if $game_switches[SwiExterieur] case @horloge.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(0, 0, 30, 0) $game_screen.start_tone_change(@tone,5) $game_variables[VarNuitJour] = "Matin" when 5 @tone = Tone.new(0, 0, 30, 0) $game_screen.start_tone_change(@tone,5) $game_variables[VarNuitJour] = "Matin" when 6 @tone = Tone.new(0, 0, 30, 0) $game_screen.start_tone_change(@tone,5) $game_variables[VarNuitJour] = "Matin" when 7 @tone = Tone.new(0, 0, 30, 0) $game_screen.start_tone_change(@tone,5) $game_variables[VarNuitJour] = "Matin" when 8 @tone = Tone.new(0, 0, 30, 0) $game_screen.start_tone_change(@tone,5) $game_variables[VarNuitJour] = "Matin" when 9 @tone = Tone.new(0, 0, 0, 0) $game_screen.start_tone_change(@tone,5) $game_variables[VarNuitJour] = "Jour" when 10 @tone = Tone.new(0, 0, 0, 0) $game_screen.start_tone_change(@tone,5) $game_variables[VarNuitJour] = "Jour" 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,10) case @horloge.hour when 0 $game_variables[VarNuitJour] = "Nuit" when 1 $game_variables[VarNuitJour] = "Nuit" when 2 $game_variables[VarNuitJour] = "Nuit" when 3 $game_variables[VarNuitJour] = "Nuit" when 4 $game_variables[VarNuitJour] = "Matin" when 5 $game_variables[VarNuitJour] = "Matin" when 6 $game_variables[VarNuitJour] = "Matin" when 7 $game_variables[VarNuitJour] = "Matin" when 8 $game_variables[VarNuitJour] = "Matin" when 9 $game_variables[VarNuitJour] = "Jour" when 10 $game_variables[VarNuitJour] = "Jour" when 11 $game_variables[VarNuitJour] = "Jour" when 12 $game_variables[VarNuitJour] = "Jour" when 13 $game_variables[VarNuitJour] = "Jour" when 14 $game_variables[VarNuitJour] = "Jour" when 15 $game_variables[VarNuitJour] = "Jour" when 16 $game_variables[VarNuitJour] = "Jour" when 17 $game_variables[VarNuitJour] = "Crépuscule" when 18 $game_variables[VarNuitJour] = "Crépuscule" when 19 $game_variables[VarNuitJour] = "Crépuscule" when 20 $game_variables[VarNuitJour] = "Nuit" when 21 $game_variables[VarNuitJour] = "Nuit" when 22 $game_variables[VarNuitJour] = "Nuit" when 23 $game_variables[VarNuitJour] = "Nuit" end end end def update refresh end end
class Scene_Map alias old_main main def main @jh = Jour_heure.new old_main end alias old_update update def update @jh.update old_update end end
|