0
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:
SMT = [2, 10, 13]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 (:grossourire
# 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 (:hurle
# 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::B)
@input_sets << 6
elsif Input.trigger?(Input:::lei
@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
