Quellcode

class Spriteset_Map
  alias initialize_i initialize
  alias dispose_i dispose
  alias update_i update
  def initialize
    initialize_i
    #--------------------------------------------------------
 
    # Hier bitte die Werte nach Wunsch konfigurieren:
    @manuell = 1
    @spiegeln = 0 # Setze auf 1, um zuerst den letzten Charakter zu laden
    @anzahl = 4 # Anzahl der Charaktere, dessen Equip angezeigt werden sollen (kann ruhig 4 bleiben, gilt nur als absolute Drosselung)
    @a = 2 #Switchnummern fuer die Charaktere
    @b = 3
    @c = 4
    @d = 5
 
    # Wichtig: falls @manuell auf 0 gesetzt ist, wird die folgende Variable nicht beachtet
    @koordinaten = [
                    [[0,0],[0,32],[0,64],[0,96],[0,128]], # Pro Kaestchen X, Y-Koordinaten nach folgendem Schema: Waffe-Schild-Helm-Ruestung-Ring
                    [[32,0],[32,32],[32,64],[32,96],[32,128]], # Falls es weniger als 4 Charaktere sind, wird der Rest nicht beachtet  
                    [[64,0],[64,32],[64,64],[64,96],[64,128]],
                    [[96,0],[96,32],[96,64],[96,96],[96,128]]
                    ]
 
    # Wichtig: falls @manuell auf 1 gesetzt ist, werden alle kommenden Variablen nicht beachtet
      @x = 200 # X-Koordinate des ersten Icons
      @y = 200 # Y-Koordinate des ersten Icons
 
      # Keine negativen Werte!
      @xAbstand = 10 # Breitenabstand der Icons zueinander, minimum 24, um ueberlappen zu verhindern
      @yAbstand = 24 # Hoehenabstand der Icons zueinander
 
      # Keine negativen Werte! Dafuer @spiegeln auf 1 setzen!
      @xLAbstand = 32 # Charakterleistenabstand (Breite) zueinander
      @yLAbstand = 0 # Charakterleistenabstand (Hoehe) zueinander
    #--------------------------------------------------------
    @switches = [$game_switches[@a], $game_switches[@b], $game_switches[@c], $game_switches[@d]]
    makeBitmap
    @sprite_i = Sprite.new
    @sprite_i.bitmap = @bitmap
    if @manuell ==1
      @sprite_i.x = 0
      @sprite_i.y = 0
    else
      @sprite_i.x = @x
      @sprite_i.y = @y
    end
    @sprite_i.z = 750
  end
 
  def makeBitmap
      if @manuell == 1
       @bitmap = Bitmap.new(640,480)
      else
       @bitmap = Bitmap.new(((@xAbstand*4)+24)+(@anzahl*@xLAbstand), ((@yAbstand*4)+24)+(@anzahl*@yLAbstand))
     end
     k = 0
     for j in 0..@anzahl-1
      i = 0
      while @switches[k] == false && k < 4
        k = k + 1
      end
      if $game_party.actors[(k - (3*@spiegeln)).abs] != nil
      if $game_party.actors[(k - (3*@spiegeln)).abs].weapon_id != 0
        icon = $data_weapons[$game_party.actors[(k - (3*@spiegeln)).abs].weapon_id].icon_name
        if @manuell == 1
          @bitmap.blt(@koordinaten[k][i][0],@koordinaten[k][i][1], RPG::Cache.icon(icon), Rect.new(0, 0, 24, 24))
        else
          @bitmap.blt((i*@xAbstand)+(j*@xLAbstand), (i*@yAbstand)+(j*@yLAbstand), RPG::Cache.icon(icon), Rect.new(0, 0, 24, 24))
        end
      end
      for i in 1..4
        case i
        when 1
          next if $game_party.actors[(k - (3*@spiegeln)).abs].armor1_id == 0
          icon = $data_armors[$game_party.actors[(k - (3*@spiegeln)).abs].armor1_id].icon_name
        when 2
          next if $game_party.actors[(k - (3*@spiegeln)).abs].armor2_id == 0
          icon = $data_armors[$game_party.actors[(k - (3*@spiegeln)).abs].armor2_id].icon_name
        when 3
          next if $game_party.actors[(k - (3*@spiegeln)).abs].armor3_id == 0
          icon = $data_armors[$game_party.actors[(k - (3*@spiegeln)).abs].armor3_id].icon_name
        when 4
          next if $game_party.actors[(k - (3*@spiegeln)).abs].armor4_id == 0
          icon = $data_armors[$game_party.actors[(k - (3*@spiegeln)).abs].armor4_id].icon_name
        end
        if @manuell == 1
          @bitmap.blt(@koordinaten[k][i][0],@koordinaten[k][i][1], RPG::Cache.icon(icon), Rect.new(0, 0, 24, 24))
        else
          @bitmap.blt((i*@xAbstand)+(j*@xLAbstand), (i*@yAbstand)+(j*@yLAbstand), RPG::Cache.icon(icon), Rect.new(0, 0, 24, 24))
        end
      end
      k = k + 1
      end
    end
  end
 
  def dispose
    dispose_i
    @sprite_i.dispose
  end
 
  def update
    update_i
    if @sprite_i != nil
      if @switches[0] != $game_switches[@a] || @switches[1] != $game_switches[@b] || @switches[2] != $game_switches[@c] || @switches[3] != $game_switches[@d]
        @switches = [$game_switches[@a], $game_switches[@b], $game_switches[@c], $game_switches[@d]]
        makeBitmap
        @sprite_i.bitmap = @bitmap
      end
    end
  end
end