최근 라이딩 스크립트를 얻게 되었습니다.
용을 타고 다니는 건데
시작하는 맵에서만 작동이 되더라더군요
그래서 이벤트로 스크립트를 사용하면 될줄 알았는데
이벤 트 스크립트에서는 스크립트 입력 이 안 됩니다.
그러니 점 도와주세요.....
혹시나 해서 라이딩은 올려 놨습니다.
%라이딩 스크립트가 있고
#==============================================================================
#
# ■?り物?張 □Ver. 2.81 □製作者：月紳士
# ?RPGツク?ルVX用 RGSS2スクリプト
#
# ●…書き換えメソッド(競合注意) ◎…メソッドのエイリアス ○…新規メソッド
#
# ※二次配布禁止！配布元には利用規約があります。必ずそちらを見てください。
#------------------------------------------------------------------------------
# 更新履?
# Ver. 2.81 茂みによるエンカウント?加が飛行中に適用されないよう修正。
# Ver. 2.80 ?り物ステ?トの機能を追加。
# Ver. 2.70 エンカウントしない?り物機能が未??だった?、追加。
# Ver. 2.63 前回の修正が不十分だったことによる不具合を再修正。
# Ver. 2.62 イベント?り物を?り?いだ際に再度?れなくなる不具合を修正。
# Ver. 2.61 下記更新の微調整。
# Ver. 2.60 HARTS HORN?の「隊列?行スクリプト」?用動作の修正と
# 月紳士のスクリプト【パ?ティ?メンバ?の追?】?用時用の更新。
# Ver. 2.51 スクリプトの見直しと細かい動作修正。
# Ver. 2.50 ?り物に?った?態でのセ?ブ?ロ?ド時の不具合を解消。
#
# ※これ以前の更新履?はマニュアルを?考にしてください。
#==============================================================================
=begin
このスクリプトで追加されるのは以下の機能です。
○馬、大型飛行船、魔法の絨?というみっつの新しい?り物を追加。
○キャラクタ?が上に?る、騎?タイプの?り物を作成できる。
○イベントにプレイヤ?を?り?ませたり、騎?させたりできる。
○イベントにイベントを騎?させることができる。
○システムの?用にて、イベントを持ち上げる、運ぶ、といったことも可能に。
※ 詳しい?明はマニュアルをご?ください。
=end
#==============================================================================
# □ ?り物?張?モジュ?ル（カスタマイズ項目）
#==============================================================================
module Expansion_Vehicle
# 馬の初期設定 # -----------------------------------------------------
# 初期配置するマップのID／X座標／Y座標
HORSE_MAP_ID = 0
HORSE_X = 0
HORSE_Y = 0
# ?像ファイルの名前／?像ファイルのINDEX
HORSE_FILE_NAME = "Animal"
HORSE_FILE_INDEX = 5
# BGMファイルの名前
HORSE_BGM_NAME = "만주의 매 (놈놈놈 OST)"
# 大型飛行船の初期設定 # ----------------------------------------------
# 初期配置するマップのID／X座標／Y座標
BIG_AIRSHIP_MAP_ID = 1
BIG_AIRSHIP_X = 11
BIG_AIRSHIP_Y = 10
# ?像ファイルの名前／?像ファイルのINDEX
BIG_AIRSHIP_FILE_NAME = "$Wivern"
BIG_AIRSHIP_FILE_INDEX = 0
# BGMファイルの名前
BIG_AIRSHIP_BGM_NAME = "Scene9"
# 魔法の絨?の初期設定 # ----------------------------------------------
# 初期配置するマップのID／X座標／Y座標
MAGIC_CARPET_MAP_ID = 0
MAGIC_CARPET_X = 0
MAGIC_CARPET_Y = 0
# ?像ファイルの名前／?像ファイルのINDEX
MAGIC_CARPET_FILE_NAME = "Ride"
MAGIC_CARPET_FILE_INDEX = 6
# BGMファイルの名前
MAGIC_CARPET_BGM_NAME = "Airship"
# その他の設定 # ------------------------------------------------------
# エンカウントしない?り物のID
NOT_ENCOUNTER_VEHICIE_ID = [0, 1, 2, 3, 4, 5]
# ID = 0:小型船／1:大型船／2:飛行船／3:馬／4:大型飛行船／5:魔法の絨?
# ?り物ステ?ト
BOAT_STATE = [] # 小型船
SHIP_STATE = [] # 大型船
AIRSHIP_STATE = [] # 飛行船
HORSE_STATE = [] # 馬
BIG_AIRSHIP_STATE = [] # 大型飛行船
MAGIC_CARPET_STATE = [] # 魔法の絨?
end
#==============================================================================
# □ Riding_Data
#------------------------------------------------------------------------------
# 騎?時の?像?理に必要なデ?タを扱うクラスです。このクラスのインスタンスは
# $riding_data で?照されます。
#==============================================================================
class Riding_Data
#--------------------------------------------------------------------------
# ○ 騎?用キャラクタ??デ?タ
#--------------------------------------------------------------------------
# @riding_pct_name # 騎?時に重ねる?像のファイル名
# # ※ ここを "self" にすると元?のキャラクタ??像を
# # 騎?時に重ねる?像に使います。
# @riding_pct_index # 騎?時に重ねる?像のインデックス
# @positioning_down # 下向きの際の位置修正値
# @positioning_left # 左向きの際の位置修正値
# @positioning_right # 右向きの際の位置修正値(省略可?省略時は左向きの逆の値を使用)
# @positioning_up # 上向きの際の位置修正値
# @priority_type # 待機時のふさわしいプライオリティ(0 の時のみ設定)
# @object_type # ?る側と?られる側の?理逆?(する場合のみtrueを定義)
# # ※ 物を持ち上げる表現に使います。
#--------------------------------------------------------------------------
def make_ride_data
# 騎馬
@character_name = "Animal"
@character_index = 5
@riding_pct_name = "Ride"
@riding_pct_index = 0
@positioning_down = [[0, -18], [0, -17], [0, -18]]
@positioning_left = [[4, -17], [4, -16], [4, -17]]
@positioning_up = [[0, -15], [0, -14], [0, -15]]
set_ride_data
# オオカミ
@character_name = "Animal"
@character_index = 6
@riding_pct_name = "Ride"
@riding_pct_index = 1
@positioning_down = [[0, -20], [0, -19], [0, -20]]
@positioning_left = [[4, -16], [4, -15], [4, -16]]
@positioning_up = [[0, -15], [0, -14], [0, -15]]
set_ride_data
# いかだ
@character_name = "Ride"
@character_index = 2
@positioning_down = [[0, -13], [0, -12], [0, -11]]
@positioning_left = [[0, -11], [0, -12], [0, -13]]
@positioning_up = [[0, -15], [0, -14], [0, -13]]
@priority_type = 0
set_ride_data
# フロ?ト
@character_name = "Ride"
@character_index = 5
@positioning_down = [[0, -11], [0, -12], [0, -13]]
@positioning_left = [[0, -11], [0, -12], [0, -13]]
@positioning_up = [[0, -11], [0, -12], [0, -13]]
@priority_type = 0
set_ride_data
# ペガサス
@character_name = "Ride"
@character_index = 3
@riding_pct_name = "Ride"
@riding_pct_index = 7
@positioning_down = [[0, -19], [0, -20], [0, -21]]
@positioning_left = [[4, -19], [4, -18], [4, -17]]
@positioning_up = [[0, -15], [0, -14], [0, -13]]
set_ride_data
# トロッコ
@character_name = "Vehicle"
@character_index = 6
@riding_pct_name = "Ride"
@riding_pct_index = 4
@positioning_down = [[0, -10], [0, -11], [0, -10]]
@positioning_left = [[-2, -10], [-1, -10], [-2, -10]]
@positioning_right = [[1, -10], [2, -10], [1, -10]]
@positioning_up = [[0, -10], [0, -11], [0, -10]]
set_ride_data
# オブジェクト
@character_name = "!$Object"
@riding_pct_name = "self"
@positioning_down = [[-1, -9], [0, -10], [1, -9]]
@positioning_left = [[-6, -11], [-5, -10], [-4, -9]]
@positioning_up = [[1, -11], [0, -12], [-1, -11]]
@object_type = true
set_ride_data
# アイテム
@character_name = "$Item"
@riding_pct_name = "self"
@positioning_down = [[-1, 1], [0, 0], [1, 1]]
@positioning_left = [[-6, -1], [-5, 0], [-4, 1]]
@positioning_up = [[1, -1], [0, -2], [-1, -1]]
@object_type = true
set_ride_data
# 魔法の絨?
@character_name = "Ride"
@character_index = 6
@positioning_down = [[0, -12], [0, -13], [0, -14]]
@positioning_left = [[0, -10], [0, -11], [0, -12]]
@positioning_up = [[0, -12], [0, -13], [0, -14]]
@priority_type = 0
set_ride_data
# 飛?
@character_name = "$Wivern"
@character_index = 0
@riding_pct_name = "$Wivern_Ride"
@riding_pct_index = 0
@positioning_down = [[0, -25], [0, -24], [0, -24]]
@positioning_left = [[7, -19], [7, -19], [7, -20]]
@positioning_up = [[0, -24], [0, -23], [0, -23]]
set_ride_data
# ランタン
@character_name = "!Flame"
@character_index = 1
@riding_pct_name = "self"
@positioning_down = [[-6, 5], [-5, 4], [-4, 5]]
@positioning_left = [[-3, 3], [-2, 4], [-1, 5]]
@positioning_up = [[7, 1], [8, 0], [7, -1]]
@object_type = true
set_ride_data
# ?玉
@character_name = "!Other1"
@character_index = 6
@riding_pct_name = "self"
@positioning_down = [[-1, 12], [0, 11], [1, 12]]
@positioning_left = [[-6, 10], [-5, 11], [-4, 12]]
@positioning_up = [[1, 10], [0, 9], [-1, 10]]
@object_type = true
set_ride_data
# ニワトリ
@character_name = "Animal"
@character_index = 2
@riding_pct_name = "self"
@positioning_down = [[-1, 2], [0, 1], [1, 2]]
@positioning_left = [[-8, -1], [-7, 0], [-6, 1]]
@positioning_up = [[1, -2], [0, -3], [-1, -2]]
@object_type = true
set_ride_data
end
#--------------------------------------------------------------------------
# ○ 公開インスタンス??（デ?タベ?ス項目の?明）
#--------------------------------------------------------------------------
# [character_name, character_index] をキ?としたハッシュとして
# 他クラスより?照します。
#--------------------------------------------------------------------------
attr_accessor :data_riding_pct_name
attr_accessor :data_riding_pct_index
attr_accessor :data_positioning_down
attr_accessor :data_positioning_left
attr_accessor :data_positioning_right
attr_accessor :data_positioning_up
attr_accessor :data_priority_type
attr_accessor :data_object_type
#--------------------------------------------------------------------------
# ○ オブジェクト初期化
#--------------------------------------------------------------------------
def initialize
@data_riding_pct_name = {}
@data_riding_pct_index = {}
@data_positioning_down = {}
@data_positioning_left = {}
@data_positioning_right = {}
@data_positioning_up = {}
@data_priority_type = {}
@data_object_type = {}
clear
make_ride_data
end
#--------------------------------------------------------------------------
# ○ クリア
#--------------------------------------------------------------------------
def clear
@character_name = ""
@character_index = 0
@riding_pct_name = ""
@riding_pct_index = 0
@positioning_down = [[0, 0], [0, 0], [0, 0]]
@positioning_left = [[0, 0], [0, 0], [0, 0]]
@positioning_right = nil
@positioning_up = [[0, 0], [0, 0], [0, 0]]
@priority_type = nil
@object_type = false
end
#--------------------------------------------------------------------------
# ○ 騎?用キャラクタ??デ?タベ?ス化
#--------------------------------------------------------------------------
def set_ride_data
key = [@character_name, @character_index]
@data_riding_pct_name[key] = @riding_pct_name
@data_riding_pct_index[key] = @riding_pct_index
@data_positioning_down[key] = @positioning_down
@data_positioning_left[key] = @positioning_left
if @positioning_right == nil
@data_positioning_right[key] = [[], [], []]
@data_positioning_right[key][0][0] = -@positioning_left[0][0]
@data_positioning_right[key][0][1] = @positioning_left[0][1]
@data_positioning_right[key][1][0] = -@positioning_left[1][0]
@data_positioning_right[key][1][1] = @positioning_left[1][1]
@data_positioning_right[key][2][0] = -@positioning_left[2][0]
@data_positioning_right[key][2][1] = @positioning_left[2][1]
else
@data_positioning_right[key] = @positioning_right
end
@data_positioning_up[key] = @positioning_up
@data_priority_type[key] = @priority_type
@data_object_type[key] = @object_type
clear
end
end
#==============================================================================
# ■ Game_Vehicle
#------------------------------------------------------------------------------
# ?り物を扱うクラスです。このクラスは Game_Map クラスの?部で使用されます。
# 現在のマップに?り物がないときは、マップ座標 (-1,-1) に設定されます。
#==============================================================================
class Game_Vehicle < Game_Character
#--------------------------------------------------------------------------
# ○ ?張の?り物のセッティング
# @move_speed : ?り物の速度
# @walk_anime : 移動時アニメ
# @step_anime : 停止時アニメ
#--------------------------------------------------------------------------
def riding_vehicle_settings
case @type
when 3 # 馬
@map_id = Expansion_Vehicle::HORSE_MAP_ID
@x = Expansion_Vehicle::HORSE_X
@y = Expansion_Vehicle::HORSE_Y
@character_name = Expansion_Vehicle::HORSE_FILE_NAME
@character_index = Expansion_Vehicle::HORSE_FILE_INDEX
@bgm = RPG::BGM.new
@bgm.name = Expansion_Vehicle::HORSE_BGM_NAME
@move_speed = 5
@walk_anime = true
@step_anime = false
when 4 # 大型飛行船
@map_id = Expansion_Vehicle::BIG_AIRSHIP_MAP_ID
@x = Expansion_Vehicle::BIG_AIRSHIP_X
@y = Expansion_Vehicle::BIG_AIRSHIP_Y
@character_name = Expansion_Vehicle::BIG_AIRSHIP_FILE_NAME
@character_index = Expansion_Vehicle::BIG_AIRSHIP_FILE_INDEX
@bgm = RPG::BGM.new
@bgm.name = Expansion_Vehicle::BIG_AIRSHIP_BGM_NAME
@move_speed = 5
@walk_anime = true
@step_anime = true
when 5 # 魔法の絨?
@map_id = Expansion_Vehicle::MAGIC_CARPET_MAP_ID
@x = Expansion_Vehicle::MAGIC_CARPET_X
@y = Expansion_Vehicle::MAGIC_CARPET_Y
@character_name = Expansion_Vehicle::MAGIC_CARPET_FILE_NAME
@character_index = Expansion_Vehicle::MAGIC_CARPET_FILE_INDEX
@bgm = RPG::BGM.new
@bgm.name = Expansion_Vehicle::MAGIC_CARPET_BGM_NAME
@move_speed = 6
@walk_anime = true
@step_anime = true
end
end
#--------------------------------------------------------------------------
# ○ ?存の?り物のセッティング
# @move_speed : ?り物の速度
# @walk_anime : 移動時アニメ
# @step_anime : 停止時アニメ
#--------------------------------------------------------------------------
def tig_ev_vehicle_initialize
case @type
when 0 # 小型船
@move_speed = 4
@walk_anime = true
@step_anime = true
when 1 # 大型船
@move_speed = 5
@walk_anime = false
@step_anime = true
when 2 # 飛行船
@move_speed = 5
@walk_anime = true
@step_anime = true
end
end
#--------------------------------------------------------------------------
# ○ 公開インスタンス??
#--------------------------------------------------------------------------
attr_reader :pattern # パタ?ン
attr_reader :bgm # ?り?み時BGM
attr_accessor :priority_type # プライオリティタイプ
attr_accessor :move_speed # 移動速度
attr_accessor :walk_anime # ?行アニメ
attr_accessor :step_anime # 足踏みアニメ
attr_accessor :instant # 一時的な呼び出しフラグ
#--------------------------------------------------------------------------
# ◎ システム設定のロ?ド
#--------------------------------------------------------------------------
alias tig_ev_load_system_settings load_system_settings
def load_system_settings
tig_ev_load_system_settings
tig_ev_vehicle_initialize
riding_vehicle_settings
@instant = false
end
#--------------------------------------------------------------------------
# ● リフレッシュ
#--------------------------------------------------------------------------
def refresh
# 位置の調整
if @driving
@map_id = $game_map.map_id
sync_with_player
elsif @map_id == $game_map.map_id
moveto(@x, @y)
end
# プライオリティタイプ調整
if [2, 4].include?(@type) # 飛行船?大型飛行船の場合
@priority_type = @driving ? 2 : vehicle_priority
else # その他の?り物
@priority_type = @driving ? 1 : vehicle_priority
end
end
#--------------------------------------------------------------------------
# ● フレ?ム更新
#--------------------------------------------------------------------------
def update
super
if [2, 4, 5].include?(@type) # 飛行船?大型飛行船?魔法の絨?の場合
case @type # タイプに合わせた最頂点の高さの取得
when 2 ; height = 1
when 4 ; height = 2
when 5 ; height = 1
end
if @driving
return if $game_player.follow_member_gathering == true
if @altitude < MAX_ALTITUDE * height
@altitude += 1 # 高度を上げる
end
elsif @altitude > 0
@altitude -= 1 # 高度を下げる
if @altitude == 0
@priority_type = vehicle_priority # 待機時のプライオリティに
$game_player.ride_off_character
$game_player.turn_down
update_bush_depth
turn_left
end
end
end
end
#--------------------------------------------------------------------------
# ◎ アニメカウントの更新
#--------------------------------------------------------------------------
alias tig_ev_update_animation update_animation unless $@
def update_animation
if riding_type? and rided_character == nil # ?り?み最中のアニメをオフに
@pattern = @original_pattern
return
end
unless @driving or @altitude > 0 # ?り物未使用時のアニメをオフに
@pattern = @original_pattern
return
end
tig_ev_update_animation
end
#--------------------------------------------------------------------------
# ◎ プレイヤ?との同期
#--------------------------------------------------------------------------
alias tig_ev_ve_sync_with_player sync_with_player
def sync_with_player
tig_ev_ve_sync_with_player
@stop_count = $game_player.stop_count
# 停止時のアニメを正しくシンクロさせる?のカウント同期追加
end
#--------------------------------------------------------------------------
# ◎ 移動可能判定
#--------------------------------------------------------------------------
alias tig_ev_ve_movable? movable?
def movable?
return false if (@type == 4 and @altitude < MAX_ALTITUDE * 2)
return false if (@type == 5 and @altitude < MAX_ALTITUDE)
# 上昇中、下降中ならば動けない(追加?り物)
return tig_ev_ve_movable?
end
#--------------------------------------------------------------------------
# ○ 待機中のプライオリティの取得
#--------------------------------------------------------------------------
def vehicle_priority
key = [@character_name, @character_index]
result = $riding_data.data_priority_type[key]
return result == nil ? 1 : result
end
#--------------------------------------------------------------------------
# ◎ ?面 Y 座標の取得
#--------------------------------------------------------------------------
alias tig_ev_ve_screen_y screen_y
def screen_y
if @type == 5
super - altitude / 5 # 魔法の絨?を浮遊させる(高さの調節)
else
tig_ev_ve_screen_y
end
end
#--------------------------------------------------------------------------
# ● ?り物に?る
#--------------------------------------------------------------------------
def get_on
@driving = true
if [2, 4].include?(@type) # 飛行船?大型飛行船の場合
@priority_type = 2 # プライオリティを「通常キャラの上」に?更
end
@bgm.play if @bgm.name != "" # BGM 開始 (設定されていなければ今の曲を??)
add_vehicle_states
end
#--------------------------------------------------------------------------
# ● ?り物から降りる
#--------------------------------------------------------------------------
def get_off
@driving = false
unless [2, 4, 5].include?(@type) # 飛行船?大型飛行船?魔法の絨?の場合
@priority_type = vehicle_priority # 本?のプライオリティに?す
$game_player.ride_off_character # 騎??態の解除
end
@direction = 4
remove_vehicle_state
end
#--------------------------------------------------------------------------
# ○ ?り物ステ?トの取得
#--------------------------------------------------------------------------
def vehicle_states
states = []
case @type
when 0 ; states = Expansion_Vehicle::BOAT_STATE
when 1 ; states = Expansion_Vehicle::SHIP_STATE
when 2 ; states = Expansion_Vehicle::AIRSHIP_STATE
when 3 ; states = Expansion_Vehicle::HORSE_STATE
when 4 ; states = Expansion_Vehicle::BIG_AIRSHIP_STATE
when 5 ; states = Expansion_Vehicle::MAGIC_CARPET_STATE
end
return states
end
#--------------------------------------------------------------------------
# ○ ?り物ステ?トの付加
#--------------------------------------------------------------------------
def add_vehicle_states
for state in vehicle_states
$game_party.members.each {|actor|actor.add_state(state)}
end
end
#--------------------------------------------------------------------------
# ○ ?り物ステ?トの解除
#--------------------------------------------------------------------------
def remove_vehicle_state
for state in vehicle_states
$game_party.members.each {|actor|actor.remove_state(state)}
end
end
#--------------------------------------------------------------------------
# ● 位置の?更 ※??指定を組み?み
# map_id : 移動先のマップID
# x : 移動先マップのX座標
# y : 移動先マップのY座標
# variables : ??指定するか？
#--------------------------------------------------------------------------
def set_location(map_id, x, y, variables = false)
# ??で指定の場合
if variables
map_id = $game_variables[map_id]
x = $game_variables[x]
y = $game_variables[y]
end
@map_id = map_id
@x = x
@y = y
refresh
end
#--------------------------------------------------------------------------
# ○ ?り物を呼び出す
# here : true = プレ?ヤ?と同位置 false = プレ?ヤ?の目の前
#--------------------------------------------------------------------------
def call(test = false, here = false)
return false if $game_player.event_vehicle_lock
# ?象となる位置座標を取得
if here # この場
x = $game_player.x
y = $game_player.y
else # 目の前
x = $game_map.x_with_direction($game_player.x, $game_player.direction)
y = $game_map.y_with_direction($game_player.y, $game_player.direction)
end
# 飛行船進入禁止エリア(?張スクリプト設定)?で呼び出し禁止されているタイプ
if $game_map.airship_obstacle_area != nil and
$game_map.airship_obstacle_area.include?([x, y])
return false if Expansion_Vehicle::CAN_T_CALL.include?(@type)
end
# 他の?り物がそこにある？
return false if $game_map.vehicle_pos_nt?(x, y)
# タイプ別に通行判定?着陸判定
case @type
when 0 # 小型船
can_call = $game_map.boat_passable?(x, y)
when 1 # 大型船
can_call = $game_map.ship_passable?(x, y)
when 2 # 飛行船
can_call = $game_map.airship_land_ok?(x, y)
when 3 # 馬
can_call = $game_map.horse_passable?(x, y)
when 4 # 大型飛行船
can_call = $game_map.big_airship_land_ok?(x, y)
when 5 # 魔法の絨?
can_call = $game_map.airship_land_ok?(x, y)
end
# 判定に問題なければ?際に呼ぶ
if can_call
set_location($game_map.map_id, x, y) unless test
return true
else
return false
end
end
#--------------------------------------------------------------------------
# ○ この場に?り物を呼び出す
# このコマンドで呼んだ?り物は、降りた時に消えてしまう。
#--------------------------------------------------------------------------
def call_here
call(false, true)
end
#--------------------------------------------------------------------------
# ○ 目の前に?り物を呼び出せるかのテスト
#--------------------------------------------------------------------------
def call_test
return call(true)
end
#--------------------------------------------------------------------------
# ○ この場に?り物を呼び出せるかのテスト
#--------------------------------------------------------------------------
def call_test_here
return call(true, true)
end
#--------------------------------------------------------------------------
# ○ 一時的に?り物を呼び出す
# このコマンドで呼んだ?り物は、降りた時に消えてしまう。
#--------------------------------------------------------------------------
def instant_call
@instant = true
call
end
#--------------------------------------------------------------------------
# ○ この場に一時的に?り物を呼び出す
# このコマンドで呼んだ?り物は、降りた時に消えてしまう。
#--------------------------------------------------------------------------
def instant_call_here
@instant = true
call(false, true)
end
end
#==============================================================================
# ■ Scene_Title
#------------------------------------------------------------------------------
# タイトル?面の?理を行うクラスです。
#==============================================================================
class Scene_Title < Scene_Base
#--------------------------------------------------------------------------
# ◎ 各種ゲ?ムオブジェクトの作成
#--------------------------------------------------------------------------
alias tig_ev_create_game_objects create_game_objects
def create_game_objects
tig_ev_create_game_objects
$riding_data = Riding_Data.new # 騎?型キャラクタ?のデ?タ生成
end
end
#==============================================================================
# ■ AudioFile
#------------------------------------------------------------------------------
# BGM、BGS、ME、SE のス?パ?クラスです。
#==============================================================================
class RPG::AudioFile
#--------------------------------------------------------------------------
# ○ ファイル(ネ?ム)の?更
# 名前の?更だけで曲を?更できるように
#--------------------------------------------------------------------------
def name=(name)
@name = name
end
end
#==============================================================================
# ■ Game_Map
#------------------------------------------------------------------------------
# マップを扱うクラスです。スクロ?ルや通行可能判定などの機能を持っています。
# このクラスのインスタンスは $game_map で?照されます。
#==============================================================================
class Game_Map
#--------------------------------------------------------------------------
# ○ 公開インスタンス??
#--------------------------------------------------------------------------
attr_reader :airship_obstacle_area # 飛行船補助スクリプト連携用
#--------------------------------------------------------------------------
# ◎ セットアップ
# map_id : マップ ID
# ※ ?り物を別マップに?り越した際の?理を追加
#--------------------------------------------------------------------------
alias tig_ev_setup setup
def setup(map_id)
tig_ev_setup(map_id)
result = false
if $game_player.vehicle_event_data != nil # イベント?り物持ち越し時の?理
# マップ?に?像?名前が同じイベントが存在するなら?り物を??する
for event in @events.values
if event.name == $game_player.vehicle_event_data[0] and
event.character_name == $game_player.vehicle_event_data[1] and
event.character_index == $game_player.vehicle_event_data[2]
$game_player.vehicle_event_data[3] = event.id
if event.riding_type?
$game_player.ride_off_character
$game_player.ride_on(event)
key = [event.character_name, event.character_index]
end
$game_player.moveto($game_player.new_x, $game_player.new_y)
event.sync_with_player
result = true
break
end
end
end
unless result
event_vehicle_refresh # イベント?り物の初期化(何も?っていない?態に)
end
interpreter.update
end
#--------------------------------------------------------------------------
# ○ イベント?り物のリフレッシュ
#--------------------------------------------------------------------------
def event_vehicle_refresh
$game_player.vehicle_event_data = nil
$game_player.event_vehicle_lock = false
if $game_player.vehicle_type == -1
$game_player.ride_off_character
end
end
#--------------------------------------------------------------------------
# ◎ ?り物の作成
#--------------------------------------------------------------------------
alias tig_ev_create_vehicles create_vehicles
def create_vehicles
tig_ev_create_vehicles
@vehicles[3] = Game_Vehicle.new(3) # 馬
@vehicles[4] = Game_Vehicle.new(4) # 大型飛行船
@vehicles[5] = Game_Vehicle.new(5) # 魔法の絨?
end
#--------------------------------------------------------------------------
# ○ 馬の取得
#--------------------------------------------------------------------------
def horse
return @vehicles[3]
end
#--------------------------------------------------------------------------
# ○ 大型飛行船の取得
#--------------------------------------------------------------------------
def big_airship
return @vehicles[4]
end
#--------------------------------------------------------------------------
# ○ 魔法の絨?の取得
#--------------------------------------------------------------------------
def magic_carpet
return @vehicles[5]
end
#--------------------------------------------------------------------------
# ○ プレイヤ?の?り物になっているイベントの取得
#--------------------------------------------------------------------------
def event_vehicle
return nil if $game_player.vehicle_event_data == nil
return @events[$game_player.vehicle_event_data[3]]
end
#--------------------------------------------------------------------------
# ○ ?張?り物用の通行障害判定
# ※ 一部の?り物が通過することができないタイルのIDをここで指定。
#--------------------------------------------------------------------------
def ex_obstacle?(tile_id)
if (2048..8191).include?(tile_id)
tile_id -= ((tile_id - 2048) % 48)
end
return [157,
160, 161, 162, 163, 164, 165, 166,
168, 169, 170, 171, 172, 174, 175,
184, 185, 186, 187, 188, 189, 190, 191,
200, 201, 202, 203, 204, 205, 206, 207,
208, 209, 210, 211, 212, 213, 214,
216, 217, 218, 219, 220, 221, 222,
226, 227, 228,
232, 233, 234, 235, 236, 237, 238,
241, 242,
248, 249, 250, 251, 252, 253, 254, 255,
2864, 3248, 3632, 4016,
2912, 3296, 3680, 4064].include?(tile_id)
end
#--------------------------------------------------------------------------
# ○ ?張?り物用の通行許可判定
# ※ 浮遊型?り物が越えることのできるタイルのIDをここで指定。
#--------------------------------------------------------------------------
def ex_pass?(tile_id)
if (2048..8191).include?(tile_id)
tile_id -= ((tile_id - 2048) % 48)
end
return [526, 527, 671, 679,
2048, 2096, 2240, 2336,
2432, 2528, 2624, 2720,
1536,
1544, 1545, 1546, 1547, 1548, 1549, 1550, 1551,
1560, 1561, 1562, 1563, 1564, 1565, 1566, 1567,
1576, 1577, 1578, 1579, 1580, 1581, 1582, 1583,
1624, 1625].include?(tile_id)
end
#--------------------------------------------------------------------------
# ○ テ?ブル型オブジェクト判定
# ※ オブジェクト型?り物を置くことができるタイルのIDをここで指定。
#--------------------------------------------------------------------------
def ex_table?(tile_id)
if (2048..8191).include?(tile_id)
tile_id -= ((tile_id - 2048) % 48)
end
return [75, 131,
350, 352, 353, 354, 355,
680,
3152, 3536, 3920, 4304].include?(tile_id)
end
#--------------------------------------------------------------------------
# ○ 馬の通行可能判定
# ※ passable? メソッドを部分改造したものです。
#--------------------------------------------------------------------------
def horse_passable?(x, y, flag = 0x01)
for event in events_xy(x, y) # 座標が一致するイベントを調べる
next if event.tile_id == 0 # グラフィックがタイルではない
next if event.priority_type > 0 # [通常キャラの下] ではない
next if event.through # すり?け?態
pass = @passages[event.tile_id] # 通行?性を取得
next if pass & 0x10 == 0x10 # [☆] : 通行に影響しない
return true if pass & flag == 0x00 # [○] : 通行可
return false if pass & flag == flag # [×] : 通行不可
end
for i in [2, 1, 0] # レイヤ?の上から順に調べる
tile_id = @map.data[x, y, i] # タイル ID を取得
return false if tile_id == nil # タイル ID 取得失敗 : 通行不可
pass = @passages[tile_id] # 通行?性を取得
next if pass & 0x10 == 0x10 # [☆] : 通行に影響しない
return false if ex_obstacle?(tile_id) ### ?張通行不可(特殊部分) ###
return true if pass & flag == 0x00 # [○] : 通行可
return false if pass & flag == flag # [×] : 通行不可
end
return false # 通行不可
end
#--------------------------------------------------------------------------
# ○ 魔法の絨?の通行可能判定
# ※ passable? メソッドを部分改造したものです。
#--------------------------------------------------------------------------
def magic_carpet_passable?(x, y, flag = 0x01)
for event in events_xy(x, y) # 座標が一致するイベントを調べる
next if event.tile_id == 0 # グラフィックがタイルではない
next if event.priority_type > 0 # [通常キャラの下] ではない
next if event.through # すり?け?態
pass = @passages[event.tile_id] # 通行?性を取得
next if pass & 0x10 == 0x10 # [☆] : 通行に影響しない
return true if pass & flag == 0x00 # [○] : 通行可
return false if pass & flag == flag # [×] : 通行不可
end
for i in [2, 1, 0] # レイヤ?の上から順に調べる
tile_id = @map.data[x, y, i] # タイル ID を取得
return false if tile_id == nil # タイル ID 取得失敗 : 通行不可
pass = @passages[tile_id] # 通行?性を取得
next if pass & 0x10 == 0x10 # [☆] : 通行に影響しない
return false if ex_obstacle?(tile_id) ### ?張通行不可(特殊部分) ###
return true if ex_pass?(tile_id) ### ?張通行許可(特殊部分) ###
return true if pass & flag == 0x00 # [○] : 通行可
return false if pass & flag == flag # [×] : 通行不可
end
return false # 通行不可
end
#--------------------------------------------------------------------------
# ○ フロ?トの通行可能判定
# ※ passable? メソッドを部分改造したものです。
#--------------------------------------------------------------------------
def float_passable?(x, y, flag = 0x01)
# for event in events_xy(x, y) # 座標が一致するイベントを調べる
# next if event.tile_id == 0 # グラフィックがタイルではない
# next if event.priority_type > 0 # [通常キャラの下] ではない
# next if event.through # すり?け?態
# pass = @passages[event.tile_id] # 通行?性を取得
# next if pass & 0x10 == 0x10 # [☆] : 通行に影響しない
# return true if pass & flag == 0x00 # [○] : 通行可
# return false if pass & flag == flag # [×] : 通行不可
# end
for i in [2, 1, 0] # レイヤ?の上から順に調べる
tile_id = @map.data[x, y, i] # タイル ID を取得
return false if tile_id == nil # タイル ID 取得失敗 : 通行不可
pass = @passages[tile_id] # 通行?性を取得
next if pass & 0x10 == 0x10 # [☆] : 通行に影響しない
return false if ex_obstacle?(tile_id) ### ?張通行不可(特殊部分) ###
return true if ex_pass?(tile_id) ### ?張通行許可(特殊部分) ###
#return true if pass & flag == 0x00 # [○] : 通行可 # コメントアウト
#return false if pass & flag == flag # [×] : 通行不可 # コメントアウト
end
return false # 通行不可
end
#--------------------------------------------------------------------------
# ○ オブジェクトの設置可能判定
# ※ passable? メソッドを部分改造したものです。
#--------------------------------------------------------------------------
def object_passable?(x, y, flag = 0x01)
for event in events_xy(x, y) # 座標が一致するイベントを調べる
next if event.tile_id == 0 # グラフィックがタイルではない
next if event.priority_type > 0 # [通常キャラの下] ではない
next if event.through # すり?け?態
pass = @passages[event.tile_id] # 通行?性を取得
next if pass & 0x10 == 0x10 # [☆] : 通行に影響しない
return true if pass & flag == 0x00 # [○] : 通行可
return false if pass & flag == flag # [×] : 通行不可
end
for i in [2, 1, 0] # レイヤ?の上から順に調べる
tile_id = @map.data[x, y, i] # タイル ID を取得
return false if tile_id == nil # タイル ID 取得失敗 : 通行不可
pass = @passages[tile_id] # 通行?性を取得
next if pass & 0x10 == 0x10 # [☆] : 通行に影響しない
return true if pass & flag == 0x00 # [○] : 通行可
return true if ex_table?(tile_id) ### テ?ブル判定(特殊部分) ###
#return true if pass & flag == 0x00 # [○] : 通行可 # コメントアウト
return false if pass & flag == flag # [×] : 通行不可
end
return false # 通行不可
end
#--------------------------------------------------------------------------
# ◎ 飛行船の着陸可能判定
# x : X 座標
# y : Y 座標
#--------------------------------------------------------------------------
alias tig_ev_airship_land_ok? airship_land_ok?
def airship_land_ok?(x, y)
if $game_player.now_vehicle == @vehicles[4] # 現在の?り物が大型船ならば
return big_airship_land_ok?(x, y) # 大型飛行船の着陸可能判定
else # 飛行船の着陸可能判定
return false if hide_tile?(x, y) # 物陰には着地不可
for i in [2, 1, 0]
return false if ex_obstacle?(@map.data[x, y, i]) # ?張通行不可
end
return tig_ev_airship_land_ok?(x, y) # 通常の着陸可能判定
end
end
#--------------------------------------------------------------------------
# ◎ 大型飛行船の着陸可能判定
# x : X 座標
# y : Y 座標
#--------------------------------------------------------------------------
def big_airship_land_ok?(x, y)
return false if hide_tile?(x, y) # 物陰には着地不可
return passable?(x, y) # 通常の通行判定
end
#--------------------------------------------------------------------------
# ○ 物陰か？判定
# x : X 座標
# y : Y 座標
#--------------------------------------------------------------------------
def hide_tile?(x, y)
tile_id = @map.data[x, y, 2]
if tile_id != nil
return @passages[tile_id] == 0x16
end
return false
end
#--------------------------------------------------------------------------
# ○ なんらかの?り物があるか？
# x : X 座標
# y : Y 座標
#--------------------------------------------------------------------------
def vehicle_pos_nt?(x, y)
return true if boat.pos_nt?(x, y)
return true if ship.pos_nt?(x, y)
return true if airship.pos_nt?(x, y) and not airship.driving
return true if horse.pos_nt?(x, y)
return true if big_airship.pos_nt?(x, y) and not big_airship.driving
return true if magic_carpet.pos_nt?(x, y)
return false
end
#--------------------------------------------------------------------------
# ◎ BGM / BGS 自動切り替え
# ※ ?り物を降りた際のBGM再開の?動を修正。
#--------------------------------------------------------------------------
alias tig_ev_autoplay autoplay
def autoplay
if $game_player.vehicle_type > -1 # ?り物時の自動演奏
$game_player.now_vehicle.bgm.play
$game_player.walking_bgm = @map.bgm
unless @map.autoplay_bgm # マップBGMが未設定なら
$game_player.walking_bgm.name = "" # ?行再開時のBGMを無音に
end
else
tig_ev_autoplay
end
end
end
#==============================================================================
# ■ Game_Character
#------------------------------------------------------------------------------
# キャラクタ?を扱うクラスです。このクラスは Game_Player クラスと Game_Event
# クラスのス?パ?クラスとして使用されます。
#==============================================================================
class Game_Character
#--------------------------------------------------------------------------
# ○ 公開インスタンス??
#--------------------------------------------------------------------------
attr_reader :altitude
attr_reader :stop_count
attr_reader :on_tile # 壁タイル?張用ダミ?
attr_reader :turn_back # 壁タイル?張用ダミ?
attr_accessor :stop_count
attr_accessor :riding_character_id
attr_accessor :rided_character_id
#--------------------------------------------------------------------------
# ◎ オブジェクト初期化
#--------------------------------------------------------------------------
alias tig_ev_initialize initialize
def initialize
tig_ev_initialize
@riding_character_id = nil
@rided_character_id = nil
@altitude = 0
end
#--------------------------------------------------------------------------
# ◎ 移動時の更新
# ※ 他のキャラクタ?への騎?時のアニメを停止させる。
#--------------------------------------------------------------------------
alias tig_ev_update_move update_move
def update_move
tig_ev_update_move
if riding_character != nil # 他のキャラクタ?へ騎?している場合
key = [riding_character.character_name, riding_character.character_index]
unless $riding_data.data_object_type[key] # オブジェクトタイプでなければ
@anime_count = 0
end
end
end
#--------------------------------------------------------------------------
# ○ 騎?タイプの?り物か？(オブジェクトタイプ含む)
#--------------------------------------------------------------------------
def riding_type?
key = [@character_name, @character_index]
return $riding_data.data_riding_pct_name.key?(key)
end
#--------------------------------------------------------------------------
# ○ オブジェクトタイプ(の?り物)か？
#--------------------------------------------------------------------------
def object_type?
key = [@character_name, @character_index]
return $riding_data.data_object_type.key?(key)
end
#--------------------------------------------------------------------------
# ◎ キャラクタ?衝突判定
# x : X 座標
# y : Y 座標
# プレイヤ?と?り物を含め、通常キャラの衝突を?出する。
#--------------------------------------------------------------------------
alias tig_ev_collide_with_characters? collide_with_characters?
def collide_with_characters?(x, y)
if @priority_type == 1 # 自分が通常キャラ
if self.is_a?(Game_Player) # プレイヤ?の場合
if riding_character != nil # 騎?している場合
return true if $game_player.other_vehicle?(x, y) # その他の?り物と衝突
end
else # プレイヤ?以外の場合
return true if $game_map.vehicle_pos_nt?(x, y) # ?り物と衝突
end
end
return tig_ev_collide_with_characters?(x, y)
end
#--------------------------------------------------------------------------
# ◎ ?面 Z 座標の取得
# ※ 騎?用?像追加により同位置?像が?える?、
# 重なり順を座標に合わせて整理している。
#--------------------------------------------------------------------------
alias tig_ev_screen_z screen_z
def screen_z
if riding_character != nil
return riding_character.screen_z + 1
end
return tig_ev_screen_z + (screen_y / 18) * 3
end
#--------------------------------------------------------------------------
# ◎ 茂み深さの更新
# ※ 騎?したキャラクタ?に茂み?理がされるのを防ぐ。
#--------------------------------------------------------------------------
alias tig_ev_update_bush_depth update_bush_depth
def update_bush_depth
if self.is_a?(Game_Player) and $game_player.now_vehicle != nil
return @bush_depth = 0
elsif self.is_a?(Game_Vehicle) and @type == 5
return @bush_depth = 0
elsif riding_character != nil
return @bush_depth = 0 unless riding_character.object_type?
end
return tig_ev_update_bush_depth
end
#--------------------------------------------------------------------------
# ○ 他のキャラクタ?にのる
#--------------------------------------------------------------------------
def ride_on(character, test = false)
return false if riding_character != nil # ?に騎?中なら騎?不可
return false if character.rided_character != nil
# すでに?り手がいるキャラへは騎?不可
return true if test # テストならばここで true を返して終了
if character.is_a?(Game_Player)
@riding_character_id = 0
elsif character.is_a?(Game_Vehicle)
@riding_character_id = -1
@riding_character_id -= character.type
else
@riding_character_id = character.id
end
if self.is_a?(Game_Player)
character.rided_character_id = 0
elsif self.is_a?(Game_Vehicle)
character.rided_character_id = -1
character.rided_character_id -= @type
else
character.rided_character_id = @id
end
character.sync_with_rided
return true
end
#--------------------------------------------------------------------------
# ○ 自分が?り物にしているキャラクタ?
#--------------------------------------------------------------------------
def riding_character
return if @riding_character_id == nil
if @riding_character_id == 0
return $game_player
elsif @riding_character_id < 0
return $game_map.vehicles[@riding_character_id.abs - 1]
else
return $game_map.events[@riding_character_id]
end
end
#--------------------------------------------------------------------------
# ○ 自分の?り手となっているキャラクタ?
#--------------------------------------------------------------------------
def rided_character
return if @rided_character_id == nil
if @rided_character_id == 0
return $game_player
elsif @rided_character_id < 0
return $game_map.vehicles[@rided_character_id.abs - 1]
else
return $game_map.events[@rided_character_id]
end
end
#--------------------------------------------------------------------------
# ○ 他のキャラクタ?からおりる
#--------------------------------------------------------------------------
def ride_off_character(test = false)
return false if riding_character == nil # 騎?してなければ降りれない
return true if test # テストならばここで true を返して終了
riding_character.rided_character_id = nil
@riding_character_id = nil
return true
end
#--------------------------------------------------------------------------
# ○ 騎?キャラクタ?との同期
#--------------------------------------------------------------------------
def sync_with_rided
@x = rided_character.x
@y = rided_character.y
@real_x = rided_character.real_x
@real_y = rided_character.real_y
@direction = @direction_fix ? @direction : rided_character.direction
update_bush_depth
@stop_count = rided_character.stop_count
end
#--------------------------------------------------------------------------
# ○ 段差マップ用??張通過判定(ダミ?メソッド)
#--------------------------------------------------------------------------
def ex_passable(direction, test = false)
return true
end
end
#==============================================================================
# ■ Game_Event
#------------------------------------------------------------------------------
# イベントを扱うクラスです。?件判定によるイベントペ?ジ切り替えや、?列?理
# イベント?行などの機能を持っており、Game_Map クラスの?部で使用されます。
#==============================================================================
class Game_Event < Game_Character
#--------------------------------------------------------------------------
# ○ 公開インスタンス??
#--------------------------------------------------------------------------
attr_accessor :passable_type
attr_accessor :priority_type
#--------------------------------------------------------------------------
# ◎ オブジェクト初期化
# map_id : マップ ID
# event : イベント (RPG::Event)
#--------------------------------------------------------------------------
alias tig_ev_event_initialize initialize
def initialize(map_id, event)
tig_ev_event_initialize(map_id, event)
set_passable_setting
end
#--------------------------------------------------------------------------
# ○ イベントの通行判定設定
#--------------------------------------------------------------------------
def set_passable_setting
@passable_type = -1
@event.name = @event.name.sub(/[<＜]小型船[>＞]/, "")
@passable_type = 0 if $& != nil
@event.name = @event.name.sub(/[<＜]大型船[>＞]/, "")
@passable_type = 1 if $& != nil
@event.name = @event.name.sub(/[<＜]馬[>＞]/, "")
@passable_type = 2 if $& != nil
@event.name = @event.name.sub(/[<＜]フロ?ト[>＞]/, "")
@passable_type = 3 if $& != nil
end
#--------------------------------------------------------------------------
# ○ 名前の取得
#--------------------------------------------------------------------------
def name
return @event.name
end
#--------------------------------------------------------------------------
# ◎ フレ?ム更新
#--------------------------------------------------------------------------
alias tig_ev_update update
def update
if riding_character != nil
riding_character.sync_with_rided
end
tig_ev_update
end
#--------------------------------------------------------------------------
# ◎ 自律移動の更新
#--------------------------------------------------------------------------
alias tig_ev_update_self_movement update_self_movement unless $@
def update_self_movement
return if rided_character != nil
tig_ev_update_self_movement
end
#--------------------------------------------------------------------------
# ○ プレイヤ?との同期
#--------------------------------------------------------------------------
def sync_with_player
@x = $game_player.x
@y = $game_player.y
@real_x = $game_player.real_x
@real_y = $game_player.real_y
@direction = @direction_fix ? @direction : $game_player.direction
update_bush_depth
@stop_count = $game_player.stop_count
@on_tile = $game_player.on_tile
@turn_back = $game_player.turn_back
end
#--------------------------------------------------------------------------
# ● マップ通行可能判定
# x : X 座標
# y : Y 座標
#--------------------------------------------------------------------------
def map_passable?(x, y)
case @passable_type
when 0 # 小型船
return $game_map.boat_passable?(x, y)
when 1 # 大型船
return $game_map.ship_passable?(x, y)
when 2 # 馬
return $game_map.horse_passable?(x, y)
when 3 # フロ?ト
return $game_map.float_passable?(x, y)
else # 徒?
return $game_map.passable?(x, y)
end
end
#--------------------------------------------------------------------------
# ● イベント起動
#--------------------------------------------------------------------------
# lock(イベント起動時に主人公の方を向く動作)をする?件を
# イベント?にイベントコマンド?文章を表示が含まれている場合のみに
# 限定する改?をしています。
# これにより、イベントへの?り?み動作をスム?ズに見せます。
#--------------------------------------------------------------------------
def start
return if @list.size <= 1 # ?行?容が空？
@starting = true
result = false ### 追加部分(ここから) ###
for i in 0...@list.size
result = true if @list[i].code == 101
end ### 追加部分(ここまで) ###
lock if @trigger < 3 and result #### 改?部分(この行) ####
unless $game_map.interpreter.running?
$game_map.interpreter.setup_starting_event
end
end
end
#==============================================================================
# ■ Game_Player
#------------------------------------------------------------------------------
# プレイヤ?を扱うクラスです。イベントの起動判定や、マップのスクロ?ルなどの
# 機能を持っています。このクラスのインスタンスは $game_player で?照されます。
#==============================================================================
class Game_Player < Game_Character
#--------------------------------------------------------------------------
# ○ 公開インスタンス??
#--------------------------------------------------------------------------
attr_reader :new_x
attr_reader :new_y
attr_accessor :walking_bgm
attr_accessor :vehicle_event_data
attr_accessor :not_encounter_vehicle_id
attr_accessor :event_vehicle_lock
attr_accessor :follow_member_gathering #【パ?ティ?メンバ?の追?】?用時用
#--------------------------------------------------------------------------
# ◎ オブジェクト初期化
#--------------------------------------------------------------------------
alias tig_ev_pl_initialize initialize
def initialize
tig_ev_pl_initialize
@not_encounter_vehicle_id = Expansion_Vehicle::NOT_ENCOUNTER_VEHICIE_ID
# 非遭遇?り物IDの初期値設定
@event_vehicle_lock = false
end
#--------------------------------------------------------------------------
# ○ 今?っている?り物
#--------------------------------------------------------------------------
def now_vehicle
if in_event_vehicle?
return $game_map.events[@vehicle_event_data[3]] unless event_vehicle_object?
end
return nil if @vehicle_type == -1
return $game_map.vehicles[@vehicle_type]
end
#--------------------------------------------------------------------------
# ○ 今?っている?り物が騎?タイプか？
#--------------------------------------------------------------------------
def now_vehicle_riding_type?
return false if now_vehicle == nil
return now_vehicle.riding_type?
end
#--------------------------------------------------------------------------
# ○ イベント?り物の取得
#--------------------------------------------------------------------------
def event_vehicle
return nil unless in_event_vehicle?
return $game_map.events[@vehicle_event_data[3]]
end
#--------------------------------------------------------------------------
# ○ イベントに?っているか判定
#--------------------------------------------------------------------------
def in_event_vehicle?
return @vehicle_event_data != nil
end
#--------------------------------------------------------------------------
# ○ イベント?り物がオブジェクトタイプか？
#--------------------------------------------------------------------------
def event_vehicle_object?
return false unless event_vehicle
key = [event_vehicle.character_name, event_vehicle.character_index]
return $riding_data.data_object_type[key]
end
#--------------------------------------------------------------------------
# ○ 今?っている?り物と別の?り物がそこにあるか？
#--------------------------------------------------------------------------
def other_vehicle?(x = @x, y = @y)
return false if @vehicle_type == -1
for vehicle in $game_map.vehicles
if vehicle.pos?(x, y)
return true if vehicle != now_vehicle
end
end
return false
end
#--------------------------------------------------------------------------
# ◎ 飛行船(もしくは大型飛行船)に?っている?態判定
#--------------------------------------------------------------------------
alias tig_ev_airship? in_airship?
def in_airship?
return true if @vehicle_type == 4
return tig_ev_airship?
end
#--------------------------------------------------------------------------
# ◎ 移動可能判定
#--------------------------------------------------------------------------
alias tig_ev_pl_movable? movable?
def movable?
if [4, 5].include?(@vehicle_type)
return false if moving? # 移動中
return false if @move_route_forcing # 移動ル?ト?制中
return false if @vehicle_getting_on # ?る動作の途中
return false if @vehicle_getting_off # 降りる動作の途中
return false if $game_message.visible # メッセ?ジ表示中
return false unless $game_map.big_airship.movable? or
$game_map.magic_carpet.movable?
return true
else
return tig_ev_pl_movable?
end
end
#--------------------------------------------------------------------------
# ◎ マップ通行可能判定
# x : X 座標
# y : Y 座標
#--------------------------------------------------------------------------
alias tig_ev_map_passable? map_passable?
def map_passable?(x, y)
if in_event_vehicle?
return $game_map.event_vehicle.map_passable?(x, y)
end
case @vehicle_type
when 3
return $game_map.horse_passable?(x, y)
when 4
return $game_map.big_airship_passable?(x, y)
when 5
return $game_map.magic_carpet_passable?(x, y)
else
return tig_ev_map_passable?(x, y)
end
end
#--------------------------------------------------------------------------
# ◎ フレ?ム更新
#--------------------------------------------------------------------------
alias tig_ev_update update
def update
tig_ev_update
update_event_vehicle
end
#--------------------------------------------------------------------------
# ◎ ?り物の?降
#--------------------------------------------------------------------------
alias tig_ev_get_on_off_vehicle get_on_off_vehicle
def get_on_off_vehicle
return false unless movable?
if in_event_vehicle?
unless @event_vehicle_lock
result = get_off_event_vehicle
if result
unless event_vehicle_object?
@vehicle_getting_off_wait = true #【パ?ティ?メンバ?の追?】?用時用
@vehicle_hide = false #【パ?ティ?メンバ?の追?】?用時用
end
return result
end
else
return false
end
else
return tig_ev_get_on_off_vehicle
end
end
#--------------------------------------------------------------------------
# ● ?り物の?理
#--------------------------------------------------------------------------
def update_vehicle
return unless in_vehicle?
vehicle = $game_map.vehicles[@vehicle_type]
if @vehicle_getting_on # ?る途中？
vehicle.moveto(@x, @y) # ?っている間に自律移動してしまうのを防ぐ
if not moving? and not @follow_member_gathering
if vehicle.riding_type?
unless [2, 4].include?(@vehicle_type)
vehicle.priority_type = 1
end
ride_on(vehicle)
else
@transparent = true # 透明化
end
@direction = vehicle.direction # 向きを?更
@move_speed = vehicle.speed # 移動速度を?更
@vehicle_getting_on = false # ?る動作終了
end
elsif @vehicle_getting_off # 降りる途中？
if not moving? and vehicle.altitude == 0
@vehicle_getting_off = false # 降りる動作終了
if vehicle.riding_type?
vehicle.priority_type = vehicle.vehicle_priority
else
@transparent = false # 透明を解除
end
if vehicle.instant
vehicle.instant = false
vehicle.set_location(0, 0, 0)
end
@vehicle_type = -1 # ?り物タイプ消去
update_bush_depth
end
else # ?り物に?っている
vehicle.sync_with_player # プレイヤ?と同時に動かす
end
end
#--------------------------------------------------------------------------
# ◎ ?り物に?る
# 現在?り物に?っていないことが前提。
#--------------------------------------------------------------------------
alias tig_ev_get_on_vehicle get_on_vehicle
def get_on_vehicle
if $game_map.horse.pos?(@x, @y) # 馬と重なっている？
get_on_horse
return true
elsif $game_map.big_airship.pos?(@x, @y) # 大型飛行船と重なっている？
get_on_big_airship
return true
elsif $game_map.magic_carpet.pos?(@x, @y) # 魔法の絨?と重なっている？
get_on_magic_carpet
return true
end
return tig_ev_get_on_vehicle
end
#--------------------------------------------------------------------------
# ◎ ?り物から降りる
# 現在?り物に?っていることが前提。
#--------------------------------------------------------------------------
alias tig_ev_get_off_vehicle get_off_vehicle
def get_off_vehicle
return false if other_vehicle?
return false if $game_map.hide_tile?(x, y)
if @vehicle_type < 2
return false unless tig_ev_get_off_vehicle
elsif @vehicle_type == 2
return false unless tig_ev_get_off_vehicle
@direction = 4
else
if @vehicle_type == 3
return false unless $game_map.events_xy(@x, @y).empty?
@direction = 2
elsif @vehicle_type == 4 or @vehicle_type == 5
return false unless airship_land_ok?(@x, @y)
@direction = 4
end
now_vehicle.get_off # 降りる?理
@vehicle_getting_off = true # 降りる動作の開始
@move_speed = 3 # 移動速度を?す
@through = false # すり?け OFF
@walking_bgm.play # ?行時の BGM 復?
make_encounter_count # エンカウント初期化
end
return true
end
#--------------------------------------------------------------------------
# ○ 馬に?る
#--------------------------------------------------------------------------
def get_on_horse
@vehicle_getting_on = true # ?り?み中フラグ
@vehicle_type = 3 # ?り物タイプ設定
@walking_bgm = RPG::BGM::last # ?行時の BGM 記憶
$game_map.horse.get_on # ?り?み?理
end
#--------------------------------------------------------------------------
# ○ 大型飛行船に?る
#--------------------------------------------------------------------------
def get_on_big_airship
@vehicle_getting_on = true # ?る動作の開始
@vehicle_type = 4 # ?り物タイプ設定
@through = true # すり?け ON
@walking_bgm = RPG::BGM::last # ?行時の BGM 記憶
$game_map.big_airship.get_on # ?り?み?理
end
#--------------------------------------------------------------------------
# ○ 魔法の絨?に?る
#--------------------------------------------------------------------------
def get_on_magic_carpet
@vehicle_getting_on = true # ?る動作の開始
@vehicle_type = 5 # ?り物タイプ設定
@walking_bgm = RPG::BGM::last # ?行時の BGM 記憶
$game_map.magic_carpet.get_on # ?り?み?理
end
#--------------------------------------------------------------------------
# ○ イベントに?る
#--------------------------------------------------------------------------
def get_on_event(event_id, test = false)
vehicle = $game_map.events[event_id]
return false if in_vehicle?
return false if in_event_vehicle?
return false if riding_character != nil
return false if vehicle.rided_character != nil
return false if vehicle.moving?
return true if test
@vehicle_getting_on = true # ?り?み中フラグ
@vehicle_event_data = [] # イベント?り物デ?タ登?
@vehicle_event_data[0] = vehicle.name
@vehicle_event_data[1] = vehicle.character_name
@vehicle_event_data[2] = vehicle.character_index
@vehicle_event_data[3] = vehicle.id
key = [vehicle.character_name, vehicle.character_index]
if $riding_data.data_priority_type[key] == 0
@vehicle_event_data[4] = vehicle.priority_type
vehicle.priority_type = 0
end
vehicle.stop_count = -20
front_x = $game_map.x_with_direction(@x, @direction)
front_y = $game_map.y_with_direction(@y, @direction)
if vehicle.x == front_x and vehicle.y == front_y
unless $riding_data.data_object_type[key]
if @follow_member_gathering != nil
@follow_member_gathering = true # 【パ?ティ?メンバ?の追?】?用時用
end
force_move_forward # 一?前進
end
end
return true
end
#--------------------------------------------------------------------------
# ○ イベント?り物の?理
#--------------------------------------------------------------------------
def update_event_vehicle
return unless in_event_vehicle?
vehicle = $game_map.events[@vehicle_event_data[3]]
key = [vehicle.character_name, vehicle.character_index]
if @vehicle_getting_on # ?る途中？
if not moving? and not @follow_member_gathering
if @vehicle_event_data[4] != nil
vehicle.priority_type = 1
end
if vehicle.riding_type?
if $riding_data.data_object_type[key]
vehicle.set_direction(@direction)
end
ride_on(vehicle)
else
@transparent = true # 透明化
end
@vehicle_getting_on = false # ?る動作終了
@through = false
end
elsif @vehicle_getting_off # 降りる途中？
if not moving?
if @vehicle_event_data[4] != nil
vehicle.priority_type = @vehicle_event_data[4]
end
@vehicle_getting_off = false # 降りる動作終了
key = [$game_map.map_id, @vehicle_event_data[3], "D"]
$game_self_switches[key] = true
$game_map.need_refresh = true
$game_player.vehicle_event_data = nil
update_bush_depth
end
else
vehicle.sync_with_player # イベント位置を同期
end
end
#--------------------------------------------------------------------------
# ○ イベントから降りる?理
#--------------------------------------------------------------------------
def get_off_event_vehicle
vehicle = $game_map.event_vehicle
front_x = $game_map.x_with_direction(@x, @direction)
front_y = $game_map.y_with_direction(@y, @direction)
key = [vehicle.character_name, vehicle.character_index]
if [0, 1, 3].include?(vehicle.passable_type)
return false unless tig_ev_map_passable?(front_x, front_y) # 接岸できない
if $riding_data.data_priority_type[key] == 0
@vehicle_event_data[4] = vehicle.priority_type
vehicle.priority_type = 0
end
force_move_forward
elsif $riding_data.data_object_type[key] and
vehicle.priority_type == 1
@vehicle_getting_off_wait = false #【パ?ティ?メンバ?の追?】?用時用
return false if collide_with_characters?(front_x, front_y)
return false unless $game_map.object_passable?(front_x, front_y)
return false unless vehicle.ex_passable(@direction)
case @direction
when 2; vehicle.move_down(false)
when 4; vehicle.move_left(false)
when 6; vehicle.move_right(false)
when 8; vehicle.move_up(false)
end
vehicle.moveto(front_x, front_y)
end
if vehicle.riding_type?
ride_off_character
else
@transparent = false # 透明を解除
end
vehicle.stop_count = 0
@vehicle_getting_off = true
return true
end
#--------------------------------------------------------------------------
# ○ イベントからの?制離?
#--------------------------------------------------------------------------
def compulsory_off_event_vehicle(erase = false)
vehicle = $game_map.event_vehicle
if vehicle and vehicle.riding_type?
ride_off_character
else
@transparent = false # 透明を解除
end
@vehicle_getting_off_wait = true #【パ?ティ?メンバ?の追?】?用時用
@vehicle_hide = false #【パ?ティ?メンバ?の追?】?用時用
$game_player.vehicle_event_data = nil
update_bush_depth
vehicle.erase if erase
end
#--------------------------------------------------------------------------
# ● エンカウントの更新
#--------------------------------------------------------------------------
def update_encounter
return if $TEST and Input.press?(Input::CTRL) # テストプレイ中？
return if @not_encounter_vehicle_id.include?(@vehicle_type) ## ?更点
if $game_player.in_airship? # 飛行中なら ## 追加点
@encounter_count -= 1 # カウントを 1 減らす ## 追加点
elsif $game_map.bush?(@x, @y) # 茂みなら ## ?更点
@encounter_count -= 2 # カウントを 2 減らす
else # 茂み以外なら
@encounter_count -= 1 # カウントを 1 減らす
end
end
end
#==============================================================================
# ■ Sprite_Character
#------------------------------------------------------------------------------
# キャラクタ?表示用のスプライトです。Game_Character クラスのインスタンスを
# 監視し、スプライトの?態を自動的に?化させます。
#==============================================================================
class Sprite_Character < Sprite_Base
#--------------------------------------------------------------------------
# ◎ フレ?ム更新
#--------------------------------------------------------------------------
alias tig_ev_update update
def update
tig_ev_update
riding_positioning
end
#--------------------------------------------------------------------------
# ○ 騎?用?像のファイルの名前取得
#--------------------------------------------------------------------------
def riding_pct_name
key = [@character.character_name, @character.character_index]
return $riding_data.data_riding_pct_name[key]
end
#--------------------------------------------------------------------------
# ○ 騎?用?像のファイルのインデックス取得
#--------------------------------------------------------------------------
def riding_pct_index
key = [@character.character_name, @character.character_index]
return $riding_data.data_riding_pct_index[key]
end
#--------------------------------------------------------------------------
# ○ 騎?しているキャラクタ?の取得
#--------------------------------------------------------------------------
def riding_character
return @character.riding_character
end
#--------------------------------------------------------------------------
# ○ 騎?しているキャラクタ?の取得
#--------------------------------------------------------------------------
def rided_character
return @character.rided_character
end
#--------------------------------------------------------------------------
# ○ 騎?時のX座標修正値の取得
#--------------------------------------------------------------------------
def riding_positioning_x(key_character, base_character)
key = [key_character.character_name, key_character.character_index]
return 0 unless $riding_data.data_positioning_down.key?(key)
pattern = base_character.pattern
pattern = 1 if pattern == 3
case base_character.direction
when 2
return $riding_data.data_positioning_down[key][pattern][0]
when 4
return $riding_data.data_positioning_left[key][pattern][0]
when 6
return $riding_data.data_positioning_right[key][pattern][0]
when 8
return $riding_data.data_positioning_up[key][pattern][0]
end
end
#--------------------------------------------------------------------------
# ○ 騎?時のY座標修正値の取得
#--------------------------------------------------------------------------
def riding_positioning_y(key_character, base_character)
key = [key_character.character_name, key_character.character_index]
return 0 unless $riding_data.data_positioning_down.key?(key)
pattern = base_character.pattern
pattern = 1 if pattern == 3
case base_character.direction
when 2
return $riding_data.data_positioning_down[key][pattern][1]
when 4
return $riding_data.data_positioning_left[key][pattern][1]
when 6
return $riding_data.data_positioning_right[key][pattern][1]
when 8
return $riding_data.data_positioning_up[key][pattern][1]
end
end
#--------------------------------------------------------------------------
# ◎ 騎?時の位置補正
#--------------------------------------------------------------------------
def riding_positioning
if riding_character != nil
key = [riding_character.character_name, riding_character.character_index]
unless $riding_data.data_object_type[key]
self.x += riding_positioning_x(riding_character, riding_character)
self.y = riding_character.screen_y
self.y += riding_positioning_y(riding_character, riding_character)
end
end
if rided_character != nil
key = [@character.character_name, @character.character_index]
if $riding_data.data_object_type[key]
self.x += riding_positioning_x(@character, rided_character)
self.y += riding_positioning_y(@character, rided_character)
end
end
end
#--------------------------------------------------------------------------
# ◎ ?送元ビットマップの更新
#--------------------------------------------------------------------------
alias tig_ev_update_bitmap update_bitmap
def update_bitmap
tig_ev_update_bitmap
if @character.rided_character != nil
return if @back_seeing == true
return if riding_pct_name == nil
if @ride_sprite == nil or
@riding_pct_name != riding_pct_name or
@riding_pct_index != riding_pct_index
@riding_pct_name = riding_pct_name
@riding_pct_index = riding_pct_index
@ride_sprite = ::Sprite.new(viewport)
file_name = @riding_pct_name == "self" ? @character.character_name : @riding_pct_name
@ride_sprite.bitmap = Cache.character(file_name)
sign = file_name[/^[!$]./]
if sign != nil and sign.include?('$')
@rcw = @ride_sprite.bitmap.width / 3
@rch = @ride_sprite.bitmap.height / 4
else
@rcw = @ride_sprite.bitmap.width / 12
@rch = @ride_sprite.bitmap.height / 8
end
@ride_sprite.ox = @rcw / 2
@ride_sprite.oy = @rch
end
else
dispose_ride_sprite
end
end
#--------------------------------------------------------------------------
# ◎ ?送元矩形の更新
#--------------------------------------------------------------------------
alias tig_ev_update_src_rect update_src_rect
def update_src_rect
tig_ev_update_src_rect
dispose_ride_sprite if @back_seeing == true
return if @ride_sprite == nil
index = @riding_pct_name == "self" ? @character.character_index : @riding_pct_index
pattern = @character.pattern < 3 ? @character.pattern : 1
sx = (index % 4 * 3 + pattern) * @rcw
sy = (index / 4 * 4 + (@character.direction - 2) / 2) * @rch
@ride_sprite.src_rect.set(sx, sy, @rcw, @rch)
@ride_sprite.x = @character.screen_x
@ride_sprite.y = @character.screen_y
@ride_sprite.z = @character.screen_z + 2
@ride_sprite.viewport = viewport
if @riding_pct_name == "self" and rided_character.direction == 8
@ride_sprite.x = -50
end
key = [@character.character_name, @character.character_index]
if $riding_data.data_object_type[key]
@ride_sprite.x += riding_positioning_x(@character, rided_character)
@ride_sprite.y += riding_positioning_y(@character, rided_character)
end
end
#--------------------------------------------------------------------------
# ◎ 解放
#--------------------------------------------------------------------------
alias tig_ev_dispose dispose
def dispose
tig_ev_dispose
dispose_ride_sprite
end
#--------------------------------------------------------------------------
# ◎ 騎?用スプライトの消去
#--------------------------------------------------------------------------
def dispose_ride_sprite
if @ride_sprite != nil
@ride_sprite.dispose
@ride_sprite = nil
end
end
end
#==============================================================================
# ■ Spriteset_Map
#------------------------------------------------------------------------------
# マップ?面のスプライトやタイルマップなどをまとめたクラスです。このクラスは
# Scene_Map クラスの?部で使用されます。
#==============================================================================
class Spriteset_Map
#--------------------------------------------------------------------------
# ◎ 飛行船の影スプライトの更新
#--------------------------------------------------------------------------
alias tig_ev_update_shadow update_shadow
def update_shadow
@shadow_sprite.z = 100
if $game_map.big_airship.altitude > 0
@shadow_sprite.x = $game_map.big_airship.screen_x
@shadow_sprite.y = $game_map.big_airship.screen_y + $game_map.big_airship.altitude
@shadow_sprite.opacity = $game_map.big_airship.altitude * 4
@shadow_sprite.update
elsif $game_map.magic_carpet.altitude > 0
if $game_player.on_tile == true
@shadow_sprite.viewport = @viewport4
else
@shadow_sprite.viewport = @viewport1
end
@shadow_sprite.x = $game_map.magic_carpet.screen_x
@shadow_sprite.y = $game_map.magic_carpet.screen_y + $game_map.magic_carpet.altitude / 5
@shadow_sprite.opacity = $game_map.magic_carpet.altitude * 8
@shadow_sprite.update
else
tig_ev_update_shadow
end
end
end
#==============================================================================
# ■ Game_Interpreter
#------------------------------------------------------------------------------
# イベントコマンドを?行するインタプリタです。このクラスは Game_Map クラス、
# Game_Troop クラス、Game_Event クラスの?部で使用されます。
#==============================================================================
class Game_Interpreter
#--------------------------------------------------------------------------
# ◎ ?り物の?降
#--------------------------------------------------------------------------
alias tig_ev_command_206 command_206
def command_206
@wait_count = 2 #【パ?ティ?メンバ?の追?】?用時にあったほうがよい
return tig_ev_command_206
end
#--------------------------------------------------------------------------
# ○ 小型船
#--------------------------------------------------------------------------
def boat
return $game_map.boat
end
#--------------------------------------------------------------------------
# ○ 大型船
#--------------------------------------------------------------------------
def ship
return $game_map.ship
end
#--------------------------------------------------------------------------
# ○ 飛行船
#--------------------------------------------------------------------------
def airship
return $game_map.airship
end
#--------------------------------------------------------------------------
# ○ 馬
#--------------------------------------------------------------------------
def horse
return $game_map.horse
end
#--------------------------------------------------------------------------
# ○ 大型飛行船
#--------------------------------------------------------------------------
def big_airship
return $game_map.big_airship
end
#--------------------------------------------------------------------------
# ○ 魔法の絨?
#--------------------------------------------------------------------------
def magic_carpet
return $game_map.magic_carpet
end
#--------------------------------------------------------------------------
# ○ プレ?ヤ?がイベントに?る
# ※ ?り物にするイベントの「スクリプト」コマンドで?行する。
#--------------------------------------------------------------------------
def get_on_event(test = false)
if @event_id > 0
return false if $game_player.event_vehicle_lock
return $game_player.get_on_event(@event_id, test)
else
return false
end
end
#--------------------------------------------------------------------------
# ○ プレ?ヤ?がイベントに?れるかのテスト
# ※ ?り物にするイベントの「スクリプト」コマンドで?行する。
#--------------------------------------------------------------------------
def get_on_event_test
return get_on_event(true)
end
#--------------------------------------------------------------------------
# ○ プレイヤ?がイベント?り物に?っているかの判定
# word : 指定語句
# ※ 指定語句がなければ?り物にのっているかどうかを判定
# あればその語句が名前に含まれている?り物にのっているかを判定
#--------------------------------------------------------------------------
def player_in_event_vehicle(word = nil)
return false unless $game_player.in_event_vehicle?
return true if word == nil
return $game_map.event_vehicle.name.include?(word)
end
#--------------------------------------------------------------------------
# ○ プレ?ヤ?のイベント?り物をロックする
#--------------------------------------------------------------------------
def event_vehicle_lock
$game_player.event_vehicle_lock = true
end
#--------------------------------------------------------------------------
# ○ プレ?ヤ?のイベント?り物をロックを解除する
#--------------------------------------------------------------------------
def event_vehicle_lock_off
$game_player.event_vehicle_lock = false
end
#--------------------------------------------------------------------------
# ○ プレ?ヤ?をイベントから?制的に降ろす
#--------------------------------------------------------------------------
def event_vehicle_compulsory_off
$game_player.compulsory_off_event_vehicle
end
#--------------------------------------------------------------------------
# ○ プレ?ヤ?のイベント?り物を消去する
#--------------------------------------------------------------------------
def event_vehicle_erase
$game_player.compulsory_off_event_vehicle(true)
end
#--------------------------------------------------------------------------
# ○ イベントをイベントに?せる
# event_id : ?り手になるイベントのID
# vehicle_id : ?り物になるイベントのID
#--------------------------------------------------------------------------
def event_vehicle(event_id, vehicle_id, test = false)
if $game_map.events[event_id] != nil and $game_map.events[vehicle_id] != nil
return $game_map.events[event_id].ride_on($game_map.events[vehicle_id], test)
else
return false
end
end
#--------------------------------------------------------------------------
# ○ イベントをイベントに?せることが出?るかのテスト
#--------------------------------------------------------------------------
def event_vehicle_test(event_id, vehicle_id)
return event_vehicle_test(event_id, vehicle_id, true)
end
#--------------------------------------------------------------------------
# ○ イベントから降ろす
# event_id : イベントから降ろすイベントのID
#--------------------------------------------------------------------------
def get_off_event(event_id, test = false)
if $game_map.events[event_id] != nil
return $game_map.events[event_id].ride_off_character(test)
else
return false
end
end
#--------------------------------------------------------------------------
# ○ イベントから降ろすことが出?るかのテスト
#--------------------------------------------------------------------------
def get_off_event_test(event_id)
return get_off_event_test(event_id, true)
end
#--------------------------------------------------------------------------
# ○ イベントをID指定してセルフスイッチを操作する
#--------------------------------------------------------------------------
def self_switches(event_id, switches_id, on_off)
return if $game_map.events == nil
return if $game_map.events[event_id] == nil
key = [$game_map.map_id, event_id, switches_id]
$game_self_switches[key] = on_off
$game_map.need_refresh = true
$game_map.need_refresh = true
end
#--------------------------------------------------------------------------
# ○ ID指定したイベントのセルフスイッチをオン
#--------------------------------------------------------------------------
def self_switches_on(event_id, switches_id)
self_switches(event_id, switches_id, true)
end
#--------------------------------------------------------------------------
# ○ ID指定したイベントのセルフスイッチをオフ
#--------------------------------------------------------------------------
def self_switches_off(event_id, switches_id)
self_switches(event_id, switches_id, false)
end
#--------------------------------------------------------------------------
# ○ ID指定したイベントのセルフスイッチをクリア(すべてオフ)
#--------------------------------------------------------------------------
def self_switches_clear(event_id)
self_switches(event_id, "A", false)
self_switches(event_id, "B", false)
self_switches(event_id, "C", false)
self_switches(event_id, "D", false)
end
#--------------------------------------------------------------------------
# ○ ID指定したイベントがオンか？
#--------------------------------------------------------------------------
def self_switches_on?(event_id, switches_id)
key = [$game_map.map_id, event_id, switches_id]
return $game_self_switches[key] == true
end
#--------------------------------------------------------------------------
# ○ ID指定したイベントがオフか？
#--------------------------------------------------------------------------
def self_switches_off?(event_id, switches_id)
key = [$game_map.map_id, event_id, switches_id]
return $game_self_switches[key] == false
end
#--------------------------------------------------------------------------
# ○ イベントと同位置のイベントのセルフスイッチをオン
#--------------------------------------------------------------------------
def self_switches_on_here(switches_id)
self_switches_here(switches_id, true)
end
#--------------------------------------------------------------------------
# ○ イベントと同位置のイベントのセルフスイッチをオフ
#--------------------------------------------------------------------------
def self_switches_off_here(switches_id)
self_switches_here(switches_id, false)
end
#--------------------------------------------------------------------------
# ○ イベントと同位置のイベントのセルフスイッチを操作する
#--------------------------------------------------------------------------
def self_switches_here(switches_id, on_off)
return if $game_map.events == nil
result = false
main_event = $game_map.events[@event_id]
for event in $game_map.events_xy(main_event.x, main_event.y)
next if event == main_event
key = [$game_map.map_id, event.id, switches_id]
$game_self_switches[key] = on_off
$game_map.need_refresh = true
result = true
end
$game_map.need_refresh = true if result
end
end
나머지 그림들은 Graphic / Character 폴더에 저장합니다.
