[RM脚本] 随意传送系统，类似于飞行棋

ikki

脚本来源：日本KGC网站
脚本说明：
導入後、カスタマイズ項目を好みに応じて変更してください。

変更後、属性[テレポート]を作成し、スキル・アイテムにセットします。
これでテレポート効果を持つスキル・アイテムの完成です。

イベントコマンド「スクリプト」で
  $game_system.teleport_permit = false
というスクリプトを入力すると、テレポートを禁止できます。
(許可する場合は true を指定)

テレポート先を追加する命令は
  Teleport.add(name, id, x, y[, dir])
  Teleport.add_now_place
の２種類があります。

前者は転送場所をマップID・X座標・Y座標で直接指定します。
nameは転送先の名前、dirは転送後のプレイヤーの向き(省略可)です。

後者は現在地をそのままテレポート先に追加します。
マップ名は、マップツリーから自動取得されます。

テレポート先を削除する命令は
  Teleport.delete(name)
です。
nameに指定した名前のテレポート先が削除されます。
{/hx}不好意思，不会翻译了，害怕翻译后反而看不懂，所以，把原说明直接放上了{/hx}
效果图：

1. 
   
2. #_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/
   
3. #_/　　◆テレポート － KGC_Teleport◆
   
4. #_/----------------------------------------------------------------------------
   
5. #_/　200xに存在した「テレポート」もどきを作成します。
   
6. #_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/
   
7. 
   
8. #==============================================================================
   
9. # ★ カスタマイズ項目 ★
   
10. #==============================================================================
    
11. 
    
12. module KGC
    
13.   # ◆テレポート SE
    
14.   #  ≪"SE ファイル名"[, Volume, Pitch]≫
    
15.   #  TELEPORT_SE = "018-Teleport01"  ←のようにファイル名だけ指定してもOK
    
16.   TELEPORT_SE = RPG::AudioFile.new("018-Teleport01", 100)
    
17. end
    
18. 
    
19. #★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
    
20. 
    
21. $imported = {} if $imported == nil
    
22. $imported["Teleport"] = true
    
23. 
    
24. if $game_special_elements == nil
    
25.   $game_special_elements = {}
    
26.   $data_system = load_data("Data/System.rxdata")
    
27. end
    
28. # テレポート属性
    
29. $game_special_elements["teleport"] = $data_system.elements.index("随意传送")
    
30. 
    
31. #★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
    
32. 
    
33. module Teleport
    
34.   #--------------------------------------------------------------------------
    
35.   # ● テレポート先の追加
    
36.   #     name : 転送先の名前
    
37.   #     id   : 転送先のマップID
    
38.   #     x    : 転送先のX座標
    
39.   #     y    : 転送先のY座標
    
40.   #     dir  : 転送後の向き(省略時：下向き)
    
41.   #--------------------------------------------------------------------------
    
42.   def self.add(name, id, x, y, dir = 2)
    
43.     # 既に同じ名前が存在する場合は戻る
    
44.     return if ($game_system.teleport_dest.find { |d| d[0] == name }) != nil
    
45.     # テレポート先に追加
    
46.     $game_system.teleport_dest << [name, id, x, y, dir]
    
47.   end
    
48.   #--------------------------------------------------------------------------
    
49.   # ● 現在地をテレポート先に追加
    
50.   #--------------------------------------------------------------------------
    
51.   def self.add_now_place
    
52.     # 現在地を取得
    
53.     place = [$game_map.map_name,
    
54.       $game_map.map_id,
    
55.       $game_player.x,
    
56.       $game_player.y,
    
57.       $game_player.direction]
    
58.     # 既に同じ名前が存在する場合は戻る
    
59.     return if ($game_system.teleport_dest.find { |d| d[0] == name }) != nil
    
60.     # テレポート先に追加
    
61.     $game_system.teleport_dest << place
    
62.   end
    
63.   #--------------------------------------------------------------------------
    
64.   # ● テレポート先を削除
    
65.   #     name : 転送先の名前
    
66.   #--------------------------------------------------------------------------
    
67.   def self.delete(name)
    
68.     # 該当するテレポート先を削除
    
69.     $game_system.teleport_dest.each { |dest|
    
70.       if dest[0] == name
    
71.         $game_system.teleport_dest.delete(dest)
    
72.         break
    
73.       end
    
74.     }
    
75.   end
    
76. end
    
77. 
    
78. #★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
    
79. 
    
80. #==============================================================================
    
81. # ■ Game_Temp
    
82. #==============================================================================
    
83. 
    
84. class Game_Temp
    
85.   #--------------------------------------------------------------------------
    
86.   # ● 公開インスタンス変数
    
87.   #--------------------------------------------------------------------------
    
88.   attr_accessor :teleport_calling         # テレポート 呼び出しフラグ
    
89.   attr_accessor :teleport_item            # テレポートアイテム
    
90.   attr_accessor :teleport_user            # テレポート使用者
    
91.   attr_accessor :teleport_cost_sp         # テレポート消費SP
    
92.   #--------------------------------------------------------------------------
    
93.   # ● オブジェクト初期化
    
94.   #--------------------------------------------------------------------------
    
95.   alias initialize_KGC_Teleport initialize
    
96.   def initialize
    
97.     # 元の処理を実行
    
98.     initialize_KGC_Teleport
    
99. 
    
100.     @teleport_item, @teleport_user = nil, nil
     
101.     @teleport_cost_sp, @teleport_calling = 0, false
     
102.   end
     
103. end
     
104. 
     
105. #★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
     
106. 
     
107. #==============================================================================
     
108. # ■ Game_System
     
109. #==============================================================================
     
110. 
     
111. class Game_System
     
112.   #--------------------------------------------------------------------------
     
113.   # ● 公開インスタンス変数
     
114.   #--------------------------------------------------------------------------
     
115.   attr_accessor :teleport_dest            # テレポート先
     
116.   attr_accessor :teleport_permit          # テレポート許可フラグ
     
117.   #--------------------------------------------------------------------------
     
118.   # ● オブジェクト初期化
     
119.   #--------------------------------------------------------------------------
     
120.   alias initialize_KGC_Teleport initialize
     
121.   def initialize
     
122.     # 元の処理を実行
     
123.     initialize_KGC_Teleport
     
124. 
     
125.     @teleport_dest, @teleport_permit = [], true
     
126.   end
     
127. end
     
128. 
     
129. #★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
     
130. 
     
131. #==============================================================================
     
132. # ■ Game_Map
     
133. #==============================================================================
     
134. 
     
135. class Game_Map
     
136.   #--------------------------------------------------------------------------
     
137.   # ● マップ名取得
     
138.   #--------------------------------------------------------------------------
     
139.   def map_name
     
140.     # MapInfo.rxdata をロード
     
141.     mapinfo = load_data("Data/MapInfos.rxdata")
     
142.     # マップ名を返す
     
143.     return mapinfo[@map_id].name
     
144.   end
     
145. end
     
146. 
     
147. #★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
     
148. 
     
149. #==============================================================================
     
150. # ■ Window_Teleport
     
151. #------------------------------------------------------------------------------
     
152. # 　テレポート先一覧を表示するウィンドウです。
     
153. #==============================================================================
     
154. 
     
155. class Window_Teleport < Window_Selectable
     
156.   #--------------------------------------------------------------------------
     
157.   # ● オブジェクト初期化
     
158.   #--------------------------------------------------------------------------
     
159.   def initialize
     
160.     super(80, 80, 480, 320)
     
161.     @column_max = 2
     
162.     refresh
     
163.     self.back_opacity = 160
     
164.     self.visible = false
     
165.     self.index = 0
     
166.   end
     
167.   #--------------------------------------------------------------------------
     
168.   # ● テレポート先の取得
     
169.   #--------------------------------------------------------------------------
     
170.   def dest
     
171.     return @data[self.index]
     
172.   end
     
173.   #--------------------------------------------------------------------------
     
174.   # ● リフレッシュ
     
175.   #--------------------------------------------------------------------------
     
176.   def refresh
     
177.     if self.contents != nil
     
178.       self.contents.dispose
     
179.       self.contents = nil
     
180.     end
     
181.     @data = []
     
182.     # テレポート先を追加
     
183.     $game_system.teleport_dest.each { |d| @data << d }
     
184.     # 項目数が 0 でなければビットマップを作成し、全項目を描画
     
185.     @item_max = @data.size
     
186.     if @item_max > 0
     
187.       self.contents = Bitmap.new(width - 32, row_max * 32)
     
188.       for i in 0...@item_max
     
189.         draw_item(i)
     
190.       end
     
191.     end
     
192.   end
     
193.   #--------------------------------------------------------------------------
     
194.   # ● 項目の描画
     
195.   #     index : 項目番号
     
196.   #--------------------------------------------------------------------------
     
197.   def draw_item(index)
     
198.     dest = @data[index]
     
199.     x = 4 + index % 2 * 224
     
200.     y = index / 2 * 32
     
201.     self.contents.draw_text(x, y, 224, 32, dest[0], 0)
     
202.   end
     
203.   #--------------------------------------------------------------------------
     
204.   # ● カーソルの矩形更新
     
205.   #--------------------------------------------------------------------------
     
206.   def update_cursor_rect
     
207.     # カーソル位置が 0 未満の場合
     
208.     if @index < 0
     
209.       self.cursor_rect.empty
     
210.       return
     
211.     end
     
212.     # 現在の行を取得
     
213.     row = @index / @column_max
     
214.     # 現在の行が、表示されている先頭の行より前の場合
     
215.     if row < self.top_row
     
216.       # 現在の行が先頭になるようにスクロール
     
217.       self.top_row = row
     
218.     end
     
219.     # 現在の行が、表示されている最後尾の行より後ろの場合
     
220.     if row > self.top_row + (self.page_row_max - 1)
     
221.       # 現在の行が最後尾になるようにスクロール
     
222.       self.top_row = row - (self.page_row_max - 1)
     
223.     end
     
224.     # カーソルの幅を計算
     
225.     cursor_width = (self.width - 32) / @column_max
     
226.     # カーソルの座標を計算
     
227.     x = @index % @column_max * cursor_width
     
228.     y = @index / @column_max * 32 - self.oy
     
229.     # カーソルの矩形を更新
     
230.     self.cursor_rect.set(x, y, cursor_width, 32)
     
231.   end
     
232. end
     
233. 
     
234. #★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
     
235. 
     
236. #==============================================================================
     
237. # ■ Scene_Map
     
238. #==============================================================================
     
239. 
     
240. class Scene_Map
     
241.   #--------------------------------------------------------------------------
     
242.   # ● メイン処理
     
243.   #--------------------------------------------------------------------------
     
244.   alias main_KGC_Teleport main
     
245.   def main
     
246.     # テレポートウィンドウ作成
     
247.     @teleport_window = Window_Teleport.new
     
248. 
     
249.     # 元の処理を実行
     
250.     main_KGC_Teleport
     
251. 
     
252.     # ウィンドウを解放
     
253.     @teleport_window.dispose
     
254.   end
     
255.   #--------------------------------------------------------------------------
     
256.   # ● フレーム更新
     
257.   #--------------------------------------------------------------------------
     
258.   alias update_KGC_Teleport update
     
259.   def update
     
260.     # 元の処理を実行
     
261.     update_KGC_Teleport
     
262. 
     
263.     # プレイヤーの移動中ではない場合
     
264.     unless $game_player.moving?
     
265.       # テレポート処理呼び出し中の場合
     
266.       if $game_temp.teleport_calling
     
267.         call_teleport
     
268.       end
     
269.     end
     
270.   end
     
271.   #--------------------------------------------------------------------------
     
272.   # ● テレポート処理の呼び出し
     
273.   #--------------------------------------------------------------------------
     
274.   def call_teleport
     
275.     # テレポート呼び出しフラグ解除
     
276.     $game_temp.teleport_calling = false
     
277.     # テレポート実行フラグをオフ
     
278.     teleport_flag = false
     
279.     # テレポートウィンドウを表示
     
280.     @teleport_window.refresh
     
281.     @teleport_window.opacity = 0
     
282.     @teleport_window.visible = true
     
283.     @teleport_window.active = true
     
284.     loop {
     
285.       # ウィンドウを更新
     
286.       @teleport_window.opacity += 16 if @teleport_window.opacity < 255
     
287.       @teleport_window.update
     
288.       # ゲーム画面を更新
     
289.       Graphics.update
     
290.       # 入力情報を更新
     
291.       Input.update
     
292. 
     
293.       # B ボタンが押された場合
     
294.       if Input.trigger?(Input::B)
     
295.         # キャンセル SE を演奏
     
296.         $game_system.se_play($data_system.cancel_se)
     
297.         # アイテムの場合
     
298.         if $game_temp.teleport_item != nil
     
299.           # アイテム取得
     
300.           item = $game_temp.teleport_item
     
301.           # 消耗する場合は 1 個戻す
     
302.           $game_party.gain_item(item.id, 1) if item.consumable
     
303.           # アイテム使用解除
     
304.           $game_temp.teleport_item = nil
     
305.         # スキルの場合
     
306.         elsif $game_temp.teleport_user != nil
     
307.           # 使用者のSPを回復
     
308.           $game_temp.teleport_user.sp += $game_temp.teleport_cost_sp
     
309.           # 使用者、消費SPを解除
     
310.           $game_temp.teleport_user = nil
     
311.           $game_temp.teleport_cost_sp = 0
     
312.         end
     
313.         # トランジション準備
     
314.         Graphics.freeze
     
315.         # ループ離脱
     
316.         break
     
317.       end
     
318.       # C ボタンが押された場合
     
319.       if Input.trigger?(Input::C)
     
320.         # テレポート場所を取得
     
321.         dest = @teleport_window.dest
     
322.         # 空欄を選択した場合
     
323.         if dest == nil
     
324.           # ブザー SE を演奏
     
325.           $game_system.se_play($data_system.buzzer_se)
     
326.           # ループ再開
     
327.           next
     
328.         end
     
329.         # 移動先を設定
     
330.         $game_temp.player_new_map_id = dest[1]
     
331.         # プレイヤーの位置を設定
     
332.         $game_temp.player_new_x = dest[2]
     
333.         $game_temp.player_new_y = dest[3]
     
334.         # プレイヤーの向きを設定
     
335.         $game_temp.player_new_direction = dest[4]
     
336.         # テレポート実行フラグをオン
     
337.         teleport_flag = true
     
338.         # ループ離脱
     
339.         break
     
340.       end
     
341.     }
     
342.     # テレポートウィンドウを消去
     
343.     @teleport_window.visible = false
     
344.     @teleport_window.active = false
     
345.     # テレポート実行の場合
     
346.     if teleport_flag
     
347.       # プレイヤー場所移動フラグをセット
     
348.       $game_temp.player_transferring = true
     
349.       # トランジション実行フラグをセット
     
350.       $game_temp.transition_processing = true
     
351.       # トランジション準備
     
352.       Graphics.freeze
     
353.       # テレポート SE を演奏
     
354.       if KGC::TELEPORT_SE.is_a?(RPG::AudioFile)
     
355.         $game_system.se_play(KGC::TELEPORT_SE)
     
356.       elsif KGC::TELEPORT_SE.is_a?(String)
     
357.         Audio.se_play("Audio/SE/" + KGC::TELEPORT_SE)
     
358.       end
     
359.       # 場所移動実行
     
360.       transfer_player
     
361.     else
     
362.       # トランジション実行
     
363.       Graphics.transition
     
364.     end
     
365.   end
     
366. end
     
367. 
     
368. #★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
     
369. 
     
370. #==============================================================================
     
371. # ■ Scene_Item
     
372. #==============================================================================
     
373. 
     
374. class Scene_Item
     
375.   #--------------------------------------------------------------------------
     
376.   # ● フレーム更新 (アイテムウィンドウがアクティブの場合)
     
377.   #--------------------------------------------------------------------------
     
378.   alias update_item_KGC_Teleport update_item
     
379.   def update_item
     
380.     # C ボタンが押された場合
     
381.     if Input.trigger?(Input::C)
     
382.       # アイテムウィンドウで現在選択されているデータを取得
     
383.       @item = @item_window.item
     
384.       # テレポート属性を持っている場合
     
385.       if @item != nil && @item.is_a?(RPG::Item) &&
     
386.           @item.element_set.include?($game_special_elements["teleport"])
     
387.         # 使用できる場合
     
388.         if $game_system.teleport_permit && @item.is_a?(RPG::Item) &&
     
389.             $game_party.item_can_use?(@item.id)
     
390.           # アイテムの使用時 SE を演奏
     
391.           $game_system.se_play(@item.menu_se)
     
392.           # 消耗品の場合は減らす
     
393.           $game_party.lose_item(@item.id, 1) if @item.consumable
     
394.           # 使用アイテムを保存
     
395.           $game_temp.teleport_item = @item
     
396.           # テレポート呼び出しフラグをセット
     
397.           $game_temp.teleport_calling = true
     
398.           # マップ画面に切り替え
     
399.           $scene = Scene_Map.new
     
400.         else
     
401.           # ブザー SE を演奏
     
402.           $game_system.se_play($data_system.buzzer_se)
     
403.           return
     
404.         end
     
405.         return
     
406.       end
     
407.     end
     
408. 
     
409.     # 元の処理を実行
     
410.     update_item_KGC_Teleport
     
411.   end
     
412. end
     
413. 
     
414. #★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
     
415. 
     
416. #==============================================================================
     
417. # ■ Scene_Skill
     
418. #==============================================================================
     
419. 
     
420. class Scene_Skill
     
421.   #--------------------------------------------------------------------------
     
422.   # ● フレーム更新 (スキルウィンドウがアクティブの場合)
     
423.   #--------------------------------------------------------------------------
     
424.   alias update_skill_KGC_Teleport update_skill
     
425.   def update_skill
     
426.     # C ボタンが押された場合
     
427.     if Input.trigger?(Input::C)
     
428.       # スキルウィンドウで現在選択されているデータを取得
     
429.       @skill = @skill_window.skill
     
430.       # テレポート属性を持っている場合
     
431.       if @skill != nil && @skill.element_set.include?($game_special_elements["teleport"])
     
432.         # 使用できる場合
     
433.         if @skill != nil && @actor.skill_can_use?(@skill.id) &&
     
434.             $game_system.teleport_permit
     
435.           # スキルの使用時 SE を演奏
     
436.           $game_system.se_play(@skill.menu_se)
     
437.           # SP消費
     
438.           @actor.sp -= @skill.sp_cost
     
439.           # 使用者・消費SPを保存
     
440.           $game_temp.teleport_user = @actor
     
441.           $game_temp.teleport_cost_sp = @skill.sp_cost
     
442.           # テレポート呼び出しフラグをセット
     
443.           $game_temp.teleport_calling = true
     
444.           # マップ画面に切り替え
     
445.           $scene = Scene_Map.new
     
446.         else
     
447.           # ブザー SE を演奏
     
448.           $game_system.se_play($data_system.buzzer_se)
     
449.           return
     
450.         end
     
451.         # 戻る
     
452.         return
     
453.       end
     
454.     end
     
455. 
     
456.     # 元の処理を実行
     
457.     update_skill_KGC_Teleport
     
458.   end
     
459. end
     

复制代码

ikki

脚本来源：日本KGC网站
脚本说明：
導入後、カスタマイズ項目を好みに応じて変更してください。

変更後、属性[テレポート]を作成し、スキル・アイテムにセットします。
これでテレポート効果を持つスキル・アイテムの完成です。

イベントコマンド「スクリプト」で
  $game_system.teleport_permit = false
というスクリプトを入力すると、テレポートを禁止できます。
(許可する場合は true を指定)

テレポート先を追加する命令は
  Teleport.add(name, id, x, y[, dir])
  Teleport.add_now_place
の２種類があります。

前者は転送場所をマップID・X座標・Y座標で直接指定します。
nameは転送先の名前、dirは転送後のプレイヤーの向き(省略可)です。

後者は現在地をそのままテレポート先に追加します。
マップ名は、マップツリーから自動取得されます。

テレポート先を削除する命令は
  Teleport.delete(name)
です。
nameに指定した名前のテレポート先が削除されます。
{/hx}不好意思，不会翻译了，害怕翻译后反而看不懂，所以，把原说明直接放上了{/hx}
效果图：

1. 
   
2. #_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/
   
3. #_/　　◆テレポート － KGC_Teleport◆
   
4. #_/----------------------------------------------------------------------------
   
5. #_/　200xに存在した「テレポート」もどきを作成します。
   
6. #_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/
   
7. 
   
8. #==============================================================================
   
9. # ★ カスタマイズ項目 ★
   
10. #==============================================================================
    
11. 
    
12. module KGC
    
13.   # ◆テレポート SE
    
14.   #  ≪"SE ファイル名"[, Volume, Pitch]≫
    
15.   #  TELEPORT_SE = "018-Teleport01"  ←のようにファイル名だけ指定してもOK
    
16.   TELEPORT_SE = RPG::AudioFile.new("018-Teleport01", 100)
    
17. end
    
18. 
    
19. #★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
    
20. 
    
21. $imported = {} if $imported == nil
    
22. $imported["Teleport"] = true
    
23. 
    
24. if $game_special_elements == nil
    
25.   $game_special_elements = {}
    
26.   $data_system = load_data("Data/System.rxdata")
    
27. end
    
28. # テレポート属性
    
29. $game_special_elements["teleport"] = $data_system.elements.index("随意传送")
    
30. 
    
31. #★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
    
32. 
    
33. module Teleport
    
34.   #--------------------------------------------------------------------------
    
35.   # ● テレポート先の追加
    
36.   #     name : 転送先の名前
    
37.   #     id   : 転送先のマップID
    
38.   #     x    : 転送先のX座標
    
39.   #     y    : 転送先のY座標
    
40.   #     dir  : 転送後の向き(省略時：下向き)
    
41.   #--------------------------------------------------------------------------
    
42.   def self.add(name, id, x, y, dir = 2)
    
43.     # 既に同じ名前が存在する場合は戻る
    
44.     return if ($game_system.teleport_dest.find { |d| d[0] == name }) != nil
    
45.     # テレポート先に追加
    
46.     $game_system.teleport_dest << [name, id, x, y, dir]
    
47.   end
    
48.   #--------------------------------------------------------------------------
    
49.   # ● 現在地をテレポート先に追加
    
50.   #--------------------------------------------------------------------------
    
51.   def self.add_now_place
    
52.     # 現在地を取得
    
53.     place = [$game_map.map_name,
    
54.       $game_map.map_id,
    
55.       $game_player.x,
    
56.       $game_player.y,
    
57.       $game_player.direction]
    
58.     # 既に同じ名前が存在する場合は戻る
    
59.     return if ($game_system.teleport_dest.find { |d| d[0] == name }) != nil
    
60.     # テレポート先に追加
    
61.     $game_system.teleport_dest << place
    
62.   end
    
63.   #--------------------------------------------------------------------------
    
64.   # ● テレポート先を削除
    
65.   #     name : 転送先の名前
    
66.   #--------------------------------------------------------------------------
    
67.   def self.delete(name)
    
68.     # 該当するテレポート先を削除
    
69.     $game_system.teleport_dest.each { |dest|
    
70.       if dest[0] == name
    
71.         $game_system.teleport_dest.delete(dest)
    
72.         break
    
73.       end
    
74.     }
    
75.   end
    
76. end
    
77. 
    
78. #★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
    
79. 
    
80. #==============================================================================
    
81. # ■ Game_Temp
    
82. #==============================================================================
    
83. 
    
84. class Game_Temp
    
85.   #--------------------------------------------------------------------------
    
86.   # ● 公開インスタンス変数
    
87.   #--------------------------------------------------------------------------
    
88.   attr_accessor :teleport_calling         # テレポート 呼び出しフラグ
    
89.   attr_accessor :teleport_item            # テレポートアイテム
    
90.   attr_accessor :teleport_user            # テレポート使用者
    
91.   attr_accessor :teleport_cost_sp         # テレポート消費SP
    
92.   #--------------------------------------------------------------------------
    
93.   # ● オブジェクト初期化
    
94.   #--------------------------------------------------------------------------
    
95.   alias initialize_KGC_Teleport initialize
    
96.   def initialize
    
97.     # 元の処理を実行
    
98.     initialize_KGC_Teleport
    
99. 
    
100.     @teleport_item, @teleport_user = nil, nil
     
101.     @teleport_cost_sp, @teleport_calling = 0, false
     
102.   end
     
103. end
     
104. 
     
105. #★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
     
106. 
     
107. #==============================================================================
     
108. # ■ Game_System
     
109. #==============================================================================
     
110. 
     
111. class Game_System
     
112.   #--------------------------------------------------------------------------
     
113.   # ● 公開インスタンス変数
     
114.   #--------------------------------------------------------------------------
     
115.   attr_accessor :teleport_dest            # テレポート先
     
116.   attr_accessor :teleport_permit          # テレポート許可フラグ
     
117.   #--------------------------------------------------------------------------
     
118.   # ● オブジェクト初期化
     
119.   #--------------------------------------------------------------------------
     
120.   alias initialize_KGC_Teleport initialize
     
121.   def initialize
     
122.     # 元の処理を実行
     
123.     initialize_KGC_Teleport
     
124. 
     
125.     @teleport_dest, @teleport_permit = [], true
     
126.   end
     
127. end
     
128. 
     
129. #★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
     
130. 
     
131. #==============================================================================
     
132. # ■ Game_Map
     
133. #==============================================================================
     
134. 
     
135. class Game_Map
     
136.   #--------------------------------------------------------------------------
     
137.   # ● マップ名取得
     
138.   #--------------------------------------------------------------------------
     
139.   def map_name
     
140.     # MapInfo.rxdata をロード
     
141.     mapinfo = load_data("Data/MapInfos.rxdata")
     
142.     # マップ名を返す
     
143.     return mapinfo[@map_id].name
     
144.   end
     
145. end
     
146. 
     
147. #★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
     
148. 
     
149. #==============================================================================
     
150. # ■ Window_Teleport
     
151. #------------------------------------------------------------------------------
     
152. # 　テレポート先一覧を表示するウィンドウです。
     
153. #==============================================================================
     
154. 
     
155. class Window_Teleport < Window_Selectable
     
156.   #--------------------------------------------------------------------------
     
157.   # ● オブジェクト初期化
     
158.   #--------------------------------------------------------------------------
     
159.   def initialize
     
160.     super(80, 80, 480, 320)
     
161.     @column_max = 2
     
162.     refresh
     
163.     self.back_opacity = 160
     
164.     self.visible = false
     
165.     self.index = 0
     
166.   end
     
167.   #--------------------------------------------------------------------------
     
168.   # ● テレポート先の取得
     
169.   #--------------------------------------------------------------------------
     
170.   def dest
     
171.     return @data[self.index]
     
172.   end
     
173.   #--------------------------------------------------------------------------
     
174.   # ● リフレッシュ
     
175.   #--------------------------------------------------------------------------
     
176.   def refresh
     
177.     if self.contents != nil
     
178.       self.contents.dispose
     
179.       self.contents = nil
     
180.     end
     
181.     @data = []
     
182.     # テレポート先を追加
     
183.     $game_system.teleport_dest.each { |d| @data << d }
     
184.     # 項目数が 0 でなければビットマップを作成し、全項目を描画
     
185.     @item_max = @data.size
     
186.     if @item_max > 0
     
187.       self.contents = Bitmap.new(width - 32, row_max * 32)
     
188.       for i in 0...@item_max
     
189.         draw_item(i)
     
190.       end
     
191.     end
     
192.   end
     
193.   #--------------------------------------------------------------------------
     
194.   # ● 項目の描画
     
195.   #     index : 項目番号
     
196.   #--------------------------------------------------------------------------
     
197.   def draw_item(index)
     
198.     dest = @data[index]
     
199.     x = 4 + index % 2 * 224
     
200.     y = index / 2 * 32
     
201.     self.contents.draw_text(x, y, 224, 32, dest[0], 0)
     
202.   end
     
203.   #--------------------------------------------------------------------------
     
204.   # ● カーソルの矩形更新
     
205.   #--------------------------------------------------------------------------
     
206.   def update_cursor_rect
     
207.     # カーソル位置が 0 未満の場合
     
208.     if @index < 0
     
209.       self.cursor_rect.empty
     
210.       return
     
211.     end
     
212.     # 現在の行を取得
     
213.     row = @index / @column_max
     
214.     # 現在の行が、表示されている先頭の行より前の場合
     
215.     if row < self.top_row
     
216.       # 現在の行が先頭になるようにスクロール
     
217.       self.top_row = row
     
218.     end
     
219.     # 現在の行が、表示されている最後尾の行より後ろの場合
     
220.     if row > self.top_row + (self.page_row_max - 1)
     
221.       # 現在の行が最後尾になるようにスクロール
     
222.       self.top_row = row - (self.page_row_max - 1)
     
223.     end
     
224.     # カーソルの幅を計算
     
225.     cursor_width = (self.width - 32) / @column_max
     
226.     # カーソルの座標を計算
     
227.     x = @index % @column_max * cursor_width
     
228.     y = @index / @column_max * 32 - self.oy
     
229.     # カーソルの矩形を更新
     
230.     self.cursor_rect.set(x, y, cursor_width, 32)
     
231.   end
     
232. end
     
233. 
     
234. #★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
     
235. 
     
236. #==============================================================================
     
237. # ■ Scene_Map
     
238. #==============================================================================
     
239. 
     
240. class Scene_Map
     
241.   #--------------------------------------------------------------------------
     
242.   # ● メイン処理
     
243.   #--------------------------------------------------------------------------
     
244.   alias main_KGC_Teleport main
     
245.   def main
     
246.     # テレポートウィンドウ作成
     
247.     @teleport_window = Window_Teleport.new
     
248. 
     
249.     # 元の処理を実行
     
250.     main_KGC_Teleport
     
251. 
     
252.     # ウィンドウを解放
     
253.     @teleport_window.dispose
     
254.   end
     
255.   #--------------------------------------------------------------------------
     
256.   # ● フレーム更新
     
257.   #--------------------------------------------------------------------------
     
258.   alias update_KGC_Teleport update
     
259.   def update
     
260.     # 元の処理を実行
     
261.     update_KGC_Teleport
     
262. 
     
263.     # プレイヤーの移動中ではない場合
     
264.     unless $game_player.moving?
     
265.       # テレポート処理呼び出し中の場合
     
266.       if $game_temp.teleport_calling
     
267.         call_teleport
     
268.       end
     
269.     end
     
270.   end
     
271.   #--------------------------------------------------------------------------
     
272.   # ● テレポート処理の呼び出し
     
273.   #--------------------------------------------------------------------------
     
274.   def call_teleport
     
275.     # テレポート呼び出しフラグ解除
     
276.     $game_temp.teleport_calling = false
     
277.     # テレポート実行フラグをオフ
     
278.     teleport_flag = false
     
279.     # テレポートウィンドウを表示
     
280.     @teleport_window.refresh
     
281.     @teleport_window.opacity = 0
     
282.     @teleport_window.visible = true
     
283.     @teleport_window.active = true
     
284.     loop {
     
285.       # ウィンドウを更新
     
286.       @teleport_window.opacity += 16 if @teleport_window.opacity < 255
     
287.       @teleport_window.update
     
288.       # ゲーム画面を更新
     
289.       Graphics.update
     
290.       # 入力情報を更新
     
291.       Input.update
     
292. 
     
293.       # B ボタンが押された場合
     
294.       if Input.trigger?(Input::B)
     
295.         # キャンセル SE を演奏
     
296.         $game_system.se_play($data_system.cancel_se)
     
297.         # アイテムの場合
     
298.         if $game_temp.teleport_item != nil
     
299.           # アイテム取得
     
300.           item = $game_temp.teleport_item
     
301.           # 消耗する場合は 1 個戻す
     
302.           $game_party.gain_item(item.id, 1) if item.consumable
     
303.           # アイテム使用解除
     
304.           $game_temp.teleport_item = nil
     
305.         # スキルの場合
     
306.         elsif $game_temp.teleport_user != nil
     
307.           # 使用者のSPを回復
     
308.           $game_temp.teleport_user.sp += $game_temp.teleport_cost_sp
     
309.           # 使用者、消費SPを解除
     
310.           $game_temp.teleport_user = nil
     
311.           $game_temp.teleport_cost_sp = 0
     
312.         end
     
313.         # トランジション準備
     
314.         Graphics.freeze
     
315.         # ループ離脱
     
316.         break
     
317.       end
     
318.       # C ボタンが押された場合
     
319.       if Input.trigger?(Input::C)
     
320.         # テレポート場所を取得
     
321.         dest = @teleport_window.dest
     
322.         # 空欄を選択した場合
     
323.         if dest == nil
     
324.           # ブザー SE を演奏
     
325.           $game_system.se_play($data_system.buzzer_se)
     
326.           # ループ再開
     
327.           next
     
328.         end
     
329.         # 移動先を設定
     
330.         $game_temp.player_new_map_id = dest[1]
     
331.         # プレイヤーの位置を設定
     
332.         $game_temp.player_new_x = dest[2]
     
333.         $game_temp.player_new_y = dest[3]
     
334.         # プレイヤーの向きを設定
     
335.         $game_temp.player_new_direction = dest[4]
     
336.         # テレポート実行フラグをオン
     
337.         teleport_flag = true
     
338.         # ループ離脱
     
339.         break
     
340.       end
     
341.     }
     
342.     # テレポートウィンドウを消去
     
343.     @teleport_window.visible = false
     
344.     @teleport_window.active = false
     
345.     # テレポート実行の場合
     
346.     if teleport_flag
     
347.       # プレイヤー場所移動フラグをセット
     
348.       $game_temp.player_transferring = true
     
349.       # トランジション実行フラグをセット
     
350.       $game_temp.transition_processing = true
     
351.       # トランジション準備
     
352.       Graphics.freeze
     
353.       # テレポート SE を演奏
     
354.       if KGC::TELEPORT_SE.is_a?(RPG::AudioFile)
     
355.         $game_system.se_play(KGC::TELEPORT_SE)
     
356.       elsif KGC::TELEPORT_SE.is_a?(String)
     
357.         Audio.se_play("Audio/SE/" + KGC::TELEPORT_SE)
     
358.       end
     
359.       # 場所移動実行
     
360.       transfer_player
     
361.     else
     
362.       # トランジション実行
     
363.       Graphics.transition
     
364.     end
     
365.   end
     
366. end
     
367. 
     
368. #★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
     
369. 
     
370. #==============================================================================
     
371. # ■ Scene_Item
     
372. #==============================================================================
     
373. 
     
374. class Scene_Item
     
375.   #--------------------------------------------------------------------------
     
376.   # ● フレーム更新 (アイテムウィンドウがアクティブの場合)
     
377.   #--------------------------------------------------------------------------
     
378.   alias update_item_KGC_Teleport update_item
     
379.   def update_item
     
380.     # C ボタンが押された場合
     
381.     if Input.trigger?(Input::C)
     
382.       # アイテムウィンドウで現在選択されているデータを取得
     
383.       @item = @item_window.item
     
384.       # テレポート属性を持っている場合
     
385.       if @item != nil && @item.is_a?(RPG::Item) &&
     
386.           @item.element_set.include?($game_special_elements["teleport"])
     
387.         # 使用できる場合
     
388.         if $game_system.teleport_permit && @item.is_a?(RPG::Item) &&
     
389.             $game_party.item_can_use?(@item.id)
     
390.           # アイテムの使用時 SE を演奏
     
391.           $game_system.se_play(@item.menu_se)
     
392.           # 消耗品の場合は減らす
     
393.           $game_party.lose_item(@item.id, 1) if @item.consumable
     
394.           # 使用アイテムを保存
     
395.           $game_temp.teleport_item = @item
     
396.           # テレポート呼び出しフラグをセット
     
397.           $game_temp.teleport_calling = true
     
398.           # マップ画面に切り替え
     
399.           $scene = Scene_Map.new
     
400.         else
     
401.           # ブザー SE を演奏
     
402.           $game_system.se_play($data_system.buzzer_se)
     
403.           return
     
404.         end
     
405.         return
     
406.       end
     
407.     end
     
408. 
     
409.     # 元の処理を実行
     
410.     update_item_KGC_Teleport
     
411.   end
     
412. end
     
413. 
     
414. #★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
     
415. 
     
416. #==============================================================================
     
417. # ■ Scene_Skill
     
418. #==============================================================================
     
419. 
     
420. class Scene_Skill
     
421.   #--------------------------------------------------------------------------
     
422.   # ● フレーム更新 (スキルウィンドウがアクティブの場合)
     
423.   #--------------------------------------------------------------------------
     
424.   alias update_skill_KGC_Teleport update_skill
     
425.   def update_skill
     
426.     # C ボタンが押された場合
     
427.     if Input.trigger?(Input::C)
     
428.       # スキルウィンドウで現在選択されているデータを取得
     
429.       @skill = @skill_window.skill
     
430.       # テレポート属性を持っている場合
     
431.       if @skill != nil && @skill.element_set.include?($game_special_elements["teleport"])
     
432.         # 使用できる場合
     
433.         if @skill != nil && @actor.skill_can_use?(@skill.id) &&
     
434.             $game_system.teleport_permit
     
435.           # スキルの使用時 SE を演奏
     
436.           $game_system.se_play(@skill.menu_se)
     
437.           # SP消費
     
438.           @actor.sp -= @skill.sp_cost
     
439.           # 使用者・消費SPを保存
     
440.           $game_temp.teleport_user = @actor
     
441.           $game_temp.teleport_cost_sp = @skill.sp_cost
     
442.           # テレポート呼び出しフラグをセット
     
443.           $game_temp.teleport_calling = true
     
444.           # マップ画面に切り替え
     
445.           $scene = Scene_Map.new
     
446.         else
     
447.           # ブザー SE を演奏
     
448.           $game_system.se_play($data_system.buzzer_se)
     
449.           return
     
450.         end
     
451.         # 戻る
     
452.         return
     
453.       end
     
454.     end
     
455. 
     
456.     # 元の処理を実行
     
457.     update_skill_KGC_Teleport
     
458.   end
     
459. end
     

复制代码

白鬼

除了汉字其余的完全看不懂了。
图片也是个叉叉。

ikki

{/gg}图片点一下就能看到了{/gg}

雷欧纳德

转地球村...

叼烟的男孩

MS只要公共事件我就可以做到

OCTSJimmy

汗……我还以为什么好玩的东东呢……

明显一个瞬移装置嘛……汗……

got3

  还可以...不过是日本的..

越前リョーマ

传送的话要是传的地方不多或不嫌麻烦完全可以用事件的地图传送和变量完成……