角色站上移動物跟著移動 - Project1

#==============================================================================
#
#　■乗り物拡張　□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 = "ship"
# 大型飛行船の初期設定 # ----------------------------------------------
# 初期配置するマップのID／X座標／Y座標
BIG_AIRSHIP_MAP_ID = 0
BIG_AIRSHIP_X = 0
BIG_AIRSHIP_Y = 0
# 画像ファイルの名前／画像ファイルの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 [email protected]
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 = 4 # 移動速度を戻す
@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

复制代码