~Site ¤Accueil ¤Forum ¤Admin ~Base de scripts ¤Scripts de base ¤Scripts Menu ¤Scripts Combat ¤Scripts Système ¤Scripts Modifiés
		Scripts de Base Game_Temp Game_System Game_Switches Game_Variables Game_SelfSwitches Game_Screen Game_Picture Game_Battler 1 Game_Battler 2 Game_Battler 3 Game_BattleAction Game_Actor Game_Enemy Game_Actors Game_Party Game_Troop Game_Map Game_CommonEvent Game_Character 1 Game_Character 2 Game_Character 3 Game_Event Game_Player Sprite_Character Sprite_Battler Sprite_Picture Sprite_Timer Spriteset_Map Spriteset_Battle Window_Base Window_Selectable Window_Command Window_Help Window_Gold Window_PlayTime Window_Steps Window_MenuStatus Window_Item Window_Skill Window_SkillStatus Window_Target Window_EquipLeft Window_EquipRight Window_EquipItem Window_Status Window_SaveFile Window_ShopCommand Window_ShopBuy Window_ShopSell Window_ShopNumber Window_ShopStatus Window_NameEdit Window_NameInput Window_InputNumber Window_Message Window_PartyCommand Window_BattleStatus Window_BattleResult Window_DebugLeft Window_DebugRight Window_Dataset Arrow_Base Arrow_Enemy Arrow_Actor Interpreter 1 Interpreter 2 Interpreter 3 Interpreter 4 Interpreter 5 Interpreter 6 Interpreter 7 Scene_Title Scene_Map Scene_Menu Scene_Item Scene_Skill Scene_Equip Scene_Status Scene_File Scene_Save Scene_Load Scene_End Scene_Battle 1 Scene_Battle 2 Scene_Battle 3 Scene_Battle 4 Scene_Shop Scene_Name Scene_Gameover Scene_Debug Main Scene_Shop ::: posté le 2006-02-16 @ 10:28:00 Auteur: Yukihiro matsumoto #============================================ # �¡ Scene_Shop #---------------------------------------------- # �@ƒVƒ‡ƒbƒv‰æ–Ê‚Ì�ˆ—�‚ð�s‚¤ƒNƒ‰ƒX‚Å‚·�B #============================================ class Scene_Shop #------------------------------------------ # �œ ƒ�ƒCƒ“�ˆ—� #------------------------------------------ def main # ƒwƒ‹ƒvƒEƒBƒ“ƒhƒE‚ð�ì�¬ @help_window = Window_Help.new # ƒRƒ}ƒ“ƒhƒEƒBƒ“ƒhƒE‚ð�ì�¬ @command_window = Window_ShopCommand.new # ƒS�[ƒ‹ƒhƒEƒBƒ“ƒhƒE‚ð�ì�¬ @gold_window = Window_Gold.new @gold_window.x = 480 @gold_window.y = 64 # ƒ_ƒ~�[ƒEƒBƒ“ƒhƒE‚ð�ì�¬ @dummy_window = Window_Base.new(0, 128, 640, 352) # �w“üƒEƒBƒ“ƒhƒE‚ð�ì�¬ @buy_window = Window_ShopBuy.new($game_temp.shop_goods) @buy_window.active = false @buy_window.visible = false @buy_window.help_window = @help_window # ”„‹pƒEƒBƒ“ƒhƒE‚ð�ì�¬ @sell_window = Window_ShopSell.new @sell_window.active = false @sell_window.visible = false @sell_window.help_window = @help_window # ŒÂ�”“ü—̓EƒBƒ“ƒhƒE‚ð�ì�¬ @number_window = Window_ShopNumber.new @number_window.active = false @number_window.visible = false # ƒXƒe�[ƒ^ƒXƒEƒBƒ“ƒhƒE‚ð�ì�¬ @status_window = Window_ShopStatus.new @status_window.visible = false # ƒgƒ‰ƒ“ƒWƒVƒ‡ƒ“ŽÀ�s Graphics.transition # ƒ�ƒCƒ“ƒ‹�[ƒv loop do # ƒQ�[ƒ€‰æ–Ê‚ð�X�V Graphics.update # “ü—Í�î•ñ‚ð�X�V Input.update # ƒtƒŒ�[ƒ€�X�V update # ‰æ–Ê‚ª�Ø‚è‘Ö‚í‚Á‚½‚烋�[ƒv‚ð’†’f if $scene != self break end end # ƒgƒ‰ƒ“ƒWƒVƒ‡ƒ“�€”õ Graphics.freeze # ƒEƒBƒ“ƒhƒE‚ð‰ð•ú @help_window.dispose @command_window.dispose @gold_window.dispose @dummy_window.dispose @buy_window.dispose @sell_window.dispose @number_window.dispose @status_window.dispose end #------------------------------------------ # �œ ƒtƒŒ�[ƒ€�X�V #------------------------------------------ def update # ƒEƒBƒ“ƒhƒE‚ð�X�V @help_window.update @command_window.update @gold_window.update @dummy_window.update @buy_window.update @sell_window.update @number_window.update @status_window.update # ƒRƒ}ƒ“ƒhƒEƒBƒ“ƒhƒE‚ªƒAƒNƒeƒBƒu‚Ì�ê�‡: update_command ‚ðŒÄ‚Ô if @command_window.active update_command return end # �w“üƒEƒBƒ“ƒhƒE‚ªƒAƒNƒeƒBƒu‚Ì�ê�‡: update_buy ‚ðŒÄ‚Ô if @buy_window.active update_buy return end # ”„‹pƒEƒBƒ“ƒhƒE‚ªƒAƒNƒeƒBƒu‚Ì�ê�‡: update_sell ‚ðŒÄ‚Ô if @sell_window.active update_sell return end # ŒÂ�”“ü—̓EƒBƒ“ƒhƒE‚ªƒAƒNƒeƒBƒu‚Ì�ê�‡: update_number ‚ðŒÄ‚Ô if @number_window.active update_number return end end #------------------------------------------ # �œ ƒtƒŒ�[ƒ€�X�V (ƒRƒ}ƒ“ƒhƒEƒBƒ“ƒhƒE‚ªƒAƒNƒeƒBƒu‚Ì�ê�‡) #------------------------------------------ def update_command # B ƒ{ƒ^ƒ“‚ª‰Ÿ‚³‚ꂽ�ê�‡ if Input.trigger?(Input::B) # ƒLƒƒƒ“ƒZƒ‹ SE ‚ð‰‰‘t $game_system.se_play($data_system.cancel_se) # ƒ}ƒbƒv‰æ–Ê‚É�Ø‚è‘Ö‚¦ $scene = Scene_Map.new return end # C ƒ{ƒ^ƒ“‚ª‰Ÿ‚³‚ꂽ�ê�‡ if Input.trigger?(Input::C) # ƒRƒ}ƒ“ƒhƒEƒBƒ“ƒhƒE‚̃J�[ƒƒ‹ˆÊ’u‚Å•ªŠò case @command_window.index when 0 # �w“ü‚·‚é # Œˆ’è SE ‚ð‰‰‘t $game_system.se_play($data_system.decision_se) # ƒEƒBƒ“ƒhƒE‚Ì�ó‘Ô‚ð�w“üƒ‚�[ƒh‚Ö @command_window.active = false @dummy_window.visible = false @buy_window.active = true @buy_window.visible = true @buy_window.refresh @status_window.visible = true when 1 # ”„‹p‚·‚é # Œˆ’è SE ‚ð‰‰‘t $game_system.se_play($data_system.decision_se) # ƒEƒBƒ“ƒhƒE‚Ì�ó‘Ԃ𔄋pƒ‚�[ƒh‚Ö @command_window.active = false @dummy_window.visible = false @sell_window.active = true @sell_window.visible = true @sell_window.refresh when 2 # ‚â‚ß‚é # Œˆ’è SE ‚ð‰‰‘t $game_system.se_play($data_system.decision_se) # ƒ}ƒbƒv‰æ–Ê‚É�Ø‚è‘Ö‚¦ $scene = Scene_Map.new end return end end #------------------------------------------ # �œ ƒtƒŒ�[ƒ€�X�V (�w“üƒEƒBƒ“ƒhƒE‚ªƒAƒNƒeƒBƒu‚Ì�ê�‡) #------------------------------------------ def update_buy # ƒXƒe�[ƒ^ƒXƒEƒBƒ“ƒhƒE‚̃AƒCƒeƒ€‚ð�Ý’è @status_window.item = @buy_window.item # B ƒ{ƒ^ƒ“‚ª‰Ÿ‚³‚ꂽ�ê�‡ if Input.trigger?(Input::B) # ƒLƒƒƒ“ƒZƒ‹ SE ‚ð‰‰‘t $game_system.se_play($data_system.cancel_se) # ƒEƒBƒ“ƒhƒE‚Ì�ó‘Ô‚ð�‰Šúƒ‚�[ƒh‚Ö @command_window.active = true @dummy_window.visible = true @buy_window.active = false @buy_window.visible = false @status_window.visible = false @status_window.item = nil # ƒwƒ‹ƒvƒeƒLƒXƒg‚ð�Á‹Ž @help_window.set_text("") return end # C ƒ{ƒ^ƒ“‚ª‰Ÿ‚³‚ꂽ�ê�‡ if Input.trigger?(Input::C) # ƒAƒCƒeƒ€‚ðŽæ“¾ @item = @buy_window.item # ƒAƒCƒeƒ€‚ª–³Œø‚Ì�ê�‡�A‚Ü‚½‚͉¿Ši‚ª�ŠŽ�‹à‚æ‚è�ã‚Ì�ê�‡ if @item == nil or @item.price > $game_party.gold # ƒuƒU�[ SE ‚ð‰‰‘t $game_system.se_play($data_system.buzzer_se) return end # ƒAƒCƒeƒ€‚Ì�ŠŽ��”‚ðŽæ“¾ case @item when RPG::Item number = $game_party.item_number(@item.id) when RPG::Weapon number = $game_party.weapon_number(@item.id) when RPG::Armor number = $game_party.armor_number(@item.id) end # ‚·‚Å‚É 99 ŒÂ�ŠŽ�‚µ‚Ä‚¢‚é�ê�‡ if number == 99 # ƒuƒU�[ SE ‚ð‰‰‘t $game_system.se_play($data_system.buzzer_se) return end # Œˆ’è SE ‚ð‰‰‘t $game_system.se_play($data_system.decision_se) # �Å‘å�w“ü‰Â”ŒÂ�”‚ðŒvŽZ max = @item.price == 0 ? 99 : $game_party.gold / @item.price max = [max, 99 - number].min # ƒEƒBƒ“ƒhƒE‚Ì�ó‘Ô‚ðŒÂ�”“ü—̓‚�[ƒh‚Ö @buy_window.active = false @buy_window.visible = false @number_window.set(@item, max, @item.price) @number_window.active = true @number_window.visible = true end end #------------------------------------------ # �œ ƒtƒŒ�[ƒ€�X�V (”„‹pƒEƒBƒ“ƒhƒE‚ªƒAƒNƒeƒBƒu‚Ì�ê�‡) #------------------------------------------ def update_sell # B ƒ{ƒ^ƒ“‚ª‰Ÿ‚³‚ꂽ�ê�‡ if Input.trigger?(Input::B) # ƒLƒƒƒ“ƒZƒ‹ SE ‚ð‰‰‘t $game_system.se_play($data_system.cancel_se) # ƒEƒBƒ“ƒhƒE‚Ì�ó‘Ô‚ð�‰Šúƒ‚�[ƒh‚Ö @command_window.active = true @dummy_window.visible = true @sell_window.active = false @sell_window.visible = false @status_window.item = nil # ƒwƒ‹ƒvƒeƒLƒXƒg‚ð�Á‹Ž @help_window.set_text("") return end # C ƒ{ƒ^ƒ“‚ª‰Ÿ‚³‚ꂽ�ê�‡ if Input.trigger?(Input::C) # ƒAƒCƒeƒ€‚ðŽæ“¾ @item = @sell_window.item # ƒXƒe�[ƒ^ƒXƒEƒBƒ“ƒhƒE‚̃AƒCƒeƒ€‚ð�Ý’è @status_window.item = @item # ƒAƒCƒeƒ€‚ª–³Œø‚Ì�ê�‡�A‚Ü‚½‚͉¿Ši‚ª 0 (”„‹p•s‰Â) ‚Ì�ê�‡ if @item == nil or @item.price == 0 # ƒuƒU�[ SE ‚ð‰‰‘t $game_system.se_play($data_system.buzzer_se) return end # Œˆ’è SE ‚ð‰‰‘t $game_system.se_play($data_system.decision_se) # ƒAƒCƒeƒ€‚Ì�ŠŽ��”‚ðŽæ“¾ case @item when RPG::Item number = $game_party.item_number(@item.id) when RPG::Weapon number = $game_party.weapon_number(@item.id) when RPG::Armor number = $game_party.armor_number(@item.id) end # �ő唄‹pŒÂ�” = ƒAƒCƒeƒ€‚Ì�ŠŽ��” max = number # ƒEƒBƒ“ƒhƒE‚Ì�ó‘Ô‚ðŒÂ�”“ü—̓‚�[ƒh‚Ö @sell_window.active = false @sell_window.visible = false @number_window.set(@item, max, @item.price / 2) @number_window.active = true @number_window.visible = true @status_window.visible = true end end #------------------------------------------ # �œ ƒtƒŒ�[ƒ€�X�V (ŒÂ�”“ü—̓EƒBƒ“ƒhƒE‚ªƒAƒNƒeƒBƒu‚Ì�ê�‡) #------------------------------------------ def update_number # B ƒ{ƒ^ƒ“‚ª‰Ÿ‚³‚ꂽ�ê�‡ if Input.trigger?(Input::B) # ƒLƒƒƒ“ƒZƒ‹ SE ‚ð‰‰‘t $game_system.se_play($data_system.cancel_se) # ŒÂ�”“ü—̓EƒBƒ“ƒhƒE‚ð”ñƒAƒNƒeƒBƒu�E•s‰ÂŽ‹‚É�Ý’è @number_window.active = false @number_window.visible = false # ƒRƒ}ƒ“ƒhƒEƒBƒ“ƒhƒE‚̃J�[ƒƒ‹ˆÊ’u‚Å•ªŠò case @command_window.index when 0 # �w“ü‚·‚é # ƒEƒBƒ“ƒhƒE‚Ì�ó‘Ô‚ð�w“üƒ‚�[ƒh‚Ö @buy_window.active = true @buy_window.visible = true when 1 # ”„‹p‚·‚é # ƒEƒBƒ“ƒhƒE‚Ì�ó‘Ԃ𔄋pƒ‚�[ƒh‚Ö @sell_window.active = true @sell_window.visible = true @status_window.visible = false end return end # C ƒ{ƒ^ƒ“‚ª‰Ÿ‚³‚ꂽ�ê�‡ if Input.trigger?(Input::C) # ƒVƒ‡ƒbƒv SE ‚ð‰‰‘t $game_system.se_play($data_system.shop_se) # ŒÂ�”“ü—̓EƒBƒ“ƒhƒE‚ð”ñƒAƒNƒeƒBƒu�E•s‰ÂŽ‹‚É�Ý’è @number_window.active = false @number_window.visible = false # ƒRƒ}ƒ“ƒhƒEƒBƒ“ƒhƒE‚̃J�[ƒƒ‹ˆÊ’u‚Å•ªŠò case @command_window.index when 0 # �w“ü‚·‚é # �w“ü�ˆ—� $game_party.lose_gold(@number_window.number * @item.price) case @item when RPG::Item $game_party.gain_item(@item.id, @number_window.number) when RPG::Weapon $game_party.gain_weapon(@item.id, @number_window.number) when RPG::Armor $game_party.gain_armor(@item.id, @number_window.number) end # ŠeƒEƒBƒ“ƒhƒE‚ðƒŠƒtƒŒƒbƒVƒ… @gold_window.refresh @buy_window.refresh @status_window.refresh # ƒEƒBƒ“ƒhƒE‚Ì�ó‘Ô‚ð�w“üƒ‚�[ƒh‚Ö @buy_window.active = true @buy_window.visible = true when 1 # ”„‹p‚·‚é # ”„‹p�ˆ—� $game_party.gain_gold(@number_window.number * (@item.price / 2)) case @item when RPG::Item $game_party.lose_item(@item.id, @number_window.number) when RPG::Weapon $game_party.lose_weapon(@item.id, @number_window.number) when RPG::Armor $game_party.lose_armor(@item.id, @number_window.number) end # ŠeƒEƒBƒ“ƒhƒE‚ðƒŠƒtƒŒƒbƒVƒ… @gold_window.refresh @sell_window.refresh @status_window.refresh # ƒEƒBƒ“ƒhƒE‚Ì�ó‘Ԃ𔄋pƒ‚�[ƒh‚Ö @sell_window.active = true @sell_window.visible = true @status_window.visible = false end return end end end
	Design By RaZ © Watery Build 2005