[Script XP e VX] HUD Estilo Castlevania

# Estado inicial da HUD
$CTV_DEFAULT = true # true é visível, false não é visível
$CTV_SWITCH  = 1    # ID da switch que ativa/desativa a HUD ou 0 para nenhum

=begin
  HUD Estilo Castlevania
  por br_lemes

  É permitido, livre de quaisquer ônus, usar, copiar, modificar e/ou
  distribuir cópias deste script, desde que seja mantido este aviso.
  NÃO HÁ QUALQUER GARANTIA, USE POR SUA PRÓPRIA CONTA E RISCO.
=end

# Estado inicial da HUD
$CTV_DEFAULT = true # true é visível, false não é visível
$CTV_SWITCH  = 1    # ID da switch que ativa/desativa a HUD ou 0 para nenhum

$RMVX = $TEST != nil

class Scene_Map
  alias ctvhud_main main
  def main
    @hud_bg = Sprite.new
    @hud_bg.x = 60
    @hud_bg.y = 20
    if $RMVX
      @hud_bg.bitmap = Cache.system("HUD_BG")
    else
      @hud_bg.bitmap = RPG::Cache.windowskin("HUD_BG")
    end
    @hud_bg.z += 1
    @hud_base = Sprite.new
    if $RMVX
      @hud_base.bitmap = Cache.system("HUD_Base")
    else
      @hud_base.bitmap = RPG::Cache.windowskin("HUD_Base")
    end
    @hud_base.z += 3
    @hud_hp = Sprite.new
    @hud_hp.bitmap = Bitmap.new(121,15)
    @hud_hp.x = 60
    @hud_hp.y = 20
    @hud_hp.z += 2
    @hud_mp = Sprite.new
    @hud_mp.bitmap = Bitmap.new(121,15)
    @hud_mp.x = 60
    @hud_mp.y = 35
    @hud_mp.z += 1
    @hud_base.z += 2
    check_switch
    draw_hp
    draw_mp
    ctvhud_main
    @hud_bg.dispose
    @hud_hp.dispose
    @hud_mp.dispose
    @hud_base.dispose
  end
  def check_switch
    if ($CTV_DEFAULT && !$game_switches[$CTV_SWITCH]) or (!$CTV_DEFAULT && $game_switches[$CTV_SWITCH])
      @hud_bg.visible = true
      @hud_hp.visible = true
      @hud_mp.visible = true
      @hud_base.visible = true
    else
      @hud_bg.visible = false
      @hud_hp.visible = false
      @hud_mp.visible = false
      @hud_base.visible = false
    end
  end
  def draw_hp
    if $RMVX
      if @hud_checkhp == $game_party.members[0].hp then return end
      meter = Cache.system("HUD_HP")
      cw = meter.width  * $game_party.members[0].hp / $game_party.members[0].maxhp
      @hud_checkhp = $game_party.members[0].hp
    else
      if @hud_checkhp == $game_party.actors[0].hp then return end
      meter = RPG::Cache.windowskin("HUD_HP")
      cw = meter.width  * $game_party.actors[0].hp / $game_party.actors[0].maxhp
      @hud_checkhp = $game_party.actors[0].hp
    end
    @hud_hp.bitmap.clear
    ch = meter.height
    src_rect = Rect.new(0, 0, cw, ch)
    @hud_hp.bitmap.blt(0, 0, meter, src_rect)
  end
  def draw_mp
    if $RMVX
      if @hud_checkmp == $game_party.members[0].mp then return end
      meter = Cache.system("HUD_MP")
      cw = meter.width  * $game_party.members[0].mp / $game_party.members[0].maxmp
      @hud_checkmp = $game_party.members[0].mp
    else
      if @hud_checkmp == $game_party.actors[0].sp then return end
      meter = RPG::Cache.windowskin("HUD_MP")
      cw = meter.width  * $game_party.actors[0].sp / $game_party.actors[0].maxsp
      @hud_checkmp = $game_party.actors[0].sp
    end
    @hud_mp.bitmap.clear
    ch = meter.height
    src_rect = Rect.new(0, 0, cw, ch)
    @hud_mp.bitmap.blt(0, 0, meter, src_rect)
  end
  alias ctvhud_update update
  def update
    ctvhud_update
    check_switch
    draw_hp
    draw_mp
    @hud_bg.update
    @hud_hp.update
    @hud_mp.update
    @hud_base.update
  end
end