Apprendre


Vous êtes
nouveau sur
Oniromancie?

Visite guidée
du site


Découvrir
RPG Maker

RM 95
RM 2000/2003
RM XP
RM VX/VX Ace
RM MV

Apprendre
RPG Maker

Guides
Tutoriels
Making-of

Dans le
Forum

Section Entraide

Tutos: Ren'Py - Combiner expressions (...) / Tutos: Réaliser un pathfinder sur (...) / News: Cérémonie des Alex d'or 2020 / Jeux: Beetle Ninja / Jeux: Le Miroir de Philéas / Chat

Bienvenue
visiteur !




publicité RPG Maker!

Statistiques

Liste des
membres


Contact

Mentions légales

98 connectés actuellement

10805530 visiteurs
depuis l'ouverture

578 visiteurs
aujourd'hui



Barre de séparation

Partenaires

Indiexpo

Akademiya RPG Maker

Hellsoft

Planète Glutko

New RPG Maker

Le Studio du Chat Vert

RPG Fusion

Tous nos partenaires

Devenir
partenaire



Menu comme un ordinateur
Script pour RPG Maker XP
Ecrit par Cetais
Publié par cetais (lui envoyer un message privé)
Signaler un script cassé

Quoi de mieux que d'avoir un menu qui vous fera penser à votre ordinateur? Pour cela, suivez bien ce script :

(message original, je pense, de Séphiroth du forum RPG Creative)

Vala ^^
Vous voulez un ordi dans votre jeux ???
Vous pouvez lire vos mails déposez de l'argent (ok javoue c'est bizarre) déposez des objets (si vous avez un éléphant comme objet ^^" allez voir comment on mat sa la dedans ^^" on le scanne ^^""")
C'est facile, simple et je lai tester avec les script sur un jeu pas vierge je suis sur de moi ^^.

Bon ... d'abord on supprime le script main et on le remplace par ceci ^^ : (laisser lui le nom 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
#==============================================================================
# ■ Main
#------------------------------------------------------------------------------
#  各クラスの定義が終わった後、ここから実際の処理が始まります。
#==============================================================================
 
begin
  Font.default_name = "Arial"
  Font.default_size = 24
  # Change the $fontface variable to change the font style
  $fontface = "Arial"
  # Change the $fontsize variable to change the font size
  $fontsize = 24
  $defaultfonttype = $fontface
  $defaultfontsize = $fontsize
  Font.default_name = $fontface
  Font.default_size = $fontsize
  # トランジション準備
  Graphics.freeze
  # シーンオブジェクト (タイトル画面) を作成
  $scene = Scene_Title.new
  # $scene が有効な限り main メソッドを呼び出す
  while $scene != nil
    $scene.main
  end
  # フェードアウト
  Graphics.transition(20)
rescue Errno::ENOENT
  # 例外 Errno::ENOENT を補足
  # ファイルがオープンできなかった場合、メッセージを表示して終了する
  filename = $!.message.sub("No such file or directory - ", "")
  print("File #{filename} was not found.")
end



Et on met un nouveau script du nom de Item Bank 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
class Itembank
  attr_reader :items
  
  def initialize
    @items = {}
  end
  
  def deposit(item_id, n, lose_party = true)
    if item_id > 0
      @items[item_id] = [[item_number(item_id) + n, 0].max, 99].min
    end
    $game_party.lose_item(item_id, n) if lose_party == true
  end
  
  def withdraw(item_id, n)
    deposit(item_id, -n)
  end
  
  def item_number(item_id)
    return @items.include?(item_id) ? @items[item_id] : 0
  end
end
 
class Scene_Title
 alias itembank_title_new_game command_new_game
 def command_new_game
   itembank_title_new_game
   $itembank = Itembank.new
 end
end
 
#===================================================
# ▼ CLASS Scene_Save Additional Code Begins
#===================================================
class Scene_Save
 
alias itembank_write_save_data write_save_data
 
  def write_save_data(file)
   itembank_write_save_data(file)
    Marshal.dump($itembank, file)
  end
  
end  
#===================================================
# ▲ CLASS Scene_Save Additional Code Ends
#===================================================
 
 
#===================================================
# ▼ CLASS Scene_Load Additional Code Begins
#===================================================
class Scene_Load
 
alias itembank_read_save_data read_save_data
 
  def read_save_data(file)
    itembank_read_save_data(file)
     $itembank = Marshal.load(file)
  end
  
end  
#===================================================
# ▲ CLASS Scene_Load Additional Code Ends
#===================================================
 
class Items_Party_Window < Window_Selectable
  def initialize
    super(0, 0, 320, 480)
    self.active = false
    self.index = -1
    refresh
    self.index = 0 if @data.size > 0
    self.back_opacity = 160
  end
  #--------------------------------------------------------------------------
  # ● アイテムの取得
  #--------------------------------------------------------------------------
  def item
    return @data[self.index]
  end
  def size
    return @data.size
  end
  #--------------------------------------------------------------------------
  # ● リフレッシュ
  #--------------------------------------------------------------------------
  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
        @data.push($data_items[i])
      end
    end
    @item_max = @data.size
    if @item_max > 0
      self.contents = Bitmap.new(width - 32, row_max * 32)
      self.contents.font.name = $fontface
      self.contents.font.size = $fontsize
      for i in 0...@item_max
        draw_item(i)
      end
    end
  end
  #--------------------------------------------------------------------------
  # ● 項目の描画
  #     index : 項目番号
  #--------------------------------------------------------------------------
  def draw_item(index)
    item = @data[index]
    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
      self.contents.font.color = normal_color
    x = 4
    y = index * 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 = 255
    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 + 240, y, 16, 32, ":", 1)
    self.contents.draw_text(x + 256, y, 24, 32, number.to_s, 2)
  end
end
 
class Items_Bank_Window < Window_Selectable
  def initialize
    super(320, 0, 320, 480)
    self.active = false
    self.index = -1
    refresh
    self.index = 0 if @data.size > 0
    self.back_opacity = 160
  end
  #--------------------------------------------------------------------------
  # ● アイテムの取得
  #--------------------------------------------------------------------------
  def item
    return @data[self.index]
  end
  def size
    return @data.size
  end
  #--------------------------------------------------------------------------
  # ● リフレッシュ
  #--------------------------------------------------------------------------
  def refresh
    if self.contents != nil
      self.contents.dispose
      self.contents = nil
    end
    @data = []
    # アイテムを追加
    for i in 1...$data_items.size
      if $itembank.item_number(i) > 0
        @data.push($data_items[i])
      end
    end
    @item_max = @data.size
    if @item_max > 0
      self.contents = Bitmap.new(width - 32, row_max * 32)
      self.contents.font.name = $fontface
      self.contents.font.size = $fontsize
      for i in 0...@item_max
        draw_item(i)
      end
    end
  end
  #--------------------------------------------------------------------------
  # ● 項目の描画
  #     index : 項目番号
  #--------------------------------------------------------------------------
  def draw_item(index)
    item = @data[index]
    number = $itembank.item_number(item.id)
    self.contents.font.color = normal_color
    x = 4
    y = index * 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 = 255
    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 + 240, y, 16, 32, ":", 1)
    self.contents.draw_text(x + 256, y, 24, 32, number.to_s, 2)
  end
end
 
class Scene_Item_Bank
  def main
  @left_window = Items_Party_Window.new
  @right_window = Items_Bank_Window.new
  @left_window.refresh
  @right_window.refresh
  @right_window.index = -1
  @left_window.active = true
  Graphics.transition
  loop do
    Graphics.update
    Input.update
    update
    if $scene != self
      break
    end
  end
  Graphics.freeze
  @left_window.dispose
  @right_window.dispose
end
# --------------------
def update
  @left_window.update
  @right_window.update
  if @left_window.active
    update_left
    return
  end
  if @right_window.active
    update_right
    return
  end
end
# --------------------
def update_left
  if Input.trigger?(Input::B)
    $game_system.se_play($data_system.decision_se)
    $scene = Scene_Computer.new
  end
  if Input.trigger?(Input::C)
    if @left_window.size > 0
      $game_system.se_play($data_system.decision_se)
      $itembank.deposit(@left_window.item.id, 1)
      @right_window.refresh
      @left_window.refresh
      @left_window.index = -1 if @left_window.size == 0
      @left_window.index = @left_window.size - 1 if @left_window.index > @left_window.size - 1
    else
      $game_system.se_play($data_system.buzzer_se)
    end
  end
  if Input.trigger?(Input::RIGHT)
    $game_system.se_play($data_system.cursor_se)
    @left_window.index = -1
    @left_window.active = false
    @right_window.refresh
    @right_window.index = (@right_window.size > 0 ? 0 : -1)
    @right_window.active = true
  end
end
# --------------------
def update_right
  if Input.trigger?(Input::B)
    $game_system.se_play($data_system.decision_se)
    $scene = Scene_Computer.new
  end
  if Input.trigger?(Input::C)
    if @right_window.size > 0
      $game_system.se_play($data_system.decision_se)
      $itembank.withdraw(@right_window.item.id, 1)
      @left_window.refresh
      @right_window.refresh
      @right_window.index = -1 if @right_window.size == 0
      @right_window.index = @right_window.size - 1 if @right_window.index > @right_window.size - 1
    else
      $game_system.se_play($data_system.buzzer_se)
    end
  end
  if Input.trigger?(Input::LEFT)
    $game_system.se_play($data_system.cursor_se)
    @right_window.index = -1
    @right_window.active = false
    @left_window.refresh
    @left_window.index = (@left_window.size > 0 ? 0 : -1)
    @left_window.active = true
  end
end
end



Et encore un au nom de Bank 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
class Bank
  attr_reader :money
  
  def initialize
    @money = 0
  end
  
  def deposit(n)
    @money += n
    $game_party.lose_gold(n)
  end
  
  def withdraw(n)
    deposit(-n)
  end
  
  def can_deposit?(n)
    if ($game_party.gold - n) < 0
      return false
    else
      return true
    end
  end
  
  def can_withdraw?(n)
    if @money - n >= 0
      if ($game_party.gold + n) > 9999999
        return false
      else
        return true
      end
    else
      return false
    end
  end
end
 
class Scene_Title
 alias bank_title_new_game command_new_game
 def command_new_game
   bank_title_new_game
   $bank = Bank.new
 end
end
 
#===================================================
# ▼ CLASS Scene_Save Additional Code Begins
#===================================================
class Scene_Save
 
alias bank_write_save_data write_save_data
 
  def write_save_data(file)
   bank_write_save_data(file)
    Marshal.dump($bank, file)
  end
  
end  
#===================================================
# ▲ CLASS Scene_Save Additional Code Ends
#===================================================
 
 
#===================================================
# ▼ CLASS Scene_Load Additional Code Begins
#===================================================
class Scene_Load
 
alias bank_read_save_data read_save_data
 
  def read_save_data(file)
    bank_read_save_data(file)
     $bank = Marshal.load(file)
  end
  
end  
#===================================================
# ▲ CLASS Scene_Load Additional Code Ends
#===================================================



Et encore un du nom de Mail 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
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
#--------------------------------------------------------------------------------------------------------------------------
# * Created by: GoldenShadow
#=============================================================
 
module SC # don't delete module, it's ripping if done anyway!
 RXSC_MAIL = "Mail Client Script: Ver.1.1"
 MAIL_HEAR_SOUND = true # set to true to hear a sound on receive
end
 
class Mail
 
 attr_accessor :mail          # Mail
 attr_accessor :msg          # Content of mail
 attr_accessor :account     # Your e-mail account
 attr_accessor :sender       # The sender
 attr_accessor :read          # If it's read or new
 attr_accessor :font           # Contents font
 
 def initialize # Define the variables we're going to use
   # Why are they global variables you ask? So we can use 'em outside this class
   @mail = [] # mail IDs
   @msg = [] # mail msgs
   @account = "#{$game_party.actors[0„.name}@RXSC.net" # This is the player's mail
   @sender = [] # sender IDs
   @read = [] # unread option IDs
   @font = [] # font
 end
 
 def received_include?(string) # check if string is in mail or sender (can be number)
   if @mail.include?(string)
     return true
   elsif @sender.include?(string)
     return true
   else
     return false
   end
 end
     
 def is_new?(id) # see if mail is unread
   if @read[id] == true
     return false
   elsif @read[id] == false
     return true
   else
     return false
   end
 end
 
 def write_mail(topic = nil,from = nil,msg = [], type = nil, font = nil)
   if SC::MAIL_HEAR_SOUND == true # Sound when receiving
     Audio.se_play("Audio/SE/055-Right01", 100, 150) # You may change the soundfile
     # In fact, you may even use Music Effects, BGM (not recommended) or BGS.
     # Change the 'se_play' to 'me_play','bgm_play' or 'bgs_play' respectivly.
     # You should also change the directory when something else than SE is used.
   end
   if topic == nil or topic == ""# Subject of message
     @mail.push("(no subject)") # if no subject specified
   else
     @mail.push(topic)
   end
   if msg == nil # Write a message in array format, like: ["line1, "line2, "etc"]
     @msg.push(["* AUTO MAIL*","No message specified by the sender."," ","Greetings from webmaster@mailserver.rxsc"])
   else
     @msg.push(msg)
   end
   if from == nil or from == "" # The sender of the mail
     @sender.push("(unknown)") # if no sender specified
   else
     @sender.push(from)
   end
   if font != nil
     @font.push(font)
   else
     @font.push(nil)
   end
   @read.push(false) # set it to unread
   if type != nil # some cool stuff
     if type == 1
       # Type 1: Corrupted Mail
       @msg[topic].push("","* AUTO MAIL *","The mail is corrupted.","Sorry for this inconvinience.","","Greetings from Webmaster")
     elsif type == 2
       # Type 2: Infected Mail
       @msg[topic].push("","* AUTO MAIL *","This mail is infected.","Delete it immediately.","","Greetings from Webmaster")
     elsif type == 3
       # Type 3: Incomplete Mail
       @msg[topic].push("","* AUTO MAIL *","Mail was not sent correctly.","Some parts may have been lost.","","Greetings from Webmaster")
     elsif type == 4
       # Add more if you like, see above for the examples
     end
   end
 end
end
 
# This is the topic window or in other words the message window.
# So this is the window where the contents of a mail is shown.
# You may change it in how you want it actually.
# Screwing this up is your own fault... but then again, you can always repaste...
class Window_Topic < Window_Base
 attr_reader :msg
 def initialize(mail)
   super(0, 0, 640, 480)
   self.contents = Bitmap.new(width - 32, height - 32)
   self.contents.font.name = $fontface
   self.contents.font.size = $fontsize
   self.visible = false
   @mail = mail # This is the index of the inbox and will be converted to the mail ID
   refresh
 end
 
 def refresh
   self.contents.clear
   unless @mail == "none" # Just a block
     self.contents.draw_text(4, 0, self.width - 40, 32, "Subject: #{$mail.mail[@mail]}")
     self.contents.draw_text(4, 32, self.width - 40, 32, "From: #{$mail.sender[@mail]}")
     rect = Rect.new(0, 68, self.width, 2)
     self.contents.fill_rect(rect, Color.new(255, 255, 255)) # Modify the color as pleased
   end
 end
 
 def show_msg(msg) # Show the mail message contents
   @topic = $mail.mail[@mail].to_s
   @msg = $mail.msg[@mail]
   self.contents = Bitmap.new(width - 32, (@msg.size * 16) + 80)
   self.contents.font.name = $fontface
   self.contents.font.size = $fontsize
   refresh
   y = 53 # start line 1 at this y-position
   unless @msg == nil or @mail == "none" # Also just a block
     for line in 0...@msg.size
       y += 16 # space between the lines
       self.contents.font.size = 16 # font size
       if $mail.font[@mail] != nil
         self.contents.font.name = $mail.font[@mail] # own font
       end
       self.contents.draw_text(4, y, self.width, 32, @msg[line].to_s)
     end
   end
 end
end
 
# This is the inbox
# When email is received it will be added at the end of the list.
# So that you can see, like the real one, which one's old or new.
class Window_Inbox < Window_Selectable
 
 def initialize
   super(0, 64, 640, 416)
   @column_max = 1
   self.index = -1
   refresh
 end
 
 def item
   return @data[self.index]
 end
 
def refresh
   if self.contents != nil
     self.contents.dispose
     self.contents = nil
   end
   @data = []
   for i in 0...$mail.mail.size # This is the var for mails
     @data.push($mail.mail[i])
   end
   @item_max = @data.size
   if @item_max >= 0
     self.contents = Bitmap.new(width - 32, height - 32)
     self.contents.font.name = $fontface
     self.contents.font.size = 24
     for i in 0...@item_max
       draw_item(i)
     end
   end
 end
 
 def draw_item(index)
   item = @data[index]
   self.contents.font.color = normal_color
   x = 4
   y = index * 32 # 32 stands for space between lines
   rect = Rect.new(x, y, self.width / @column_max - 32, 32)
   self.contents.fill_rect(rect, Color.new(0, 0, 0, 0))
   self.contents.draw_text(x, y, self.width - 40, 32, item.to_s) # mail topic (subject)
   self.contents.draw_text(x + 400, y, self.width - 40, 32, $mail.sender[index].to_s) # Sender
   if $mail.read[index] == false
     self.contents.font.color = Color.new(130,225,89)
     self.contents.draw_text(x + 300, y, self.width - 40, 32, "NEW") # if mail is unread
   else
     self.contents.font.color = normal_color
     self.contents.draw_text(x + 300, y, self.width - 40, 32, "") # if mail is read, change as pleased
   end
 end
end
 
# This is the built-in mail client.
# You may modify it but try not to screw it too much up.
class Scene_Mail
 
 def main
   @help_window = Window_Help.new
   if $mail.mail.size == 0 or $mail.mail == nil
     @help_window.set_text("No mail.")
   else
     @help_window.set_text("You have #{$mail.mail.size} message" + ($mail.mail.size > 1 ? "s " : " ") + "in your inbox.")
   end
   @help_window.z = 100
   @inbox = Window_Inbox.new
   @inbox.index = 0 if $mail.mail.size > 0
   @inbox.active = true
   @inbox.visible = true
   @inbox.z = 200
   @topic_window = Window_Topic.new("none")
   @topic_window.z = 100
   @message_window = Window_Message.new # For msg's to show...
   Graphics.transition
   loop do
     Graphics.update
     Input.update
     update
     if $scene != self
       break
     end
   end
   Graphics.freeze
   @inbox.dispose
   @topic_window.dispose
   @message_window.dispose
   @help_window.dispose
 end
 
 def update
   @message_window.update
   @inbox.update
   @help_window.update
   @topic_window.update
   if $game_temp.message_window_showing
     return
   end
   if @inbox.active == false
     update_topic
     return
   end
   if @inbox.active == true
     update_inbox
     return
   end
 end
   
 def update_inbox
   if $mail.mail.size == 0 or $mail.mail == nil
     @inbox.index = -1
   end
   if Input.trigger?(Input::C) # selecting the topic at inbox
     if @inbox.index == nil or $mail.mail.size == 0 # if no topics...
       $game_system.se_play($data_system.buzzer_se) # errrr
       return
     end
     $game_system.se_play($data_system.decision_se)
     @topic_window.contents.clear
     @topic_window = Window_Topic.new(@inbox.index)
     @topic_window.show_msg(@inbox.index)
     if $mail.read[@inbox.index] == false
       $mail.read[@inbox.index] = true
       @inbox.refresh
     end
     @topic_window.visible = true
     @inbox.active = false
     @inbox.visible = false
     @help_window.visible = false
   end
   if Input.trigger?(Input::B)
     $game_system.se_play($data_system.cancel_se)
     $scene = Scene_Computer.new # This would be the previous scene
   end
   if Input.trigger?(Input::Z) # Deletes selected email
     $mail.mail.delete_at(@inbox.index)
     $mail.msg.delete_at(@inbox.index)
     $mail.sender.delete_at(@inbox.index)
     $mail.read.delete_at(@inbox.index)
     $mail.font.delete_at(@inbox.index)
     $game_system.se_play($data_system.decision_se)
     @inbox.refresh
     if $mail.mail.size == 0
       @inbox.index = -1
       @help_window.set_text("No mail.")
     else
     @help_window.set_text("You have #{$mail.mail.size} message" + ($mail.mail.size > 1 ? "s " : " ") + "in your inbox.")
     end
     if @inbox.index > $mail.mail.size - 1
       @inbox.index -= 1
     end
   end
   if Input.trigger?(Input::X) # Deletes all
     $mail.mail.clear
     $mail.msg.clear
     $mail.sender.clear
     $mail.read.clear
     $mail.font.clear
     $game_system.se_play($data_system.decision_se)
     @inbox.refresh
     @help_window.set_text("No mail.")
     @inbox.index = -1 # this will make the cursor be hidden (cuz there arent any mails)
   end
 end
 
 def update_topic # this command is for the topic window, add stuff if you like
   if Input.trigger?(Input::B) # cancel button to return to inbox
     $game_system.se_play($data_system.cancel_se)
     @inbox.active = true
     @inbox.visible = true
     @help_window.visible = true
     @topic_window.visible = false
   end
   if Input.repeat?(Input::DOWN)
     @topic_window.oy += 16 if @topic_window.oy < ((@topic_window.msg.size * 16) + 80) - 448
   end
   if Input.repeat?(Input::UP)
     @topic_window.oy -= 16 if @topic_window.oy > 0
   end   
 end
end
 
# This is a example mail for you to learn from.
# Study this and you'll learn it in no time!
class Scene_Title
 alias mail_title_new_game command_new_game
 def command_new_game
   mail_title_new_game
   $mail = Mail.new
 end
end
 
#===================================================
# ▼ CLASS Scene_Save Additional Code Begins
#===================================================
class Scene_Save
 
alias mail_write_save_data write_save_data
 
  def write_save_data(file)
   mail_write_save_data(file)
    Marshal.dump($mail, file)
  end
  
end  
#===================================================
# ▲ CLASS Scene_Save Additional Code Ends
#===================================================
 
 
#===================================================
# ▼ CLASS Scene_Load Additional Code Begins
#===================================================
class Scene_Load
 
alias mail_read_save_data read_save_data
 
  def read_save_data(file)
    mail_read_save_data(file)
     $mail = Marshal.load(file)
  end
  
end  
#===================================================
# ▲ CLASS Scene_Load Additional Code Ends
#===================================================



Et encore un du nom de Computer au-dessus de main (c'est le dernier) :

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
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
#-----------------------------------------------------------------
# Slipknot Computer Menu System
#    created by slipknot
#-----------------------------------------------------------------
class Game_Temp
  attr_accessor :menubar
  alias comp_menu_init initialize
  def initialize
    comp_menu_init
    @menubar = "bar1"
  end
end
class Scene_Computer
#-----------------------------------------------------------------
 def initialize(menu_index = 0)
   @menu_index = menu_index
 end
#-----------------------------------------------------------------
 def main
   @g = Gold.new
   @g.x = 80
   @g.y = 80
   @g.visible = false
   @g.active = false
   s1="Deposit"
   s2="Withdraw"
   s3="About"
   s4="None"
   s5="Blue"
   s6="Olive"
   s7="Silver"
   @bank = Window_Command.new(132, [s1,s2])
   @bank.x = 320-@bank.width/2
   @bank.y = 240-@bank.height/2
   @bank.visible = false
   @bank.active = false
   @back = Window_Command.new(100, [s5,s6,s7])
   @back.x = 320-@back.width/2
   @back.y = 240-@back.height/2
   if @backso = nil
     @backso = 1
   end
   @back.visible = false
   @back.active = false
   @imagen = Sprite.new
   @imagen.bitmap=RPG::Cache.picture("back")
   @bar = Sprite.new
   @bar.bitmap=RPG::Cache.picture($game_temp.menubar)
   @bar.y=449
   @playtime = Playtime.new
   @stname = Startname.new
   @command = Computer.new
   @command.index = @menu_index
   @command.z = 100
   Graphics.transition
   loop do
     Graphics.update
     Input.update
     update
     if $scene != self
       break
     end
   end
   Graphics.freeze
   @command.dispose
   @playtime.dispose
   @stname.dispose
   @g.dispose
   @bar.dispose
   @imagen.dispose
 end
#-----------------------------------------------------------------
 def update
   @command.update
   @bar.update
   @stname.update
   @playtime.update
   @imagen.update
   if @backso==0
     @bar.bitmap=RPG::Cache.picture("bar1")
     $game_temp.menubar = "bar1"
   elsif @backso==1
     @bar.bitmap=RPG::Cache.picture("bar2")
     $game_temp.menubar = "bar2"
   elsif @backso==2
     @bar.bitmap=RPG::Cache.picture("bar3")
     $game_temp.menubar = "bar3"
   end
   @g.update
   @bank.update
   @banknum.update if @banknum != nil
   @back.update
   if @back.active
     update_back
     return
   end
   if @bank.active
     update_g
     return
   end
    if @banknum != nil
   if @banknum.active
     update_banknum
     return
   end
   end
   if @command.active
     update_command
     return
   end
 end
#-----------------------------------------------------------------
 def delay(seconds)
   for i in 0...(seconds * 1)
     sleep 0.01
     Graphics.update
   end
 end
#-----------------------------------------------------------------
 def audiofade
   Audio.bgm_fade(800)
   Audio.bgs_fade(800)
   Audio.me_fade(800)
 end
#-----------------------------------------------------------------
 def update_banknum
   if Input.trigger?(Input::B)
     $game_system.se_play($data_system.cancel_se)
   @banknum.active = false
   @banknum.visible = false
   @banknum.dispose
   @banknum = nil
   @bank.active = true
   @bank.visible = true
     return
   end
   if Input.trigger?(Input::C)
     n = @banknum.number
     if @withdraw
       if $bank.can_withdraw?(n)
         $game_system.se_play($data_system.shop_se)
         $bank.withdraw(n)
         @g.refresh
         bank_done
       else
         $game_system.se_play($data_system.buzzer_se)
       end
     else
       if $bank.can_deposit?(n)
         $game_system.se_play($data_system.shop_se)
         $bank.deposit(n)
         @g.refresh
         bank_done
       else
         $game_system.se_play($data_system.buzzer_se)
       end
     end
     return
   end
 end
 
 def bank_done
   @banknum.active = false
   @banknum.visible = false
   @banknum.dispose
   @banknum = nil
   @withdraw = nil
   @bank.active = true
   @bank.visible = true
 end
 
 def update_g
   if Input.trigger?(Input::B)
     $game_system.se_play($data_system.cancel_se)
     @g.visible = false
     @g.active = false
     @bank.active = false
     @bank.visible = false
     @command.active = true
     return
   end
   if Input.trigger?(Input::C)
     case @bank.index
     when 0
       $game_system.se_play($data_system.decision_se)
       bank_deposit
     when 1
       $game_system.se_play($data_system.decision_se)
       bank_withdraw
     end
     return
   end
 end
 
 def bank_deposit
   @bank.active = false
   @bank.visible = false
   @withdraw = false
   @banknum = Window_InputNumber.new(7)
   @banknum.opacity = 255
   @banknum.x = 320-@banknum.width/2
   @banknum.y = 240-@banknum.height/2
   @banknum.number = 0
   @banknum.active = true
   @banknum.visible = true
 end
 
 def bank_withdraw
   @bank.active = false
   @bank.visible = false
   @withdraw = true
   @banknum = Window_InputNumber.new(7)
   @banknum.opacity = 255
   @banknum.x = 320-@banknum.width/2
   @banknum.y = 240-@banknum.height/2
   @banknum.number = 0
   @banknum.active = true
   @banknum.visible = true
 end
 
#-----------------------------------------------------------------
 def update_back
   if Input.trigger?(Input::B)
     $game_system.se_play($data_system.cancel_se)
     acceptback
     @back.index = -1
     return
   end
   if Input.trigger?(Input::C)
     case @back.index
     when 0
       $game_system.se_play($data_system.decision_se)
       @backso = 0
       acceptback
     when 1
       $game_system.se_play($data_system.decision_se)
       @backso = 1
       acceptback
     when 2
       $game_system.se_play($data_system.decision_se)
       @backso = 2
       acceptback
     end
     return
   end
 end
#-----------------------------------------------------------------
 def acceptback
   @back.active = false
   @back.visible = false
   @command.active = true
 end
#-----------------------------------------------------------------
 def update_command
   if Input.trigger?(Input::B)
     $game_system.se_play($data_system.cancel_se)
     $scene = Scene_Map.new
     return
   end
   if Input.trigger?(Input::C)
     if $game_party.actors.size == 0 and @command.index < 4
       $game_system.se_play($data_system.buzzer_se)
       return
     end
     case @command.index
     when 0
       $game_system.se_play($data_system.decision_se)
       $scene = Scene_Item_Bank.new
     when 1
       $game_system.se_play($data_system.decision_se)
       $scene = Scene_Mail.new
     when 2
       $game_system.se_play($data_system.decision_se)
       @command.active=false
       @g.visible=true
       @bank.active=true
       @bank.visible=true
       return
     when 3
       $game_system.se_play($data_system.decision_se)
       @command.active=false
       @back.active=true
       @back.visible=true
       @back.index = 0
       return
     end
     return
   end
   if Input.press?(Input::DOWN) or  Input.press?(Input::RIGHT)
     delay(2)
     $game_system.se_play($data_system.cursor_se)
     @command.setup_move(Computer::M_L)
     delay(2)
     return
   end
   if Input.press?(Input::UP) or  Input.press?(Input::LEFT)
     delay(2)
     $game_system.se_play($data_system.cursor_se)
     @command.setup_move(Computer::M_R)
     delay(2)
     return
   end
 end
#-----------------------------------------------------------------
end
#-----------------------------------------------------------------
class Computer < Window_Base
#-----------------------------------------------------------------
 M_R=1
 M_L=2
 attr_accessor :index
#-----------------------------------------------------------------
 def initialize
   super(0, 0, 640, 480)
   self.contents = Bitmap.new(width-32, height-32)
   self.contents.font.name = $defaultfonttype
   self.contents.font.color = text_color(0)
   self.contents.font.size = 22
   self.opacity = 0
   s1 = "Item Storage"
   s2 = "Mail"
   s3 = "Bank"
   s4 = "Theme"
   @commands = [s1, s2, s3, s4]
   @item_max = 4
   @index = 0
   ic_itm = RPG::Cache.icon("034-Item03")
   ic_eml = RPG::Cache.icon("033-Item02")
   ic_gld = RPG::Cache.icon("gold")
   ic_bck = RPG::Cache.icon("backicon")
   @items = [ic_itm, ic_eml, ic_gld, ic_bck]
   @disabled = [false, false, false, false]
   refresh
 end
#-----------------------------------------------------------------
 def update
   super
   refresh
 end
#-----------------------------------------------------------------
 def refresh
   self.contents.clear
   x=4
   y=50
   o=25
   for i in 0...@item_max
     ic_disable = RPG::Cache.icon("")
     rect = Rect.new(0, 0, @items[i].width, @items[i].height)
     if @index == i
       self.contents.blt( x, y*i+1, @items[i], rect)
       if @disabled[@index]
         self.contents.blt( x, y*i+1, ic_disable, rect)
       end
     else
       self.contents.blt( x, y*i+1, @items[i], rect, 128)
       if @disabled[@index]
         self.contents.blt(x, y*i+1, ic_disable, rect, 128)
       end
     end
   end
   self.contents.font.size = 18
   self.contents.draw_text(4, o, 100, 24,"Item Storage")
   self.contents.draw_text(4, o+y, 100, 24,"Mail")
   self.contents.draw_text(4, o+y*2, 100, 24,"Bank")
   self.contents.draw_text(4, o+y*3, 100, 24,"Theme")
 end
#-----------------------------------------------------------------
 def disable_item(index)
   @disabled[index] = true
 end
#-----------------------------------------------------------------
 def setup_move(mode)
   if mode == M_R
     @index -= 1
     @index = @items.size - 1 if @index < 0
   elsif mode == M_L
     @index += 1
     @index = 0 if @index >= @items.size
   else
     return
   end
 end
#-----------------------------------------------------------------
end
#-----------------------------------------------------------------
class Gold < Window_Base
#-----------------------------------------------------------------
 def initialize
   super(0,0,160,156)
   self.contents = Bitmap.new(width-32, height-32)
   self.contents.font.name = $defaultfonttype
   self.contents.font.size = $defaultfontsize
   refresh
 end
 def refresh
   self.contents.clear
   self.contents.draw_text(0,0,120,32,"You have:")
   icon = RPG::Cache.icon("gold")
   self.contents.draw_text (4,32,92,32,$game_party.gold.to_s,2)
   self.contents.blt(103,37,icon,Rect.new(0,0,24,24))
   self.contents.draw_text(0,64,128,32,"Bank contains:")
   self.contents.draw_text (4,96,92,32,$bank.money.to_s,2)
   self.contents.blt(103,101,icon,Rect.new(0,0,24,24))
 end
#-----------------------------------------------------------------
end
#-----------------------------------------------------------------
class Playtime < Window_Base
#-----------------------------------------------------------------
 def initialize
   super(546,433,140,64)
   self.contents = Bitmap.new(width-32,height-32)
   self.opacity = 0
   self.contents.font.name = $fontface
   self.contents.font.size = 16
   self.contents.font.color = Color.new(0, 0, 0)
   refresh
 end
 #--------------------------------------------------------------------------
 def refresh
    self.contents.clear
    @total_sec = Graphics.frame_count / Graphics.frame_rate
    hour = @total_sec / 60 / 60
    min = @total_sec / 60 % 60
    sec = @total_sec % 60
    text = sprintf("%02d:%02d:%02d", hour, min, sec)
    self.contents.draw_text(12, 0, 140, 32, text)
  end
  #--------------------------------------------------------------------------
  def update
    super
    if Graphics.frame_count / Graphics.frame_rate != @total_sec
      refresh
    end
  end
#-----------------------------------------------------------------
end
#-----------------------------------------------------------------
class Startname < Window_Base
#-----------------------------------------------------------------
 def initialize
   super(-12,432,112,64)
   self.contents = Bitmap.new(width-32,height-32)
   self.opacity = 0
   self.contents.font.name = ["Franklin Gothic Medium", $defaultfonttype]
   self.contents.font.size = 26
   self.contents.font.bold = true
   self.contents.font.italic = true
   icon = RPG::Cache.icon("xp")
   self.contents.blt(0,5,icon,Rect.new(0,0,24,24))
   self.contents.font.color = Color.new(128, 128, 128, 160)
   self.contents.draw_text(30,2,72,32,"start")
   self.contents.font.color = normal_color
   self.contents.draw_text(27,0,72,32,"start")
 end
#-----------------------------------------------------------------
end



Voilà :smile:

Maintenant juste encore des icone a mettre dans "icone" :

image

image

image

Maintenant encore des pictures :smile: :

image

image

image

image

Voila,
derniere chose pour appellez un ordinateur suffit de mettre sur un evenement par la touche action ce scrîpt:
$scene = Scene_Computer.new
Pour ajoutez des objets lorsque le joueur ce connecte a l ordi c est :
$itembank.deposit(1,4,false) #4 "nom de l objet et enlevez les guillemets", not from party
Changez le 4 par un chiffre de votre choix.

Vala
Amusez vous bien

Le résultat peut être ??
Le voilà ^^

image

Mis à jour le 11 juillet 2020.





Simsor (visiteur non enregistré) - posté le 01/11/2008 à 21:58:10

❤ 0

Bonjour.

Excusez-moi mais je n'ai toujours pas compris comment on envoie un mail...:grah1
Pouvez-vous m'expliquer svp ?


vefv (visiteur non enregistré) - posté le 06/11/2008 à 19:12:48

❤ 0

c de la merde celui qui la crée a un peu trop :bob il faut le :feu


Rockmik - posté le 06/11/2008 à 19:26:21 (12688 messages postés) - honor

❤ 0

En ligne

Des commentaires comme cela tu te les gardes petit.

Les ramens, c'est délicieux.


Erwdu??? - posté le 22/11/2008 à 16:13:43 (137 messages postés)

❤ 0

EREUR LIGNE 10 ITEM BANK
Ya toujours des ereur:fache2:hum:fache3


natinusala - posté le 07/03/2009 à 15:34:26 (586 messages postés)

❤ 0

Mon avatar est une patate trysophille aux poils de moustache musclés.

Simsor a dit:



Bonjour.

Excusez-moi mais je n'ai toujours pas compris comment on envoie un mail...
Pouvez-vous m'expliquer svp ?



La je sais pas quoi dire... :susp

Attends je vais chercher un stylo


Obscurity - posté le 01/08/2009 à 11:33:43 (2 messages postés)

❤ 0

Presque bon

Peut-on utiliser se script sur vx?:inter

Vive B.O.P euh....non?


Tata Monos - posté le 01/08/2009 à 15:29:23 (28 messages postés)

❤ 0

Compte Non utilisé

Teste par toi même.


Gallica - posté le 25/11/2010 à 12:15:30 (2 messages postés)

❤ 0

Bonjour,
Je vous informe que moi le script marche très
bien ! J'ai modifier quelques chose je crois mais je
ne m'en souvient plus et il faudrait tout reconfiguré
le script et en ce moment je ne suis pas très fort
en script... Et j'aimerais savoir comment peut-on
envoié avec le système de mail ? Car j'ai tout tester
mais rien ne marche .... ;)

Ps: Je remerci selui ou s'elle qui a crée se site !
Il est super ! Avec plein de script différent !:)


polochons - posté le 27/05/2011 à 19:26:00 (6 messages postés)

❤ 0

ligne 10 snif :'(

edit:y en a partout des erreur et gallica au lieu de frimer tu peux le donner la partie du script s'il te plaît

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 - Mentions légales

Plan du site

Communauté: Accueil | Forum | Chat | Commentaires | News | Flash-news | Screen de la semaine | Sorties | Tests | Gaming-Live | Interviews | Galerie | OST | Blogs | Articles perso | Recherche
Apprendre: Visite guidée | RPG Maker 95 | RPG Maker 2003 | RPG Maker XP | RPG Maker VX | RPG Maker MV | Tutoriels | Guides | Making-of
Télécharger: Programmes | Scripts | Packs de ressources | Midis | Eléments séparés | Sprites
Jeux: Au hasard | Notre sélection | Sélection des membres | Jeux complets | Tous les jeux | Le cimetière | RPG Maker 95 | RPG Maker 2000 | RPG Maker 2003 | RPG Maker XP | RPG Maker VX | RPG Maker VX Ace | RPG Maker MV | Autres | Proposer
Ressources RPG Maker 2000/2003: Chipsets | Charsets | Panoramas | Backdrops | Facesets | Battle anims | Battle charsets | Monstres | Systems | Templates
Ressources RPG Maker XP: Tilesets | Autotiles | Characters | Battlers | Window skins | Icônes | Transitions | Fogs | Templates
Ressources RPG Maker VX: Tilesets | Charsets | Facesets | Systèmes
Ressources RPG Maker MV: Tilesets | Characters | Faces | Systèmes | Title | Battlebacks | Animations | SV/Ennemis
Archives: Palmarès | L'Annuaire | Livre d'or | Le Wiki | Divers