Sistema de limitação de Dinheiro 1.0

#===============================================================
# ● [VX] ◦ Money Limitation System ◦ □
#--------------------------------------------------------------
# ◦ by Woratana [woratana@hotmail.com]
# ◦ Criado no dia: 13/07/2008
# ◦ Versão: 1.0
# ◦ Tradução de: Foxmaker
#--------------------------------------------------------------
# Selecione a opção chamar script e adicione essas palavras:
# $game_system.max_money = x (x representa o valor maximo de dinheiro)
#=================================================================

class Game_System
  alias wora_maxmoney_gamsys_ini initialize
  #--------------------------------------------------------------------------
  # * Object Initialization
  #--------------------------------------------------------------------------
  def initialize
    wora_maxmoney_gamsys_ini
    @max_money = 9999999
  end
 
  def max_money
    return @max_money
  end
 
  def max_money=(new_money)
    @max_money = new_money
    $game_party.gain_gold(@max_money - $game_party.gold) if
  @max_money < $game_party.gold
  end
end

class Game_Party < Game_Unit
  #--------------------------------------------------------------------------
  # * Gain Gold (or lose)
  #--------------------------------------------------------------------------
  def gain_gold(n)
    @gold = [[@gold + n, 0].max, $game_system.max_money].min
  end
end