Oniromancie: Scripts - Menu de recrutement de personnages


Comment ça marche?

Aëdemphia
Par Sylvanor

Fighting Robots Quest
Par Boulon

Forstale
Par Ødd Clock

Geex
Par roys

Inexistence
Par Falco

La Légende d'Ibabou
Par Zaitan

Lije
Par Gaetz

LoveMaster
Par Cuddlefox

Sarcia
Par Kaëlar

Super Mario RPG - Lost Souls
Par Omegabowser

Jeux: Polaris 03 / Jeux: LoveMaster v1.2.12 / News: Test de Creepypasta Universe 3 / Jeux: Monster World RPG / Jeux: Pif et Hercule /

Chat  (57 connectés)

Bienvenue
visiteur !






publicité RPG Maker!

Statistiques

Liste des
membres


Contact

49 connectés actuellement

9292474 visiteurs
depuis l'ouverture

1325 visiteurs
aujourd'hui

Groupe Facebook

Barre de séparation

Partenaires




TOP
GAMEMAKING


Les 5 plus
visités

Lunae, le baz'arts d'Emz0

Le studio du chat vert

Pixelandgame

Tashiroworld

HeyMakeGames

Au hasard

Hellsoft

Ultime Vengeance

La maison des Makers

Les deux derniers

Famas

Lunae, le baz'arts d'Emz0

Nos autres partenaires

Devenir
partenaire


Barre de séparation

Un site du réseau
War Paradise

Annuaires référenceurs




Menu de recrutement de personnages
Script pour RPG Maker XP
Ecrit par Mr Drerrawyn

Disclaimer: Ceci est mon tout premier script sur RPG Maker, je l'ai fait pour découvrir le moteur et RGSS, le code est très certainement moche à voir, c'est pas anormal. Il s'agit d'un menu qui permet de recruter dans l'équipe des personnages de la BDD. Il ne permet pas de retirer des personnages de l'équipe et d'en échanger, mais seulement d'en recruter.

Pour commencer des screenshots pour voir à quoi ça ressemble:
image

image

Comment l'utiliser ?
Il suffit de l'appeler via la commande d'appel de script suivante:

Portion de code : Tout sélectionner

1
$scene = Scene_Hire.new(a, b, c, d)

en remplaçant a, b, c et d par le numéro dans la base de donnée des quatre personnages que vous laisserez recruter. On peut très bien renseigner moins de quatre personnages, dans ce cas, le systême remplira les trous avec le premier personnage, sans perturber le fonctionnement du script.
Vous pouvez modifier le titre du menu en modifiant la chaine à la ligne 175:

Portion de code : Tout sélectionner

1
@Title = Window_Title.new("Sélectionnez le personnage à recruter")



Le script en lui-même, nommez-le comme vous le voulez, au-dessus de main:

Portion de code : Tout sélectionner

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
 
def every_char_in_team(id)
  for i in (0..3)
    if not $game_party.actors.include?($game_actors[id[i]])
      return false
    end
  end
  return true
end
 
# HIRE WINDOW BUY
 
class Window_Hire_Buy < Window_Base
  attr_reader   :index
  
  def initialize(cost)
    super(400, 226, 150, 96)
    @cost = cost
    @index  = 0
    self.contents = Bitmap.new(width-32, height-32)
    # Police
    self.contents.font.name = $fontface
    self.contents.font.size = $fontsize
    refresh
  end
 
  def refresh
    self.contents.clear
    self.contents.draw_text(0, 0, 75, 32, "Engager")
    self.contents.draw_text(0, 32, 75, 32, "Annuler")
    self.cursor_rect.set(-5,@index*32,127,32)
  end
 
  def cursor_up
    @index = (@index + 1)% 2
  end
 
  def cursor_down
    cursor_up
  end
end
 
# HIRE DESCRIPTION WINDOW
 
class Window_Hire_Desc < Window_Base
  def initialize(actor=nil)
    super(0, 162, 640, 318)
    self.contents = Bitmap.new(width-32, height-32)
    # Police
    self.contents.font.name = $fontface
    self.contents.font.size = $fontsize
    refresh(actor)
  end
 
  def refresh(actor)
    self.contents.clear
    if(actor != nil)
      draw_actor_class(actor, 0, 0)
      draw_actor_name(actor, 180, 0)
      draw_actor_level(actor, 0, 32)
      draw_actor_exp(actor, 180, 32)
      draw_actor_hp(actor, 0, 64, 172)
      draw_actor_sp(actor, 0, 96, 172)
      draw_actor_parameter(actor, 180, 64, 1)
      draw_actor_parameter(actor, 180, 92, 2)
      draw_actor_parameter(actor, 0, 160, 3)
      draw_actor_parameter(actor, 0, 192, 4)
      draw_actor_parameter(actor, 0, 224, 5)
      draw_actor_parameter(actor, 0, 256, 6)
      
      draw_actor_state(actor, 90, 128)
 
      draw_item_name($data_weapons[actor.weapon_id], 180, 160)
      draw_item_name($data_armors[actor.armor1_id], 180, 192)
      draw_item_name($data_armors[actor.armor2_id], 180, 224)
      draw_item_name($data_armors[actor.armor3_id], 180, 256)
      draw_item_name($data_armors[actor.armor4_id], 180, 288)
    end
  end
end
 
# HIRE WINDOW
 
class Window_Hire < Window_Base
  attr_reader :index
  attr_reader :actors
  
  def initialize(actor1, actor2, actor3, actor4)
    @separateur = 48
    @index = 0
    @actors = Array.[](actor1, actor2, actor3, actor4)
    super(112, 70, 416, 86)
    self.contents = Bitmap.new(width-32, height-32)
    # Police
    self.contents.font.name = $fontface
    self.contents.font.size = $fontsize
    refresh
  end
 
  def next_good_index
    nb_choix = 8
    loop do 
      if nb_choix == 0
        return false  # Erreur
      end
      cursor_right
      nb_choix -= 1
      break if not $game_party.actors.include?(actors[index])
    end
    return true
  end
 
  def previous_good_index
    nb_choix = 8
    loop do
      if nb_choix == 0
        return false  # Erreur
      end
      cursor_left
      nb_choix -= 1
      break if not $game_party.actors.include?(actors[index])
    end
    return true
  end
 
  def cursor_left
    @index = (@index + 3) % 4
  end
 
  def cursor_right
    @index = (@index + 1) % 4
  end
 
  def update_cursor
    self.cursor_rect.set(@index*2*@separateur,0,(@index+1)*2*@separateur-@index*2*@separateur, 52)
  end
 
  def refresh
    self.contents.clear
    update_cursor
    for i in 0..3
      if not $game_party.actors.include?(@actors[i])
        draw_actor_graphic(@actors[i], @separateur*(i*2+1), 50)
      end
    end
  end
end
 
# HIRE WINDOW TITLE
 
class Window_Title < Window_Base
  
  def initialize(msg)
    super(0,0,640,64)
    @message = msg
    self.contents = Bitmap.new(width-32, height-32)
    # Police
    self.contents.font.name = $fontface
    self.contents.font.size = $fontsize
    refresh
  end
  
  def refresh
    self.contents.clear
    self.contents.font.color = normal_color
    self.contents.draw_text(0, 0, 640, 32, @message, 1)
  end
end 
 
# HIRE SCENE
 
class Scene_Hire
  def initialize(first = 1, second = first, third = first, fourth = first)
    @Actors_id = Array.[](first, second, third, fourth)
    # --------------------- TITRE DU MENU --------------------------
    @Title = Window_Title.new("Sélectionnez le personnage à recruter")
    #---------------------------------------------------------------
    @Hire = Window_Hire.new($game_actors[@Actors_id[0]], $game_actors[@Actors_id[1]], $game_actors[@Actors_id[2]], $game_actors[@Actors_id[3]])
    if not every_char_in_team(@Actors_id)
      @Hire_desc = Window_Hire_Desc.new(@Hire.actors[@Hire.index])
    else
      @Hire_desc = Window_Hire_Desc.new
    end
    @Hire.next_good_index
    @Hire.previous_good_index
    @Hire.refresh
    update_desc
  end
 
  def main
    Graphics.transition
    loop do
      Graphics.update
      Input.update
      update
      if $scene != self
        break
      end
    end
    close
  end
 
  def close
    Graphics.freeze
    @Title.dispose
    @Hire.dispose
    @Hire_desc.dispose
  end
 
  def update_desc
    @Hire_desc.refresh(@Hire.actors[@Hire.index])
  end
 
  def update
    if @Hire_buy == nil
      @Title.update
      @Hire.update
      @Hire_desc.update
      if Input.trigger?(Input::B) # ANNULATION
        $game_system.se_play($data_system.cancel_se)
        $scene = Scene_Map.new
        return
      end
      if Input.trigger?(Input::C) # VALIDATION
        if not every_char_in_team(@Actors_id)
          $game_system.se_play($data_system.decision_se)
          @Hire_buy = Window_Hire_Buy.new(500)
        else
          $game_system.se_play($data_system.buzzer_se)
        end
        return
      end
      if Input.trigger?(Input::RIGHT)
        if not @Hire.next_good_index
          $game_system.se_play($data_system.buzzer_se)
          return
        else
          $game_system.se_play($data_system.cursor_se)
        end
        @Hire.refresh
        update_desc
        return
      end
      if Input.trigger?(Input::LEFT)
        if not @Hire.previous_good_index
          $game_system.se_play($data_system.buzzer_se)
          return
        else
          $game_system.se_play($data_system.cursor_se)
        end
        @Hire.refresh
        update_desc
        return
      end
    else
      @Hire_buy.update
      if Input.trigger?(Input::DOWN)
        $game_system.se_play($data_system.cursor_se)
        @Hire_buy.cursor_down
        @Hire_buy.refresh
        return
      end
      if Input.trigger?(Input::UP)
        $game_system.se_play($data_system.cursor_se)
        @Hire_buy.cursor_up
        @Hire_buy.refresh
        return
      end
      if Input.trigger?(Input::C)
        if @Hire_buy.index == 1
          $game_system.se_play($data_system.decision_se)
          @Hire_buy.dispose
          @Hire_buy = nil
        else
          if $game_party.actors.size < 4
            $game_system.se_play($data_system.decision_se)
            $game_party.add_actor(@Actors_id[@Hire.index])
            @Hire_buy.dispose
            @Hire_buy = nil
            if not @Hire.next_good_index
              $scene = Scene_Map.new
            end
            @Hire.refresh
            @Hire_desc.refresh(@Hire.actors[@Hire.index])
          else
            $game_system.se_play($data_system.buzzer_se)
          end
        end
        return
      end
      if Input.trigger?(Input::B)
        @Hire_buy.dispose
        @Hire_buy = nil
        return
      end
    end
  end
end
 



Je mettrai sans doute à jour le script pour le rendre moins dégueux ou résoudre des problèmes s'il y en a (ou l'étendre).
Si vous l'utilisez, il serait courtois de me créditer (7pri2)


winterskill - posté le 23/05/2017 à 12:34:11. (883 messages postés) - geniesdumal

Empereur des bons gros meuh

et est-ce qu'on peut recruter PLUS que 4 personnages?

"pommes de rainette et pommes d'API, API API Rest-e" | "A combattre sans périls, on triomphe sans gloire" - le cid ; (oui mais on gagne quand même non?...) | à soutenir absolument : https://www.kickstarter.com/projects/1264023666/bushido-the-way-of-men


Mr Drerrawyn - posté le 27/05/2017 à 11:05:20. (1654 messages postés) - geniesdumal

Le

Le script ne le permet pas en l'état, non, mais si y'a vraiment besoin, je pense que ça peut s'adapter assez facilement


Nemau - posté le 20/06/2017 à 16:14:29. (30401 messages postés) - admin

En toute amitié

Citation:

7pri2


6pri1 était déjà pris ? :D

Bravo pour ce script. <= la petite phrase pour faire style je floode pas. xD

Trombinoscope ~ Calli ~ Polaris 03 ~ Le Famas ~ Level Up! ~ Les Forges

Suite à de nombreux abus, le post en invités a été désactivé. Veuillez vous inscrire si vous souhaitez participer à la conversation.

Haut de page

Merci de ne pas reproduire le contenu de ce site sans autorisation.
Contacter l'équipe

Plan du site:

Activité: Accueil | News | Forum | Flash-news | Chat | Commentaires | Galerie | Screen de la semaine | Sorties | Articles perso | Livre d'or | Recherche
Jeux: Index jeux séparés | Top Classiques | Top Originaux | Les autres | RPG Maker 95 | RPG Maker 2000 | RPG Maker 2003 | RPG Maker XP | RPG Maker VX | RPG Maker VX Ace | RPG Maker MV | Autres | Jeux complets | Proposer
Rubriques: Le Wiki | Collection Oniro | Tutoriaux | Scripts | Guides | Gaming-Live | Tests | Making-of | Interviews | Articles perso | OST | L'Annuaire | Divers | Palmarès
Hébergés: Aëdemphia | Fighting Robots Quest | Forstale | Geex | Inexistence | La Légende d'Ibabou | Lije | LoveMaster | Sarcia | Super Mario RPG - Lost Souls
Ressources: Jeux | Programmes | Packs de ressources | Midis | Eléments séparés | Sprites
RPG Maker 2000/2003: Chipsets | Charsets | Panoramas | Backdrops | Facesets | Battle anims | Battle charsets | Monstres | Systems | Templates
RPG Maker XP: Tilesets | Autotiles | Characters | Battlers | Window skins | Icônes | Transitions | Fogs | Templates
RPG Maker VX: Tilesets | Charsets | Facesets | Systèmes
RPG Maker MV: Tilesets | Characters | Faces | Systèmes | Title | Battlebacks | Animations | SV/Ennemis