Pokémon Script Project Forum Index

Manuel | Search
 Information des admins 
Si vous désirez parler de PSP ou obtenir du soutient là dessus, merci d'aller faire un tour sur https://pokemonworkshop.com/forum/index.php Imbécile heureux

Menu Pokémon Personalisé
Goto page: <  1, 2, 3, 4, 5, 6  >
 
Post new topic   Reply to topic    Pokémon Script Project Forum Index -> Game Making -> Ressources techniques -> Scripts
Previous topic :: Next topic   
Author Message
Antoine'
Guest





PostPosted: Thu 16 Jul - 14:34 (2009)    Post subject: Menu Pokémon Personalisé

1.  #==============================================================================  
   2. # ■ Pokemon_Menu  
   3. # Pokemon Script Project - Krosk   
   4. # 18/07/07  
   5. # Modifier par Slash le 15/07/09  
   6. #-----------------------------------------------------------------------------  
   7. # Scène modifiable  
   8. #-----------------------------------------------------------------------------  
   9. # Menu principal accessible par échap  
  10. #-----------------------------------------------------------------------------  
  11.   
  12. module POKEMON_S  
  13.   class Pokemon_Menu  
  14.     #--------------------------------------------------------------------------  
  15.     #  
  16.     #--------------------------------------------------------------------------  
  17.     def initialize(menu_index = 0)  
  18.       @menu_index = menu_index  
  19.     end  
  20.     #--------------------------------------------------------------------------  
  21.     #   
  22.     #--------------------------------------------------------------------------  
  23.       def main  
  25.       Graphics.freeze  
  26.      @z_level = 10000  
  27.      @background = Sprite.new  
  28.      @background.bitmap = RPG::Cache.picture("Menu.PNG")  
  29.      @background.x = 0  
  30.      @background.y = 0  
  31.      @background.z = @z_level  
  32.      @location = Window_Location.new  
  33.      @location.x = 0  
  34.      @location.y = 394  
  35.      @location.z = @z_level + 2  
  36.      @location.opacity = 0  
  37.      @argent = Window_Argent.new  
  38.      @argent.x = 480  
  39.      @argent.y = 424  
  40.      @argent.z = @z_level + 2  
  41.      @argent.opacity = 0  
  42.      @pokemon = Window_Pokemon.new  
  43.      @pokemon.x = -2  
  44.      @pokemon.y = 0  
  45.      @pokemon.z = @z_level + 2  
  46.      @pokemon.opacity = 0  
  47.       @spriteset = Spriteset_Map.new  
  48.       s1 = "      POKéDEX"  
  49.       s2 = "      POKéMON"  
  50.       s3 = "      SAC"  
  51.       s4 = "      " + Player.name  
  52.       s5 = "      SAUVER"  
  53.       s6 = "      QUITTER"  
  54.       @command_window = Window_Command.new(180, [s1, s2, s3, s4, s5, s6])  
  55.       @command_window.index = @menu_index  
  56.       @command_window.x = 467 - 3  
  57.       @command_window.y = 105  
  58.       @command_window.z = @z_level + 2  
  59.       @command_window.opacity = 0  
  60.         
  61.       if $pokemon_party.size == 0  
  62.         # Enlève accès Equipe  
  63.         @command_window.disable_item(1)  
  64.       end  
  65.       if not($data_pokedex[0])  
  66.         # Enlève accès Pokédex si non possédé  
  67.         @command_window.disable_item(0)  
  68.       end  
  69.       if $game_system.save_disabled  
  70.         @command_window.disable_item(4)  
  71.       end  
  72.   
  73.       Graphics.transition  
  74.       loop do  
  75.         Graphics.update  
  76.         Input.update  
  77.         update  
  78.         if $scene != self  
  79.           break  
  80.         end  
  81.       end  
  82.       Graphics.freeze  
  83.       @pokemon.dispose  
  84.       @location.dispose  
  85.       @argent.dispose  
  86.       @command_window.dispose  
  87.       @background.dispose  
  88.       @spriteset.dispose  
  89.     end  
  90.     #--------------------------------------------------------------------------  
  91.     #   
  92.     #--------------------------------------------------------------------------  
  93.     def update  
  94.       # ウィンドウを更新  
  95.       @command_window.update  
  96.       @spriteset.update  
  97.       # コマンドウィンドウがアクティブの場合: update_command を呼ぶ  
  98.       if @command_window.active  
  99.         update_command  
 100.         return  
 101.       end  
 102.     end  
 103.     #--------------------------------------------------------------------------  
 104.     # ● フレーム更新 (コマンドウィンドウがアクティブの場合)  
 105.     #--------------------------------------------------------------------------  
 106.     def update_command  
 107.       # B ボタンが押された場合  
 108.       if Input.trigger?(Input::B)  
 109.         # キャンセル SE を演奏  
 110.         $game_system.se_play($data_system.cancel_se)  
 111.         # マップ画面に切り替え  
 112.         $scene = Scene_Map.new  
 113.         return  
 114.       end  
 115.       # C ボタンが押された場合  
 116.       if Input.trigger?(Input::C)  
 117.         # パーティ人数が 0 人で、セーブ、ゲーム終了以外のコマンドの場合  
 118.         if $game_party.actors.size == 0 and @command_window.index < 4  
 119.           # ブザー SE を演奏  
 120.           $game_system.se_play($data_system.buzzer_se)  
 121.           return  
 122.         end  
 123.         # コマンドウィンドウのカーソル位置で分岐  
 124.         case @command_window.index  
 125.         when 0 # Pokédex  
 126.           if not($data_pokedex[0])  
 127.             $game_system.se_play($data_system.buzzer_se)  
 128.             return  
 129.           end  
 130.           $game_system.se_play($data_system.decision_se)  
 131.           $scene = POKEMON_S::Pokemon_Pokedex.new  
 132.         when 1 # Menu  
 133.           if $pokemon_party.size == 0  
 134.             $game_system.se_play($data_system.buzzer_se)  
 135.             return  
 136.           end  
 137.           $game_system.se_play($data_system.decision_se)  
 138.           $scene = POKEMON_S::Pokemon_Party_Menu.new  
 139.         when 2 # Sac  
 140.           $game_system.se_play($data_system.decision_se)  
 141.           $scene = Pokemon_Item_Bag.new  
 142.         when 3 # Carte dresseur  
 143.           $game_system.se_play($data_system.decision_se)  
 144.           $game_temp.common_event_id = 19  
 145.           $scene = Scene_Map.new  
 146.         when 4 # Sauvegarde  
 147.           if $game_system.save_disabled  
 148.             $game_system.se_play($data_system.buzzer_se)  
 149.             return  
 150.           end  
 151.           $game_system.se_play($data_system.decision_se)  
 152.           $scene = POKEMON_S::Pokemon_Save.new  
 153.         when 5 # Quitter le menu  
 154.           $game_system.se_play($data_system.decision_se)  
 155.           $scene = Scene_Map.new  
 156.         end  
 157.         return  
 158.       end  
 159.     end  
 160.   end  
 161. end  
 162.   
 163. #===================================================  
 164. #Window_Location  
 165. #===================================================  
 166.   
 167. class Window_Location < Window_Base  
 168. #--------------------------------------------------------------------------  
 169. def initialize  
 170. super(0, 0, 160, 96)  
 171. self.contents = Bitmap.new(width - 32, height - 32)  
 172. self.contents.font.name = $fontface  
 173. self.contents.font.size = $fontsize  
 174. refresh  
 175. end  
 176. #--------------------------------------------------------------------------  
 177. def refresh  
 178. self.contents.clear  
 179. self.contents.font.color = normal_color  
 180. self.contents.draw_text(4, 32, 120, 32,$data_mapzone[$game_map.map_id][1], 2)  
 181. end  
 182. end  
 183. #===================================================  
 184. #Window_Argent  
 185. #===================================================  
 186. class Window_Argent < Window_Base  
 187.   
 188.   #--------------------------------------------------------------------------  
 189.   def initialize  
 190.     super(0, 0, 160, 64)  
 191.     self.contents = Bitmap.new(width - 32, height - 32)  
 192.     self.contents.font.name = $fontface  
 193.     self.contents.font.size = $fontsize  
 194.     refresh  
 195.   end  
 196.   
 197.   #--------------------------------------------------------------------------  
 198.   def refresh  
 199.     self.contents.clear  
 200.     cx = contents.text_size($data_system.words.gold).width  
 201.     self.contents.font.color = normal_color  
 202.     self.contents.draw_text(4, 0, 120-cx-2, 32, $game_party.gold.to_s + "$", 2)  
 203.   end  
 204. end  
 205. #===================================================  
 206. #Window_Pokémon  
 207. #===================================================  
 208. class Window_Pokemon < Window_Base  
 209.   #--------------------------------------------------------------------------  
 210.   def initialize  
 211.     super(0, 0, 470, 480)  
 212.     self.contents = Bitmap.new(width - 0, height - 0)  
 213.     self.contents.font.name = $fontface  
 214.     self.contents.font.size = $fontsize  
 215.     refresh  
 216.   end  
 217.   
 218.   #--------------------------------------------------------------------------  
 219.   def refresh  
 220.       
 221.     if $pokemon_party.size > 0  
 222.       @order = [0,1,2,3,4,5]  
 223.       self.contents.clear  
 224.       cx = contents.text_size($data_system.words.gold).width  
 225.       self.contents.font.color = normal_color  
 226.       src_rect = Rect.new(0, 10, 64, 64)  
 227.       for i in 0..($pokemon_party.size - 1)  
 228.        @pokemon = $pokemon_party.actors[@order[i]]  
 229.        if i < 3  
 230.        self.contents.draw_text(56,64 + (i*106) , 120, 32,@pokemon.given_name )  
 231.        self.contents.draw_text(62,95 + (i*106) , 120, 32,"Nv "  + @pokemon.level.to_s )  
 232.        draw_gender(149, 99 + (i*106), @pokemon.gender)  
 233.        bitmap = RPG::Cache.battler(@pokemon.icon, 0)  
 234.        self.contents.blt(-8, 67 + (i*107), bitmap, src_rect, 255)  
 235.        else  
 236.        self.contents.draw_text(283,64 + ((i-3)*106) , 120, 32,@pokemon.given_name )  
 237.        self.contents.draw_text(289,95 + ((i-3)*106) , 120, 32,"Nv " + @pokemon.level.to_s )  
 238.        draw_gender(376, 99 + ((i-3)*106), @pokemon.gender)  
 239.        bitmap = RPG::Cache.battler(@pokemon.icon, 0)  
 240.        self.contents.blt(219, 67 + ((i-3)*107), bitmap, src_rect, 255)         
 241.        end  
 242.       end  
 243.       return  
 244.     end  
 245.       
 246.   end  
 247.     
 248.   def draw_gender(x, y, gender)  
 249.       if gender == 1  
 250.         rect = Rect.new(0, 0, 18, 33)  
 251.         bitmap = RPG::Cache.picture("Maleb.png")  
 252.         self.contents.blt(x, y, bitmap, rect, 255)  
 253.       end  
 254.       if gender == 2  
 255.         rect = Rect.new(0, 0, 18, 33)  
 256.         bitmap = RPG::Cache.picture("Femaleb.png")  
 257.         self.contents.blt(x, y, bitmap, rect, 255)          
 258.       end  
 259.   end  
 260.   
 261.     
 262. end
Back to top
Publicité






PostPosted: Thu 16 Jul - 14:34 (2009)    Post subject: Publicité

PublicitéSupprimer les publicités ?
Back to top
Sphinx
Scribe
Scribe


Joined: 07 Jan 2008
Posts: 9,736
Localisation: Quelque part, dans le monde... Ou peut être sur une autre planète...
ID Steam: FaQuinator

PostPosted: Thu 16 Jul - 14:44 (2009)    Post subject: Menu Pokémon Personalisé

Mollasse enragé alors ton bug est plus qu'insoluble... Une ligne de commentaire ne peut pas causer de bug :? Elle est ignorée lorsque le script est exécuté. Elle n'existe pas, donc elle ne peut pas bugger...
Back to top
Antoine'
Guest





PostPosted: Thu 16 Jul - 14:45 (2009)    Post subject: Menu Pokémon Personalisé

ba c'est bizzare mais sa me met bien sa C'est pas grave jremet l'ancien 
Back to top
Solfay1
Guest





PostPosted: Thu 16 Jul - 15:26 (2009)    Post subject: Menu Pokémon Personalisé

il manque pas un END ?
Back to top
Sphinx
Scribe
Scribe


Joined: 07 Jan 2008
Posts: 9,736
Localisation: Quelque part, dans le monde... Ou peut être sur une autre planète...
ID Steam: FaQuinator

PostPosted: Thu 16 Jul - 15:27 (2009)    Post subject: Menu Pokémon Personalisé

nop, l'erreur serait à la dernière ligne et serait de type SyntaxError
Back to top
Slash
Membre


Joined: 18 Jan 2008
Posts: 2,504
Localisation: MONTSURS (53)

PostPosted: Thu 16 Jul - 17:45 (2009)    Post subject: Menu Pokémon Personalisé

bizarre la ligne 22 est un commentaire donc elle ne peut pas bugger
a tu bien copier tout le script car pour la ligne 37 sa te renvoie a la class Window argent en fin de script ?
Back to top
Pαlвσlѕку
Team SDK


Joined: 17 Aug 2008
Posts: 5,983
Masculin

PostPosted: Thu 16 Jul - 18:18 (2009)    Post subject: Menu Pokémon Personalisé

Les scripts entre balises codes SVP.

Il y a deux raisons différentes qui peuvent expliquer ces bugs :

- Vous ne savez pas installer un script correctement, ce qui relève de la base de RMXP.
- Votre version de PSP est trop ancienne ou pas à jour, et cela peut provoquer divers bugs.
Back to top
Skype
Solfay1
Guest





PostPosted: Thu 16 Jul - 18:24 (2009)    Post subject: Menu Pokémon Personalisé

Oh j'ai remarquer un bug Slash :
Voici ma carte dresseur qui indique que j'ai 3000£


et le menue m'indique 0£
Back to top
Sphinx
Scribe
Scribe


Joined: 07 Jan 2008
Posts: 9,736
Localisation: Quelque part, dans le monde... Ou peut être sur une autre planète...
ID Steam: FaQuinator

PostPosted: Thu 16 Jul - 19:42 (2009)    Post subject: Menu Pokémon Personalisé

remplace $game_party.gold par $pokemon_party.money et ca règlera ton bug, solfay Clin d'œil foireux
Back to top
Peter
Guest





PostPosted: Thu 16 Jul - 20:25 (2009)    Post subject: Menu Pokémon Personalisé

HS
Sphinx wrote:
Mollasse enragé alors ton bug est plus qu'insoluble... Une ligne de commentaire ne peut pas causer de bug :? Elle est ignorée lorsque le script est exécuté. Elle n'existe pas, donc elle ne peut pas bugger...


La sphinx je te contredit car moi j'avais oublier ca # dans un script en commentaire et ca à buger par contre des que je les remis miracle tout à fonctioner
FIN DU HS
Back to top
Sphinx
Scribe
Scribe


Joined: 07 Jan 2008
Posts: 9,736
Localisation: Quelque part, dans le monde... Ou peut être sur une autre planète...
ID Steam: FaQuinator

PostPosted: Thu 16 Jul - 21:58 (2009)    Post subject: Menu Pokémon Personalisé

sur la ligne que tu nous as donné, il y a le #, donc c'était déjà un commentaire
Back to top
Jimmy
Membre


Joined: 27 Mar 2009
Posts: 1,093

PostPosted: Fri 17 Jul - 12:28 (2009)    Post subject: Menu Pokémon Personalisé

Moi sa marche mais sa me met inconnu a tout les lieu...



Je sait pas quoi faire...
Back to top
Sphinx
Scribe
Scribe


Joined: 07 Jan 2008
Posts: 9,736
Localisation: Quelque part, dans le monde... Ou peut être sur une autre planète...
ID Steam: FaQuinator

PostPosted: Fri 17 Jul - 12:43 (2009)    Post subject: Menu Pokémon Personalisé

Normal, je pense qu'il a adapté son script aux zones. (re)Lis dans le manuel ce qui concerne les zones.
Back to top
Jimmy
Membre


Joined: 27 Mar 2009
Posts: 1,093

PostPosted: Fri 17 Jul - 12:45 (2009)    Post subject: Menu Pokémon Personalisé

Ah mince le truc [1]...
Back to top
Sphinx
Scribe
Scribe


Joined: 07 Jan 2008
Posts: 9,736
Localisation: Quelque part, dans le monde... Ou peut être sur une autre planète...
ID Steam: FaQuinator

PostPosted: Fri 17 Jul - 12:48 (2009)    Post subject: Menu Pokémon Personalisé

>> entre autre, oui Imbécile heureux J'ai pas regardé en détails, mais je suppose qu'il a basé son affichage du lieu sur data_zone Imbécile heureux
Back to top
Display posts from previous:   
Post new topic   Reply to topic    Pokémon Script Project Forum Index -> Game Making -> Ressources techniques -> Scripts All times are GMT + 1 Hour
Goto page: <  1, 2, 3, 4, 5, 6  >
Page 3 of 6

 
Jump to:  

Index | Free forum | Free support forum | Free forums directory | Report a violation | Cookies | Charte | Conditions générales d'utilisation
Powered by phpBB © 2001, 2005 phpBB Group
Thème par Thomas et l'équipe de la refonte PSP 2012 (version 1.0)