Cerca nel Forum

Nome Script: Comandi segreti nel Titolo Versione: 1.00 Autore/i: kaisouryouiki Informazioni: Lo script aggiunge dei comandi segreti nel titolo, vale a dire che se si digiterà una sequenza dei tasti impostati nello script, questo ti manda in una mappa prestabilita =) Utile ad esempio se si vuole mandare il giocatore in un'area segreta dove guadagna più HP etc (esempio venuto sul momento) ^^ Istruzioni: Inserite lo script sopra Main. Questo pezzo di codice poi: [c]SMT = [2, 10, 13][/c] fa riferimtno a: il 2 è l'ID della mappa in cui si verrà teletrasportati, e 10/13 le coorinate della mappa. Per modificare la sequenza dei tasti, fate riferimento a questo pezzo di codice: # 1 => DOWN (↓) # 2 => LEFT (←) # 3 => RIGHT (→) # 4 => UP (↑) # 5 => A (Shift) # 6 => B # 7 => X (A) # 8 => Y (S) # 9 => Z (D) # 10 => L (Q) # ゲームセレクトシステム導入時は使用不可 # 11 => R (W) # ゲームセレクトシステム導入時は使用不可 TSC = [4, 1, 3, 2] Dove 4,1,3,2 corrispondono quindi ai tasti (come indicato) Su, Giù, Destra e Sinistra. Script: =begin ★タイトル隠しコマンド★ タイトル画面にて、特定のキーを特定の順番で入力した際に、 指定マップへ飛ばすことができます。 ● 仕様 ●========================================================== 入力を間違えた時点で、入力情報はリセットされます。 ==================================================================== ● 挿入位置 ●====================================================== 「スタートコマンド拡張」導入時は、それより下にお願いします。 ==================================================================== ver1.00 Last Update : 2010/07/29 7/29 : 新規 ろかん　　　http://kaisouryouiki.web.fc2.com/ =end #=========================================== # 設定箇所 #=========================================== module Rokan module Secret_Command # 隠しコマンド成功時に飛ばされるマップ情報 # [開始マップID, マップX座標, マップY座標] SMT = [2, 10, 13] # 隠しコマンドの内容 # 正しい入力順を以下の値を使って順番に設定 # 1 => DOWN (↓) # 2 => LEFT (←) # 3 => RIGHT (→) # 4 => UP (↑) # 5 => A (Shift) # 6 => B ( # 7 => X (A) # 8 => Y (S) # 9 => Z (D) # 10 => L (Q) # ゲームセレクトシステム導入時は使用不可 # 11 => R (W) # ゲームセレクトシステム導入時は使用不可 TSC = [4, 1, 3, 2] # 隠しコマンド失敗判定をとるコマンド間のフレーム数 # ここで指定したフレーム数の間、何も入力がないと入力情報はリセットされます。 SIC = 90 # 隠しコマンド成功時に演奏するSE SSS = RPG::SE.new("Decision1", 80, 70) end end #=========================================== # ここまで #=========================================== $rsi = {} if $rsi == nil $rsi["タイトル隠しコマンド"] = true class Scene_Title < Scene_Base #-------------------------------------------------------------------------- # ● インクルード Rokan::Secret_Command #-------------------------------------------------------------------------- include Rokan::Secret_Command #-------------------------------------------------------------------------- # ● フレーム更新 ※再定義 #-------------------------------------------------------------------------- alias secret_update update def update @input_sets ||= [] @interval_count ||= SIC secret_update secret_input to_secret_map if success_secret? end #-------------------------------------------------------------------------- # ● 隠しコマンド入力更新 #-------------------------------------------------------------------------- def secret_input if Input.trigger?(Input::DOWN) @input_sets << 1 elsif Input.trigger?(Input::LEFT) @input_sets << 2 elsif Input.trigger?(Input::RIGHT) @input_sets << 3 elsif Input.trigger?(Input::UP) @input_sets << 4 elsif Input.trigger?(Input::A) @input_sets << 5 elsif Input.trigger?(Input:: @input_sets << 6 elsif Input.trigger?(Input:) @input_sets << 7 elsif Input.trigger?(Input::Y) @input_sets << 8 elsif Input.trigger?(Input::Z) @input_sets << 9 elsif Input.trigger?(Input::L) @input_sets << 10 elsif Input.trigger?(Input::R) @input_sets << 11 elsif ! @input_sets.empty? @interval_count -= 1 @input_sets << 0 if @interval_count.zero? return end @interval_count = SIC end #-------------------------------------------------------------------------- # ● 隠しコマンド成功判定 #-------------------------------------------------------------------------- def success_secret? @input_sets.size.times do |i| unless @input_sets[i] == TSC[i] @input_sets = [] break end end return (@input_sets.size == TSC.size) end #-------------------------------------------------------------------------- # ● 隠しマップへ移行 #-------------------------------------------------------------------------- def to_secret_map SSS.play $game_party.setup_starting_members $game_map.setup(SMT[0]) $game_player.moveto(SMT[1], SMT[2]) $game_player.refresh $scene = Scene_Map.new RPG::BGM.fade(1500) close_command_window Graphics.fadeout(60) Graphics.wait(40) Graphics.frame_count = 0 RPG::BGM.stop $game_map.autoplay end end