Map Loction HUD Options

[hunter x]

Hi evry body.....

this my first script ihave made it so simple it show map loction , you need these pictur for the Hud:


Image:


Demo:
Idon't thinj it need Demo .

Script:

post it above main and change name to Map_Loction.

[Show/Hide] The Script

CODE

#==============================================================================
# Map_Loction
#------------------------------------------------------------------------------
# simple map loction ,iam typr note if you want to changr
# by Hunter x
# v. 1.0
# http://www.rpgrevolution.com/
#==============================================================================

module LSRS
  
  
  module ScriptConfig_001
    
    # time for the hud hidden
    Timer = 150
    
    # pictur loction must be on ( Windowskin )
    BackGroundImage = "Chip_Location"
    
    # Position(3=down 9=up)
    Position = 9
    
    # Opacity of the Hud
    Opacity = 155
    
    # Position of the Font (0:Left 1:Midlle 2:right)
    LabelPosition = 1
    
    # Font Type and Color
    LabelFont = Font.new(["MS UI Gothic", "Tahoma", "Tahoma"])
    LabelFont.color = Color.new(0, 0, 0)
    #LabelFont.size = 22      #Size of the font
    #LabelFont.bold = false   # (true : bold, false :Normal)
    #LabelFont.italic = false # (true : italic, false :Normal)
  end
end

# Dont touch
class LSRS::Sprite_Location < Sprite
  include LSRS::ScriptConfig_001
  @@cache = {}
  
  
  def initialize(text)
    super()
    RPG::Cache.windowskin(BackGroundImage).font = LabelFont
    self.z = 9996
    self.opacity = 0
    @count = 0
    @text = text
    refresh
    set_align
  end
  
  
  def update
    if @text != $game_map.map_name
      @text = $game_map.map_name
      refresh
    end
    if $game_system.map_interpreter.running?
      
      self.opacity -= 24
      
      @count = 0
    elsif @count.zero?
      self.opacity -= 12
    elsif self.opacity < Opacity
      self.opacity = [self.opacity += 12, Opacity].min
    else
      @count -= 1
    end
  end
  
  
  def refresh
    if @text.empty?
      
      self.visible = false
      return
    end
    if @@cache[@text]
      self.bitmap = @@cache[@text]
    else
      self.bitmap = RPG::Cache.windowskin(BackGroundImage).dup
      
      self.bitmap.draw_text(self.bitmap.rect, @text, LabelPosition)
      @@cache[@text] = self.bitmap
    end
    self.visible = true
    @count = Timer
  end
  
  
  def set_align
    self.x = case Position % 3
      when 1 then 0
      when 2 then 320 - self.width / 2
      else 640 - self.width
    end
    self.y = case Position
      when 1 .. 3 then 480 - self.height
      when 4 .. 6 then 240 - self.height / 2
      else 0
    end
  end
  
  
  def height
    self.bitmap ? self.bitmap.rect.height : 0
  end
  
  
  def width
    self.bitmap ? self.bitmap.rect.width : 0
  end
end


class Game_Map
  @@mapinfo = load_data("Data/MapInfos.rxdata")
  
  
  def map_name(id = @map_id)
    @@mapinfo[id].name.sub(/@.*/, "")
  end
end


class Scene_Map
  alias :main_lsrs1 :main
  alias :update_lsrs1 :update
  

  def main
    @location_sprite = LSRS::Sprite_Location.new($game_map.map_name)
    main_lsrs1
    @location_sprite.dispose
  end
  

  def update
    update_lsrs1
    @location_sprite.update
  end
end

Note:Iam Arbic one so ican't type English very well.

Hopw it usefull.

[KDawg08]

I'm new to this stuff but I've been downloading ALOT of tutorials, and I am using this in my game. Thanks, I'm loving how it is setup

[Josuec]

Thank you very much, it works . !

[Gary The Duck]

Nice, thank you!

[cupski]

Great!
Thank!

[Seitei Son Goku]

A pretty useful script! Indeed, a life saver for parts of the game where you NEED to know where you are! Thanks!

[ragnaroc444]

A pretty useful script! Indeed, a life saver for parts of the game where you NEED to know where you are! Thanks!

sweet hey can you also change the pic for the map name to whatever you want with the same dimensions and same name?

[FlippedSided]

Wow this is great and works perfectly. However I would like to cut down the time that its displayed in the top right corner. How do i do this? Also how can i change where its displayed? (For example if i wanted it to be in the top left corner)

This post has been edited by Crazygi: Apr 14 2010, 02:27 PM

[Legacy]

@ragnaroc444

yes you can, all you have to do is place the new file in the windowskin flder, and either name it "Chip_Location" or edit the script here. To be the name of the file.

CODE

    # pictur loction must be on ( Windowskin )
    BackGroundImage = "Chip_Location"

@Crazygi

look at these: It explians it pretty well, if you read the comments

CODE

    # time for the hud hidden
    Timer = 150
    
    # Position(3=down 9=up)
    Position = 9

    # Position of the Font (0:Left 1:Midlle 2:right)
    LabelPosition = 1

This post has been edited by LegACy: Apr 14 2010, 02:50 PM

[FlippedSided]

look at these: It explians it pretty well, if you eread the comments

CODE

    # time for the hud hidden
    Timer = 150
    
    # Position(3=down 9=up)
    Position = 9

    # Position of the Font (0:Left 1:Midlle 2:right)
    LabelPosition = 1

Oooooh okay . Thanks . TBH, didnt really read through the script as most of the stuff dont make too much sense to me. Luckily that does though . Thanks

sweet hey can you also change the pic for the map name to whatever you want with the same dimensions and same name?

Yes you can. I made a quick one myself and it had no problems . Just remember you have to import it to window skins in the resources and correctly set the transparent and semi-transparent colours. I suggest you load the original image so you quickly have the right size to work with.
Oh and also make sure you either:
Call your design: Chip_Location which means you cant save each design you make into the same folder
or a better alternative,
In the script, close to the top, where it says:

CODE

BackGroundImage = "Chip_Location"

just simply change the name Chip_Location to whatever you name your design. (Make sure to leave in the: " " ). For example:

CODE

BackGroundImage = "My_Design1"

BTW love this script. Gonna use it in everything i make

This post has been edited by Crazygi: Apr 14 2010, 02:55 PM

[dsoulja85]

SWEET!!, this is exactly what i was looking for! I will surely give you props for this in my credits ^^. i was searching everwhere for an "XP" Graphical location map script, this didnt come up in the google search though !! 1 question, could you customize the dimensions of the graphic if you wanted a different sized picture? thanks again,

[Mataris]

Sweet this is perfect only thing i would like is a different Backround but i bet i can find one somewhere that will siut me mad props to you, thank you very much.

[Locke]

Oh boy! This is better and it works too. I'm happy with it

SALUTE!!

[Crossknive]

How come when I change the map I'm in it goes away and doesn't come back?

[Scriptless]

If you want the map HUD to look like a default window change the opacity to 255.

# Opacity of the Hud
Opacity = 255

[YoshidudeEx]

Thank you. I been looking almost everywhere for this!

[drakiyth]

This is a nice script and all but you need to make a way of turning it on/off immediately before a map zone. The problem I'm having is my introduction is totally screwed up with this because it's ALWAYS on. Hunter, do you think you could fix this to work with a switch or something?

[Night_Runner]

@> drakiyth: Give edit this a go:

[Show/Hide] Hide-able Edit

CODE

#==============================================================================
# Map_Loction
#------------------------------------------------------------------------------
# simple map loction ,iam typr note if you want to changr
# by Hunter x
# v. 1.0
# http://www.rpgrevolution.com/
#==============================================================================

module LSRS
  
  
  module ScriptConfig_001
    
    # hide location switch
    OffSwitch = 1
    
    # time for the hud hidden
    Timer = 150
    
    # pictur loction must be on ( Windowskin )
    BackGroundImage = "Chip_Location"
    
    # Position(3=down 9=up)
    Position = 9
    
    # Opacity of the Hud
    Opacity = 155
    
    # Position of the Font (0:Left 1:Midlle 2:right)
    LabelPosition = 1
    
    # Font Type and Color
    LabelFont = Font.new(["MS UI Gothic", "Tahoma", "Tahoma"])
    LabelFont.color = Color.new(0, 0, 0)
    #LabelFont.size = 22      #Size of the font
    #LabelFont.bold = false   # (true : bold, false :Normal)
    #LabelFont.italic = false # (true : italic, false :Normal)
  end
end

# Dont touch
class LSRS::Sprite_Location < Sprite
  include LSRS::ScriptConfig_001
  @@cache = {}
  
  
  def initialize(text)
    super()
    RPG::Cache.windowskin(BackGroundImage).font = LabelFont
    self.z = 9996
    self.opacity = 0
    @count = 0
    @text = text
    refresh
    set_align
  end
  
  
  def update
    if @text != $game_map.map_name
      @text = $game_map.map_name
      refresh
    end
    if $game_switches[OffSwitch]
      return @count = self.opacity = 0
    end
    if $game_system.map_interpreter.running?
      
      self.opacity -= 24
      
      @count = 0
    elsif @count.zero?
      self.opacity -= 12
    elsif self.opacity < Opacity
      self.opacity = [self.opacity += 12, Opacity].min
    else
      @count -= 1
    end
  end
  
  
  def refresh
    if @text.empty?
      
      self.visible = false
      return
    end
    if @@cache[@text]
      self.bitmap = @@cache[@text]
    else
      self.bitmap = RPG::Cache.windowskin(BackGroundImage).dup
      
      self.bitmap.draw_text(self.bitmap.rect, @text, LabelPosition)
      @@cache[@text] = self.bitmap
    end
    self.visible = true
    @count = Timer
  end
  
  
  def set_align
    self.x = case Position % 3
      when 1 then 0
      when 2 then 320 - self.width / 2
      else 640 - self.width
    end
    self.y = case Position
      when 1 .. 3 then 480 - self.height
      when 4 .. 6 then 240 - self.height / 2
      else 0
    end
  end
  
  
  def height
    self.bitmap ? self.bitmap.rect.height : 0
  end
  
  
  def width
    self.bitmap ? self.bitmap.rect.width : 0
  end
end


class Game_Map
  @@mapinfo = load_data("Data/MapInfos.rxdata")
  
  
  def map_name(id = @map_id)
    @@mapinfo[id].name.sub(/@.*/, "")
  end
end


class Scene_Map
  alias :main_lsrs1 :main
  alias :update_lsrs1 :update
  

  def main
    @location_sprite = LSRS::Sprite_Location.new($game_map.map_name)
    main_lsrs1
    @location_sprite.dispose
  end
  

  def update
    update_lsrs1
    @location_sprite.update
  end
end

[blakerrdurr]

I'm having a similar problem but the opposite effect.
During my introduction the script doesn't take effect which is good but then when you get to move and actually play the script still doesn't take effect. But when I make the starting position somewhere random without the into it works again but is cut off if there is another event happening.
This is a great script but I need it to not show up during my intro and then start working afterwards. Would this be possible?

[Night_Runner]

Yup, completely possible Just needs a bit of editing

[Show/Hide] blakerrdurr's edit

CODE

#==============================================================================
# Map_Loction
#------------------------------------------------------------------------------
# simple map loction ,iam typr note if you want to changr
# by Hunter x
# v. 1.0
# http://www.rpgrevolution.com/
#==============================================================================

module LSRS
  
  
  module ScriptConfig_001
    
    # hide location switch
    OffSwitch = 1
    
    # time for the hud hidden
    Timer = 150
    
    # pictur loction must be on ( Windowskin )
    BackGroundImage = "Chip_Location"
    
    # Position(3=down 9=up)
    Position = 9
    
    # Opacity of the Hud
    Opacity = 155
    
    # Position of the Font (0:Left 1:Midlle 2:right)
    LabelPosition = 1
    
    # Font Type and Color
    LabelFont = Font.new(["MS UI Gothic", "Tahoma", "Tahoma"])
    LabelFont.color = Color.new(0, 0, 0)
    #LabelFont.size = 22      #Size of the font
    #LabelFont.bold = false   # (true : bold, false :Normal)
    #LabelFont.italic = false # (true : italic, false :Normal)
  end
end

# Dont touch
class LSRS::Sprite_Location < Sprite
  include LSRS::ScriptConfig_001
  @@cache = {}
  
  
  def initialize(text)
    super()
    RPG::Cache.windowskin(BackGroundImage).font = LabelFont
    self.z = 9996
    self.opacity = 0
    @count = 0
    @text = text
    refresh
    set_align
    @has_shown = false
  end
  
  
  def update
    if $game_switches[OffSwitch]
      self.opacity = 0
      @count = 0
      return
    end
    if not @has_shown and not $game_switches[OffSwitch]
      @count = Timer
    end
    if @text != $game_map.map_name
      @text = $game_map.map_name
      refresh
    end
    if @count.zero?
      self.opacity -= 12
    elsif self.opacity < Opacity
      @has_shown = true
      self.opacity = [self.opacity += 12, Opacity].min
    else
      @count -= 1
    end
  end
  
  
  def refresh
    if @text.empty?
      self.visible = false
      return
    end
    if @@cache[@text]
      self.bitmap = @@cache[@text]
    else
      self.bitmap = RPG::Cache.windowskin(BackGroundImage).dup
      self.bitmap.draw_text(self.bitmap.rect, @text, LabelPosition)
      @@cache[@text] = self.bitmap
    end
    self.visible = true
    @count = Timer
  end
  
  
  def set_align
    self.x = case Position % 3
      when 1 then 0
      when 2 then 320 - self.width / 2
      else 640 - self.width
    end
    self.y = case Position
      when 1 .. 3 then 480 - self.height
      when 4 .. 6 then 240 - self.height / 2
      else 0
    end
  end
  
  
  def height
    self.bitmap ? self.bitmap.rect.height : 0
  end
  
  
  def width
    self.bitmap ? self.bitmap.rect.width : 0
  end
end


class Game_Map
  @@mapinfo = load_data("Data/MapInfos.rxdata")
  def map_name(id = @map_id)
    @@mapinfo[id].name.sub(/@.*/, "")
  end
end


class Scene_Map
  alias :main_lsrs1 :main
  alias :update_lsrs1 :update
  
  def main
    @location_sprite = LSRS::Sprite_Location.new($game_map.map_name)
    main_lsrs1
    @location_sprite.dispose
  end
  

  def update
    update_lsrs1
    @location_sprite.update
  end
end