Maker Palace

¡El Reino del RpgMaker y del Ocio!
 
ÍndiceBuscarGrupos de UsuariosScriptsRecursosTutorialesPalaceJuegosPalaceWikiFAQRegistrarseConectarse
Conectarse
Nombre de Usuario:
Contraseña:
Entrar automáticamente en cada visita: 
:: Recuperar mi contraseña
Temas similares
Buscar
 
 

Resultados por:
 
Rechercher Búsqueda avanzada
Últimos temas
» RPG Maker Mv Pregunta
por kyonides-arkanthos Sáb Ene 13, 2018 12:32 am

» [VXAce] Burando Doragon
por gantzer49 Dom Dic 31, 2017 10:07 am

» Una Ventana de Oro y Monto de Préstamos
por kyonides-arkanthos Jue Dic 21, 2017 1:41 am

» Reparación de Conjuros
por kyonides-arkanthos Jue Oct 12, 2017 12:22 am

» Screenshot del nuevo KUnits XP oon menú
por LinkLuis55 Sáb Sep 23, 2017 10:03 pm

» Dando una vuelta por acá
por LinkLuis55 Dom Ago 20, 2017 2:56 pm

» Heroes del Crimen 2 DEMO
por jasuso Mar Ago 01, 2017 12:04 am

Recomendados
RPG en RPG Maker
La importancia de un Backup
Que requiere un sistema de Batalla para ser exitoso
9 Minutos de Juegos por fans
Guía de Subforos para Tontos de Maker Palace
Indice de Scripts Locales XP
Falcao Pearl ABS Liquid
¿Quién está en línea?
En total hay 8 usuarios en línea: 0 Registrados, 0 Ocultos y 8 Invitados :: 2 Motores de búsqueda

Ninguno

La mayor cantidad de usuarios en línea fue 179 el Mar Ago 30, 2011 10:06 pm.
MiniChat
Mejores posteadores
Raiden (3346)
 
DaviX (2740)
 
Frikilangelo (2461)
 
SagahonArturo (1806)
 
Falcao (1775)
 
kyonides-arkanthos (1772)
 
Mur-mai-der (1755)
 
Ares (1613)
 
LinkLuis55 (1558)
 
Webmaster24 (1354)
 
Afiliados
Crear foro Mundo Maker Foro de anime y RM2k3/XP/VX Computer mix
Flag Counter
free counters
Visitas


Comparte | 
 

 Una Ventana de Oro y Monto de Préstamos

Ver el tema anterior Ver el tema siguiente Ir abajo 
AutorMensaje
kyonides-arkanthos
Lord Guru Maker
Lord Guru Maker
avatar

Cantidad de envíos : 1772
Miembro desde : 03/02/2010
Sexo : Masculino

Maker : RMXP


MensajeTema: Una Ventana de Oro y Monto de Préstamos   Lun Dic 18, 2017 8:58 pm

Este pequeño script o scriptlet les permite crear una simple ventana de Oro, pero luego de cierta modificación también permite sacar préstamos a lo mafioso y llevar un conteo de lo que han sacado sin utilizar una variable de evento. Obviamente la parte de sumarle o restarle ese dinero al monto de oro de los héroes se hace de forma tradicional.

Bueno este script fue hecho por varios foreros, entre ellos me cuento, pero ya que ninguno de los anteriores decidió adjudicarse la autoría de un script tan simple, he aquí que yo tampoco lo haré.

Código:
#==============================================================================
# ** Gold Window HUD
#==============================================================================

# Instructions for Loans / Instrucciones para los préstamos

#   Get More Money / Para incrementar el monto de los préstamos
#   $game_party.increase_loan(N)

#   Make a Payment / Para decrementar el monto de los préstamos
#   $game_party.pay_loan(N)

#   N is equal to any integer. / N es igual a cualquier número entero.

#   Also remember you can togle the GOLD_LOANS_SWITCH_ID at any time.
#   Además recuerda que puedes (des)activar el interruptor de Préstamos cuando
#   quieras para ver los Préstamos (activado) o el Oro (desactivado).

module Gold_Window
  #  CONFIGURATION      CONFIGURACIÓN
 
  # Window horizontal position
  X = 0
  # Window vertical position
  Y = 420
  # Window width / Ancho
  WIDTH = 160
  # Window height / Altura
  HEIGHT = 64
  # Window opacity / Opacidad general de la ventana
  OPACITY = 255
  # Window back opacity / Opacidad del fondo de la ventana
  BACK_OPACITY = 160
  # Hide Window Switch / Interruptor para esconder la ventana
  SHOW_SWITCH_ID = 1
  # Gold and Loans Switch ID
  # Interruptor para cambiar de Oro a Préstamos y viceversa
  GOLD_LOANS_SWITCH_ID = 2
  # Maximum Amount for Loans / Monto máximo para préstamos
  LOANS_MAX = 99999999
  # Etiqueta de Préstamos
  LOANS_LABEL = 'P'
  # List of Icon Filenames / Lista de Archivos de Íconos
  ICONS = ['gold', '']
  #   END OF CONFIGURATION     FIN DE CONFIGURACIÓN
end

#==============================================================================
# ** Window_Gold_HUD
[url=http://www.mundo-maker.com/tags/------------------------------------------------------------------------------]#------------------------------------------------------------------------------[/url]
# This window displays amount of gold.
#==============================================================================

class Window_Gold_HUD < Window_Base
  include Gold_Window
  #--------------------------------------------------------------------------
  # * Object Initialization
  #--------------------------------------------------------------------------
  def initialize
    super(X, Y, 160, 64)
    self.contents = Bitmap.new(width - 32, height - 32)
    self.opacity = OPACITY
    self.back_opacity = BACK_OPACITY
    self.visible = !hidden?
    @mode = !$game_switches[GOLD_LOANS_SWITCH_ID] ? 0 : 1
    refresh
  end
  #--------------------------------------------------------------------------
  # * Gold graphic
  #--------------------------------------------------------------------------
  def draw_gold_pic(actor, x, y)
    bitmap = RPG::Cache.picture(ICONS[@mode]) rescue nil
    return if bitmap.nil?
    sw = bitmap.width
    sh = bitmap.height
    src_rect = Rect.new(0, 0, sw, sh)
    self.contents.blt(x, y, bitmap, src_rect)
  end
  #--------------------------------------------------------------------------
  # * Refresh
  #--------------------------------------------------------------------------
  def refresh
    @mode = !$game_switches[GOLD_LOANS_SWITCH_ID] ? 0 : 1
    if @mode == 0 and @gold != $game_party.gold
      @gold = $game_party.gold
      self.contents.clear
      draw_gold_pic(@actor, 112, 10)
      cx = contents.text_size($data_system.words.gold).width
      self.contents.draw_text(4, 0, 120 - cx - 2, 32, $game_party.loans.to_s, 2)
    elsif @mode == 1 and @loans != $game_party.loans
      @loans = $game_party.loans
      self.contents.clear
      draw_gold_pic(@actor, 112, 10)
      cx = contents.text_size(LOANS_LABEL).width
    end
  end
  #--------------------------------------------------------------------------
  # * Update
  #--------------------------------------------------------------------------
  def update
    super
    self.visible = !hidden?
    refresh if self.visible
  end
  def hidden?() !$game_switches[SHOW_SWITCH_ID] end
  def hide() $game_switches[SHOW_SWITCH_ID] = true end
  def show() $game_switches[SHOW_SWITCH_ID] = false end
  def switch_info() $game_switches[LOANS_VAR_ID] = end
end

#==============================================================================
# ** Game_Party
#==============================================================================

class Game_Party
  attr_reader :loans
  alias gold_window_gm_party_init initialize
  def initialize
    @loans = 0
    gold_window_gm_party_init
  end
  def pay_loan(n) @loans = [@loans - n, 0].max end
  def increase_loan(n) @loans = [@loans + n, Gold_Window::LOANS_MAX].min end
end

#==============================================================================
# ** Scene_Map
#==============================================================================

class Scene_Map
  #--------------------------------------------------------------------------
  # * Main Processing
  #--------------------------------------------------------------------------
  alias gold_hud_main main
  def main
    @gold_window = Window_Gold_HUD.new
    gold_hud_main
    @gold_window.dispose
  end
  #--------------------------------------------------------------------------
  # * Frame Update
  #--------------------------------------------------------------------------
  alias gold_hud_update update
  def update
    @gold_window.update
    gold_hud_update
  end
end
Volver arriba Ir abajo
Ver perfil de usuario http://deloquesea.mforos.com/forums/
kyonides-arkanthos
Lord Guru Maker
Lord Guru Maker
avatar

Cantidad de envíos : 1772
Miembro desde : 03/02/2010
Sexo : Masculino

Maker : RMXP


MensajeTema: Re: Una Ventana de Oro y Monto de Préstamos   Miér Dic 20, 2017 10:35 pm

Aquí les dejo otra versión que solo sirve para los préstamos pero sin GUI. Permite configurar el número de pasos que han de dar antes de que el prestamista automáticamente les sume una multa o intereses al monto principal y el porcentaje de dicho interés tan malevolente.

Llamados a script

Monto total:
$game_party.loans

Para sacar el préstamo:
$game_party.new_loan(monto)

Para pagar el préstamo (total o parcialmente):
$game_party.pay_loan(monto)

Para pedir más dinero prestado:
$game_party.increase_loan(monto)

Para congelar opción de préstamos:
$game_party.freeze_loans

Para descongelar opción de préstamos:
$game_party.thaw_loans

Código:
module Loans
  MAX = 99999999
  INTEREST_STEPS = 100
  INTEREST_PERCENT = 10
end

class Game_Party
  attr_reader :loans
  alias loans_initialize initialize
  alias loans_increase_steps increase_steps
  def initialize
    @loans = 0
    @disable_loans = nil
    loans_initialize
  end

  def new_loan(amount)
    return if @disable_loans
    @loans = amount
    @loans_steps = @steps
  end

  def pay_loan(amount)
    old_loans = @loans
    @loans = [@loans - amount, 0].max
    lose_gold(old_loans - @loans)
  end

  def increase_loan(amount)
    return if @disable_loans
    old_loans = @loans
    @loans = [@loans + amount, Loans::MAX].min
    gain_gold(@loans - old_loans)
  end

  def increase_steps
    loans_increase_steps
    return unless (@steps - @loans_steps) % Loans::INTEREST_STEPS == 0
    @loans += @loans * Loans::INTEREST_PERCENT / 100
  end
  def freeze_loans() @disable_loans = true end
  def thaw_loans() @disable_loans = nil end
end
Volver arriba Ir abajo
Ver perfil de usuario http://deloquesea.mforos.com/forums/
kyonides-arkanthos
Lord Guru Maker
Lord Guru Maker
avatar

Cantidad de envíos : 1772
Miembro desde : 03/02/2010
Sexo : Masculino

Maker : RMXP


MensajeTema: Re: Una Ventana de Oro y Monto de Préstamos   Jue Dic 21, 2017 1:41 am

Bueno les aviso, estimados foreros, que hice una modificación del script, ahora este permite congelar y descongelar la opción de pedir préstamos de dudosa procedencia... ¡No olviden echarle un ojo a los llamados a script!
Volver arriba Ir abajo
Ver perfil de usuario http://deloquesea.mforos.com/forums/
Contenido patrocinado




MensajeTema: Re: Una Ventana de Oro y Monto de Préstamos   

Volver arriba Ir abajo
 
Una Ventana de Oro y Monto de Préstamos
Ver el tema anterior Ver el tema siguiente Volver arriba 
Página 1 de 1.
 Temas similares
-
» Algien podria pedir el modo ventana?
» MODO Ventana
» [RPG Maker VX] Mensaje en los cofres
» [Trama] La llamada a la caza
» Tutorial Photoshop CS6 para Muppets dummies

Permisos de este foro:No puedes responder a temas en este foro.
Maker Palace :: RGSS Scripts :: Scripts Maker XP-
Cambiar a: