Валюты (Game Currency)

=begin ############################################################################### # # # Валюта (Game Currency) # # # ############################################################################### Автор: Денис Кузнецов (http://vk.com/id8137201) Группа ВК: https://vk.com/scriptsrpgmakervxace Версия: 1.1 Релиз от: 14.08.15 Первый релиз: 13.08.15 Что нового в этой версии: - Добавил новый вызов скрита - Добавил сохранение/загрузку одной настройки вместе с игрой - Убрал коэффициенты - Изменено название одного вызова скрипта, а также некоторые параметры вызовов - Баг фикс Window_Gold, Window_Window_ShopNumber и Scene_Shop Инструкция: Получить текущее количество денег текущей валюты: get_game_currency_value Получить номер текущей валюты: get_game_currency_type Получить номер валюты, использованной в предыдущий раз: get_game_last_currency_type Установить значение для текущей валюты: set_game_currency_value(value) Установить номер валюты для использования: set_game_currency_type(currency_type) Перенести деньги с одной валюты на другую: type1 - откуда перенести type2 - куда перенести rate - значение коэффициента переноса (type1 * rate) (по-умолчанию равен 1) game_exchange_currency(type1, type2, rate) Увеличить значение валюты: currency_type - номер валюты amount - значение game_gain_currency(currency_type, amount) Уменьшить значение валюты: game_lose_currency(currency_type, amount) Установить отображение только текущей валюты в окне золота (Window_Gold): setup - true или false (только текущее значение или нет) set_game_window_gold_current_currency(setup) Для справки о совместимости с другими скриптами: В данном скрипте переписаны/дополнены стандартные классы ### module Vocab ### Переписанные методы: self.currency_unit(currency_type = nil) ### class Game_Party ### Новые методы: init_currency currency_value=(currency_value) currency_type=(currency_type) exchange_currency(type1, type2, rate) gold Дополненные методы: initialize Переписанные методы: gain_gold(amount) ### class Window_Gold ### Новые методы: value_width type Дополненные методы: initialize update draw_currency_value(value, unit, x, y, width) Переписанные методы: value currency_unit ### class Window_ShopNumber ### Дополненные методы: initialize(x, y, height) set(item, max, price, currency_unit = nil) draw_currency_value(value, unit, x, y, width) Переписанные методы: currency_unit=(currency_unit) ### class Scene_Shop ### Переписанные методы: money currency_unit =end module Currency_Settings # Какую валюту использовать в начале игры ? GAME_CURRENCY_START_TYPE = 0 # Настройка валют # номер_валюты => { :name => "символ_валюты", :start_value => значение (количество валюты в начале игры (можно не указывать этот параметр)) } GAME_CURRENCY = { 0 => { :name => "Gil" }, 1 => { :name => "$", :start_value => 5000 }, 2 => { :name => "€", :start_value => 2000 } } # Настройка иконок для отображения в окне денег # Если не указана иконка, то будет отображаться символ валюты # номер_валюты => номер_иконки # GAME_CURRENCY_WINDOW_GOLD_ICON = { } чтобы не использовать GAME_CURRENCY_WINDOW_GOLD_ICON = { 0 => 341, 1 => 361, #~ 2 => 360 } # Отображать только используемую на данный момент валюту ? # true - да, false - нет $GAME_CURRENCY_WINDOW_GOLD_CURRENT_CURRENCY = false end # module Currency_Settings module Vocab def self.currency_unit(currency_type = nil) if currency_type.nil? Currency_Settings::GAME_CURRENCY[$game_party.currency_type][:name] else Currency_Settings::GAME_CURRENCY[currency_type][:name] end end end # module Vocab class Game_Party < Game_Unit include Currency_Settings attr_reader :last_currency_type attr_reader :currency_type attr_reader :currency alias denis_kyznetsov_game_currency_game_party_initialize initialize def initialize denis_kyznetsov_game_currency_game_party_initialize @last_currency_type = GAME_CURRENCY_START_TYPE @currency_type = GAME_CURRENCY_START_TYPE init_currency end def init_currency return if !@currency.nil? @currency = {} GAME_CURRENCY.keys.each do |index| value = GAME_CURRENCY[index].has_key?(:start_value) ? GAME_CURRENCY[index][:start_value] : 0 @currency[index] = value end end def currency_value=(currency_value) @currency[@currency_type] = currency_value end def currency_type=(currency_type) @last_currency_type = @currency_type @currency_type = currency_type end def exchange_currency(type1, type2, rate) @currency[type2] += (@currency[type1] * rate).to_i @currency[type1] = 0 end def gold return @currency[@currency_type] end def gain_gold(amount) @currency[@currency_type] = [[@currency[@currency_type] + amount, -max_gold].max, max_gold].min end end # class Game_Party < Game_Unit class Game_Interpreter include Currency_Settings def set_game_window_gold_current_currency(setup) $GAME_CURRENCY_WINDOW_GOLD_CURRENT_CURRENCY = setup end def get_game_currency_value return $game_party.gold end def get_game_currency_type return $game_party.currency_type end def get_game_last_currency_type return $game_party.last_currency_type end def set_game_currency_value(value) $game_party.currency_value = value end def set_game_currency_type(currency_type) return if !GAME_CURRENCY.has_key?(currency_type) $game_party.currency_type = currency_type end def game_exchange_currency(type1, type2, rate = 1) return if !GAME_CURRENCY.has_key?(type1) || !GAME_CURRENCY.has_key?(type2) $game_party.exchange_currency(type1, type2, rate) end def game_gain_currency(currency_type, amount) return if !GAME_CURRENCY.has_key?(currency_type) last_currency = $game_party.currency_type game_currency_type(currency_type) $game_party.gain_gold(amount) game_currency_type(last_currency) end def game_lose_currency(currency_type, amount) game_gain_currency(currency_type, -amount) end end # class Game_Interpreter $imported = {} if $imported.nil? $imported["DenKyz_Game_Currency"] = true class Window_Gold < Window_Base include Currency_Settings alias denis_kyznetsov_game_currency_window_gold_initialize initialize def initialize @currency_keys_type = 0 # номер ключа массива валют denis_kyznetsov_game_currency_window_gold_initialize self.arrows_visible = false self.ox = -value_width if !$GAME_CURRENCY_WINDOW_GOLD_CURRENT_CURRENCY && GAME_CURRENCY.size > 1 end alias denis_kyznetsov_game_currency_window_gold_update update def update denis_kyznetsov_game_currency_window_gold_update if !$GAME_CURRENCY_WINDOW_GOLD_CURRENT_CURRENCY && GAME_CURRENCY.size > 1 self.ox += 1 if self.ox > contents.width @currency_keys_type += 1 @currency_keys_type %= $game_party.currency.keys.size self.ox = -value_width refresh end elsif $GAME_CURRENCY_WINDOW_GOLD_CURRENT_CURRENCY && self.ox != 0 self.ox = 0 refresh end end def value_width # ширина значения вместе с иконкой или текстом val_width = 24 # отступ val_width += text_size(currency_unit).width if !GAME_CURRENCY_WINDOW_GOLD_ICON.has_key?(type) # ширина названия валюты, если нет иконки val_width += text_size(value).width # ширина значения return val_width end def value # значение валюты if $GAME_CURRENCY_WINDOW_GOLD_CURRENT_CURRENCY $game_party.gold else $game_party.currency[type] end end def type # получить тип валюты из ключей if $GAME_CURRENCY_WINDOW_GOLD_CURRENT_CURRENCY $game_party.currency_type else $game_party.currency.keys[@currency_keys_type] end end def currency_unit # символ валюты Vocab::currency_unit(type) end alias denis_kyznetsov_game_currency_window_gold_draw_currency_value draw_currency_value def draw_currency_value(value, unit, x, y, width) return denis_kyznetsov_game_currency_window_gold_draw_currency_value(value, unit, x, y, width) if !GAME_CURRENCY_WINDOW_GOLD_ICON.has_key?(type) change_color(normal_color) draw_text(x, y, width - 16 - 2, line_height, value, 2) draw_icon(GAME_CURRENCY_WINDOW_GOLD_ICON[type], width - 16, y) end end # class Window_Gold < Window_Base class Window_ShopNumber < Window_Selectable include Currency_Settings alias denis_kyznetsov_game_currency_window_shop_number_initialize initialize def initialize(x, y, height) denis_kyznetsov_game_currency_window_shop_number_initialize(x, y, height) @currency_unit = $game_party.currency_type end alias denis_kyznetsov_game_currency_window_shop_number_set set def set(item, max, price, currency_unit = nil) denis_kyznetsov_game_currency_window_shop_number_set(item, max, price, currency_unit) @currency_unit = $game_party.currency_type if currency_unit refresh end def currency_unit=(currency_unit) @currency_unit = $game_party.currency_type refresh end alias denis_kyznetsov_game_currency_window_shop_number_draw_currency_value draw_currency_value def draw_currency_value(value, unit, x, y, width) if !GAME_CURRENCY_WINDOW_GOLD_ICON.has_key?(unit) unit = Vocab::currency_unit return denis_kyznetsov_game_currency_window_shop_number_draw_currency_value(value, unit, x, y, width) end change_color(normal_color) draw_text(x, y, width - 16 - 2, line_height, value, 2) draw_icon(GAME_CURRENCY_WINDOW_GOLD_ICON[unit], width - 16, y) end end # class Window_ShopNumber < Window_Selectable class Scene_Shop < Scene_MenuBase def money $game_party.gold end def currency_unit $game_party.currency_type end end # class Scene_Shop < Scene_MenuBase module DataManager class << self alias denis_kyznetsov_game_currency_data_manager_make_save_contents make_save_contents alias denis_kyznetsov_game_currency_data_manager_extract_save_contents extract_save_contents end def self.make_save_contents contents = denis_kyznetsov_game_currency_data_manager_make_save_contents contents[:GAME_CURRENCY_WINDOW_GOLD_CURRENT_CURRENCY] = $GAME_CURRENCY_WINDOW_GOLD_CURRENT_CURRENCY contents end def self.extract_save_contents(contents) denis_kyznetsov_game_currency_data_manager_extract_save_contents(contents) $GAME_CURRENCY_WINDOW_GOLD_CURRENT_CURRENCY = contents[:GAME_CURRENCY_WINDOW_GOLD_CURRENT_CURRENCY] end end # module DataManager