Variation du prix des marchandises ( Achat / Vente )

Nom : Variation du prix des marchandises ( Achat / Vente )
Auteur : ASHKA
Script : 1
Info :Ce script est la version simplifié et pour VX d'un systeme que j'ai developpé pour mon projet solo.
Il permet de modifier le prix des objets, armes, armures pour chaque magasin, à l'achat comme à la vente et independament les uns des autres.
Il existe en deux versions :

1) La permiere utilise un systeme d'indice qui influe sur le prix
( Multiplié par 1 / 1.2 / 2.3 / 0.5 / 0.9 / 0.2 ... )
L'indice d'achat par defaut est 1.
L'indice de vente par defaut est 0.5.

Spoiler:

Code:: # Variation du prix des marchandises ( Achat / Vente ) # par indice # Ce script permet d'avoir pour chaque objet, arme et armure un indice # modifiant le prix d'achat ou de vente. # Il suffit d'inserer un script avant d'appeler votre magasin. # Voici les commandes à utiliser : # $indice_achat_objet[X] = Y # Donne à l'objet d'ID X l'indice Y pour l'achat # $indice_achat_arme[X] = Y # Donne à l'arme d'ID X l'indice Y pour l'achat # $indice_achat_armure[X] = Y # Donne à l'armure d'ID X l'indice Y pour l'achat # $indice_vente_objet[X] = Y # Donne à l'objet d'ID X l'indice Y pour la vente # $indice_vente_arme[X] = Y # Donne à l'arme d'ID X l'indice Y pour la vente # $indice_vente_armure[X] = Y # Donne à l'armure d'ID X l'indice Y pour la vente # Ci dessous, vous pouvez regler le retour automatique à l'indice par # defaut entre chaque magasin ( soit 1 pour l'achat et 0.5 pour la vente) # true = réinitialisation automatique à l'indice par defaut. # false = conserve l'indice d'un magasin à l'autre si rien n'est defini. # -------------------------------------------------- #=============================================================== # # rpgmakervx.1fr1.net # #=============================================================== class Scene_Shop < Scene_Base #### RETOUR_AUTO_DEFAUT = true # Retour automatique à l'indice par defaut entre chaque magasin #### def update_buy_selection @status_window.item = @buy_window.item if Input.trigger?(Input::B) Sound.play_cancel @command_window.active = true @dummy_window.visible = true @buy_window.active = false @buy_window.visible = false @status_window.visible = false @status_window.item = nil @help_window.set_text("") return end if Input.trigger?(Input::C) @item = @buy_window.item number = $game_party.item_number(@item) if @item.is_a?(RPG::Item) prix = (@item.price * $indice_achat_objet[@item.id]).to_i elsif @item.is_a?(RPG::Weapon) prix = (@item.price * $indice_achat_arme[@item.id]).to_i elsif @item.is_a?(RPG::Armor) prix = (@item.price * $indice_achat_armure[@item.id]).to_i end if @item == nil or prix > $game_party.gold or number == 99 Sound.play_buzzer else Sound.play_decision max = @item.price == 0 ? 99 : $game_party.gold / prix max = [max, 99 - number].min @buy_window.active = false @buy_window.visible = false @number_window.set(@item, max, prix) @number_window.active = true @number_window.visible = true end end end def update_sell_selection if Input.trigger?(Input::B) Sound.play_cancel @command_window.active = true @dummy_window.visible = true @sell_window.active = false @sell_window.visible = false @status_window.item = nil @help_window.set_text("") elsif Input.trigger?(Input::C) @item = @sell_window.item @status_window.item = @item if @item.is_a?(RPG::Item) prix = (@item.price * $indice_vente_objet[@item.id]).to_i elsif @item.is_a?(RPG::Weapon) prix = (@item.price * $indice_vente_arme[@item.id]).to_i elsif @item.is_a?(RPG::Armor) prix = (@item.price * $indice_vente_armure[@item.id]).to_i end if @item == nil or prix == 0 Sound.play_buzzer else Sound.play_decision max = $game_party.item_number(@item) @sell_window.active = false @sell_window.visible = false @number_window.set(@item, max, prix) @number_window.active = true @number_window.visible = true @status_window.visible = true end end end def decide_number_input Sound.play_shop @number_window.active = false @number_window.visible = false case @command_window.index when 0 # Buy if @item.is_a?(RPG::Item) prix = (@item.price * $indice_achat_objet[@item.id]).to_i elsif @item.is_a?(RPG::Weapon) prix = (@item.price * $indice_achat_arme[@item.id]).to_i elsif @item.is_a?(RPG::Armor) prix = (@item.price * $indice_achat_armure[@item.id]).to_i end $game_party.lose_gold(@number_window.number * prix) $game_party.gain_item(@item, @number_window.number) @gold_window.refresh @buy_window.refresh @status_window.refresh @buy_window.active = true @buy_window.visible = true when 1 # sell if @item.is_a?(RPG::Item) prix = (@item.price * $indice_vente_objet[@item.id]).to_i elsif @item.is_a?(RPG::Weapon) prix = (@item.price * $indice_vente_arme[@item.id]).to_i elsif @item.is_a?(RPG::Armor) prix = (@item.price * $indice_vente_armure[@item.id]).to_i end $game_party.gain_gold(@number_window.number * prix) $game_party.lose_item(@item, @number_window.number) @gold_window.refresh @sell_window.refresh @status_window.refresh @sell_window.active = true @sell_window.visible = true @status_window.visible = false end end def update_command_selection if Input.trigger?(Input::B) Sound.play_cancel if RETOUR_AUTO_DEFAUT == true réinitialisation end $scene = Scene_Map.new elsif Input.trigger?(Input::C) case @command_window.index when 0 # buy Sound.play_decision @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 # sell if $game_temp.shop_purchase_only Sound.play_buzzer else Sound.play_decision @command_window.active = false @dummy_window.visible = false @sell_window.active = true @sell_window.visible = true @sell_window.refresh end when 2 # Quit Sound.play_decision if RETOUR_AUTO_DEFAUT == true réinitialisation end $scene = Scene_Map.new end end end def réinitialisation for i in 1...$data_items.size item = $data_items[i] $indice_achat_objet[item.id] = 1 $indice_vente_objet[item.id] = 0.5 end for i in 1...$data_weapons.size item = $data_weapons[i] $indice_achat_arme[item.id] = 1 $indice_vente_arme[item.id] = 0.5 end for i in 1...$data_armors.size item = $data_armors[i] $indice_achat_armure[item.id] = 1 $indice_vente_armure[item.id] = 0.5 end end end # class # --------------------------------------------------- class Scene_Title < Scene_Base def start super $indice_achat_objet = Hash.new(1) $indice_vente_objet = Hash.new(0.5) $indice_achat_arme = Hash.new(1) $indice_vente_arme = Hash.new(0.5) $indice_achat_armure = Hash.new(1) $indice_vente_armure = Hash.new(0.5) load_database # Load database create_game_objects # Create game objects check_continue # Determine if continue is enabled create_title_graphic # Create title graphic create_command_window # Create command window play_title_music # Play title screen music end end # ------------------------------------------------- class Window_ShopBuy < Window_Selectable def draw_item(index) item = @data[index] number = $game_party.item_number(item) if item.is_a?(RPG::Item) prix = (item.price * $indice_achat_objet[item.id]).to_i elsif item.is_a?(RPG::Weapon) prix = (item.price * $indice_achat_arme[item.id]).to_i elsif item.is_a?(RPG::Armor) prix = (item.price * $indice_achat_armure[item.id]).to_i end enabled = (prix <= $game_party.gold and number < 99) rect = item_rect(index) self.contents.clear_rect(rect) draw_item_name(item, rect.x, rect.y, enabled) rect.width -= 4 self.contents.draw_text(rect, prix.to_s, 2) end end # ---------------------------------------------------------

2) La deuxieme permet de directement choisir son prix.
Le prix d'achat par defaut est celui de la base de donnée.
Le prix de vente par defaut est celui de la base de donnée divisé par 2.

Spoiler:

Code:: # Variation du prix des marchandises ( Achat / Vente ) # par modification du prix # Ce script permet d'avoir pour chaque objet, arme et armure un prix # different dans chaque magasin que ce soit pour l'achat ou la vente. # Il suffit d'inserer un script avant d'appeler votre magasin. # Voici les commandes à utiliser : # $prix_achat_objet[X] = Y # Donne à l'objet d'ID X le prix Y pour l'achat # $prix_achat_arme[X] = Y # Donne à l'arme d'ID X le prix Y pour l'achat # $prix_achat_armure[X] = Y # Donne à l'armure d'ID X le prix Y pour l'achat # $prix_vente_objet[X] = Y # Donne à l'objet d'ID X le prix Y pour la vente # $prix_vente_arme[X] = Y # Donne à l'arme d'ID X le prix Y pour la vente # $prix_vente_armure[X] = Y # Donne à l'armure d'ID X le prix Y pour la vente # Entre chaque magasin, le prix est réinitialisé. # Le prix normal de la base de donnée pour l'achat. # Le prix de la base de donnée divisé par 2 pour la vente. # -------------------------------------------------- class Scene_Shop < Scene_Base def update_buy_selection @status_window.item = @buy_window.item if Input.trigger?(Input::B) Sound.play_cancel @command_window.active = true @dummy_window.visible = true @buy_window.active = false @buy_window.visible = false @status_window.visible = false @status_window.item = nil @help_window.set_text("") return end if Input.trigger?(Input::C) @item = @buy_window.item number = $game_party.item_number(@item) if @item.is_a?(RPG::Item) if $prix_achat_objet[@item.id] != @item.price prix = $prix_achat_objet[@item.id].to_i else prix = @item.price end elsif @item.is_a?(RPG::Weapon) if $prix_achat_arme[@item.id] != @item.price prix = $prix_achat_arme[@item.id].to_i else prix = @item.price end elsif @item.is_a?(RPG::Armor) if $prix_achat_armure[@item.id] != @item.price prix = $prix_achat_armure[@item.id].to_i else prix = @item.price end end if @item == nil or prix > $game_party.gold or number == 99 Sound.play_buzzer else Sound.play_decision max = @item.price == 0 ? 99 : $game_party.gold / prix max = [max, 99 - number].min @buy_window.active = false @buy_window.visible = false @number_window.set(@item, max, prix) @number_window.active = true @number_window.visible = true end end end def update_sell_selection if Input.trigger?(Input::B) Sound.play_cancel @command_window.active = true @dummy_window.visible = true @sell_window.active = false @sell_window.visible = false @status_window.item = nil @help_window.set_text("") elsif Input.trigger?(Input::C) @item = @sell_window.item @status_window.item = @item if @item.is_a?(RPG::Item) if $prix_vente_objet[@item.id] != (@item.price / 2) prix = $prix_vente_objet[@item.id].to_i else prix = @item.price / 2 end elsif @item.is_a?(RPG::Weapon) if $prix_vente_arme[@item.id] != (@item.price / 2) prix = $prix_vente_arme[@item.id].to_i else prix = @item.price / 2 end elsif @item.is_a?(RPG::Armor) if $prix_vente_armure[@item.id] != (@item.price / 2) prix = $prix_vente_armure[@item.id].to_i else prix = @item.price / 2 end end if @item == nil or prix == 0 Sound.play_buzzer else Sound.play_decision max = $game_party.item_number(@item) @sell_window.active = false @sell_window.visible = false @number_window.set(@item, max, prix) @number_window.active = true @number_window.visible = true @status_window.visible = true end end end def decide_number_input Sound.play_shop @number_window.active = false @number_window.visible = false case @command_window.index when 0 # Buy if @item.is_a?(RPG::Item) if $prix_achat_objet[@item.id] != @item.price prix = $prix_achat_objet[@item.id].to_i else prix = @item.price end elsif @item.is_a?(RPG::Weapon) if $prix_achat_arme[@item.id] != @item.price prix = $prix_achat_arme[@item.id].to_i else prix = @item.price end elsif @item.is_a?(RPG::Armor) if $prix_achat_armure[@item.id] != @item.price prix = $prix_achat_armure[@item.id].to_i else prix = @item.price end end $game_party.lose_gold(@number_window.number * prix) $game_party.gain_item(@item, @number_window.number) @gold_window.refresh @buy_window.refresh @status_window.refresh @buy_window.active = true @buy_window.visible = true when 1 # sell if @item.is_a?(RPG::Item) if $prix_vente_objet[@item.id] != (@item.price / 2) prix = $prix_vente_objet[@item.id].to_i else prix = @item.price / 2 end elsif @item.is_a?(RPG::Weapon) if $prix_vente_arme[@item.id] != (@item.price / 2) prix = $prix_vente_arme[@item.id].to_i else prix = @item.price / 2 end elsif @item.is_a?(RPG::Armor) if $prix_vente_armure[@item.id] != (@item.price / 2) prix = $prix_vente_armure[@item.id].to_i else prix = @item.price / 2 end end $game_party.gain_gold(@number_window.number * prix) $game_party.lose_item(@item, @number_window.number) @gold_window.refresh @sell_window.refresh @status_window.refresh @sell_window.active = true @sell_window.visible = true @status_window.visible = false end end def update_command_selection if Input.trigger?(Input::B) Sound.play_cancel $scene = Scene_Map.new elsif Input.trigger?(Input::C) case @command_window.index when 0 # buy Sound.play_decision @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 # sell if $game_temp.shop_purchase_only Sound.play_buzzer else Sound.play_decision @command_window.active = false @dummy_window.visible = false @sell_window.active = true @sell_window.visible = true @sell_window.refresh end when 2 # Quit Sound.play_decision $scene = Scene_Map.new end end end def réinitialisation for i in 1...$data_items.size item = $data_items[i] $prix_achat_objet[item.id] = item.price $prix_vente_objet[item.id] = item.price / 2 end for i in 1...$data_weapons.size item = $data_weapons[i] $prix_achat_arme[item.id] = item.price $prix_vente_arme[item.id] = item.price / 2 end for i in 1...$data_armors.size item = $data_armors[i] $prix_achat_armure[item.id] = item.price $prix_vente_armure[item.id] = item.price / 2 end end end # class # --------------------------------------------------- class Scene_Title < Scene_Base def start super $prix_achat_objet = Hash.new(1) $prix_vente_objet = Hash.new(1) $prix_achat_arme = Hash.new(1) $prix_vente_arme = Hash.new(1) $prix_achat_armure = Hash.new(1) $prix_vente_armure = Hash.new(1) load_database # Load database create_game_objects # Create game objects check_continue # Determine if continue is enabled create_title_graphic # Create title graphic create_command_window # Create command window play_title_music # Play title screen music end end # ------------------------------------------------- class Window_ShopBuy < Window_Selectable def draw_item(index) item = @data[index] number = $game_party.item_number(item) if item.is_a?(RPG::Item) if $prix_achat_objet[item.id] != item.price prix = $prix_achat_objet[item.id].to_i else prix = item.price end elsif item.is_a?(RPG::Weapon) if $prix_achat_arme[item.id] != item.price prix = $prix_achat_arme[item.id].to_i else prix = item.price end elsif item.is_a?(RPG::Armor) if $prix_achat_armure[item.id] != item.price prix = $prix_achat_armure[item.id].to_i else prix = item.price end end enabled = (prix <= $game_party.gold and number < 99) rect = item_rect(index) self.contents.clear_rect(rect) draw_item_name(item, rect.x, rect.y, enabled) rect.width -= 4 self.contents.draw_text(rect, prix.to_s, 2) end end # --------------------------------------------------------- class Scene_Map < Scene_Base def start super Scene_Shop.new.réinitialisation $game_map.refresh @spriteset = Spriteset_Map.new @message_window = Window_Message.new end end # -----------------------------------------------------------