Ruby Quellcode

#==============================================================================
# ** Handymenü für yamina-chan [Version 0.8]
#------------------------------------------------------------------------------
#  Ersetzt das normale Scene_Menü durch eine neue, in Handyoptik. Hierfür wird
#  eine passende Grafik benötigt, die das Handy mit leerem Display und vier
#  Buttons anzeigt.
#  In Zeile 40 kann für das neue Commandwindow ein eigener Windowskin festge-
#  legt werden und darunter bei Bedarf der opacity und back_opacity Wert ver-
#  ändert werden.
#  Die Icons auf den Buttons kann das Skript selber zeichnen - die Grafiknamen
#  können in Zeile 48 angegeben werden. Und abschließend kann in Zeile 151 ein
#  Hintergrundbild spezifiziert werden.
#  
#  
#  
#    Das Skript befindet sich noch in Entwicklung. Aktuell können ab Zeile 191
#     Audiodateien angegeben werden, die beim Druck auf die Buttons erklingen.
#                            Diese Mechanik wird in Zukunft noch ausgetauscht.
#------------------------------------------------------------------------------
#  Autor: Playm
#  Datum: August 2015
#  Maker: RPG Maker XP
#  Einfache Nutzung in nicht-kommerziellen  RMXP  Projekten ist gestattet.
#  Keine kommerzielle Nutzung gestattet. Für Lizenzen an den Autor wenden.
#  Keine Weiterverbreitung in originaler oder abgeänderter Form gestattet.
#==============================================================================
# ** Window_Handy
#------------------------------------------------------------------------------
#  New Commandwindow for Scene_Menu
#==============================================================================
class Window_Handy < Window_Selectable
  #--------------------------------------------------------------------------
  # * Const
  #--------------------------------------------------------------------------
  LINE_HEIGHT = 48
  #--------------------------------------------------------------------------
  # * Setup Windowskin
  #--------------------------------------------------------------------------
  def setup_windowskin
    self.windowskin = RPG::Cache.windowskin('001-Blue01')
    self.opacity = 0
    #self.back_opacity = 255
  end
  #--------------------------------------------------------------------------
  # * Icons to use in Menu (use empty names, to omit this icon)
  #--------------------------------------------------------------------------
  def get_icon( number )
    case number
    when 0 # First Button
      RPG::Cache.icon('Phone')
    when 1 # Second Button
      RPG::Cache.icon('Envelope')
    when 2 # Third Button
      RPG::Cache.icon('Book')
    when 3 # Last Button
      RPG::Cache.icon('')
    end
  end
  #--------------------------------------------------------------------------
  # * Object Initialization
  #--------------------------------------------------------------------------
  def initialize
    super(208, 128, 224, 288)
    self.contents = Bitmap.new(width - 32, height - 32)
    setup_windowskin
    refresh
    @item_max = 3 + 4
    @index = 0
  end
  #--------------------------------------------------------------------------
  # * Refresh
  #--------------------------------------------------------------------------
  def refresh
    contents.clear
    contents.font.size = 26
    contents.font.bold = true
    contents.draw_text( item_rect(0), 'Speichern', 1)
    contents.draw_text( item_rect(1), 'Laden',     1)
    contents.draw_text( item_rect(2), 'Beenden',   1)
    for i in 0..3
      draw_icon(i)
    end
  end
  #--------------------------------------------------------------------------
  # * Draw Icon
  #--------------------------------------------------------------------------
  def draw_icon( icon_index )
    icon      = get_icon( icon_index )
    target_x  = icon_index * 48 + 6
    target_y  = 192 + 6
    icon_rect = Rect.new( 0, 0, 24, 24)
    offset    = (40 - 24) / 2
    contents.blt( target_x + offset, target_y + offset, icon, icon_rect )
  end
  #--------------------------------------------------------------------------
  # * Get Rect for command item
  #--------------------------------------------------------------------------
  def item_rect( index )
    case index
    when 0,1,2
      Rect.new( 0, LINE_HEIGHT*index, 192, LINE_HEIGHT )
    when 3,4,5,6
      Rect.new( 6 + 48*(index-3), 6+192, 40, 40 )
    else
      nil
    end
  end
  #--------------------------------------------------------------------------
  # * Cursor Rectangle Update
  #--------------------------------------------------------------------------
  def update_cursor_rect
    r = item_rect( @index )
    if r
      self.cursor_rect = r
    else
      self.cursor_rect.empty
    end
    return
    if true
    else
      r = item_rect( @index )
      self.cursor_rect = r   if r
      self.cursor_rect.empty unless r
    end
  end
  #--------------------------------------------------------------------------
  # * Perform mouse operations
  #--------------------------------------------------------------------------
  def mouse_operation
    mx = Mouse.pos_x - (self.x - self.ox + 16)
    my = Mouse.pos_y - (self.y - self.oy + 16)
    for index in 0...@item_max
      rect = item_rect( index )
      if mx > rect.x and mx < rect.x + rect.width and
         my > rect.y and my < rect.y + rect.height
        mouse_cursor(index)
        break
      end
    end
  end
end
#==============================================================================
# ** Scene_Menu
#==============================================================================
class Scene_Menu
  #--------------------------------------------------------------------------
  # * Main Processing
  #--------------------------------------------------------------------------
  def main
    @background = Sprite.new               # Menuback
    @background.bitmap = RPG::Cache.picture('Smartphone_Menu')
    @command_window = Window_Handy.new     # Make command window
    Graphics.transition                    # Execute transition
    loop do                                # Main loop
      Graphics.update                      # Update game screen
      Input.update                         # Update input information
      update                               # Frame update
      break if $scene != self              # Abort loop if screen is changed
    end
    Graphics.freeze                        # Prepare for transition
    @command_window.dispose                # Dispose of windows
    @background.dispose                    # Dispose sprites
  end
  #--------------------------------------------------------------------------
  # * Frame Update
  #--------------------------------------------------------------------------
  def update    
    @command_window.update                 # Update windows
    if Input.trigger?(Input::B)            # If B button was pressed
      $game_system.se_play($data_system.cancel_se) # Play cancel SE
      $scene = Scene_Map.new                       # Switch to map screen
      return
    end
    if Input.trigger?(Input::C)            # If C button was pressed
      case @command_window.index           # Branch by cursor position
      when 0  # Save
        # If saving is forbidden
        if $game_system.save_disabled
          $game_system.se_play($data_system.buzzer_se) # Play buzzer SE
          return
        end
        $game_system.se_play($data_system.decision_se) # Play decision SE
        $scene = Scene_Save.new                        # Switch to save screen
      when 1  # Load
        $game_system.se_play($data_system.decision_se) # Play decision SE
        $scene = Scene_Load.new                        # Switch to load screen
      when 2  # End Game
        $game_system.se_play($data_system.decision_se) # Play decision SE
        $scene = Scene_End.new                         # Switch to end screen
      when 3  # Icon 1
        Audio.se_play('Audio/SE/055-Right01', 100, 100)
      when 4  # Icon 2
        Audio.se_play('Audio/SE/056-Right02', 100, 100)
      when 5  # Icon 3
        Audio.se_play('Audio/SE/057-Wrong01', 100, 100)
      when 6  # Icon 4
        Audio.se_play('Audio/SE/058-Wrong02', 100, 100)
      end
      return
    end
  end
end