[RMXP] -HtMaL(AG47)- (Test Name)

#-------------------------------------------------------------------------- # ** Scene_Modern_Shop #-------------------------------------------------------------------------- class Scene_Modern_Shop #-------------------------------------------------------------------------- # * Object Initialization #-------------------------------------------------------------------------- def initialize(item) @item = item end #-------------------------------------------------------------------------- # * Main #-------------------------------------------------------------------------- def main @sprite_set = Spriteset_Map.new @help_window = Window_Help2.new @help_window.opacity = 200 @command_window = Window_Command.new(160, ['Взять','Положить']) @command_window.y = 64 @command_window.opacity = 200 @number_window = Window_ShopNumber.new @number_window.active = false @number_window.visible = false @number_window.y = 64 @number_window.opacity = 200 @shopping_window = Window_ShoppingCart.new('buy') @shopping_window.active = false @shopping_window.visible = false @objects = [@sprite_set, @help_window, @command_window, @number_window, @shopping_window] Graphics.transition while $scene == self Graphics.update Input.update @objects.each {|x| x.update} update end Graphics.freeze @objects.each {|object| object.dispose} end #-------------------------------------------------------------------------- # * Frame Update #-------------------------------------------------------------------------- def update if @command_window.active update_command return end if @number_window.active update_number return end end #-------------------------------------------------------------------------- # * Frame Update (when command window is active) #-------------------------------------------------------------------------- def update_command @help_window.set_text('Желаете ли вы взять или положить '+@item.name+'?', 1) if Input.trigger?(Input::B) $game_system.se_play($data_system.cancel_se) $scene = Scene_Map.new return end if Input.trigger?(Input::C) case @command_window.index when 0 # Take case @item when RPG::Item number = $game_party.temp_item_number(@item.id) when RPG::Weapon number = $game_party.temp_weapon_number(@item.id) when RPG::Armor number = $game_party.temp_armor_number(@item.id) end if number == 99 $game_system.se_play($data_system.buzzer_se) @help_window.set_text('Нет более места для '+@item.name+'', 1) return end $game_system.se_play($data_system.decision_se) max = @item.price == 0 ? 99 : $game_party.gold / @item.price max = [max, 99 - number].min @command_window.active = false @command_window.visible = false @number_window.set(@item, max, @item.price) @number_window.active = true @number_window.visible = true when 1 # Place case @item when RPG::Item number = $game_party.temp_item_number(@item.id) when RPG::Weapon number = $game_party.temp_weapon_number(@item.id) when RPG::Armor number = $game_party.temp_armor_number(@item.id) end if number == 0 $game_system.se_play($data_system.buzzer_se) else max = number $game_system.se_play($data_system.decision_se) @command_window.active = false @command_window.visible = false @number_window.set(@item, max, @item.price / 2) @number_window.active = true @number_window.visible = true end end return end end #-------------------------------------------------------------------------- # * Frame Update (when quantity input window is active) #-------------------------------------------------------------------------- def update_number if Input.trigger?(Input::B) $game_system.se_play($data_system.cancel_se) @number_window.active = false @number_window.visible = false @command_window.active = true @command_window.visible = true end if @item.price > $game_party.gold @help_window.set_text('Вы не можете приобрести '+@item.name+'', 1) else @help_window.set_text('Количество '+@item.name+'', 1) end if Input.trigger?(Input::C) if @item.price > $game_party.gold $game_system.se_play($data_system.buzzer_se) else $game_system.se_play($data_system.shop_se) @number_window.active = false @number_window.visible = false case @command_window.index when 0 # Take case @item when RPG::Item $game_party.gain_temp_item(@item.id, @number_window.number) @shopping_window.refresh when RPG::Weapon $game_party.gain_temp_weapon(@item.id, @number_window.number) @shopping_window.refresh when RPG::Armor $game_party.gain_temp_armor(@item.id, @number_window.number) @shopping_window.refresh end @command_window.active = true @command_window.visible = true when 1 # Place case @item when RPG::Item $game_party.gain_temp_item(@item.id, (@number_window.number * -1)) @shopping_window.refresh when RPG::Weapon $game_party.gain_temp_weapon(@item.id, (@number_window.number * -1)) @shopping_window.refresh when RPG::Armor $game_party.gain_temp_armor(@item.id, (@number_window.number * -1)) @shopping_window.refresh end @command_window.active = true @command_window.visible = true end end return end end end #------------------------------------------------------------------------------ # ** Scene_ShoppingCart #------------------------------------------------------------------------------ class Scene_ShoppingCart #-------------------------------------------------------------------------- # * Object Initialization #-------------------------------------------------------------------------- def initialize(access = 'buy') @access = access end #-------------------------------------------------------------------------- # * Main #-------------------------------------------------------------------------- def main @sprite_set = Spriteset_Map.new @shopping_cart = Window_ShoppingCart.new(@access) @shopping_cart.active = true @shopping_cart.index = 0 @shopping_cart.opacity = 0 @total_ammount = @shopping_cart.get_total_ammount @total_price = @shopping_cart.get_total_price @shoptotal_window = Window_ShopTotal.new(@total_ammount, @total_price, @access) @shoptotal_window.opacity = 0 @command_window = Window_HorizCommand.new(['Да', 'Отмена'], 320) @command_window.x = 320 @command_window.y = 288 @command_window.opacity = 0 @command_windowsell = Window_HorizCommand.new(['Продать', 'Отмена'], 320) @command_windowsell.x = 320 @command_windowsell.y = 288 @command_windowsell.opacity = 0 unless @access == 'sell' @command_windowsell.visible = false @command_windowsell.active = false end unless @access == 'buy' @command_window.visible = false @command_window.active = false end @objects = [@sprite_set, @shopping_cart, @command_window, @shoptotal_window, @dummy_window, @command_windowsell] Graphics.transition loop do Graphics.update Input.update @objects.each {|x| x.update} update if $scene != self break end end Graphics.freeze @objects.each {|object| object.dispose} end #-------------------------------------------------------------------------- # * Frame Update #-------------------------------------------------------------------------- def update if Input.trigger?(Input::B) if @access == 'sell' $game_system.se_play($data_system.cancel_se) $scene = Scene_Sell.new return else $game_system.se_play($data_system.cancel_se) $scene = Scene_Map.new return end end if @command_window.active if Input.trigger?(Input::C) case @command_window.index when 0 if @total_price > $game_party.gold or @total_price == 0 $game_system.se_play($data_system.buzzer_se) else $game_system.se_play($data_system.shop_se) $game_party.lose_gold(@total_price) @shopping_cart.add_items @shopping_cart.refresh $scene = Scene_Map.new end when 1 $scene = Scene_Map.new end end end if @command_windowsell.active if Input.trigger?(Input::C) case @command_windowsell.index when 0 if @total_price == 0 $game_system.se_play($data_system.buzzer_se) else $game_system.se_play($data_system.shop_se) $game_party.gain_gold(@total_price) @shopping_cart.sell_items @shopping_cart.refresh $scene = Scene_Map.new end when 1 $game_system.have_sell_item = 0 $scene = Scene_Map.new end end end end end #------------------------------------------------------------------------------ # ** Scene_Sell #------------------------------------------------------------------------------ class Scene_Sell #-------------------------------------------------------------------------- # * Main #-------------------------------------------------------------------------- def main @sprite_set = Spriteset_Map.new @sell_window = Window_SellItems.new @sell_window.opacity = 0 @sellaid_window = Sell_Aid.new @sellaid_window.opacity = 0 @sell_window.help_window = @sellaid_window @help_window = Window_Help3.new @help_window.opacity = 200 @help_window.z = 110 @help_window.visible = false @number_window = Window_ShopNumber.new @number_window.active = false @number_window.visible = false @number_window.y = 64 @number_window.z = 110 @number_window.opacity = 200 @command_windowsell = Window_HorizCommand.new(['Продать', 'Отмена'], 320) @command_windowsell.visible = false @command_windowsell.active = false @dummy_window = Window_Base.new(320, 0, 320, 288) @dummy_window.opacity = 200 @objects = [@sprite_set, @command_windowsell, @sell_window, @sellaid_window, @number_window, @dummy_window, @help_window] Graphics.transition loop do Graphics.update Input.update @objects.each {|x| x.update} update if $scene != self break end end Graphics.freeze @objects.each {|object| object.dispose} end #-------------------------------------------------------------------------- # * Frame Update #-------------------------------------------------------------------------- def update if @sell_window.active == true update_sell return end if @number_window.active == true update_number return end end #-------------------------------------------------------------------------- # * Frame Update (when quantity input window is active) #-------------------------------------------------------------------------- def update_number if Input.trigger?(Input::B) $game_system.se_play($data_system.cancel_se) @number_window.active = false @number_window.visible = false @help_window.visible = false @sell_window.active = true @sell_window.visible = true end if Input.trigger?(Input::C) $game_system.se_play($data_system.shop_se) @number_window.active = false @number_window.visible = false @help_window.visible = false item = @sell_window.item @sell_window.add_sell_items(item, @number_window.number) @sell_window.refresh @sell_window.active = true return end end #-------------------------------------------------------------------------- # * Frame Update (when sell window is active) #-------------------------------------------------------------------------- def update_sell if Input.trigger?(Input::A) @item = @sell_window.item if @item == nil $game_system.se_play($data_system.buzzer_se) else $game_system.se_play($data_system.cancel_se) $scene = Scene_ShoppingCart.new('sell') return end end if Input.trigger?(Input::B) $game_system.se_play($data_system.cancel_se) $game_system.have_sell_item = 0 $scene = Scene_Map.new return end if Input.trigger?(Input::C) @item = @sell_window.item if @item == nil $game_system.se_play($data_system.buzzer_se) else case @item when RPG::Item number = $game_party.item_number(@item.id) number2 = $game_party.sell_item_number(@item.id) when RPG::Weapon number = $game_party.weapon_number(@item.id) number2 = $game_party.sell_weapon_number(@item.id) when RPG::Armor number = $game_party.armor_number(@item.id) number2 = $game_party.sell_armor_number(@item.id) end $game_system.se_play($data_system.decision_se) if number2 == 0 @help_window.set_text('Сколько вещей желаете положить?', 1) max = number else @help_window.set_text('Сколько вещей желаете забрать?', 1) max = number2 end @sell_window.active = false @number_window.set(@item, max, @item.price / 2) @number_window.active = true @number_window.visible = true @help_window.visible = true end end end end #------------------------------------------------------------------------------ # ** Scene_Map #------------------------------------------------------------------------------ class Scene_Map #-------------------------------------------------------------------------- # * Menu Call #-------------------------------------------------------------------------- def call_menu $game_temp.menu_calling = false if $game_temp.menu_beep $game_system.se_play($data_system.decision_se) $game_temp.menu_beep = false end $game_player.straighten if $game_system.have_temp_item == 1 $scene = Scene_ShoppingCart.new('menu') else $scene = Scene_Menu.new end end end #-------------------------------------------------------------------------- # ** Window_SellItems #-------------------------------------------------------------------------- class Window_SellItems < Window_Selectable #-------------------------------------------------------------------------- # * Object Initialization #-------------------------------------------------------------------------- def initialize super(320, 0, 320, 160) @column_max = 1 refresh self.index = 0 end #-------------------------------------------------------------------------- # * Getting Items #-------------------------------------------------------------------------- def item return @data[index] end #-------------------------------------------------------------------------- # * Add_Sell_Items #-------------------------------------------------------------------------- def add_sell_items(item, number) case item when RPG::Item if $game_party.sell_item_number(item.id) == 0 $game_party.gain_sell_item(item.id, number) else $game_party.gain_sell_item(item.id, number*-1) end when RPG::Weapon if $game_party.sell_weapon_number(item.id) == 0 $game_party.gain_sell_weapon(item.id, number) else $game_party.gain_sell_weapon(item.id, number*-1) end when RPG::Armor if $game_party.sell_armor_number(item.id) == 0 $game_party.gain_sell_armor(item.id,number) else $game_party.gain_sell_armor(item.id,number*-1) end end end #-------------------------------------------------------------------------- # * Refresh #-------------------------------------------------------------------------- def refresh if self.contents != nil self.contents.dispose self.contents = nil end @data = [] for i in 1...$data_items.size if $game_party.item_number(i) > 0 if $data_items[i].price > 0 @data.push($data_items[i]) end end end for i in 1...$data_weapons.size if $game_party.weapon_number(i) > 0 if $data_weapons[i].price > 0 @data.push($data_weapons[i]) end end end for i in 1...$data_armors.size if $game_party.armor_number(i) > 0 if $data_armors[i].price > 0 @data.push($data_armors[i]) end end end @item_max = @data.size if $game_system.have_sell_item == 0 empty_list end if @item_max > 0 self.contents = Bitmap.new(width - 32, row_max * 32) for i in 0...@item_max draw_item(i) end end end #-------------------------------------------------------------------------- # * Draw Item #-------------------------------------------------------------------------- def draw_item(index) item = @data[index] case item when RPG::Item number = $game_party.item_number(item.id) number2 = $game_party.sell_item_number(item.id) when RPG::Weapon number = $game_party.weapon_number(item.id) number2 = $game_party.sell_weapon_number(item.id) when RPG::Armor number = $game_party.armor_number(item.id) number2 = $game_party.sell_armor_number(item.id) end if number2 > 0 self.contents.font.color = disabled_color else self.contents.font.color = normal_color end x = 4 + index % 1 * (288 + 32) y = index / 1 * 32 rect = Rect.new(x, y, self.width / @column_max - 32, 32) self.contents.fill_rect(rect, Color.new(0, 0, 0, 0)) bitmap = RPG::Cache.icon(item.icon_name) opacity = self.contents.font.color == normal_color ? 255 : 128 self.contents.blt(x, y + 4, bitmap, Rect.new(0, 0, 24, 24), opacity) self.contents.draw_text(x + 28, y, 212, 32, item.name, 0) self.contents.draw_text(x + 210, y, 50, 32, (item.price / 2).to_s, 0) self.contents.draw_text(x + 250, y, 30, 32, $data_system.words.gold, 2) end #-------------------------------------------------------------------------- # * Help Text Update #-------------------------------------------------------------------------- def update_help case item when RPG::Item number = $game_party.item_number(item.id) number2 = $game_party.sell_item_number(item.id) when RPG::Weapon number = $game_party.weapon_number(item.id) number2 = $game_party.sell_weapon_number(item.id) when RPG::Armor number = $game_party.armor_number(item.id) number2 = $game_party.sell_armor_number(item.id) end if self.item != nil @help_window.set_text(self.item.name, number, number2) end end #-------------------------------------------------------------------------- # * Empty_List #-------------------------------------------------------------------------- def empty_list if @item_max > 0 for i in 0...@item_max item = @data[i] case item when RPG::Item $game_party.gain_sell_item(item.id, $game_party.sell_item_number(item.id)*-1) when RPG::Weapon $game_party.gain_sell_weapon(item.id, $game_party.sell_weapon_number(item.id)*-1) when RPG::Armor $game_party.gain_sell_armor(item.id,$game_party.sell_armor_number(item.id)*-1) end end end $game_system.have_sell_item = 1 end end #------------------------------------------------------------------------------ # ** Sell_Aid #------------------------------------------------------------------------------ class Sell_Aid < Window_Base #-------------------------------------------------------------------------- # * Object Initialization #-------------------------------------------------------------------------- def initialize super(320, 160, 320, 128) self.contents = Bitmap.new(width - 32, height - 32) end #-------------------------------------------------------------------------- # * Set Text #-------------------------------------------------------------------------- def set_text(text, number, number2, align = 0) if text != @text or align != @align or number != @number or number2 != @number2 self.contents.clear self.contents.font.color = normal_color self.contents.draw_text(4, 0, self.width - 40, 32, text, align) self.contents.draw_text(4, 32, self.width - 40, 32, 'Inventory', align) self.contents.draw_text(100, 32, self.width - 40, 32, number.to_s, align) self.contents.draw_text(4, 62, self.width - 40, 32, 'Selling', align) self.contents.draw_text(100, 62, self.width - 40, 32, number2.to_s, align) @text = text @align = align @number = number @number2 = number2 @actor = nil end self.visible = true end end #------------------------------------------------------------------------------ # ** Window_ShoppingCart #------------------------------------------------------------------------------ class Window_ShoppingCart < Window_Selectable #-------------------------------------------------------------------------- # * Object Initialization #-------------------------------------------------------------------------- def initialize(access) super(320, 0, 320, 160) self.contents = Bitmap.new(width - 32, height - 32) @access = access if @access == 'sell' refresh2 else refresh end end #-------------------------------------------------------------------------- # * Refresh #-------------------------------------------------------------------------- def refresh if self.contents != nil self.contents.dispose self.contents = nil end @data = [] for i in 1...$data_items.size if $game_party.temp_item_number(i) > 0 @data.push($data_items[i]) end end for i in 1...$data_weapons.size if $game_party.temp_weapon_number(i) > 0 @data.push($data_weapons[i]) end end for i in 1...$data_armors.size if $game_party.temp_armor_number(i) > 0 @data.push($data_armors[i]) end end @item_max = @data.size if $game_system.in_shop == 0 empty_list @item_max = 0 $game_system.in_shop = 1 else if @item_max > 0 $game_system.have_temp_item = 1 self.contents = Bitmap.new(width - 32, row_max * 32) for i in 0...@item_max draw_item(i) end else $game_system.have_temp_item = 0 end end end #-------------------------------------------------------------------------- # * Refresh2 #-------------------------------------------------------------------------- def refresh2 if self.contents != nil self.contents.dispose self.contents = nil end @data = [] for i in 1...$data_items.size if $game_party.sell_item_number(i) > 0 @data.push($data_items[i]) end end for i in 1...$data_weapons.size if $game_party.sell_weapon_number(i) > 0 @data.push($data_weapons[i]) end end for i in 1...$data_armors.size if $game_party.sell_armor_number(i) > 0 @data.push($data_armors[i]) end end @item_max = @data.size if @item_max > 0 self.contents = Bitmap.new(width - 32, row_max * 32) for i in 0...@item_max draw_item(i) end end end #-------------------------------------------------------------------------- # * Draw Item #-------------------------------------------------------------------------- def draw_item(index) item = @data[index] if @access == 'sell' case item when RPG::Item number = $game_party.sell_item_number(item.id) when RPG::Weapon number = $game_party.sell_weapon_number(item.id) when RPG::Armor number = $game_party.sell_armor_number(item.id) end else case item when RPG::Item number = $game_party.temp_item_number(item.id) when RPG::Weapon number = $game_party.temp_weapon_number(item.id) when RPG::Armor number = $game_party.temp_armor_number(item.id) end end self.contents.font.color = normal_color x = 4 + index % 1 * (288 + 32) y = index / 1 * 32 rect = Rect.new(x, y, self.width / @column_max - 32, 32) self.contents.fill_rect(rect, Color.new(0, 0, 0, 0)) bitmap = RPG::Cache.icon(item.icon_name) opacity = self.contents.font.color == normal_color ? 255 : 128 self.contents.blt(x, y + 4, bitmap, Rect.new(0, 0, 24, 24), opacity) self.contents.draw_text(x + 28, y, 212, 32, item.name, 0) self.contents.draw_text(x + 170, y, 16, 32, "x", 1) self.contents.draw_text(x + 180, y, 24, 32, number.to_s, 2) if @access == 'sell' self.contents.draw_text(x + 206, y, 54, 32, ((item.price/2)*number).to_s, 2) else self.contents.draw_text(x + 206, y, 54, 32, (item.price*number).to_s, 2) end self.contents.draw_text(x + 250, y, 32, 32, $data_system.words.gold, 2) end #-------------------------------------------------------------------------- # * Get_Total_Ammount #-------------------------------------------------------------------------- def get_total_ammount total = 0 if @item_max > 0 for i in 0...@item_max item = @data[i] case item when RPG::Item if @access == 'sell' total += $game_party.sell_item_number(item.id) else total += $game_party.temp_item_number(item.id) end when RPG::Weapon if @access == 'sell' total += $game_party.sell_weapon_number(item.id) else total += $game_party.temp_weapon_number(item.id) end when RPG::Armor if @access == 'sell' total += $game_party.sell_armor_number(item.id) else total += $game_party.temp_armor_number(item.id) end end end end return total end #-------------------------------------------------------------------------- # * Get_Total_Price #-------------------------------------------------------------------------- def get_total_price total = 0 if @item_max > 0 for i in 0...@item_max item = @data[i] case item when RPG::Item if @access == 'sell' total += (item.price / 2) * $game_party.sell_item_number(item.id) else total += item.price * $game_party.temp_item_number(item.id) end when RPG::Weapon if @access == 'sell' total += (item.price / 2) * $game_party.sell_weapon_number(item.id) else total += item.price * $game_party.temp_weapon_number(item.id) end when RPG::Armor if @access == 'sell' total += (item.price / 2) * $game_party.sell_armor_number(item.id) else total += item.price * $game_party.temp_armor_number(item.id) end end end end return total end #-------------------------------------------------------------------------- # * Add_Items #-------------------------------------------------------------------------- def add_items if @item_max > 0 for i in 0...@item_max item = @data[i] case item when RPG::Item $game_party.gain_item(item.id, $game_party.temp_item_number(item.id)) when RPG::Weapon $game_party.gain_weapon(item.id, $game_party.temp_weapon_number(item.id)) when RPG::Armor $game_party.gain_armor(item.id,$game_party.temp_armor_number(item.id)) end end end empty_list end #-------------------------------------------------------------------------- # * sell_items #-------------------------------------------------------------------------- def sell_items if @item_max > 0 for i in 0...@item_max item = @data[i] case item when RPG::Item $game_party.lose_item(item.id, $game_party.sell_item_number(item.id)) when RPG::Weapon $game_party.lose_weapon(item.id, $game_party.sell_weapon_number(item.id)) when RPG::Armor $game_party.lose_armor(item.id,$game_party.sell_armor_number(item.id)) end end end empty_list end #-------------------------------------------------------------------------- # * Empty_List #-------------------------------------------------------------------------- def empty_list if @item_max > 0 for i in 0...@item_max item = @data[i] case item when RPG::Item if @access == 'sell' $game_party.gain_sell_item(item.id, $game_party.sell_item_number(item.id)*-1) else $game_party.gain_temp_item(item.id, $game_party.temp_item_number(item.id)*-1) end when RPG::Weapon if @access == 'sell' $game_party.gain_sell_weapon(item.id, $game_party.sell_weapon_number(item.id)*-1) else $game_party.gain_temp_weapon(item.id, $game_party.temp_weapon_number(item.id)*-1) end when RPG::Armor if @access == 'sell' $game_party.gain_sell_armor(item.id,$game_party.sell_armor_number(item.id)*-1) else $game_party.gain_temp_armor(item.id,$game_party.temp_armor_number(item.id)*-1) end end end end $game_system.have_temp_item = 0 end end #------------------------------------------------------------------------------ # ** Window Horizontal Command #------------------------------------------------------------------------------ class Window_HorizCommand < Window_Selectable #-------------------------------------------------------------------------- # * Object Initialization #-------------------------------------------------------------------------- def initialize(commands, width = 640, height = 64) super(0, 0, width, height) self.contents = Bitmap.new(width - 32, height - 32) @commands = commands @item_max = @commands.size @column_max = @commands.size refresh self.index = 0 end #-------------------------------------------------------------------------- # * Refresh #-------------------------------------------------------------------------- def refresh self.contents.clear for i in 0...@item_max draw_item(i, normal_color) end end #-------------------------------------------------------------------------- # * Draw Item #-------------------------------------------------------------------------- def draw_item(index, color) self.contents.font.color = color x = width / @item_max * index off = width / @item_max - 32 self.contents.draw_text(x, 0, off, 32, @commands[index], 1) end #-------------------------------------------------------------------------- # * Disable Item #-------------------------------------------------------------------------- def disable_item(index) draw_item(index, disabled_color) end end #------------------------------------------------------------------------------ # ** Window Shop Total #------------------------------------------------------------------------------ class Window_ShopTotal < Window_Base #-------------------------------------------------------------------------- # * Object Initialization #-------------------------------------------------------------------------- def initialize(total_ammount, total_price, access) @total_ammount = total_ammount @total_price = total_price @access = access super(585, 369, 240, 128) self.contents = Bitmap.new(width - 32, height - 32) refresh end #-------------------------------------------------------------------------- # * Refresh #-------------------------------------------------------------------------- def refresh self.contents.clear self.contents.font.name = "Bangkok" self.contents.font.color = normal_color self.contents.font.size = 14 if Font.method_defined? :outline= self.contents.font.outline = true end self.contents.draw_text(4, 0, 160, 24, "Количество:") self.contents.draw_text(100, 0, 160, 24, @total_ammount.to_s, 2) self.contents.draw_text(4, 14, 160, 24, "Цена:") self.contents.draw_text(100, 14, 160, 24, @total_price.to_s, 2) self.contents.draw_text(156, 14, 32, 24, $data_system.words.gold, 2) unless @access == 'sell' self.contents.draw_text(4, 28, 160, 24, "В кошельке:") self.contents.draw_text(100, 28, 160, 24, $game_party.gold.to_s) self.contents.draw_text(156, 28, 32, 24, $data_system.words.gold, 2) end end end #------------------------------------------------------------------------------ # ** Window Shop Number (Text Removal) #------------------------------------------------------------------------------ class Window_ShopNumber < Window_Base #-------------------------------------------------------------------------- # * Object Initialization #-------------------------------------------------------------------------- def initialize super(0, 128, 368, 200) self.contents = Bitmap.new(width - 32, height - 32) @item = nil @max = 1 @price = 0 @number = 1 end #-------------------------------------------------------------------------- # * Refresh #-------------------------------------------------------------------------- def refresh self.contents.clear draw_item_name(@item, 36, 64) self.contents.font.color = normal_color self.contents.draw_text(64, 96, 32, 32, "×") self.contents.draw_text(100, 96, 24, 32, @number.to_s, 2) self.cursor_rect.set(96, 96, 32, 32) end end #------------------------------------------------------------------------------ # ** Window_Help2 #------------------------------------------------------------------------------ class Window_Help2 < Window_Base #-------------------------------------------------------------------------- # * Object Initialization #-------------------------------------------------------------------------- def initialize super(0, 0, 490, 64) self.contents = Bitmap.new(width - 32, height - 32) end #-------------------------------------------------------------------------- # * Set Text #-------------------------------------------------------------------------- def set_text(text, align = 0) if text != @text or align != @align self.contents.clear self.contents.font.color = normal_color self.contents.draw_text(4, 0, self.width - 40, 32, text, align) @text = text @align = align @actor = nil end self.visible = true end end #------------------------------------------------------------------------------ # ** Window_Help3 #------------------------------------------------------------------------------ class Window_Help3 < Window_Base #-------------------------------------------------------------------------- # * Object Initialization #-------------------------------------------------------------------------- def initialize super(0, 0, 368, 64) self.contents = Bitmap.new(width - 32, height - 32) end #-------------------------------------------------------------------------- # * Set Text #-------------------------------------------------------------------------- def set_text(text, align = 0) if text != @text or align != @align self.contents.clear self.contents.font.color = normal_color self.contents.draw_text(4, 0, self.width - 40, 32, text, align) @text = text @align = align @actor = nil end self.visible = true end end #-------------------------------------------------------------------------- # ** Game_Party #-------------------------------------------------------------------------- class Game_Party alias vpcdmd_initialize initialize #-------------------------------------------------------------------------- # * Object Initialization #-------------------------------------------------------------------------- def initialize vpcdmd_initialize @temp_items = {} @temp_weapons = {} @temp_armors = {} @sell_items = {} @sell_weapons = {} @sell_armors = {} end #-------------------------------------------------------------------------- # * Get Number of Items Possessed #-------------------------------------------------------------------------- def temp_item_number(item_id) return @temp_items.include?(item_id) ? @temp_items[item_id] : 0 end #-------------------------------------------------------------------------- # * Get Number of Weapons Possessed #-------------------------------------------------------------------------- def temp_weapon_number(weapon_id) return @temp_weapons.include?(weapon_id) ? @temp_weapons[weapon_id] : 0 end #-------------------------------------------------------------------------- # * Get Amount of Armor Possessed #-------------------------------------------------------------------------- def temp_armor_number(armor_id) return @temp_armors.include?(armor_id) ? @temp_armors[armor_id] : 0 end #-------------------------------------------------------------------------- # * Gain Items (or lose) #-------------------------------------------------------------------------- def gain_temp_item(item_id, n) if item_id > 0 @temp_items[item_id] = [[temp_item_number(item_id) + n, 0].max, 99].min end end #-------------------------------------------------------------------------- # * Gain Weapons (or lose) #-------------------------------------------------------------------------- def gain_temp_weapon(weapon_id, n) if weapon_id > 0 @temp_weapons[weapon_id] = [[temp_weapon_number(weapon_id) + n, 0].max, 99].min end end #-------------------------------------------------------------------------- # * Gain Armor (or lose) #-------------------------------------------------------------------------- def gain_temp_armor(armor_id, n) if armor_id > 0 @temp_armors[armor_id] = [[temp_armor_number(armor_id) + n, 0].max, 99].min end end #-------------------------------------------------------------------------- # * Get Number of Items Possessed #-------------------------------------------------------------------------- def sell_item_number(item_id) return @sell_items.include?(item_id) ? @sell_items[item_id] : 0 end #-------------------------------------------------------------------------- # * Get Number of Weapons Possessed #-------------------------------------------------------------------------- def sell_weapon_number(weapon_id) return @sell_weapons.include?(weapon_id) ? @sell_weapons[weapon_id] : 0 end #-------------------------------------------------------------------------- # * Get Amount of Armor Possessed #-------------------------------------------------------------------------- def sell_armor_number(armor_id) return @sell_armors.include?(armor_id) ? @sell_armors[armor_id] : 0 end #-------------------------------------------------------------------------- # * Gain Items (or lose) #-------------------------------------------------------------------------- def gain_sell_item(item_id, n) if item_id > 0 @sell_items[item_id] = [[sell_item_number(item_id) + n, 0].max, 99].min end end #-------------------------------------------------------------------------- # * Gain Weapons (or lose) #-------------------------------------------------------------------------- def gain_sell_weapon(weapon_id, n) if weapon_id > 0 @sell_weapons[weapon_id] = [[sell_weapon_number(weapon_id) + n, 0].max, 99].min end end #-------------------------------------------------------------------------- # * Gain Armor (or lose) #-------------------------------------------------------------------------- def gain_sell_armor(armor_id, n) if armor_id > 0 @sell_armors[armor_id] = [[sell_armor_number(armor_id) + n, 0].max, 99].min end end end #-------------------------------------------------------------------------- # ** Game_System #-------------------------------------------------------------------------- class Game_System attr_accessor :in_shop attr_accessor :have_temp_item attr_accessor :have_sell_item alias vpcdmd_initialize initialize #-------------------------------------------------------------------------- # * Initialization #-------------------------------------------------------------------------- def initialize vpcdmd_initialize @in_shop = 0 @have_temp_item = 0 @have_sell_item = 0 end #-------------------------------------------------------------------------- # * In_Shop #-------------------------------------------------------------------------- def in_shop return @in_shop end #-------------------------------------------------------------------------- # * Have_Temp_Item #-------------------------------------------------------------------------- def have_temp_item return @have_temp_item end #-------------------------------------------------------------------------- # * Have_Sell_Item #-------------------------------------------------------------------------- def have_sell_item return @have_sell_item end end

#=============================================================================== # ** Shop (First) #------------------------------------------------------------------------------- # Shop_First #------------------------------------------------------------------------------- module SHOP101 #Transition Time. LADY_TT = 10 #Transition Type(Name). LADY_TTT = "" # Set Maximum VST = 250 end $ladyscript = {} if $ladyscript == nil $ladyscript["Shop_1"] = true ################## # Window_Shop101 # ################## class Window_Shop101 < Window_Base def initialize super(0, 0, 820, 620) self.contents = Bitmap.new(width - 32, height - 32) self.opacity = 0 refresh end def refresh self.contents.clear self.contents.font.name = "Bangkok" back = RPG::Cache.picture("Shop1_Interface") self.contents.blt(-14, -18, back, Rect.new(0, 0, back.width, back.height)) equip = RPG::Cache.icon('Slot_Shop') self.contents.font.size = 14 draw_item_text($data_weapons[1], 59, 9) self.contents.blt(5, 11, equip, Rect.new(0, 0, equip.width, equip.height)) draw_item_icon($data_weapons[1], 5, 11) self.contents.draw_text(90, 34, 88, 32, $data_weapons[1].price.to_s, 2) self.contents.font.size = 14 draw_item_text($data_weapons[2], 59, 69) self.contents.blt(5, 71, equip, Rect.new(0, 0, equip.width, equip.height)) draw_item_icon($data_weapons[2], 5, 71) self.contents.draw_text(90, 95, 88, 32, $data_weapons[2].price.to_s, 2) self.contents.font.size = 14 draw_item_text($data_weapons[3], 59, 129) self.contents.blt(5, 131, equip, Rect.new(0, 0, equip.width, equip.height)) draw_item_icon($data_weapons[3], 5, 131) self.contents.draw_text(90, 155, 88, 32, $data_weapons[3].price.to_s, 2) self.contents.font.size = 14 draw_item_text($data_weapons[4], 59, 189) self.contents.blt(5, 191, equip, Rect.new(0, 0, equip.width, equip.height)) draw_item_icon($data_weapons[4], 5, 191) self.contents.draw_text(90, 215, 88, 32, $data_weapons[4].price.to_s, 2) self.contents.font.size = 14 draw_item_text($data_weapons[5], 59, 249) self.contents.blt(5, 251, equip, Rect.new(0, 0, equip.width, equip.height)) draw_item_icon($data_weapons[5], 5, 251) self.contents.draw_text(90, 275, 88, 32, $data_weapons[5].price.to_s, 2) self.contents.font.size = 14 draw_item_text($data_weapons[6], 59, 309) self.contents.blt(5, 311, equip, Rect.new(0, 0, equip.width, equip.height)) draw_item_icon($data_weapons[6], 5, 311) self.contents.draw_text(90, 335, 88, 32, $data_weapons[6].price.to_s, 2) self.contents.font.size = 14 draw_item_text($data_weapons[7], 59, 369) self.contents.blt(5, 371, equip, Rect.new(0, 0, equip.width, equip.height)) draw_item_icon($data_weapons[7], 5, 371) self.contents.draw_text(90, 395, 88, 32, $data_weapons[7].price.to_s, 2) self.contents.font.size = 14 draw_item_text($data_weapons[8], 59, 429) self.contents.blt(5, 431, equip, Rect.new(0, 0, equip.width, equip.height)) draw_item_icon($data_weapons[8], 5, 431) self.contents.draw_text(90, 455, 88, 32, $data_weapons[8].price.to_s, 2) self.contents.font.size = 14 draw_item_text($data_weapons[9], 59, 489) self.contents.blt(5, 491, equip, Rect.new(0, 0, equip.width, equip.height)) draw_item_icon($data_weapons[9], 5, 491) self.contents.draw_text(90, 515, 88, 32, $data_weapons[9].price.to_s, 2) self.contents.font.size = 14 draw_item_text($data_weapons[10], 249, 9) self.contents.blt(194, 11, equip, Rect.new(0, 0, equip.width, equip.height)) draw_item_icon($data_weapons[10], 194, 11) self.contents.draw_text(279, 34, 88, 32, $data_weapons[10].price.to_s, 2) self.contents.font.size = 14 draw_item_text($data_weapons[11], 249, 69) self.contents.blt(194, 71, equip, Rect.new(0, 0, equip.width, equip.height)) draw_item_icon($data_weapons[11], 194, 71) self.contents.draw_text(279, 95, 88, 32, $data_weapons[11].price.to_s, 2) self.contents.font.size = 14 draw_item_text($data_weapons[12], 249, 129) self.contents.blt(194, 131, equip, Rect.new(0, 0, equip.width, equip.height)) draw_item_icon($data_weapons[12], 194, 131) self.contents.draw_text(279, 155, 88, 32, $data_weapons[12].price.to_s, 2) self.contents.font.size = 14 draw_item_text($data_weapons[13], 249, 189) self.contents.blt(194, 191, equip, Rect.new(0, 0, equip.width, equip.height)) draw_item_icon($data_weapons[13], 194, 191) self.contents.draw_text(279, 215, 88, 32, $data_weapons[13].price.to_s, 2) self.contents.font.size = 14 self.contents.blt(194, 251, equip, Rect.new(0, 0, equip.width, equip.height)) self.contents.font.size = 14 self.contents.blt(194, 311, equip, Rect.new(0, 0, equip.width, equip.height)) self.contents.font.size = 14 self.contents.blt(194, 371, equip, Rect.new(0, 0, equip.width, equip.height)) self.contents.font.size = 14 self.contents.blt(194, 431, equip, Rect.new(0, 0, equip.width, equip.height)) self.contents.font.size = 14 self.contents.blt(194, 491, equip, Rect.new(0, 0, equip.width, equip.height)) self.contents.font.size = 14 self.contents.blt(383, 11, equip, Rect.new(0, 0, equip.width, equip.height)) self.contents.font.size = 14 self.contents.blt(383, 71, equip, Rect.new(0, 0, equip.width, equip.height)) self.contents.font.size = 14 self.contents.blt(383, 131, equip, Rect.new(0, 0, equip.width, equip.height)) self.contents.font.size = 14 self.contents.blt(383, 191, equip, Rect.new(0, 0, equip.width, equip.height)) self.contents.font.size = 14 self.contents.blt(383, 251, equip, Rect.new(0, 0, equip.width, equip.height)) self.contents.font.size = 14 self.contents.blt(383, 311, equip, Rect.new(0, 0, equip.width, equip.height)) self.contents.font.size = 14 self.contents.blt(383, 371, equip, Rect.new(0, 0, equip.width, equip.height)) end end ################## # Window_Shop101 # ################## class Window_ShopChecker < Window_Base def initialize super(0, 0, 820, 620) self.contents = Bitmap.new(width - 32, height - 32) self.opacity = 0 refresh end def refresh self.contents.clear checker = RPG::Cache.picture("Shop_Checker") self.contents.blt(0, 5, checker, Rect.new(0, 0, checker.width, checker.height)) end end ################ # Scene_Shop101# ################ class Scene_Shop101 def initialize(actor_index = 0, equip_index = 0) @actor_index = actor_index @item_index = 0 @row = @item_index / 9 @col = @item_index % 3 end def main @map_battleback = Spriteset_Map.new @map_battleback.delete_characters if REMOVE_CLASSES.size > 0 @shop_window = Window_Shop101.new @shopping_cart = Window_ShoppingCart.new(@access) @shopping_cart.active = false @shopping_cart.opacity = 0 @total_ammount = @shopping_cart.get_total_ammount @total_price = @shopping_cart.get_total_price @shoptotal_window = Window_ShopTotal.new(@total_ammount, @total_price, @access) @shoptotal_window.opacity = 0 @shopchecker = Window_ShopChecker.new Graphics.transition(SHOP101::LADY_TT, "Graphics/Transitions/" + SHOP101::LADY_TTT) loop do Graphics.update Input.update update if $scene != self break end end for i in 0..30 Graphics.update end Graphics.freeze @map_battleback.dispose @shop_window.dispose @shopping_cart.dispose @shoptotal_window.dispose @shopchecker.dispose end def update if Input.trigger?(Input::RIGHT) $game_system.se_play($data_system.cursor_se) @col += 1 @shopchecker.x += 189 if @col == 3 @col = 0 @shopchecker.x -= 567 end if @col == 2 if @row > 6 @col = 0 @shopchecker.x -= 378 end end @item_index = 3 * @row + @col return end if Input.trigger?(Input::LEFT) $game_system.se_play($data_system.cursor_se) @col -= 1 @shopchecker.x -= 189 if @col == -1 @col = 2 @shopchecker.x += 567 end if @col == 2 if @row > 6 @col = 1 @shopchecker.x -= 189 end end @item_index = 3 * @row + @col return end if Input.trigger?(Input::UP) $game_system.se_play($data_system.cursor_se) @row -= 1 @shopchecker.y -= 60 if @row == -1 if @col != 2 @row = 8 @shopchecker.y += 540 else @row = 6 @shopchecker.y += 420 end end @item_index = 9 * @row + @col if @col == 2 @item_index = 7 * @row + @col end return end if Input.trigger?(Input::DOWN) $game_system.se_play($data_system.cursor_se) @row += 1 @shopchecker.y += 60 if @row == 9 @row = 0 @shopchecker.y -= 540 end if @col == 2 if @row > 6 @row = 0 @shopchecker.y -= 420 end end @item_index = 9 * @row + @col if @col == 2 @item_index = 7 * @row + @col end return end end if Input.trigger?(Input::Key['Enter']) $scene = Scene_Modern_Shop.new($data_weapons[1]) end if Input.trigger?(Input::Key['Escape']) $scene = Scene_cshop.new end end

#------------------------------------------------------------------------------- # Removal Feature #------------------------------------------------------------------------------- REMOVE_CLASSES = [Game_Player, Game_Event] #============================================================================== # Spriteset_Map #============================================================================== class Spriteset_Map def delete_characters @character_sprites.clone.each_index {|i| if REMOVE_CLASSES.include?(@character_sprites[i].character.class) @character_sprites[i].dispose @character_sprites[i] = nil end} @character_sprites.compact! end end #============================================================================== # Spriteset_Battle #============================================================================== class Spriteset_Battle alias init_map_as_battleback_later initialize def initialize @map_battleback = Spriteset_Map.new @map_battleback.delete_characters if REMOVE_CLASSES.size > 0 init_map_as_battleback_later @battleback_sprite.dispose @battleback_sprite = nil end alias disp_map_as_battleback_later dispose def dispose @battleback_sprite = Sprite.new if @battleback_sprite == nil if @map_battleback != nil @map_battleback.dispose @map_battleback = nil end disp_map_as_battleback_later end end