Mini carte

Code:


####################################################################
# MapRadar v1.5
#
# Por: SojaBird
# Site: http://www.nestcast.blogspot.com
# Discrição: Mostra um mapa com radar, indicando a posição do personagem
# Tradução: Randal Br do Forum RPG Maker Brasil
# Traduit par Douk
# http://rpgmakervx.1fr1.net/
####################################################################

#===============================================================
#                           
#                rpgmakervx.1fr1.net                                           
#       
#===============================================================

####################################################################
# Start Setup - Iniciar configuração
####################################################################
# Picture Setup - Configuration de l'image
PlayerWidth = 8 # La largeur da l'image de l'indicateur du joueur
PlayerHeight = 8 # La longeur de l'image de l'indicateur du joueur
PicWidth = 144 # La largeur du frame et de l'image de fond
PicHeight = 144 # La longeur du frame et de l'image de fond

Frame = "Frame" # Nom de l'image pour a moldura
Player = "Player" # Nom de l'imagem qui va indiquer la position du joueur
Back = "Back" # Nom de l'image qui sera le fond du Hud et qui montrera la carte
# Vous devez faire une image d'une carte pour être affichés sur le Hud,
# Lorsque la largeur = playerSize * [numéros de X-tiles] et la hauteur = playerSize * [numéro deo Y-tiles]
# Le nom dps cartes doivent être "la carte. .." où "..." Le numéro d'identification sera marqué lui.
# Ex Pour map001 vous devez appeller le fichier "map1" pour map002 "Map2", etc.

# Placement = Colocação (posicionamento)
PlacementX = 3 # Position Horizontale du Hud [Gauche=1, Centre=2, Droite=3, Customisation=0]
PlacementY = 1 # Position Verticale du Hud [Top=1, Centre=2, Fond=3, Customisation=0]

CustomX = 0 # position horizontale customisation pour le Hud
CustomY = 0 # position verticale customisation pour le Hud

# Opacity = Opacitée
Back_Opacity = 100 # Opacitée du fond
Map_Opacity = 200 # Opacitée de Map
Frame_Opacity = 255 # Opacitée de frame
Player_Opacity = 200 # Opacitée de l'indicateur du joueur
Hide = true # Devrait ou ne devrait pas masquer le Hud lorsque le joueur est à l'origine
Hide_Opacity = 100 # Comment l'opacitée sera réduite lorsque le joueur se trouve derrière le hud

# Text Setup - configuration du Texte
DrawLocation = true # Devrait ou ne pas mettre le nom de la carte
Font = "Arial" # Police qui sera utilisée pour le nom de la carte

# ScriptUse Setup - Configuration de l'utilisation du script
UseRadar = true # Si vous utilisez ce script ou non (false mettre graphique et le caractère ne figure pas sur la carte)

####################################################################
# End Setup - Fim de Setup
####################################################################

####################################################################
####################################################################

X_Place =
    case PlacementX
      when 1
        0
      when 2
        272-(PicWidth/2)
      when 3
        544-PicWidth
      when 0
        CustomX
      end

Y_Place =
    case PlacementY
      when 1
        0
      when 2
        208-(PicHeight/2)
      when 3
        416-PicHeight
      when 0
        CustomY
      end
     
####################################################################
####################################################################
                    if UseRadar == true
####################################################################
####################################################################
 
class Scene_Map < Scene_Base

  def start
    super
    $game_map.refresh
    @spriteset = Spriteset_Map.new
    @message_window = Window_Message.new
    $Radar = Radar.new
  end

  def terminate
    super
    if $scene.is_a?(Scene_Battle)
      @spriteset.dispose_characters
    end
    snapshot_for_background
    @spriteset.dispose
    @message_window.dispose
    $Radar.dispose
    if $scene.is_a?(Scene_Battle)
      perform_battle_transition
    end
  end
 
  def update
    super
    $game_map.interpreter.update
    $game_map.update
    $game_player.update
    $game_system.update
    @spriteset.update
    @message_window.update
    $Radar.update
    unless $game_message.visible
      update_transfer_player
      update_encounter
      update_call_menu
      update_call_debug
      update_scene_change
    end
  end
 
  def update_transfer_player
    return unless $game_player.transfer?
    fade = (Graphics.brightness > 0)
    fadeout(30) if fade
    @spriteset.dispose
    $game_player.perform_transfer
    $game_map.autoplay
    $game_map.update
    Graphics.wait(15)
    @spriteset = Spriteset_Map.new
    $Radar.dispose
    $Radar = Radar.new
    fadein(30) if fade
    Input.update
  end
 
end

####################################################################
####################################################################

class Radar
 
  def initialize
    # draw frame
    @frame = Sprite.new
    @frame.bitmap = Cache.picture(Frame)
    @frame.x = X_Place
    @frame.y = Y_Place
    @frame.z = 9998
    @frame.opacity = Frame_Opacity
    # draw location
    if DrawLocation == true
      @location_name = Sprite.new
      @location_name.bitmap = Bitmap.new(200,32)
      @location_name.x = (544/2)-100
      @location_name.y = 416-32
      @location_name.bitmap.font.name = Font
    end
    # draw map
    @map_viewport = Viewport.new(X_Place, Y_Place, PicWidth, PicHeight)
    @map = Sprite.new(@map_viewport)
    @map.bitmap = Cache.picture("Map" + $game_map.map_id.to_s)
    @map.z = 9997
    @map.opacity = Map_Opacity
    # draw player
    @player_icon = Sprite.new(@map_viewport)
    @player_icon.bitmap = Cache.picture(Player)
    @player_icon.x = PicWidth/2
    @player_icon.y = PicHeight/2
    @player_icon.z = 9999
    @player_icon.opacity = Player_Opacity
    # draw bg
    @map_back = Sprite.new(@map_viewport)
    @map_back.z = 9996
    @map_back.bitmap = Cache.picture(Back)
    @map_back.opacity = Back_Opacity

    update
  end
 
  def update
    # draw location
    if DrawLocation == true
      if @map_id != $game_map.map_id
        @map_id = $game_map.map_id
        @location_name.bitmap.clear
        @location_name.bitmap.draw_text(0, 0, 200, 32, load_data("Data/MapInfos.rvdata")[@map_id].name,1)
      end
    end
    # move map to player (x, y)
    if @map.x*32 != $game_player.x or @map.y*32 != $game_player.y
      @map.x = (PicWidth/2) - ($game_player.x * PlayerWidth)
      @map.y = (PicHeight/2) - ($game_player.y * PlayerHeight)
    end
    if Hide == true
      if $game_player.x >= X_Place/32 and $game_player.y >= Y_Place/32 and $game_player.x <= (X_Place+PicWidth)/32 and $game_player.y <= (Y_Place+PicHeight)/32
        @frame.opacity = Frame_Opacity-Hide_Opacity
        @map_back.opacity = Back_Opacity-Hide_Opacity
        @map.opacity = Map_Opacity-Hide_Opacity
        @player_icon.opacity = Player_Opacity-Hide_Opacity
      else
        @frame.opacity = Frame_Opacity
        @map_back.opacity = Back_Opacity
        @map.opacity = Map_Opacity
        @player_icon.opacity = Player_Opacity
      end
    end
  end

  def dispose
    if DrawLocation == true
      @location_name.dispose
    end
    @map_viewport.dispose
    @map.dispose
    @player_icon.dispose
    @frame.dispose
  end
end


                    end


Infos sup' :
A mettre dessus de Main
Faire un screen de votre map et la nommer :
Exemple :
(Map)Map001 => (Image)Map1 : A mettre dans le dossier Pictures
Pas mal de choses sont modifiable, j'ai mis les commentaires dans le script.

Code:

unless Font.exist?("Arial")

Code:

#==============================================================================
# ■ Main
#------------------------------------------------------------------------------
# 　各クラスの定義が終わった後、ここから実際の処理が始まります。
#==============================================================================

unless Font.exist?("UmePlus Gothic")
  print "UmePlus Gothic trouvé"
  exit
end

begin
  Graphics.freeze
  $scene = Scene_Title.new
  $scene.main while $scene != nil
  Graphics.transition(30)
rescue Errno::ENOENT
  filename = $!.message.sub("No such file or directory - ", "")
  print("#{filename} Fichier non trouvé")
end


#==============================================================================
# ■ Main
#------------------------------------------------------------------------------
# 　各クラスの定義が終わった後、ここから実際の処理が始まります。
#==============================================================================

unless Font.exist?("UmePlus Gothic")
print "UmePlus Gothic trouvé"
exit
end

begin
Graphics.freeze
$scene = Scene_Title.new
$scene.main while $scene != nil
Graphics.transition(30)
rescue Errno::ENOENT
filename = $!.message.sub("No such file or directory - ", "")
print("#{filename} Fichier non trouvé")

Spoiler: