Ruby Quellcode

$zyklus = true
$drinnen = true
$morgen = 6
$mittag = 10
$abend = 18
$nacht = 22
#
$rlt_id = 19
#
#-------------------------------------------------------------------------------
class Scene_Map
  alias main_rt main
  alias update_rt update 
 
  def main
    $screen.refresh
    $game_map.refresh
    main_rt
    $game_screen.start_tone_change(Tone.new(0 ,0 ,0 ,0 ), 15);
  end
 
  def update
    $screen.update
    update_rt
  end
end
 
class Scene_Title
  alias main_rt  main
  def main
    main_rt
    $screen = Screen.new unless $game_variables== nil
  end
end
 
class Scene_Load
  alias on_decision_rt on_decision
  def on_decision(filename)
    on_decision_rt(filename)
    $screen = Screen.new
  end
end
 
class Screen
  def initialize
    $game_variables[$rlt_id] = @hour = Time.now.hour
    update
  end
 
  def an
    $zyklus = true
    refresh
  end
 
  def aus
    $zyklus = false
    refresh
  end
 
 
  def rein
    $drinnen = true
    refresh
  end
 
  def raus
    $drinnen = false
    refresh
  end
 
  def update
    @now = Time.now.hour
    unless @now == @hour
      $game_variables[$rlt_id] = @hour = @now
      refresh
    end
  end
 
  def refresh
    if(@hour<$morgen or @hour >=$nacht)
      set_time_screen(4)
    elsif(@hour < $mittag)
      set_time_screen(1)
    elsif(@hour<$abend)
      set_time_screen(2)
    else
      set_time_screen(3)
    end
  end
 
  def set_time_screen(stade)
    if $zyklus
      case stade
      when 1
        if $drinnen
          $game_screen.start_tone_change(Tone.new(-17 ,-51 ,-34 ,0 ), 15);
        else
          $game_screen.start_tone_change(Tone.new(51 ,-51 ,-102 ,0 ), 15);
        end
      when 2
        $game_screen.start_tone_change(Tone.new(0 ,0 ,0 ,0 ), 15);
      when 3
        $game_screen.start_tone_change(Tone.new(-65 ,($drinnen ? -51 : -135),-35 ,17 ), 15);
      when 4
        if $drinnen
          $game_screen.start_tone_change(Tone.new(-136 ,-102 ,-17 ,51 ), 15);
        else
          $game_screen.start_tone_change(Tone.new(-180 ,-120 ,-10 ,70 ), 15);
        end
      end
    else
      $game_screen.start_tone_change(Tone.new(0 ,0 ,0 ,0 ), 15);
    end
  end
end