话说...实用脚本收集

叮当 · 发表于 2006-9-13 11:08:39

楼顶留空

叮当 · 发表于 2006-9-13 11:09:56

#==============================================================================
#　＋＋　アクティブタイムバトル　ver. 2.57　＋＋
#　　Script by パラ犬
#　　[url]http://2d6.parasite.jp/[/url]
#------------------------------------------------------------------------------
# CTゲージが溜まったバトラーから順にコマンド入力する戦闘形式。
# バトルステータス画面をサイドビューらしくする機能もあります。
# バトラーをサイドビュータイプに表示するスクリプトは、お好きなものを
# 用意してください。
#------------------------------------------------------------------------------
#［設置上の注意］
# できるだけリストの上のほうに置いてください。（Scene_Debugよりは下）
#------------------------------------------------------------------------------
#［操作］
#・逃走
#　味方バトラーの一人以上がコマンド入力待ちのときにキャンセルボタンを押すことで
#　「逃げる」コマンドが選択できます。
#　敵の数が多かったり、コマンド入力待ちのバトラーが少ないと、
#　逃走成功率が低くなります。
#
#・行動順の入れ替え
#　複数のバトラーが行動可能のとき、
#　Rボタン（PageDownキー）で次のバトラーと順番を入れ替え、
#　Lボタン（PageUpキー）で行動順をいちばん最後に回します。
#==============================================================================
module PARA_CTB
# コマンド入力時にCTのカウントを止めるか（true:止める / false:止めない）
COMMAND_WAIT = false
# アイテム、スキル、ターゲット選択時にCTのカウントを止めるか（true:止める / false:止めない）
SELECT_WAIT = true
# アニメーション表示時にCTのカウントを止めるか（true:止める / false:止めない）
ANIMATION_WAIT = false
# バトルスピード（数値が大きいほどCTの溜まりが速くなる）
BATTLE_SPEED = 3
# バトルメンバーの最大数（多人数PTスクリプトを導入している時に設定）
PARTY_SIZE = 4
# 行動終了時のCT減少パーセンテージ
ACT_ATTACK_CT = 100 # 通常攻撃
ACT_GUARD_CT = 100 # 防御
ACT_ESCAPE_CT = 100 # 逃走失敗
ACT_SKILL_CT = 100 # スキル
ACT_ITEM_CT = 100 # アイテム
# 逃走失敗時のメッセージ
UNESCAPE_MES = "逃走失敗"
# CT満タン時の効果音（""で音を鳴らさない）
# 効果音は「Audio/SE」フォルダ内
FULL_CT_SE = "015-Jump01"
# 効果音のボリューム
FULL_CT_SE_VOL = 80
# CT満タン時のバトラーの色調（(0,0,0)で変化なし）
FULL_CT_COLOR = Tone.new(32,0,0)
# HPゲージの色（グラデーション左端）
HP_COLOR_LEFT = Color.new(128, 0, 0, 255)
# HPゲージの色（グラデーション右端）
HP_COLOR_RIGHT= Color.new(255, 0, 0, 255)
# SPゲージの色（グラデーション左端）
SP_COLOR_LEFT = Color.new(0, 0, 128, 255)
# SPゲージの色（グラデーション右端）
SP_COLOR_RIGHT= Color.new(0, 0, 255, 255)
# CTゲージの色（グラデーション左端）
COLOR_LEFT = Color.new(128, 128, 64, 255)
# CTゲージの色（グラデーション右端）
COLOR_RIGHT= Color.new(255, 255, 128, 255)
# CTが満タンになったときのゲージの色
COLOR_FULL = Color.new(255, 225, 128, 255)
# ゲージ枠の色
FRAME_COLOR = Color.new(192, 192, 192, 255)
# ゲージ枠の太さ
FRAME_BORDER = 1
# ゲージの背景色
BACK_COLOR = Color.new(128, 128, 128, 128)
# 名前のフォントサイズ
NAME_FONT_SIZE = 16
# HP/SPのフォントサイズ
HPSP_FONT_SIZE = 18
# エネミー名のフォントサイズ
ENEMY_FONT_SIZE = 16
# 最大HP/SPを描画するか（ true / false ）
MAX_DRAW = false
# エネミー名をグループ化（ true / false ）
# （trueにすると「ゴースト 2」のようにまとめて表示します）
ENEMY_GROUPING = false
# エネミー名の下にゲージを表示（ 0:なし / 1:HP / 2:CT ）
# （エネミー名をグループ化している場合は無効）
ENEMY_DRAWING_MATER = 0
# アクターのヘルプウインドウにHP/SPゲージを表示（ true / false ）
HELP_DRAWING_MATER_ACTOR = false
# エネミーのヘルプウインドウにHP/SPゲージを表示（ true / false ）
HELP_DRAWING_MATER_ENEMY = false
# コマンドウインドウの位置を強制指定（ true / false ）
#（他の方のサイドビュースクリプトを併用していて
# コマンドウインドウの位置がどうしても不自然になるならtrueに）
# ※trueにしても適用されない場合、このスクリプトを
# 　サイドビューよりも下に置いてみてください
WINDOWPOS_CHANGE = false
WINDOWPOS_X = 100 # X座標
WINDOWPOS_Y = 320 # Y座標
# コマンドウインドウの不透明度
WINDOW_OPACITY = 160
# CTのカウント間隔。少ないほどゲージ描画がなめらかに。(最小値は0)
# 処理が重い場合は、この数値を上げてください。
CT_SKIP = 2
end
# ↑ 設定項目ここまで
#------------------------------------------------------------------------------
#==============================================================================
# ■ Scene_Battle
#==============================================================================
class Scene_Battle
#--------------------------------------------------------------------------
# ○ CTのカウント
#--------------------------------------------------------------------------
def update_ct
# カウントアップが許可されているとき
if @countup
for actor in $game_party.actors
# 行動できるか
if actor.movable? == false and actor.ct_visible and @phase4_step != 5
# 不可視状態でカウントアップ
actor.ct_visible = false
actor.countup = true
actor.full_ct = false
elsif actor.movable? and actor.ct_visible == false
# 不可視カウントアップを解除
clear_ct(actor)
actor.ct_visible = true
end
# アクターの入れ替えに対応
if actor.max_ct == 0
actor.max_ct = @max_ct
end
# アクターのカウントアップ
if actor.countup
# CTがmaxになっており、コマンド入力待ちアクターに含まれない
if actor.now_ct >= @max_ct and !(@pre_action_battlers.include?(actor))
# コマンド入力待ちアクターに追加
@pre_action_battlers.push(actor)
@action_count += 1
# 効果音を鳴らす
if PARA_CTB::FULL_CT_SE != "" and actor.ct_visible
Audio.se_play("Audio/SE/" + PARA_CTB::FULL_CT_SE,PARA_CTB::FULL_CT_SE_VOL)
end
# それ以上カウントアップしない
actor.countup = false
actor.full_ct = true
else
# カウントアップ
actor.make_action_speed
ct_skip = PARA_CTB::CT_SKIP != 0 ? PARA_CTB::CT_SKIP : 1
actor.now_ct += actor.current_action.speed * PARA_CTB::BATTLE_SPEED * ct_skip
end
end
end
for enemy in $game_troop.enemies
# 行動できるか
if enemy.movable? == false and enemy.ct_visible and @phase4_step == 5
# 不可視状態でカウントアップ
enemy.ct_visible = false
enemy.countup = true
enemy.full_ct = false
elsif enemy.movable? and enemy.ct_visible == false
# 不可視カウントアップを解除
clear_ct(enemy)
enemy.ct_visible = true
end
# エネミーのカウントアップ
if enemy.countup
# CTがmaxになっており、行動待ちエネミーに含まれない
if enemy.now_ct >= @max_ct and ! @pre_action_battlers.include?(enemy)
# 行動待ちエネミーに追加
@pre_action_battlers.push(enemy)
@action_count += 1
# それ以上カウントアップしない
enemy.countup = false
enemy.full_ct = true
else
# カウントアップ
enemy.make_action_speed
enemy.now_ct += enemy.current_action.speed * PARA_CTB::BATTLE_SPEED
end
end
end
# CTゲージを再描画
@status_window.refresh_ct
@status_window2.refresh_ct
end
end
#--------------------------------------------------------------------------
# ○ バトラーのCTを0に
#--------------------------------------------------------------------------
def clear_ct(battler)
battler.countup = true
battler.now_ct = 0
battler.full_ct = false
end
#--------------------------------------------------------------------------
# ○ バトラーのCTを任意のパーセンテージに
#--------------------------------------------------------------------------
def declease_ct(battler,percent)
battler.countup = true
battler.now_ct = battler.now_ct * percent / 100
battler.full_ct = false
end
#--------------------------------------------------------------------------
# ○ CTの初期化
#--------------------------------------------------------------------------
def initialize_ct
# CTの基準値を決定
max_ct
for battler in $game_party.actors + $game_troop.enemies
if battler.movable?
n = $game_party.actors.size + $game_troop.enemies.size
# 戦闘開始時にある程度のCTを溜めておく
battler.now_ct = battler.agi * 60 * n
battler.ct_visible = true
else
clear_ct(battler)
battler.ct_visible = false
end
battler.countup = true
battler.full_ct = false
battler.max_ct = @max_ct
end
end
#--------------------------------------------------------------------------
# ○ バトラー全員の素早さからCTの基準値を決定
#--------------------------------------------------------------------------
def max_ct
for battler in $game_party.actors + $game_troop.enemies
@max_ct += battler.agi
end
@max_ct *= 100
end
#--------------------------------------------------------------------------
# ○ バトラーの行動順を変更
#--------------------------------------------------------------------------
def shift_activer(shift)
# 一つシフトする時で後ろのアクターが2人以上
if @pre_action_battlers != nil
if shift == 1 and @pre_action_battlers.size >= @actor_array_index + 3
# 現在のアクターを取得
act = @pre_action_battlers[@actor_array_index]
# 現在のアクターを二つ後ろに挿入
@pre_action_battlers.insert(@actor_array_index+2, act)
# 現在位置を消去
@pre_action_battlers.delete_at(@actor_array_index)
@actor_array_index -= 1
phase3_next_actor
else
act = @pre_action_battlers[@actor_array_index]
# 現在のアクターを一番後ろに追加
@pre_action_battlers.push(act)
# 現在位置を消去
@pre_action_battlers.delete_at(@actor_array_index)
@actor_array_index -= 1
phase3_next_actor
end
end
end
#--------------------------------------------------------------------------
# ● メイン処理
#--------------------------------------------------------------------------
alias main_ctb main
def main
# エネミー名ウインドウを作成
@status_window2 = Window_BattleStatus_enemy.new
@action_battlers = []
@pre_action_battlers = []
@max_ct = 0
@countup = false
@ct_wait = 0
@action_count = 0
main_ctb
# エネミー名ウインドウを破棄
@status_window2.dispose
end
#--------------------------------------------------------------------------
# ● フレーム更新
#--------------------------------------------------------------------------
alias ctb_update update
def update
# バトルイベント実行中の場合
if $game_system.battle_interpreter.running?
# インタプリタを更新
$game_system.battle_interpreter.update
# アクションを強制されているバトラーが存在しない場合
if $game_temp.forcing_battler == nil
# バトルイベントの実行が終わった場合
unless $game_system.battle_interpreter.running?
# 戦闘継続の場合、バトルイベントのセットアップを再実行
unless judge
setup_battle_event
end
end
# アフターバトルフェーズでなければ
if @phase != 5
# ステータスウィンドウをリフレッシュ
@status_window.refresh
# エネミー名リストを更新
@status_window2.refresh
end
end
else
if PARA_CTB::CT_SKIP == 0
update_ct
else
if @ct_wait > 0
@ct_wait -= 1
else
update_ct
@ct_wait = PARA_CTB::CT_SKIP
end
end
end
ctb_update
end
#--------------------------------------------------------------------------
# ● プレバトルフェーズ開始
#--------------------------------------------------------------------------
alias ctb_start_phase1 start_phase1
def start_phase1
# CTを初期化
initialize_ct
# カウントアップ開始
@countup = true
ctb_start_phase1
end
#--------------------------------------------------------------------------
# ● フレーム更新 (プレバトルフェーズ)
#--------------------------------------------------------------------------
def update_phase1
# エネミー名リストを更新
@status_window2.refresh
# 勝敗判定
if judge
# 勝利または敗北の場合 : メソッド終了
return
end
# パーティーコマンドフェーズを飛ばしてアクターコマンドフェーズ開始
start_phase3
end
#--------------------------------------------------------------------------
# ● パーティコマンドフェーズ開始
#--------------------------------------------------------------------------
def start_phase2
# フェーズ 2 に移行
@phase = 2
# アクターを非選択状態に設定
@actor_index = -1
@active_battler = nil
# パーティコマンドウィンドウを有効化
@party_command_window.active = true
@party_command_window.visible = true
# アクターコマンドウィンドウを無効化
@actor_command_window.active = false
@actor_command_window.visible = false
# メインフェーズフラグをクリア
$game_temp.battle_main_phase = false
# コマンド入力不可能な場合
unless $game_party.inputable?
# メインフェーズ開始
start_phase4
end
end
#--------------------------------------------------------------------------
# ● フレーム更新 (パーティコマンドフェーズ : 逃げる)
#--------------------------------------------------------------------------
def update_phase2_escape
# エネミーの素早さ合計を計算
enemies_agi = 0
for enemy in $game_troop.enemies
if enemy.exist?
enemies_agi += enemy.agi
end
end
# 行動可能アクターの素早さ合計を計算
actors_agi = 0
for actor in @pre_action_battlers
if actor.is_a?(Game_Actor) and actor.exist?
actors_agi += actor.agi
end
end
# 逃走成功判定
success = rand(100) < 50 * actors_agi / enemies_agi
# 逃走成功の場合
if success
# 逃走 SE を演奏
$game_system.se_play($data_system.escape_se)
# バトル開始前の BGM に戻す
$game_system.bgm_play($game_temp.map_bgm)
# CTをクリア
for battler in $game_party.actors
clear_ct(battler)
end
# バトル終了
battle_end(1)
# 逃走失敗の場合
else
# ヘルプウィンドウに "逃走失敗" をセット
@help_window.set_text(PARA_CTB::UNESCAPE_MES, 1)
# アクターのアクションとCTをクリア
pre_action_battlers = @pre_action_battlers.clone
for act in pre_action_battlers
if act.is_a?(Game_Actor)
declease_ct(act, 100-PARA_CTB::ACT_ESCAPE_CT)
act.current_action.clear
@pre_action_battlers.delete(act)
end
end
@party_command_window.visible = false
# ヘルプウィンドウを表示
@help_window.visible = true
@wait_count = 20
# メインフェーズ開始
start_phase4
end
end
#--------------------------------------------------------------------------
# ● アクターコマンドフェーズ開始
#--------------------------------------------------------------------------
def start_phase3
# フェーズ 3 に移行
@phase = 3
# アクターを非選択状態に設定
@actor_index = -1
@active_battler = nil
@actor_array_index = -1
# 次のアクターのコマンド入力へ
if @pre_action_battlers != []
phase3_next_actor
else
start_phase4
end
end
#--------------------------------------------------------------------------
# ● 次のアクターのコマンド入力へ
#--------------------------------------------------------------------------
def phase3_next_actor
# ループ
begin
# アクターの明滅エフェクト OFF
if @active_battler != nil
@active_battler.blink = false
end
# 最後のアクターの場合
if @actor_array_index + 1 == @pre_action_battlers.size
# メインフェーズ開始
start_phase4
return
#次がエネミーの場合
elsif $game_troop.enemies.include?(@pre_action_battlers[@actor_array_index + 1])
# メインフェーズ開始
start_phase4
return
end
# アクターのインデックスを進める
@actor_array_index += 1
@actor_index = @pre_action_battlers[@actor_array_index].index
@active_battler = $game_party.actors[@actor_index]
@active_battler.blink = true
@active_battler.current_action.clear
# アクターがコマンド入力を受け付けない状態ならもう一度
end until @active_battler.inputable?
# アクターコマンドウィンドウをセットアップ
phase3_setup_command_window
end
#--------------------------------------------------------------------------
# ● 前のアクターのコマンド入力へ
#--------------------------------------------------------------------------
def phase3_prior_actor
# ループ
begin
# アクターの明滅エフェクト OFF
if @active_battler != nil
@active_battler.blink = false
end
# 最初のアクターの場合
if @actor_array_index <= 0
# アクターコマンドフェーズ開始
start_phase2
return
end
# アクターのインデックスを戻す
@actor_array_index -= 1
@actor_index = @pre_action_battlers[@actor_array_index].index
@active_battler = $game_party.actors[@actor_index]
@active_battler.blink = true
@active_battler.current_action.clear
# アクターがコマンド入力を受け付けない状態ならもう一度
end until @active_battler.inputable?
# アクターコマンドウィンドウをセットアップ
phase3_setup_command_window
end
#--------------------------------------------------------------------------
# ● アクターコマンドウィンドウのセットアップ
#--------------------------------------------------------------------------
alias phase3_setup_command_window_ctb phase3_setup_command_window
def phase3_setup_command_window
@actor_command_window.back_opacity = PARA_CTB::WINDOW_OPACITY
phase3_setup_command_window_ctb
if PARA_CTB::WINDOWPOS_CHANGE
# アクターコマンドウィンドウの位置を設定
@actor_command_window.x = PARA_CTB::WINDOWPOS_X
@actor_command_window.y = PARA_CTB::WINDOWPOS_Y
# ステータスウインドウに隠れないように
@actor_command_window.z = 9999
end
end
#--------------------------------------------------------------------------
# ● フレーム更新 (アクターコマンドフェーズ)
#--------------------------------------------------------------------------
def update_phase3
# エネミーアローが有効の場合
if @enemy_arrow != nil
@countup = PARA_CTB::SELECT_WAIT ? false : true
update_phase3_enemy_select
# アクターアローが有効の場合
elsif @actor_arrow != nil
@countup = PARA_CTB::SELECT_WAIT ? false : true
update_phase3_actor_select
# スキルウィンドウが有効の場合
elsif @skill_window != nil
@countup = PARA_CTB::SELECT_WAIT ? false : true
update_phase3_skill_select
# アイテムウィンドウが有効の場合
elsif @item_window != nil
@countup = PARA_CTB::SELECT_WAIT ? false : true
update_phase3_item_select
# アクターコマンドウィンドウが有効の場合
elsif @actor_command_window.active
@countup = PARA_CTB::COMMAND_WAIT ? false : true
update_phase3_basic_command
end
end
#--------------------------------------------------------------------------
# ● フレーム更新 (アクターコマンドフェーズ : 基本コマンド)
#--------------------------------------------------------------------------
alias ctb_update_phase3_basic_command update_phase3_basic_command
def update_phase3_basic_command
ctb_update_phase3_basic_command
# LRボタンで行動順を変更
if Input.trigger?(Input::R)
shift_activer(1)
end
if Input.trigger?(Input::L)
shift_activer(-1)
end
end
#--------------------------------------------------------------------------
# ● メインフェーズ開始
#--------------------------------------------------------------------------
def start_phase4
# フェーズ 4 に移行
@phase = 4
battler_count = $game_party.actors.size + $game_troop.enemies.size
if @action_count >= battler_count or $game_temp.battle_turn == 0
# バトルイベントの全ページを検索
for index in 0...$data_troops[@troop_id].pages.size
# イベントページを取得
page = $data_troops[@troop_id].pages[index]
# このページのスパンが [ターン] の場合
if page.span == 1
# 実行済みフラグをクリア
$game_temp.battle_event_flags[index] = false
end
end
# ターン数カウント
$game_temp.battle_turn += 1
@action_count = 0
end
# アクターを非選択状態に設定
@actor_index = -1
@active_battler = nil
# パーティコマンドウィンドウを有効化
@party_command_window.active = false
@party_command_window.visible = false
# アクターコマンドウィンドウを無効化
@actor_command_window.active = false
@actor_command_window.visible = false
# メインフェーズフラグをセット
$game_temp.battle_main_phase = true
# エネミーアクション作成
for enemy in $game_troop.enemies
enemy.make_action
end
# 行動順序作成
make_action_orders
# ステップ 1 に移行
@phase4_step = 1
end
#--------------------------------------------------------------------------
# ● 行動順序作成
#--------------------------------------------------------------------------
def make_action_orders
# 配列 @action_battlers を初期化
@action_battlers = []
if @pre_action_battlers != []
for i in 0..@actor_array_index
# アクターを配列 @action_battlers に追加
@action_battlers.push(@pre_action_battlers[0])
@pre_action_battlers.shift
end
if @pre_action_battlers.size != 0
loop do
if $game_troop.enemies.include?(@pre_action_battlers[0])
# エネミーを配列 @action_battlers に追加
@action_battlers.push(@pre_action_battlers[0])
@pre_action_battlers.shift
else
break
end
end
end
end
end
#--------------------------------------------------------------------------
# ● フレーム更新 (メインフェーズステップ 1 : アクション準備)
#--------------------------------------------------------------------------
alias ctb_update_phase4_step1 update_phase4_step1
def update_phase4_step1
@countup = true
# ヘルプウィンドウを隠す
@help_window.visible = false
# 勝敗判定
if judge
# 勝利または敗北の場合 : メソッド終了
return
end
# 未行動バトラーが存在しない場合 (全員行動した)
if @action_battlers.size == 0
# アクターコマンドフェーズ開始
start_phase3
return
end
ctb_update_phase4_step1
end
#--------------------------------------------------------------------------
# ● フレーム更新 (メインフェーズステップ 2 : アクション開始)
#--------------------------------------------------------------------------
alias ctb_update_phase4_step2 update_phase4_step2
def update_phase4_step2
# 強制アクションでなければ
unless @active_battler.current_action.forcing
# 制約が [行動できない] の場合
if @active_battler.restriction == 4
# CTをクリア
clear_ct(@active_battler)
# アクション強制対象のバトラーをクリア
$game_temp.forcing_battler = nil
# ステップ 1 に移行
@phase4_step = 1
return
end
end
# アニメーション再生中にCTをカウントするか
if PARA_CTB::ANIMATION_WAIT == false
@countup = true
end
ctb_update_phase4_step2
end
#--------------------------------------------------------------------------
# ● 基本アクション結果作成
#--------------------------------------------------------------------------
alias make_basic_action_result_ctb make_basic_action_result
def make_basic_action_result
# 何もしないの場合
if @active_battler.current_action.basic == 3
# CTをクリア
clear_ct(@active_battler)
# アクション強制対象のバトラーをクリア
$game_temp.forcing_battler = nil
# ステップ 1 に移行
@phase4_step = 1
return
end
make_basic_action_result_ctb
end
#--------------------------------------------------------------------------
# ● スキルアクション結果作成
#--------------------------------------------------------------------------
def make_skill_action_result
# スキルを取得
@skill = $data_skills[@active_battler.current_action.skill_id]
# 強制アクションでなければ
unless @active_battler.current_action.forcing
# SP 切れなどで使用できなくなった場合
unless @active_battler.skill_can_use?(@skill.id)
# アクション強制対象のバトラーをクリア
$game_temp.forcing_battler = nil
# CTをクリア
declease_ct(@active_battler,100-PARA_CTB::ACT_SKILL_CT)
# ステップ 1 に移行
@phase4_step = 1
return
end
end
# SP 消費
@active_battler.sp -= @skill.sp_cost
# ステータスウィンドウをリフレッシュ
@status_window.refresh
# ヘルプウィンドウにスキル名を表示
@help_window.set_text(@skill.name, 1)
# アニメーション ID を設定
@animation1_id = @skill.animation1_id
@animation2_id = @skill.animation2_id
# コモンイベント ID を設定
@common_event_id = @skill.common_event_id
# 対象側バトラーを設定
set_target_battlers(@skill.scope)
# スキルの効果を適用
for target in @target_battlers
target.skill_effect(@active_battler, @skill)
end
end
#--------------------------------------------------------------------------
# ● アイテムアクション結果作成
#--------------------------------------------------------------------------
alias ctb_make_item_action_result make_item_action_result
def make_item_action_result
# アイテムを取得
@item = $data_items[@active_battler.current_action.item_id]
# アイテム切れなどで使用できなくなった場合
unless $game_party.item_can_use?(@item.id)
# CTをクリア
declease_ct(@active_battler,100-PARA_CTB::ACT_ITEM_CT)
# ステップ 1 に移行
@phase4_step = 1
return
end
ctb_make_item_action_result
end
#--------------------------------------------------------------------------
# ● フレーム更新 (メインフェーズステップ 5 : ダメージ表示)
#--------------------------------------------------------------------------
alias update_phase4_step5_ctb update_phase4_step5
def update_phase4_step5
# ダメージを記録
for target in @target_battlers
if target.damage != nil
target.movable_backup = target.movable?
end
end
update_phase4_step5_ctb
end
#--------------------------------------------------------------------------
# ● フレーム更新 (メインフェーズステップ 6 : リフレッシュ)
#--------------------------------------------------------------------------
alias update_phase4_step6_ctb update_phase4_step6
def update_phase4_step6
@active_battler.countup = true
if @active_battler.current_action.basic == 1
# 防御
declease_ct(@active_battler,100-PARA_CTB::ACT_GUARD_CT)
else
case @active_battler.current_action.kind
# 攻撃
when 0
declease_ct(@active_battler,100-PARA_CTB::ACT_ATTACK_CT)
# スキル
when 1
declease_ct(@active_battler,100-PARA_CTB::ACT_SKILL_CT)
# アイテム
when 2
declease_ct(@active_battler,100-PARA_CTB::ACT_ITEM_CT)
else
clear_ct(@active_battler)
end
end
# ターゲットが行動不能になったらCTを0に
for target in @target_battlers
if target.movable? == false and target.movable_backup == true
clear_ct(target)
@status_window.refresh_ct
end
end
# エネミー名リストを更新
@status_window2.refresh
update_phase4_step6_ctb
end
#--------------------------------------------------------------------------
# ● アフターバトルフェーズ開始
#--------------------------------------------------------------------------
alias ctb_start_phase5 start_phase5
def start_phase5
@countup = false
ctb_start_phase5
end
end
#==============================================================================
# ■ Window_BattleStatus
#==============================================================================
class Window_BattleStatus < Window_Base
#--------------------------------------------------------------------------
# ● オブジェクト初期化
#--------------------------------------------------------------------------
def initialize
super(160, 320, 480, 160)
self.contents = Bitmap.new(width - 32, height - 32)
@level_up_flags = [false, false, false, false]
@before_hp = []
@before_sp = []
@before_states = []
@now_hp = []
@now_sp = []
@now_states = []
refresh
end
#--------------------------------------------------------------------------
# ● リフレッシュ
#--------------------------------------------------------------------------
def refresh
@item_max = $game_party.actors.size
for i in 0...$game_party.actors.size
actor = $game_party.actors[i]
line_height = 120 / PARA_CTB::PARTY_SIZE
actor_y = i * line_height + 4
# 現在のステータスを配列に
@now_hp[i] = actor.hp
@now_sp[i] = actor.sp
@now_states[i] = actor.states
# レベルアップ
if @level_up_flags[i]
self.contents.fill_rect(344, actor_y+14, 100, 8, Color.new(0, 0, 0, 0))
self.contents.font.color = normal_color
self.contents.draw_text(344, actor_y, 120, 32, "LEVEL UP!")
end
end
# バトルステータスの軽量化処理
# ステータスの配列が変化したときのみ描画処理
if @before_hp == nil or @before_sp == nil or @before_states == nil or
@before_hp != @now_hp or @before_sp != @now_sp or @before_states != @now_states
self.contents.clear
for i2 in 0...$game_party.actors.size
actor = $game_party.actors[i2]
line_height = 120 / PARA_CTB::PARTY_SIZE
actor_y = i2 * line_height + 4
self.contents.font.size = PARA_CTB::NAME_FONT_SIZE
# 名前を描画
draw_actor_name(actor, 4, actor_y+16-PARA_CTB::NAME_FONT_SIZE)
# HPを描画
hp_color1 = PARA_CTB::HP_COLOR_LEFT
hp_color2 = PARA_CTB::HP_COLOR_RIGHT
draw_meter(actor.hp, actor.maxhp, 125, actor_y+14, 80, 8, hp_color1, hp_color2)
draw_actor_hp(actor, 102, actor_y+16-PARA_CTB::HPSP_FONT_SIZE, 100)
# SPを描画
sp_color1 = PARA_CTB::SP_COLOR_LEFT
sp_color2 = PARA_CTB::SP_COLOR_RIGHT
draw_meter(actor.sp, actor.maxsp, 245, actor_y+14, 80, 8, sp_color1, sp_color2)
draw_actor_sp(actor, 222, actor_y+16-PARA_CTB::HPSP_FONT_SIZE, 100)
# 変化後のステータスを配列に
@before_hp[i2] = actor.hp
@before_sp[i2] = actor.sp
@before_states[i2] = actor.states
# レベルアップ
if @level_up_flags[i2]
self.contents.fill_rect(344, actor_y, 100, 8, Color.new(0, 0, 0, 0))
self.contents.font.color = normal_color
self.contents.draw_text(344, actor_y, 120, 32, "LEVEL UP!")
end
end
end
refresh_ct
end
#--------------------------------------------------------------------------
# ● CTゲージのリフレッシュ
#--------------------------------------------------------------------------
def refresh_ct
for i in 0...$game_party.actors.size
actor = $game_party.actors[i]
line_height = 120 / PARA_CTB::PARTY_SIZE
actor_y = i * line_height + 4
# CTが満タンになったときのゲージの色
ct_color_full = PARA_CTB::COLOR_FULL
# CTゲージの色（左端）
ct_color_start = actor.full_ct ? ct_color_full : PARA_CTB::COLOR_LEFT
# CTゲージの色（右端）
ct_color_end = actor.full_ct ? ct_color_full : PARA_CTB::COLOR_RIGHT
if @level_up_flags[i] != true and actor.ct_visible
draw_meter(actor.now_ct, actor.max_ct, 344, actor_y+14, 100, 8, ct_color_start, ct_color_end)
elsif @level_up_flags[i] != true
draw_meter(0, actor.max_ct, 344, actor_y+14, 100, 8, ct_color_start, ct_color_end)
end
end
end
#--------------------------------------------------------------------------
# ● フレーム更新
#--------------------------------------------------------------------------
def update
super
end
#--------------------------------------------------------------------------
# ● HP の描画
# actor : アクター
# x : 描画先 X 座標
# y : 描画先 Y 座標
# width : 描画先の幅
#--------------------------------------------------------------------------
def draw_actor_hp(actor, x, y, width = 144)
# 文字列 "HP" を描画
self.contents.font.color = system_color
self.contents.font.size = 16
self.contents.draw_text(x, y+2, 32, 32, $data_system.words.hp)
self.contents.font.color = normal_color
self.contents.font.size = PARA_CTB::HPSP_FONT_SIZE
if PARA_CTB::MAX_DRAW
# MaxHP を描画
self.contents.draw_text(x, y, width, 32, actor.maxhp.to_s, 2)
text_size = self.contents.text_size(actor.maxhp.to_s)
text_x = x + width - text_size.width - 12
self.contents.draw_text(text_x, y, 12, 32, "/", 1)
# HP を描画
self.contents.font.color = actor.hp == 0 ? knockout_color :
actor.hp <= actor.maxhp / 4 ? crisis_color : normal_color
text_x = text_x - text_size.width
self.contents.draw_text(text_x, y, text_size.width, 32, actor.hp.to_s, 2)
else
self.contents.font.color = actor.hp == 0 ? knockout_color :
actor.hp <= actor.maxhp / 4 ? crisis_color : normal_color
self.contents.draw_text(x, y, width, 32, actor.hp.to_s, 2)
end
end
#--------------------------------------------------------------------------
# ● SP の描画
# actor : アクター
# x : 描画先 X 座標
# y : 描画先 Y 座標
# width : 描画先の幅
#--------------------------------------------------------------------------
def draw_actor_sp(actor, x, y, width = 144)
# 文字列 "SP" を描画
self.contents.font.color = system_color
self.contents.font.size = 16
self.contents.draw_text(x, y+2, 32, 32, $data_system.words.sp)
self.contents.font.color = normal_color
self.contents.font.size = PARA_CTB::HPSP_FONT_SIZE
if PARA_CTB::MAX_DRAW
# MaxSP を描画
self.contents.draw_text(x, y, width, 32, actor.maxsp.to_s, 2)
text_size = self.contents.text_size(actor.maxsp.to_s)
text_x = x + width - text_size.width - 12
self.contents.draw_text(text_x, y, 12, 32, "/", 1)
# SP を描画
self.contents.font.color = actor.sp == 0 ? knockout_color :
actor.sp <= actor.maxsp / 4 ? crisis_color : normal_color
text_x = text_x - text_size.width
self.contents.draw_text(text_x, y, text_size.width, 32, actor.sp.to_s, 2)
else
self.contents.font.color = actor.sp == 0 ? knockout_color :
actor.sp <= actor.maxsp / 4 ? crisis_color : normal_color
self.contents.draw_text(x, y, width, 32, actor.sp.to_s, 2)
end
end
end
#==============================================================================
# □ 敵の名前を表示するウインドウ
#==============================================================================
class Window_BattleStatus_enemy < Window_Base
#--------------------------------------------------------------------------
# ○ オブジェクト初期化
#--------------------------------------------------------------------------
def initialize
super(0, 320, 160, 160)
self.contents = Bitmap.new(width - 32, height - 32)
refresh
end
#--------------------------------------------------------------------------
# ○ リフレッシュ
#--------------------------------------------------------------------------
def refresh
self.contents.clear
self.contents.font.color = normal_color
self.contents.font.size = PARA_CTB::ENEMY_FONT_SIZE
@exist_enemies = []
if $game_troop.enemies != nil
if PARA_CTB::ENEMY_GROUPING
ememy_list = []
ememy_list_index = []
# エネミーをグループ化
for i in 0...$game_troop.enemies.size
enemy = $game_troop.enemies[i]
if enemy.exist?
if ememy_list.include?(enemy.name)
ememy_list_index[ememy_list.index(enemy.name)] += 1
else
# エネミー名を記録
ememy_list.push(enemy.name)
ememy_list_index[ememy_list.index(enemy.name)] = 1
end
end
end
# エネミーの名前と数を描画
enemy_index = 0
for enemy_name in ememy_list
enemy_y = enemy_index * (PARA_CTB::ENEMY_FONT_SIZE+6) + 4
if ememy_list_index[enemy_index] > 1
enemy_name = enemy_name + "　" + ememy_list_index[enemy_index].to_s
end
self.contents.draw_text(4, enemy_y, 160, 20, enemy_name)
enemy_index += 1
end
else
# エネミーの名前を描画
enemy_index = 0
for i in 0...$game_troop.enemies.size
enemy = $game_troop.enemies[i]
if enemy.exist?
@exist_enemies.push(enemy)
line_height = PARA_CTB::ENEMY_FONT_SIZE + 6
if PARA_CTB::ENEMY_DRAWING_MATER != 0
line_height += 10
end
enemy_y = enemy_index * line_height + 4
self.contents.draw_text(4, enemy_y, 160, 20, enemy.name)
enemy_index += 1
if PARA_CTB::ENEMY_DRAWING_MATER == 1
hp_color1 = PARA_CTB::HP_COLOR_LEFT
hp_color2 = PARA_CTB::HP_COLOR_RIGHT
y = enemy_y + PARA_CTB::ENEMY_FONT_SIZE + 3
draw_meter(enemy.hp, enemy.maxhp, 4, y, 80, 8, hp_color1, hp_color2)
end
end
end
end
end
refresh_ct
end
#--------------------------------------------------------------------------
# ● CTゲージのリフレッシュ
#--------------------------------------------------------------------------
def refresh_ct
if PARA_CTB::ENEMY_DRAWING_MATER == 2 and @exist_enemies != nil
enemy_index = 0
for enemy in @exist_enemies
line_height = PARA_CTB::ENEMY_FONT_SIZE + 16
enemy_y = enemy_index * line_height + 4
y = enemy_y + PARA_CTB::ENEMY_FONT_SIZE + 3
# CTが満タンになったときのゲージの色
ct_color_full = PARA_CTB::COLOR_FULL
# CTゲージの色（左端）
ct_color_start = enemy.full_ct ? ct_color_full : PARA_CTB::COLOR_LEFT
# CTゲージの色（右端）
ct_color_end = enemy.full_ct ? ct_color_full : PARA_CTB::COLOR_RIGHT
if enemy.ct_visible
draw_meter(enemy.now_ct, enemy.max_ct, 4, y, 100, 8, ct_color_start, ct_color_end)
else
draw_meter(0, enemy.max_ct, 4, y, 100, 8, ct_color_start, ct_color_end)
end
enemy_index += 1
end
end
end
end
#==============================================================================
# ■ Window_Base
#==============================================================================
class Window_Base < Window
#--------------------------------------------------------------------------
# ○ ゲージを描画
#--------------------------------------------------------------------------
def draw_meter(now, max, x, y, width, height, start_color, end_color=start_color )
self.contents.fill_rect(x, y, width, height, PARA_CTB::FRAME_COLOR)
self.contents.fill_rect(x+PARA_CTB::FRAME_BORDER, y+PARA_CTB::FRAME_BORDER, width-
PARA_CTB::FRAME_BORDER*2, height-PARA_CTB::FRAME_BORDER*2, PARA_CTB::BACK_COLOR)
now = now > max ? max : now
percentage = max != 0 ? (width-2) * now / max.to_f : 0
if start_color == end_color
self.contents.fill_rect(x+1, y+1, percentage, height-2, start_color)
else
for i in 1..percentage
r = start_color.red + (end_color.red - start_color.red) / percentage * i
g = start_color.green + (end_color.green - start_color.green) / percentage * i
b = start_color.blue + (end_color.blue - start_color.blue) / percentage * i
a = start_color.alpha + (end_color.alpha - start_color.alpha) / percentage * i
self.contents.fill_rect(x+i, y+1, 1, height-2, Color.new(r, g, b, a))
end
end
end
end
#==============================================================================
# ■ Game_Battler
#==============================================================================
class Game_Battler
#--------------------------------------------------------------------------
# ● 公開インスタンス変数
#--------------------------------------------------------------------------
attr_accessor :max_ct
attr_accessor :now_ct
attr_accessor :full_ct
attr_accessor :countup
attr_accessor :ct_visible
attr_accessor :movable_backup
#--------------------------------------------------------------------------
# ● オブジェクト初期化
#--------------------------------------------------------------------------
alias ctb_initialize initialize
def initialize
ctb_initialize
@max_ct = 0
@now_ct = 0
@full_ct = false
@countup = true
@ct_visible = true
end
end
#==============================================================================
# ■ Sprite_Battler
#==============================================================================
class Sprite_Battler < RPG::Sprite
#--------------------------------------------------------------------------
# ● フレーム更新
#--------------------------------------------------------------------------
alias ctb_update update
def update
ctb_update
if @battler != nil
if @battler.full_ct and @battler.ct_visible
# CTが溜まったバトラーの色調を変化させる
fullct_color = PARA_CTB::FULL_CT_COLOR
self.tone = fullct_color
else
fullct_color = Tone.new(0,0,0)
self.tone = fullct_color
end
end
end
end
#==============================================================================
# ■ Window_Help
#==============================================================================
class Window_Help < Window_Base
#--------------------------------------------------------------------------
# ● アクター設定
# actor : ステータスを表示するアクター
#--------------------------------------------------------------------------
alias set_actor_ctb set_actor
def set_actor(actor)
if PARA_CTB::HELP_DRAWING_MATER_ACTOR
self.contents.clear
draw_actor_name(actor, 4, 0)
draw_actor_state(actor, 140, 0)
hp_color1 = PARA_CTB::HP_COLOR_LEFT
hp_color2 = PARA_CTB::HP_COLOR_RIGHT
draw_meter(actor.hp, actor.maxhp, 316, 18, 112, 8, hp_color1, hp_color2)
draw_actor_hp(actor, 284, 0)
sp_color1 = PARA_CTB::SP_COLOR_LEFT
sp_color2 = PARA_CTB::SP_COLOR_RIGHT
draw_meter(actor.sp, actor.maxsp, 492, 18, 112, 8, sp_color1, sp_color2)
draw_actor_sp(actor, 460, 0)
@actor = actor
@text = nil
self.visible = true
else
set_actor_ctb(actor)
end
end
#--------------------------------------------------------------------------
# ● エネミー設定
# enemy : 名前とステートを表示するエネミー
#--------------------------------------------------------------------------
alias set_enemy_ctb set_enemy
def set_enemy(enemy)
if PARA_CTB::HELP_DRAWING_MATER_ENEMY
self.contents.clear
draw_actor_name(enemy, 4, 0)
draw_actor_state(enemy, 140, 0)
hp_color1 = PARA_CTB::HP_COLOR_LEFT
hp_color2 = PARA_CTB::HP_COLOR_RIGHT
draw_meter(enemy.hp, enemy.maxhp, 316, 18, 112, 8, hp_color1, hp_color2)
draw_actor_hp(enemy, 284, 0)
sp_color1 = PARA_CTB::SP_COLOR_LEFT
sp_color2 = PARA_CTB::SP_COLOR_RIGHT
draw_meter(enemy.sp, enemy.maxsp, 492, 18, 112, 8, sp_color1, sp_color2)
draw_actor_sp(enemy, 460, 0)
self.visible = true
else
set_enemy_ctb(enemy)
end
end
end

复制代码

叮当 · 发表于 2006-9-13 11:12:05

#==============================================================================
#　＋＋　サイドビューバトル（歩行グラフィック版）　ver. 1.14　＋＋
#　　Script by パラ犬
#　　[url]http://2d6.parasite.jp/[/url]
#------------------------------------------------------------------------------
# バトルフィールドに歩行グラフィックを表示します。
#==============================================================================
module SDVA
X_LINE = 500 # 横位置のバトラー表示座標
Y_LINE = 200 # 縦位置のバトラー表示座標
X_SPACE = 15 # 横位置のバトラー同士の間隔
Y_SPACE = 40 # 縦位置のバトラー同士の間隔
X_POSITION = 25 # 隊列［前衛・中衛・後衛］の横間隔
Y_POSITION = 0 # 隊列［前衛・中衛・後衛］の縦間隔
ATTACK_MOVE = true # 攻撃時に前へ踏み出すか（ true / false ）
SKILL_MOVE = true # スキル使用時に前へ踏み出すか（ true / false ）
ITEM_MOVE = false # アイテム使用時に前へ踏み出すか（ true / false ）
MOVE_STEP = 1 # 移動歩数
MOVE_PIXEL = 10 # 一歩あたりのピクセル数
PARTY_POS = 1 # キャラクターの向き（ 0:下 / 1:左 / 2:右 / 3:上）
WINDOWPOS_CHANGE = true # コマンドウインドウをバトラーの横に表示するか（ true / false ）
end
#==============================================================================
# ■ Game_Actor
#==============================================================================
class Game_Actor < Game_Battler
#--------------------------------------------------------------------------
# ● バトル画面 X 座標の取得
#--------------------------------------------------------------------------
def screen_x
if self.index != nil
# 隊列を取得
pos = $data_classes[self.class_id].position
x_pos = pos * SDVA::X_POSITION
scr_x = self.index * SDVA::X_SPACE + SDVA::X_LINE + x_pos
# 移動アクションのとき
if self.current_action.move_action == true
# 横に移動
scr_x += @shift_x
end
return scr_x
else
return 0
end
end
#--------------------------------------------------------------------------
# ● バトル画面 Y 座標の取得
#--------------------------------------------------------------------------
def screen_y
if self.index != nil
# 隊列を取得
pos = $data_classes[self.class_id].position
y_pos = pos * SDVA::Y_POSITION
scr_y = self.index * SDVA::Y_SPACE + SDVA::Y_LINE + y_pos
# 移動アクションのとき
if self.current_action.move_action == true
# 縦に移動
scr_y += @shift_y
end
return scr_y
else
return 0
end
end
#--------------------------------------------------------------------------
# ● バトル画面 Z 座標の取得
#--------------------------------------------------------------------------
def screen_z
if self.index != nil
return self.index
else
return 0
end
end
end
#==============================================================================
# ■ Game_Battler (分割定義 1)
#==============================================================================
class Game_Battler
#--------------------------------------------------------------------------
# ● 公開インスタンス変数
#--------------------------------------------------------------------------
attr_reader :pattern # 歩行パターン
attr_reader :trans_x # X方向の移動距離
attr_reader :moving # 移動中フラグ
#--------------------------------------------------------------------------
# ● オブジェクト初期化
#--------------------------------------------------------------------------
alias initialize_sdva initialize
def initialize
initialize_sdva
move_reset
end
#--------------------------------------------------------------------------
# ○ 移動カウント
#--------------------------------------------------------------------------
def move
@moving = 1
if @step < SDVA::MOVE_STEP
# 歩数を満たすまで移動
@pattern = (@pattern + 1) % 4
@step += 1
move_step
else
# 移動終了
@pattern = 1
@moving = 2
end
end
#--------------------------------------------------------------------------
# ○ 移動処理
#--------------------------------------------------------------------------
def move_step
# パーティの向きによって移動座標を変える
case SDVA::PARTY_POS
when 0
@shift_y = @step * SDVA::MOVE_PIXEL
when 1
@shift_x = -(@step * SDVA::MOVE_PIXEL)
when 2
@shift_x = @step * SDVA::MOVE_PIXEL
when 3
@shift_y = -(@step * SDVA::MOVE_PIXEL)
end
end
#--------------------------------------------------------------------------
# ○ 移動のリセット
#--------------------------------------------------------------------------
def move_reset
@moving = 0
@pattern = 0
@step = 0
@shift_x = 0
@shift_y = 0
end
end
#==============================================================================
# ■ Game_BattleAction
#==============================================================================
class Game_BattleAction
#--------------------------------------------------------------------------
# ● 公開インスタンス変数
#--------------------------------------------------------------------------
attr_accessor :move_action # 移動するアクションか
#--------------------------------------------------------------------------
# ● クリア
#--------------------------------------------------------------------------
alias clear_sdva clear
def clear
clear_sdva
@move_action = false
end
end
#==============================================================================
# ■ Sprite_Battler
#==============================================================================
class Sprite_Battler < RPG::Sprite
#--------------------------------------------------------------------------
# ● フレーム更新
#--------------------------------------------------------------------------
alias update_sdva update
def update
# バトラーがアクターに含まれるとき
if @battler.is_a?(Game_Actor)
# ファイル名か色相が現在のものと異なる場合
# 行動中の場合
if @battler.battler_name != @battler_name or
@battler.battler_hue != @battler_hue or
@battler.current_action.basic == 0 or
@battler.current_action.kind != 3
# ビットマップを取得、設定
@character_name = @battler.character_name
@character_hue = @battler.character_hue
# 歩行グラフィックを描画
self.bitmap = RPG::Cache.character(@character_name, @character_hue)
cw = self.bitmap.width / 4
ch = self.bitmap.height / 4
@width = cw
@height = ch
if @battler.current_action.move_action == true
# 歩かせる
@battler.move
else
@battler.move_reset
end
# 転送元の矩形を設定
sx = @battler.pattern * cw
sy = SDVA::PARTY_POS * ch
self.src_rect.set(sx, sy, cw, ch)
self.ox = @width / 2
self.oy = @height
# 隠れ状態なら不透明度を 0 にする
if @battler.hidden
self.opacity = 0
end
end
end
update_sdva
end
end
#==============================================================================
# ■ Scene_Battle
#==============================================================================
class Scene_Battle
#--------------------------------------------------------------------------
# ● アクターコマンドウィンドウのセットアップ
#--------------------------------------------------------------------------
alias phase3_setup_command_window_sdva phase3_setup_command_window
def phase3_setup_command_window
phase3_setup_command_window_sdva
if SDVA::WINDOWPOS_CHANGE
# アクターコマンドウィンドウの位置を設定
case SDVA::PARTY_POS
when 0
x_pos = @active_battler.screen_x - (@actor_command_window.width/2)
y_pos = @active_battler.screen_y
when 1
x_pos = @active_battler.screen_x - @actor_command_window.width - 16
y_pos = @active_battler.screen_y - @actor_command_window.height
when 2
x_pos = @active_battler.screen_x + 16
y_pos = @active_battler.screen_y - @actor_command_window.height
when 3
x_pos = @active_battler.screen_x - (@actor_command_window.width/2)
y_pos = @active_battler.screen_y - @actor_command_window.height - 48
end
@actor_command_window.x = x_pos >= 0 ? x_pos : 0
@actor_command_window.x = x_pos+@actor_command_window.width <= 640 ? x_pos : 640-@actor_command_window.width
@actor_command_window.y = y_pos >= 0 ? y_pos : 0
@actor_command_window.y = y_pos+@actor_command_window.height <= 480 ? y_pos : 480-@actor_command_window.height
# ステータスウインドウに隠れないように
@actor_command_window.z = 9999
end
end
#--------------------------------------------------------------------------
# ● フレーム更新 (メインフェーズステップ 3 : 行動側アニメーション)
#--------------------------------------------------------------------------
alias update_phase4_step3_sdva update_phase4_step3
def update_phase4_step3
if SDVA::ATTACK_MOVE
if @active_battler.current_action.basic == 0
@active_battler.current_action.move_action = true
end
end
if SDVA::SKILL_MOVE
if @active_battler.current_action.kind == 1
@active_battler.current_action.move_action = true
end
end
if SDVA::ITEM_MOVE
if @active_battler.current_action.kind == 2
@active_battler.current_action.move_action = true
end
end
# バトラーがアクターに含まれ、移動アクション中
if @active_battler.is_a?(Game_Actor) and
@active_battler.current_action.move_action
# 移動終了時
if @active_battler.moving == 2
update_phase4_step3_sdva
end
elsif @active_battler.moving == 0
update_phase4_step3_sdva
end
end
#--------------------------------------------------------------------------
# ● フレーム更新 (メインフェーズステップ 6 : リフレッシュ)
#--------------------------------------------------------------------------
alias update_phase4_step6_sdva update_phase4_step6
def update_phase4_step6
@active_battler.current_action.move_action = false
@active_battler.move_reset
update_phase4_step6_sdva
end
end
#==============================================================================
# ■ Spriteset_Battle
#==============================================================================
class Spriteset_Battle
#--------------------------------------------------------------------------
# ● オブジェクト初期化
#--------------------------------------------------------------------------
alias initialize_sdva initialize
def initialize
initialize_sdva
@viewport2.z = 1
end
end
#==============================================================================
# ■ Arrow_Actor
#==============================================================================
class Arrow_Actor < Arrow_Base
#--------------------------------------------------------------------------
# ● フレーム更新
#--------------------------------------------------------------------------
alias update_sdva update
def update
update_sdva
# カーソル下
if Input.repeat?(Input::DOWN)
$game_system.se_play($data_system.cursor_se)
@index += 1
@index %= $game_party.actors.size
end
# カーソル上
if Input.repeat?(Input::UP)
$game_system.se_play($data_system.cursor_se)
@index += $game_party.actors.size - 1
@index %= $game_party.actors.size
end
end
end
#==============================================================================
# ■ Arrow_Enemy
#==============================================================================
class Arrow_Enemy < Arrow_Base
#--------------------------------------------------------------------------
# ● フレーム更新
#--------------------------------------------------------------------------
alias update_sdva update
def update
update_sdva
# カーソル下
if Input.repeat?(Input::DOWN)
$game_system.se_play($data_system.cursor_se)
$game_troop.enemies.size.times do
@index += 1
@index %= $game_troop.enemies.size
break if self.enemy.exist?
end
end
# カーソル上
if Input.repeat?(Input::UP)
$game_system.se_play($data_system.cursor_se)
$game_troop.enemies.size.times do
@index += $game_troop.enemies.size - 1
@index %= $game_troop.enemies.size
break if self.enemy.exist?
end
end
end
end

复制代码

叮当 · 发表于 2006-9-13 11:12:52

#==============================================================================
#　＋＋　サイドビューバトル（歩行グラフィック版）　ver. 1.14　＋＋
#　　Script by パラ犬
#　　[url]http://2d6.parasite.jp/[/url]
#------------------------------------------------------------------------------
# バトルフィールドに歩行グラフィックを表示します。
#==============================================================================
module SDVA
X_LINE = 500 # 横位置のバトラー表示座標
Y_LINE = 200 # 縦位置のバトラー表示座標
X_SPACE = 15 # 横位置のバトラー同士の間隔
Y_SPACE = 40 # 縦位置のバトラー同士の間隔
X_POSITION = 25 # 隊列［前衛・中衛・後衛］の横間隔
Y_POSITION = 0 # 隊列［前衛・中衛・後衛］の縦間隔
ATTACK_MOVE = true # 攻撃時に前へ踏み出すか（ true / false ）
SKILL_MOVE = true # スキル使用時に前へ踏み出すか（ true / false ）
ITEM_MOVE = false # アイテム使用時に前へ踏み出すか（ true / false ）
MOVE_STEP = 1 # 移動歩数
MOVE_PIXEL = 10 # 一歩あたりのピクセル数
PARTY_POS = 1 # キャラクターの向き（ 0:下 / 1:左 / 2:右 / 3:上）
WINDOWPOS_CHANGE = true # コマンドウインドウをバトラーの横に表示するか（ true / false ）
end
#==============================================================================
# ■ Game_Actor
#==============================================================================
class Game_Actor < Game_Battler
#--------------------------------------------------------------------------
# ● バトル画面 X 座標の取得
#--------------------------------------------------------------------------
def screen_x
if self.index != nil
# 隊列を取得
pos = $data_classes[self.class_id].position
x_pos = pos * SDVA::X_POSITION
scr_x = self.index * SDVA::X_SPACE + SDVA::X_LINE + x_pos
# 移動アクションのとき
if self.current_action.move_action == true
# 横に移動
scr_x += @shift_x
end
return scr_x
else
return 0
end
end
#--------------------------------------------------------------------------
# ● バトル画面 Y 座標の取得
#--------------------------------------------------------------------------
def screen_y
if self.index != nil
# 隊列を取得
pos = $data_classes[self.class_id].position
y_pos = pos * SDVA::Y_POSITION
scr_y = self.index * SDVA::Y_SPACE + SDVA::Y_LINE + y_pos
# 移動アクションのとき
if self.current_action.move_action == true
# 縦に移動
scr_y += @shift_y
end
return scr_y
else
return 0
end
end
#--------------------------------------------------------------------------
# ● バトル画面 Z 座標の取得
#--------------------------------------------------------------------------
def screen_z
if self.index != nil
return self.index
else
return 0
end
end
end
#==============================================================================
# ■ Game_Battler (分割定義 1)
#==============================================================================
class Game_Battler
#--------------------------------------------------------------------------
# ● 公開インスタンス変数
#--------------------------------------------------------------------------
attr_reader :pattern # 歩行パターン
attr_reader :trans_x # X方向の移動距離
attr_reader :moving # 移動中フラグ
#--------------------------------------------------------------------------
# ● オブジェクト初期化
#--------------------------------------------------------------------------
alias initialize_sdva initialize
def initialize
initialize_sdva
move_reset
end
#--------------------------------------------------------------------------
# ○ 移動カウント
#--------------------------------------------------------------------------
def move
@moving = 1
if @step < SDVA::MOVE_STEP
# 歩数を満たすまで移動
@pattern = (@pattern + 1) % 4
@step += 1
move_step
else
# 移動終了
@pattern = 1
@moving = 2
end
end
#--------------------------------------------------------------------------
# ○ 移動処理
#--------------------------------------------------------------------------
def move_step
# パーティの向きによって移動座標を変える
case SDVA::PARTY_POS
when 0
@shift_y = @step * SDVA::MOVE_PIXEL
when 1
@shift_x = -(@step * SDVA::MOVE_PIXEL)
when 2
@shift_x = @step * SDVA::MOVE_PIXEL
when 3
@shift_y = -(@step * SDVA::MOVE_PIXEL)
end
end
#--------------------------------------------------------------------------
# ○ 移動のリセット
#--------------------------------------------------------------------------
def move_reset
@moving = 0
@pattern = 0
@step = 0
@shift_x = 0
@shift_y = 0
end
end
#==============================================================================
# ■ Game_BattleAction
#==============================================================================
class Game_BattleAction
#--------------------------------------------------------------------------
# ● 公開インスタンス変数
#--------------------------------------------------------------------------
attr_accessor :move_action # 移動するアクションか
#--------------------------------------------------------------------------
# ● クリア
#--------------------------------------------------------------------------
alias clear_sdva clear
def clear
clear_sdva
@move_action = false
end
end
#==============================================================================
# ■ Sprite_Battler
#==============================================================================
class Sprite_Battler < RPG::Sprite
#--------------------------------------------------------------------------
# ● フレーム更新
#--------------------------------------------------------------------------
alias update_sdva update
def update
# バトラーがアクターに含まれるとき
if @battler.is_a?(Game_Actor)
# ファイル名か色相が現在のものと異なる場合
# 行動中の場合
if @battler.battler_name != @battler_name or
@battler.battler_hue != @battler_hue or
@battler.current_action.basic == 0 or
@battler.current_action.kind != 3
# ビットマップを取得、設定
@character_name = @battler.character_name
@character_hue = @battler.character_hue
# 歩行グラフィックを描画
self.bitmap = RPG::Cache.character(@character_name, @character_hue)
cw = self.bitmap.width / 4
ch = self.bitmap.height / 4
@width = cw
@height = ch
if @battler.current_action.move_action == true
# 歩かせる
@battler.move
else
@battler.move_reset
end
# 転送元の矩形を設定
sx = @battler.pattern * cw
sy = SDVA::PARTY_POS * ch
self.src_rect.set(sx, sy, cw, ch)
self.ox = @width / 2
self.oy = @height
# 隠れ状態なら不透明度を 0 にする
if @battler.hidden
self.opacity = 0
end
end
end
update_sdva
end
end
#==============================================================================
# ■ Scene_Battle
#==============================================================================
class Scene_Battle
#--------------------------------------------------------------------------
# ● アクターコマンドウィンドウのセットアップ
#--------------------------------------------------------------------------
alias phase3_setup_command_window_sdva phase3_setup_command_window
def phase3_setup_command_window
phase3_setup_command_window_sdva
if SDVA::WINDOWPOS_CHANGE
# アクターコマンドウィンドウの位置を設定
case SDVA::PARTY_POS
when 0
x_pos = @active_battler.screen_x - (@actor_command_window.width/2)
y_pos = @active_battler.screen_y
when 1
x_pos = @active_battler.screen_x - @actor_command_window.width - 16
y_pos = @active_battler.screen_y - @actor_command_window.height
when 2
x_pos = @active_battler.screen_x + 16
y_pos = @active_battler.screen_y - @actor_command_window.height
when 3
x_pos = @active_battler.screen_x - (@actor_command_window.width/2)
y_pos = @active_battler.screen_y - @actor_command_window.height - 48
end
@actor_command_window.x = x_pos >= 0 ? x_pos : 0
@actor_command_window.x = x_pos+@actor_command_window.width <= 640 ? x_pos : 640-@actor_command_window.width
@actor_command_window.y = y_pos >= 0 ? y_pos : 0
@actor_command_window.y = y_pos+@actor_command_window.height <= 480 ? y_pos : 480-@actor_command_window.height
# ステータスウインドウに隠れないように
@actor_command_window.z = 9999
end
end
#--------------------------------------------------------------------------
# ● フレーム更新 (メインフェーズステップ 3 : 行動側アニメーション)
#--------------------------------------------------------------------------
alias update_phase4_step3_sdva update_phase4_step3
def update_phase4_step3
if SDVA::ATTACK_MOVE
if @active_battler.current_action.basic == 0
@active_battler.current_action.move_action = true
end
end
if SDVA::SKILL_MOVE
if @active_battler.current_action.kind == 1
@active_battler.current_action.move_action = true
end
end
if SDVA::ITEM_MOVE
if @active_battler.current_action.kind == 2
@active_battler.current_action.move_action = true
end
end
# バトラーがアクターに含まれ、移動アクション中
if @active_battler.is_a?(Game_Actor) and
@active_battler.current_action.move_action
# 移動終了時
if @active_battler.moving == 2
update_phase4_step3_sdva
end
elsif @active_battler.moving == 0
update_phase4_step3_sdva
end
end
#--------------------------------------------------------------------------
# ● フレーム更新 (メインフェーズステップ 6 : リフレッシュ)
#--------------------------------------------------------------------------
alias update_phase4_step6_sdva update_phase4_step6
def update_phase4_step6
@active_battler.current_action.move_action = false
@active_battler.move_reset
update_phase4_step6_sdva
end
end
#==============================================================================
# ■ Spriteset_Battle
#==============================================================================
class Spriteset_Battle
#--------------------------------------------------------------------------
# ● オブジェクト初期化
#--------------------------------------------------------------------------
alias initialize_sdva initialize
def initialize
initialize_sdva
@viewport2.z = 1
end
end
#==============================================================================
# ■ Arrow_Actor
#==============================================================================
class Arrow_Actor < Arrow_Base
#--------------------------------------------------------------------------
# ● フレーム更新
#--------------------------------------------------------------------------
alias update_sdva update
def update
update_sdva
# カーソル下
if Input.repeat?(Input::DOWN)
$game_system.se_play($data_system.cursor_se)
@index += 1
@index %= $game_party.actors.size
end
# カーソル上
if Input.repeat?(Input::UP)
$game_system.se_play($data_system.cursor_se)
@index += $game_party.actors.size - 1
@index %= $game_party.actors.size
end
end
end
#==============================================================================
# ■ Arrow_Enemy
#==============================================================================
class Arrow_Enemy < Arrow_Base
#--------------------------------------------------------------------------
# ● フレーム更新
#--------------------------------------------------------------------------
alias update_sdva update
def update
update_sdva
# カーソル下
if Input.repeat?(Input::DOWN)
$game_system.se_play($data_system.cursor_se)
$game_troop.enemies.size.times do
@index += 1
@index %= $game_troop.enemies.size
break if self.enemy.exist?
end
end
# カーソル上
if Input.repeat?(Input::UP)
$game_system.se_play($data_system.cursor_se)
$game_troop.enemies.size.times do
@index += $game_troop.enemies.size - 1
@index %= $game_troop.enemies.size
break if self.enemy.exist?
end
end
end
end

复制代码

叮当 · 发表于 2006-9-13 11:14:32

#==============================================================================
#　＋＋　戦闘終了時にステータスＵＰ　ver. 1.40　＋＋
#　　Script by パラ犬
#　　[url]http://2d6.parasite.jp/[/url]
#------------------------------------------------------------------------------
# 戦闘時の行動により、バトル終了時にステータスがアップします。
#------------------------------------------------------------------------------
#［設置上の注意］
# アクティブタイムバトルと併用する時は、このスクリプトを下に置いてください。
#==============================================================================
module PARA_STSUP
# 各行動時に能力値がアップする確率
# （戦闘終了時に全ての行動の平均値で計算します）
# [最大HP/最大SP/腕力/器用さ/素早さ/魔力]
ACT_ATK = [10, 0, 10, 5, 5, 0] # 通常攻撃
ACT_SKILL = [5, 10, 5, 5, 5, 5] # スキル
ACT_GUARD = [20, 0, 0, 0, 0, 0] # 防御
ACT_ITEM = [5, 5, 5, 5, 5, 5] # アイテム
ACT_NONE = [0, 0, 0, 0, 0, 0] # コマンド未入力または行動不能
# 武器属性で通常攻撃の成長率を変化
# （書式は「 "属性名"=>成長率」。最終行は「 } 」で閉じる）
ATK_ELEMENTS = { "剣" => [10, 0, 10, 5, 5, 0],
"槍" => [10, 0, 10, 5, 5, 0],
"斧" => [10, 0, 20, 0, 0, 0]}
# スキルの属性で成長率を変化
SKILL_ELEMENTS = { "剣" => [5, 10, 10, 5, 5, 0],
"槍" => [5, 10, 5, 5, 10, 0],
"斧" => [10, 10, 20, 0, 0, 0],
"黒魔法\\" => [0, 15, 0, 5, 0, 15],
"神聖魔法" => [0, 15, 0, 0, 5, 15]}
# 上昇値 [最小値,最大値]
# [最大HP/最大SP/腕力/器用さ/素早さ/魔力]
UP_POINT = [ [5,20], [5,20], [1,5], [1,5], [1,5], [1,5] ]
# 能力値限界
# [最大HP/最大SP/腕力/器用さ/素早さ/魔力]
LIMIT = [ 999999, 9999, 999, 999, 999, 999 ]
# ステータスアップを行わないアクターのID
#（アクターIDをコンマで区切って記述。例：[ 0, 2, 3 ] ）
EXC_ACTOR = []
# ステータスアップ結果の表示順（ 0:アクターごと / 1:能力値ごと）
THREAD_TYPE = 0
# ステータス上昇ウインドウを表示するか（ true / false ）
VIEW_VISIBLE = true
# ステータス上昇ウインドウの書式
# {name} :アクター名
# {param} :パラメータ
# {point} :上昇値
VIEW_TEXT = "{name}の{param}が{point}ポイントアップ"
# ステータス上昇ウインドウの表示時間
VIEW_TIME = 40
# ステータス上昇ウインドウを表示しないときのアニメーション表示間隔
VIEW_ANM_TIME = 8
# 敵との強さに差があるとき、成長率に影響を与えるか（ true / false ）
# （補正率は「敵の能力値÷アクターの能力値」の平均）
LVEF = true
# 能力値アップ率に対する補正率の適用パーセント
LVEF_PER = 50
# 上昇値に対する補正率の適用パーセント
LVEF_POINT = 0
# 人数差が補正率に与える影響（パーセント）
LVEF_PARTIES = 50
# ステータスアップ時にアニメーションを表示（ true / false ）
ANM_USE = true
# 表示するアニメーションのID
ANM_HP = 98 # 最大HP
ANM_SP = 98 # 最大SP
ANM_STR = 98 # 腕力
ANM_DEX = 98 # 器用さ
ANM_AGI = 98 # 素早さ
ANM_INT = 98 # 魔力
end
# ↑ 設定項目ここまで
#------------------------------------------------------------------------------
#==============================================================================
# ■ Scene_Battle
#==============================================================================
class Scene_Battle
#--------------------------------------------------------------------------
# ● プレバトルフェーズ開始
#--------------------------------------------------------------------------
alias start_phase1_stsup start_phase1
def start_phase1
for actor in $game_party.actors
# 行動履歴を初期化
actor.act_history = []
end
@stsup = []
@now_stsup_anm = -1
@btl_lv = 0
enemy_sts = [0,0,0,0,0,0]
actor_sts = [0,0,0,0,0,0]
btl_lv = [0,0,0,0,0,0]
# エネミーの強さを記録
for enemy in $game_troop.enemies
enemy_sts[0] += enemy.base_maxhp
enemy_sts[1] += enemy.base_maxsp
enemy_sts[2] += enemy.base_str
enemy_sts[3] += enemy.base_dex
enemy_sts[4] += enemy.base_agi
enemy_sts[5] += enemy.base_int
end
# アクターの強さを記録
for actor in $game_party.actors
actor_sts[0] += actor.base_maxhp
actor_sts[1] += actor.base_maxsp
actor_sts[2] += actor.base_str
actor_sts[3] += actor.base_dex
actor_sts[4] += actor.base_agi
actor_sts[5] += actor.base_int
end
# 一体あたりの強さを計算
for i in 0..5
enemy_sts[i] /= $game_troop.enemies.size.to_f
actor_sts[i] /= $game_party.actors.size.to_f
end
# 敵の強さの倍率
for i in 0..5
btl_lv[i] = enemy_sts[i] / actor_sts[i]
@btl_lv += btl_lv[i]
end
@btl_lv /= btl_lv.size
# 人数差による補正
m = $game_troop.enemies.size.to_f / $game_party.actors.size.to_f
if m >= 1
m = 1 + (m - 1) * PARA_STSUP::LVEF_PARTIES / 100
else
m = 1 - (1 - m) * PARA_STSUP::LVEF_PARTIES / 100
end
if @btl_lv >= 1
@btl_lv = (@btl_lv - 1) * m + 1
else
@btl_lv = @btl_lv * m
end
start_phase1_stsup
end
#--------------------------------------------------------------------------
# ● 次のアクターのコマンド入力へ
#--------------------------------------------------------------------------
alias phase3_next_actor_stsup phase3_next_actor
def phase3_next_actor
if @active_battler != nil
# アクションを行動履歴に追加
act_kind = @active_battler.current_action.kind
act_basic = @active_battler.current_action.basic
act = [act_kind,act_basic]
if act == [0,0] # 攻撃
# 武器属性によって成長率を変更
if @active_battler.element_set.size != 0
for element_id in @active_battler.element_set
element_name = $data_system.elements[element_id]
if PARA_STSUP::ATK_ELEMENTS.include?(element_name)
per = PARA_STSUP::ATK_ELEMENTS[element_name]
end
end
end
if per == nil
per = PARA_STSUP::ACT_ATK
end
elsif act == [0,1] # 防御
per = PARA_STSUP::ACT_GUARD
elsif act == [1,3] or act == [1,0] # スキル
# スキル属性によって成長率を変更
skill_id = @active_battler.current_action.skill_id
skill_elements = $data_skills[skill_id].element_set
if skill_elements.size != 0
for element_id in skill_elements
element_name = $data_system.elements[element_id]
if PARA_STSUP::SKILL_ELEMENTS.include?(element_name)
per = PARA_STSUP::SKILL_ELEMENTS[element_name]
end
end
end
if per == nil
per = PARA_STSUP::ACT_SKILL
end
elsif act == [2,3] or act == [2,0] # アイテム
per = PARA_STSUP::ACT_ITEM
else
per = PARA_STSUP::ACT_NONE
end
@active_battler.act_history.push(per)
end
phase3_next_actor_stsup
end
#--------------------------------------------------------------------------
# ● 前のアクターのコマンド入力へ
#--------------------------------------------------------------------------
alias phase3_prior_actor_stsup phase3_prior_actor
def phase3_prior_actor
phase3_prior_actor_stsup
if @active_battler != nil
# 行動履歴を削除
@active_battler.act_history.pop
end
end
#--------------------------------------------------------------------------
# ● アフターバトルフェーズ開始
#--------------------------------------------------------------------------
alias start_phase5_stsup start_phase5
def start_phase5
start_phase5_stsup
# ステータスアップ処理
status_up
end
#--------------------------------------------------------------------------
# ● フレーム更新 (アフターバトルフェーズ)
#--------------------------------------------------------------------------
alias update_phase5_stsup update_phase5
def update_phase5
# ステータス上昇ウインドウ表示待ちのアイテムがある場合
if @stsup != nil and @stsup != []
# C ボタンが押された場合
if Input.trigger?(Input::C)
# 次のステータスアップウインドウを表示
result_stsup
end
# ウェイトカウントが 0 より大きい場合
if @phase5_wait_count > 0
# ウェイトカウントを減らす
@phase5_wait_count -= 1
# ウェイトカウントが 0 になった場合
if @phase5_wait_count == 0
# 次のステータスアップウインドウを表示
result_stsup
end
return
end
# ステータス上昇ウインドウ表示中の場合
elsif @help_window.visible
# C ボタンが押された場合
if Input.trigger?(Input::C)
@help_window.visible = false
@phase5_wait_count = 1
end
# ウェイトカウントが 0 より大きい場合
if @phase5_wait_count > 0
# ウェイトカウントを減らす
@phase5_wait_count -= 1
# ウェイトカウントが 0 になった場合
if @phase5_wait_count == 0
@help_window.visible = false
@phase5_wait_count = 1
end
return
end
else
update_phase5_stsup
end
end
#--------------------------------------------------------------------------
# ○ ステータスアップウインドウを表示
#--------------------------------------------------------------------------
def result_stsup
if @stsup[0] != nil and @stsup[0] != []
# 配列の先頭から値を取り出す
stsup = @stsup[0]
# 能力値の名前を取得
case stsup[1]
when 0 # 最大HP
stsup_sts = $data_system.words.hp
when 1 # 最大SP
stsup_sts = $data_system.words.sp
when 2 # 腕力
stsup_sts = $data_system.words.str
when 3 # 器用さ
stsup_sts = $data_system.words.dex
when 4 # 素早さ
stsup_sts = $data_system.words.agi
when 5 # 魔力
stsup_sts = $data_system.words.int
end
name = stsup[0].name
param = stsup_sts
point = stsup[2]
# 表示する文字列を設定
text = PARA_STSUP::VIEW_TEXT.dup
begin
text[/{name}/] = "#{name}"
rescue
end
begin
text[/{param}/] = "#{param}"
rescue
end
begin
text[/{point}/] = "#{point.to_s}"
rescue
end
# ヘルプウィンドウに文字列をセット
@help_window.set_text(text, 1)
# アニメーションを表示
if PARA_STSUP::ANM_USE
# アニメーションをまとめて表示
if PARA_STSUP::THREAD_TYPE == 1
if @now_stsup_anm != stsup[1]
@now_stsup_anm = stsup[1]
actors = []
for sts_group in @stsup
if sts_group[1] == @now_stsup_anm
actors.push(sts_group[0])
end
end
for actor in actors
case @now_stsup_anm
when 0 # 最大HP
actor.animation_id = PARA_STSUP::ANM_HP
when 1 # 最大SP
actor.animation_id = PARA_STSUP::ANM_SP
when 2 # 腕力
actor.animation_id = PARA_STSUP::ANM_STR
when 3 # 器用さ
actor.animation_id = PARA_STSUP::ANM_DEX
when 4 # 素早さ
actor.animation_id = PARA_STSUP::ANM_AGI
when 5 # 魔力
actor.animation_id = PARA_STSUP::ANM_INT
end
end
end
else
actor = stsup[0]
case stsup[1]
when 0 # 最大HP
actor.animation_id = PARA_STSUP::ANM_HP
when 1 # 最大SP
actor.animation_id = PARA_STSUP::ANM_SP
when 2 # 腕力
actor.animation_id = PARA_STSUP::ANM_STR
when 3 # 器用さ
actor.animation_id = PARA_STSUP::ANM_DEX
when 4 # 素早さ
actor.animation_id = PARA_STSUP::ANM_AGI
when 5 # 魔力
actor.animation_id = PARA_STSUP::ANM_INT
end
end
end
@stsup.shift
# ヘルプウィンドウを表示
if PARA_STSUP::VIEW_VISIBLE
@help_window.visible = true
@phase5_wait_count = PARA_STSUP::VIEW_TIME
else
@help_window.visible = false
@phase5_wait_count = PARA_STSUP::VIEW_ANM_TIME
end
end
end
#--------------------------------------------------------------------------
# ○ ステータスアップ処理
#--------------------------------------------------------------------------
def status_up
for actor in $game_party.actors
# EXPを取得できないステート時もしくは
# 除外アクターは処理をスキップ
if actor.cant_get_exp? or PARA_STSUP::EXC_ACTOR.include?(actor.id)
next
end
stsup_percent = [0,0,0,0,0,0]
# コマンド未入力だった場合
if actor.act_history == []
# ダミーコマンドを追加
actor.act_history.push(PARA_STSUP::ACT_NONE)
end
for act in actor.act_history
# 上昇パーセンテージを合計
for i in 0...stsup_percent.size
stsup_percent[i] += act[i]
end
end
# 敵の強さによる補正
if PARA_STSUP::LVEF
for i in 0..stsup_percent.size-1
if @btl_lv >= 1
btl_per = 1 + (@btl_lv - 1) * PARA_STSUP::LVEF_PER / 100
else
btl_per = 1 - (1 - @btl_lv) * PARA_STSUP::LVEF_PER / 100
end
stsup_percent[i] *= btl_per
end
end
# 上昇パーセンテージを算出
for i in 0..stsup_percent.size-1
stsup_percent[i] /= actor.act_history.size
end
# 各ステータスで上昇判定
for s in 0..stsup_percent.size-1
rnd = rand(100)
if stsup_percent[s] > rnd
# 上昇値を決定
up_point = PARA_STSUP::UP_POINT[s].dup
# 敵の強さによる補正
if PARA_STSUP::LVEF
if @btl_lv >= 1
btl_point = 1 + (@btl_lv - 1) * PARA_STSUP::LVEF_POINT / 100
else
btl_point = 1 - (1 - @btl_lv) * PARA_STSUP::LVEF_POINT / 100
end
up_point[0] *= @btl_lv * btl_point
up_point[1] *= @btl_lv * btl_point
end
# ランダマイズ
rnd_val = (up_point[1] - up_point[0]).floor
rnd_pt = rand(rnd_val)
stsup_pt = (rnd_pt + up_point[0]).floor
# 能力値を上昇
case s
when 0 # 最大HP
if actor.stsup_maxhp + stsup_pt > PARA_STSUP::LIMIT[0]
stsup_pt = PARA_STSUP::LIMIT[0] - actor.stsup_maxhp
stsup_pt = stsup_pt < 0 ? 0 : stsup_pt
end
actor.stsup_maxhp += stsup_pt
when 1 # 最大SP
if actor.stsup_maxsp + stsup_pt > PARA_STSUP::LIMIT[1]
stsup_pt = PARA_STSUP::LIMIT[1] - actor.stsup_maxsp
stsup_pt = stsup_pt < 0 ? 0 : stsup_pt
end
actor.stsup_maxsp += stsup_pt
when 2 # 腕力
if actor.stsup_str + stsup_pt > PARA_STSUP::LIMIT[2]
stsup_pt = PARA_STSUP::LIMIT[2] - actor.stsup_str
stsup_pt = stsup_pt < 0 ? 0 : stsup_pt
end
actor.stsup_str += stsup_pt
when 3 # 器用さ
if actor.stsup_dex + stsup_pt > PARA_STSUP::LIMIT[3]
stsup_pt = PARA_STSUP::LIMIT[3] - actor.stsup_dex
stsup_pt = stsup_pt < 0 ? 0 : stsup_pt
end
actor.stsup_dex += stsup_pt
when 4 # 素早さ
if actor.stsup_agi + stsup_pt > PARA_STSUP::LIMIT[4]
stsup_pt = PARA_STSUP::LIMIT[4] - actor.stsup_agi
stsup_pt = stsup_pt < 0 ? 0 : stsup_pt
end
actor.stsup_agi += stsup_pt
when 5 # 魔力
if actor.stsup_int + stsup_pt > PARA_STSUP::LIMIT[5]
stsup_pt = PARA_STSUP::LIMIT[5] - actor.stsup_int
stsup_pt = stsup_pt < 0 ? 0 : stsup_pt
end
actor.stsup_int += stsup_pt
end
# 上昇ポイントが0のときはスキップ
if stsup_pt <= 0
next
end
# 配列に追加
@stsup.push([actor,s,stsup_pt])
end
end
end
if PARA_STSUP::THREAD_TYPE == 1 and @stsup != []
# 能力値ごとにソート
@stsup.sort! do |a, b|
if a[1] > b[1]
+1
elsif a[1] < b[1]
-1
elsif a[0].index > b[0].index
+1
elsif a[0].index < b[0].index
-1
else
a <=> b
end
end
end
end
end
#==============================================================================
# ■ Game_Battler
#==============================================================================
class Game_Battler
#--------------------------------------------------------------------------
# ● 公開インスタンス変数
#--------------------------------------------------------------------------
attr_accessor :act_history # 行動履歴
#--------------------------------------------------------------------------
# ● オブジェクト初期化
#--------------------------------------------------------------------------
alias initialize_stsup initialize
def initialize
initialize_stsup
@act_history = []
end
end
#==============================================================================
# ■ Game_Actor
#==============================================================================
class Game_Actor < Game_Battler
#--------------------------------------------------------------------------
# ● 公開インスタンス変数
#--------------------------------------------------------------------------
attr_accessor :stsup_maxhp
attr_accessor :stsup_maxsp
attr_accessor :stsup_str
attr_accessor :stsup_dex
attr_accessor :stsup_agi
attr_accessor :stsup_int
#--------------------------------------------------------------------------
# ● セットアップ
# actor_id : アクター ID
#--------------------------------------------------------------------------
alias setup_stsup setup
def setup(actor_id)
setup_stsup(actor_id)
@stsup_maxhp = 0
@stsup_maxsp = 0
@stsup_str = 0
@stsup_dex = 0
@stsup_agi = 0
@stsup_int = 0
end
#--------------------------------------------------------------------------
# ● 基本 MaxHP の取得
#--------------------------------------------------------------------------
alias base_maxhp_stsup base_maxhp
def base_maxhp
n = base_maxhp_stsup
if @stsup_maxhp != nil
n += @stsup_maxhp
end
return n
end
#--------------------------------------------------------------------------
# ● 基本 MaxSP の取得
#--------------------------------------------------------------------------
alias base_maxsp_stsup base_maxsp
def base_maxsp
n = base_maxsp_stsup
if @stsup_maxsp != nil
n += @stsup_maxsp
end
return n
end
#--------------------------------------------------------------------------
# ● 基本腕力の取得
#--------------------------------------------------------------------------
alias base_str_stsup base_str
def base_str
n = base_str_stsup
if @stsup_str != nil
n += @stsup_str
end
return n
end
#--------------------------------------------------------------------------
# ● 基本器用さの取得
#--------------------------------------------------------------------------
alias base_dex_stsup base_dex
def base_dex
n = base_dex_stsup
if @stsup_dex != nil
n += @stsup_dex
end
return n
end
#--------------------------------------------------------------------------
# ● 基本素早さの取得
#--------------------------------------------------------------------------
alias base_agi_stsup base_agi
def base_agi
n = base_agi_stsup
if @stsup_agi != nil
n += @stsup_agi
end
return n
end
#--------------------------------------------------------------------------
# ● 基本魔力の取得
#--------------------------------------------------------------------------
alias base_int_stsup base_int
def base_int
n = base_int_stsup
if @stsup_int != nil
n += @stsup_int
end
return n
end
end

复制代码

叮当 · 发表于 2006-9-13 11:16:06

#==============================================================================
#　＋＋　メッセージふきだし表示　ver. 1.40　＋＋
#　　Script by パラ犬
#　　[url]http://2d6.parasite.jp/[/url]
#------------------------------------------------------------------------------
# ふきだし表示をするには、
# テール用画像「(スキン名)-top」「(スキン名)-under」を
# 「Graphics/Windowskins」フォルダにインポートしておく必要があります。
#------------------------------------------------------------------------------
#
# ［ふきだし表示の使い方］
# イベントコマンド「スクリプト」で「$mes_id」にイベントIDを代入することで
# そのイベントにふきだしがポップするようになります。
# （記述例： $mes_id=4 ）
# IDに-1を代入するとプレイヤー、0でそのイベント自身。
# nilまたは""を代入すると、通常のメッセージ表示に戻ります。
# 表示位置はイベント「文章オプション」で変更できます。
# 表示位置に「中央」を指定すると、イベントの位置に関係なく
# 画面中央に表示されます。
#
# ［名前ウインドウの使い方］
# イベントコマンド「スクリプト」で「$mes_name」に文字列を代入することで
# 名前ウインドウを表示します。
# （記述例： $mes_name="アルシェス" ）
# 制御文字 \\N[n] を使用する場合、\\は\\\\と記述してください。
# （記述例： $mes_name="\\\\N[1]" $mes_name="\\\\N[\\\\V[1]]"）
# ""またはnilを代入すると、非表示になります。
#
# 二つの機能は独立していますので、それぞれ単体で使えます。
# 　$mes_id=(ID) + $mes_name="名前" ：ふきだし表示＋名前ウインドウ
# 　$mes_id=(ID) + $mes_name="" ：ふきだし表示 (名前なし)
# 　$mes_id=nil + $mes_name="名前" ：デフォルトウインドウ＋名前ウインドウ
# 　$mes_id=nil + $mes_name="" ：デフォルトウインドウ (名前なし)
#
# ［メッセージ表示スピードの変更法］
# イベントコマンド「スクリプト」で「$mes_speed」に数値を代入します。
# （記述例： $mes_speed=1 ）
#==============================================================================
module FUKI
# スキンの設定
# ウインドウスキンと同じものを使うときは「""」
FUKI_SKIN_NAME = "001-Blue01" # ふきだし用スキン
NAME_SKIN_NAME = "001-Blue01" # 名前表示用スキン
# フォントサイズ
MES_FONT_SIZE = 22 # ふきだし
NAME_FONT_SIZE = 14 # 名前ウインドウ
# 文字色
#（ Color.new(0, 0, 0, 0)を指定すると、通常文字色を使用します）
FUKI_COLOR = Color.new(255, 255, 255, 255) # ふきだしウインドウ
NAME_COLOR = Color.new(255, 255, 255, 255) # 名前ウインドウ
# ウインドウの透明度
FUKI_OPACITY = 255 # ふきだしウインドウ
MES_OPACITY = 255 # 通常のメッセージウインドウ
NAME_OPACITY = 255 # 名前ウインドウ
# 名前ウインドウの相対位置
NAME_SHIFT_X = 0 # 横位置
NAME_SHIFT_Y = 16 # 縦位置
# 画面上下からウインドウがはみ出す時は、
# 自動で表示位置（上下）をチェンジ（ true / false ）
POS_FIX = true
# 画面の一番端ではふきだしを少しずらす
# 角の丸いスキンを使っていて、枠の角がふきだしと重なる場合に true にする
CORNER_SHIFT = false
SHIFT_PIXEL = 4 # trueの時にずらすピクセル数
# キャラクターの縦のサイズ
CHARACTOR_HEIGHT = 48
# ふきだしの相対位置（縦位置）
POP_SHIFT_TOP = 0 # 表示位置が上のとき
POP_SHIFT_UNDER = -16 # 表示位置が下のとき
# メッセージ表示速度（数字が小さいほど速い。0で瞬間表示）
# $mes_speedに数値を代入することで、ゲーム中に変更可。
MES_SPEED = 1
end
#==============================================================================
# □ Window_FukiMessage
#==============================================================================
class Window_FukiMessage < Window_Selectable
#--------------------------------------------------------------------------
# ● オブジェクト初期化
#--------------------------------------------------------------------------
def initialize
super(80, 304, 480, 160)
self.contents = Bitmap.new(width - 32, height - 32)
self.visible = false
self.z = 9998
@fade_in = false
@fade_out = false
@contents_showing = false
@cursor_width = 0
self.active = false
self.index = -1
@w = 0
@h = 0
@wait = 0
@dx = 0
@dy = 0
$mes_speed = FUKI::MES_SPEED
end
#--------------------------------------------------------------------------
# ○ サイズを決定してウインドウを作成
#--------------------------------------------------------------------------
def refresh_create
self.contents.clear
self.contents.font.color = normal_color
self.contents.font.size = FUKI::MES_FONT_SIZE
# ウインドウサイズを取得
get_windowsize
w = @w + 32 + 8
h = @h * (self.contents.font.size + 10) + 26
# ふきだしウインドウを作成
set_fukidasi(self.x, self.y, w, h)
# 名前ウインドウを作成
set_namewindow
# メッセージ表示用変数の初期化
@dx = @dy = 0
@cursor_width = 0
@contents_drawing = true
# 瞬間表示の場合、ここで表示処理
if $mes_speed == 0
# 描画処理をループ
while $game_temp.message_text != ""
draw_massage
end
draw_opt_text
@contents_showing_end = true
@contents_drawing = false
else
# 一文字ずつ描画
refresh_drawtext
end
end
#--------------------------------------------------------------------------
# ○ 一文字ずつ描画
#--------------------------------------------------------------------------
def refresh_drawtext
if $game_temp.message_text != nil
if @wait > 0
@wait -= 1
elsif @wait == 0
# 描画処理
draw_massage
@wait = $mes_speed
end
end
# 描画終了
if $game_temp.message_text == ""
draw_opt_text
@contents_showing_end = true
@contents_drawing = false
end
end
#--------------------------------------------------------------------------
# ○ ウインドウサイズを取得
#--------------------------------------------------------------------------
def get_windowsize
x = y = 0
@h = @w = 0
@cursor_width = 0
# 選択肢なら字下げを行う
if $game_temp.choice_start == 0
x = 16
end
# 表示待ちのメッセージがある場合
if $game_temp.message_text != nil
text = $game_temp.message_text.clone
# 制御文字処理
begin
last_text = text.clone
text.gsub!(/\\\\[Vv]\\[([0-9]+)\\]/) { $game_variables[$1.to_i] }
end until text == last_text
text.gsub!(/\\\\[Nn]\\[([0-9]+)\\]/) do
$game_actors[$1.to_i] != nil ? $game_actors[$1.to_i].name : ""
end
# 便宜上、"\\\\\\\\" を "\\000" に変換
text.gsub!(/\\\\\\\\/) { "\\000" }
# "\\\\C" を "\\001" に、"\\\\G" を "\\002" に変換
text.gsub!(/\\\\[Cc]\\[([0-9]+)\\]/) { "\\001" }
text.gsub!(/\\\\[Gg]/) { "\\002" }
# c に 1 文字を取得 (文字が取得できなくなるまでループ)
while ((c = text.slice!(/./m)) != nil)
# \\\\ の場合
if c == "\\000"
# 本来の文字に戻す
c = "\\\\"
end
# \\C[n] または \\G の場合
if c == "\\001" or c == "\\002"
# 次の文字へ
next
end
# 改行文字の場合
if c == "\\n"
# y に 1 を加算
y += 1
# 縦横サイズを取得
@h = y
@w = x > @w ? x : @w
if y >= $game_temp.choice_start
@w = x + 8 > @w ? x + 8 : @w
end
x = 0
# 選択肢なら字下げを行う
if y >= $game_temp.choice_start
x = 8
end
# 次の文字へ
next
end
# x に描画した文字の幅を加算
x += self.contents.text_size(c).width
end
end
# 数値入力の場合
if $game_temp.num_input_variable_id > 0
digits_max = $game_temp.num_input_digits_max
number = $game_variables[$game_temp.num_input_variable_id]
@h += 1
x = digits_max * self.contents.font.size + 16
@w = x > @w ? x : @w
end
end
#--------------------------------------------------------------------------
# ○ 描画処理
#--------------------------------------------------------------------------
def draw_massage
self.contents.font.color = normal_color
# 表示待ちのメッセージがある場合
if $game_temp.message_text != nil
text = $game_temp.message_text
# 制御文字処理
begin
last_text = text.clone
text.gsub!(/\\\\[Vv]\\[([0-9]+)\\]/) { $game_variables[$1.to_i] }
end until text == last_text
text.gsub!(/\\\\[Nn]\\[([0-9]+)\\]/) do
$game_actors[$1.to_i] != nil ? $game_actors[$1.to_i].name : ""
end
# 便宜上、"\\\\\\\\" を "\\000" に変換
text.gsub!(/\\\\\\\\/) { "\\000" }
# "\\\\C" を "\\001" に、"\\\\G" を "\\002" に変換
text.gsub!(/\\\\[Cc]\\[([0-9]+)\\]/) { "\\001[#{$1}]" }
text.gsub!(/\\\\[Gg]/) { "\\002" }
# c に 1 文字を取得
if ((c = text.slice!(/./m)) != nil)
# 選択肢の場合
if @dy >= $game_temp.choice_start
# 字下げを行う
@dx = 8
# 文字を描画
font_size = self.contents.font.size
self.contents.draw_text(4+@dx, (font_size+10)*@dy, font_size, font_size, c)
# x に描画した文字の幅を加算
@dx += self.contents.text_size(c).width
# ループ
while ((c = text.slice!(/./m)) != "\\n")
# 文字を描画
font_size = self.contents.font.size
self.contents.draw_text(4+@dx, (font_size+10)*@dy, font_size, font_size, c)
# x に描画した文字の幅を加算
@dx += self.contents.text_size(c).width
end
if c == "\\n"
# カーソルの幅を更新
@cursor_width = [@cursor_width, @dx].max
# y に 1 を加算
@dy += 1
@dx = 0
end
return
end
# \\\\ の場合
if c == "\\000"
# 本来の文字に戻す
c = "\\\\"
end
# \\C[n] の場合
if c == "\\001"
# 文字色を変更
text.sub!(/\\[([0-9]+)\\]/, "")
color = $1.to_i
if color >= 0 and color <= 7
self.contents.font.color = text_color(color)
end
end
# \\G の場合
if c == "\\002"
# ゴールドウィンドウを作成
if @gold_window == nil
@gold_window = Window_Gold.new
@gold_window.x = 560 - @gold_window.width
if $game_temp.in_battle
@gold_window.y = 192
else
@gold_window.y = self.y >= 128 ? 32 : 384
end
@gold_window.opacity = self.opacity
@gold_window.back_opacity = self.back_opacity
end
end
# 改行文字の場合
if c == "\\n"
# y に 1 を加算
@dy += 1
@dx = 0
end
# 文字を描画
self.contents.font.size = FUKI::MES_FONT_SIZE
font_size = self.contents.font.size
self.contents.draw_text(4+@dx, (font_size+10)*@dy, font_size, font_size, c)
# x に描画した文字の幅を加算
@dx += self.contents.text_size(c).width
end
end
end
#--------------------------------------------------------------------------
# ○ 選択肢と数値入力を有効に
#--------------------------------------------------------------------------
def draw_opt_text
# 選択肢の場合
if $game_temp.choice_max > 0
@item_max = $game_temp.choice_max
self.active = true
self.index = 0
end
# 数値入力の場合
if $game_temp.num_input_variable_id > 0
digits_max = $game_temp.num_input_digits_max
number = $game_variables[$game_temp.num_input_variable_id]
@input_number_window = Window_InputNumber.new(digits_max)
@input_number_window.number = number
@input_number_window.x = self.x + 8
@input_number_window.y = self.y + $game_temp.num_input_start * 32
end
end
#--------------------------------------------------------------------------
# ○ ふきだしを表示
#--------------------------------------------------------------------------
def set_fukidasi(x, y, width, height)
# $mes_id が空のときはふきだしを表示しない
if $mes_id == nil or $mes_id == ""
del_fukidasi
reset_window
else
# ポーズサインを非表示
self.pause = false
# 位置を取得
pos = get_fuki_pos(width, height)
x = pos[0]
y = pos[1]
skin = FUKI::FUKI_SKIN_NAME != "" ? FUKI::FUKI_SKIN_NAME : $game_system.windowskin_name
# ふきだし用メッセージウインドウを作成
self.windowskin = RPG::Cache.windowskin(skin)
self.x = x
self.y = y
self.height = height
self.width = width
self.contents.dispose
self.contents = Bitmap.new(width - 32, height - 32)
self.back_opacity = FUKI::FUKI_OPACITY
self.contents.clear
self.contents.font.color = normal_color
self.contents.font.size = FUKI::MES_FONT_SIZE
# ふきだしのテールを描画
if $game_system.message_frame == 0
# 位置を取得
tale_pos = get_tale_pos
@tale = Sprite.new
case @message_position
when 0 # 上
@tale.bitmap = RPG::Cache.windowskin(skin + "-top")
@tale.x = tale_pos[0]
@tale.y = tale_pos[1]
@tale.z = self.z + 1
when 1 # 中
@tale.dispose
@tale = nil
when 2 # 下
@tale.bitmap = RPG::Cache.windowskin(skin + "-under")
@tale.x = tale_pos[0]
@tale.y = tale_pos[1]
@tale.z = self.z + 1
end
end
end
end
#--------------------------------------------------------------------------
# ○ ふきだしの位置を計算
#--------------------------------------------------------------------------
def get_fuki_pos(width, height)
# キャラクターを取得
@character = get_character($mes_id)
if @character == nil
# キャラクターが存在しないときは通常のメッセージウインドウに
del_fukidasi
reset_window
return
end
# 座標処理
x = ( @character.real_x - $game_map.display_x + 64 ) * 32 / 128 - (width / 2)
# はみ出すときは画面内に収まるように移動
if x + width > 640
x = 640 - width
elsif x < 0
x = 0
end
# ウインドウの位置を決定
case $game_system.message_position
when 0 # 上
y = ( @character.real_y - $game_map.display_y + 64) * 32 / 128 - height - FUKI::CHARACTOR_HEIGHT + FUKI::POP_SHIFT_TOP
when 1 # 中
y = (480 - height) / 2
x = (640 - width) / 2
when 2 # 下
y = ( @character.real_y - $game_map.display_y + 64) * 32 / 128 + 32 + FUKI::POP_SHIFT_UNDER
end
#メッセージポジション一時記憶
@message_position = $game_system.message_position
# 画面外にはみ出す時はウインドウの上下をチェンジ
if FUKI::POS_FIX
case @message_position
when 0 # 上
if y <= 0
@message_position = 2
y = ( @character.real_y - $game_map.display_y + 64) * 32 / 128 + FUKI::POP_SHIFT_UNDER
end
when 2 # 下
if y + height >= 480
@message_position = 0
y = ( @character.real_y - $game_map.display_y + 64) * 32 / 128 - height + 32 - FUKI::CHARACTOR_HEIGHT + FUKI::POP_SHIFT_TOP
end
end
end
return [x,y]
end
#--------------------------------------------------------------------------
# ○ テールの位置を計算
#--------------------------------------------------------------------------
def get_tale_pos
case @message_position
when 0 # 上
# 座標処理
x = ( @character.real_x - $game_map.display_x + 64 ) * 32 / 128 - 16
# 画面端では位置をずらす
if FUKI::CORNER_SHIFT
if x == 0
x = FUKI::SHIFT_PIXEL
elsif x == 640 - 32
x = 640 - 32 - FUKI::SHIFT_PIXEL
end
end
y = self.y + self.height - 16
when 1 # 中
x = nil
y = nil
when 2 # 下
# 座標処理
x = ( @character.real_x - $game_map.display_x + 64 ) * 32 / 128 - 16
# 画面端では位置をずらす
if FUKI::CORNER_SHIFT
if x == 0
x = FUKI::SHIFT_PIXEL
elsif @tale.x == 640 - 32
x = 640 - 32 - FUKI::SHIFT_PIXEL
end
end
y = self.y - 16
end
return [x,y]
end
#--------------------------------------------------------------------------
# ○ 名前ウインドウを表示
#--------------------------------------------------------------------------
def set_namewindow
# $mes_name が空のときは名前ウインドウを表示しない
if $mes_name == nil or $mes_name == ""
return
else
# 変数をセット
mes_name = $mes_name
# 制御文字処理
begin
last_text = mes_name.clone
mes_name.gsub!(/\\\\[Vv]\\[([0-9]+)\\]/) { $game_variables[$1.to_i] }
end until mes_name == last_text
mes_name.gsub!(/\\\\[Nn]\\[([0-9]+)\\]/) do
$game_actors[$1.to_i] != nil ? $game_actors[$1.to_i].name : ""
end
name_width = mes_name.size / 2 * FUKI::NAME_FONT_SIZE
name_height = FUKI::NAME_FONT_SIZE
name_x = self.x + FUKI::NAME_SHIFT_X
name_y = self.y - name_height - 16 + FUKI::NAME_SHIFT_Y
# 名前ウインドウ（枠のみ）を作成
@name_win = Window_Base.new(name_x, name_y, name_width + 16, name_height + 16)
skin = FUKI::NAME_SKIN_NAME != "" ? FUKI::NAME_SKIN_NAME : $game_system.windowskin_name
@name_win.windowskin = RPG::Cache.windowskin(skin)
@name_win.back_opacity = FUKI::NAME_OPACITY
@name_win.z = self.z + 1
# 余白をwindowクラスの限界よりも小さくするため、二重構造に
@name_contents = Sprite.new
@name_contents.x = name_x + 12
@name_contents.y = name_y + 8
@name_contents.bitmap = Bitmap.new(name_width, name_height)
@name_contents.z = @name_win.z + 2
# 文字色の設定
nil_color = Color.new(0,0,0,0)
if FUKI::NAME_COLOR != nil_color
@name_contents.bitmap.font.color = FUKI::NAME_COLOR
else
@name_contents.bitmap.font.color = normal_color
end
@name_contents.bitmap.font.size = FUKI::NAME_FONT_SIZE
# ウインドウサイズを調整
rect = @name_contents.bitmap.text_size(mes_name)
@name_win.width = rect.width + 32
# 名前を描画
@name_contents.bitmap.draw_text(rect, mes_name)
end
end
#--------------------------------------------------------------------------
# ○ ふきだしと名前ウインドウを破棄
#--------------------------------------------------------------------------
def del_fukidasi
if @tale != nil
@tale.dispose
@tale = nil
end
if @name_win != nil
@name_win.dispose
@name_win = nil
@name_contents.dispose
@name_contents = nil
end
self.opacity = 0
self.x = 80
self.width = 480
self.height = 160
self.contents.dispose
self.contents = Bitmap.new(width - 32, height - 32)
self.pause = true
end
#--------------------------------------------------------------------------
# ○ キャラクターの取得
# parameter : パラメータ
#--------------------------------------------------------------------------
def get_character(parameter)
# パラメータで分岐
case parameter
when -1 # プレイヤー
return $game_player
when 0 # このイベント
events = $game_map.events
return events == nil ? nil : events[$active_event_id]
else # 特定のイベント
events = $game_map.events
return events == nil ? nil : events[parameter]
end
end
#--------------------------------------------------------------------------
# ● ウィンドウの位置と不透明度の設定
#--------------------------------------------------------------------------
def reset_window
if $game_temp.in_battle
self.y = 16
else
case $game_system.message_position
when 0 # 上
self.y = 16
when 1 # 中
self.y = 160
when 2 # 下
self.y = 304
end
end
if $game_system.message_frame == 0
self.opacity = 255
else
self.opacity = 0
end
self.back_opacity = FUKI::MES_OPACITY
end
#--------------------------------------------------------------------------
# ● フレーム更新
#--------------------------------------------------------------------------
def update
super
# ふきだしモードではイベントの動きに追従
if @tale != nil
pos = get_fuki_pos(self.width, self.height)
self.x = pos[0]
self.y = pos[1]
tale_pos = get_tale_pos
@tale.x = tale_pos[0]
@tale.y = tale_pos[1]
if @name_win != nil
name_height = FUKI::NAME_FONT_SIZE
@name_win.x = self.x + FUKI::NAME_SHIFT_X
@name_win.y = self.y - name_height - 16 + FUKI::NAME_SHIFT_Y
@name_contents.x = @name_win.x + 12
@name_contents.y = @name_win.y + 8
end
end
# フェードインの場合
if @fade_in
self.contents_opacity += 24
if @name_win != nil
@name_win.opacity += 24
end
if @tale != nil
@tale.opacity += 24
end
if @input_number_window != nil
@input_number_window.contents_opacity += 24
end
if self.contents_opacity == 255
@fade_in = false
end
return
end
# メッセージ表示中の場合
if @contents_drawing
refresh_drawtext
return
end
# 数値入力中の場合
if @input_number_window != nil
@input_number_window.update
# 決定
if Input.trigger?(Input::C)
$game_system.se_play($data_system.decision_se)
$game_variables[$game_temp.num_input_variable_id] =
@input_number_window.number
$game_map.need_refresh = true
# 数値入力ウィンドウを解放
@input_number_window.dispose
@input_number_window = nil
terminate_message
end
return
end
# メッセージ表示終了の場合
if @contents_showing_end
# 選択肢の表示中でなければポーズサインを表示
# ふきだしモードでは非表示
if $game_temp.choice_max == 0 and @tale == nil
self.pause = true
else
self.pause = false
end
# キャンセル
if Input.trigger?(Input::B)
if $game_temp.choice_max > 0 and $game_temp.choice_cancel_type > 0
$game_system.se_play($data_system.cancel_se)
$game_temp.choice_proc.call($game_temp.choice_cancel_type - 1)
terminate_message
end
end
# 決定
if Input.trigger?(Input::C)
if $game_temp.choice_max > 0
$game_system.se_play($data_system.decision_se)
$game_temp.choice_proc.call(self.index)
end
terminate_message
# ふきだしを破棄
del_fukidasi
end
return
end
# フェードアウト中以外で表示待ちのメッセージか選択肢がある場合
if @fade_out == false and $game_temp.message_text != nil
@contents_showing = true
$game_temp.message_window_showing = true
reset_window
refresh_create
if @name_win != nil
@name_win.opacity = 0
end
if @tale != nil
@tale.opacity = 0
end
Graphics.frame_reset
self.visible = true
self.contents_opacity = 0
if @input_number_window != nil
@input_number_window.contents_opacity = 0
end
@fade_in = true
return
end
# 表示すべきメッセージがないが、ウィンドウが可視状態の場合
if self.visible
@fade_out = true
self.opacity -= 48
if @name_win != nil
@name_win.opacity -= 48
end
if @tale != nil
@tale.opacity -= 48
end
if self.opacity == 0
self.visible = false
@fade_out = false
$game_temp.message_window_showing = false
del_fukidasi
end
return
end
end
#--------------------------------------------------------------------------
# ●解放
#--------------------------------------------------------------------------
def dispose
terminate_message
$game_temp.message_window_showing = false
if @input_number_window != nil
@input_number_window.dispose
end
super
end
#--------------------------------------------------------------------------
# ● メッセージ終了処理
#--------------------------------------------------------------------------
def terminate_message
self.active = false
self.pause = false
self.index = -1
self.contents.clear
# 表示中フラグをクリア
@contents_showing = false
@contents_showing_end = false
# メッセージコールバックを呼ぶ
if $game_temp.message_proc != nil
$game_temp.message_proc.call
end
# 文章、選択肢、数値入力に関する変数をクリア
$game_temp.message_text = nil
$game_temp.message_proc = nil
$game_temp.choice_start = 99
$game_temp.choice_max = 0
$game_temp.choice_cancel_type = 0
$game_temp.choice_proc = nil
$game_temp.num_input_start = 99
$game_temp.num_input_variable_id = 0
$game_temp.num_input_digits_max = 0
# ゴールドウィンドウを開放
if @gold_window != nil
@gold_window.dispose
@gold_window = nil
end
end
#--------------------------------------------------------------------------
# ● カーソルの矩形更新
#--------------------------------------------------------------------------
def update_cursor_rect
if @index >= 0
n = $game_temp.choice_start + @index
font_size = self.contents.font.size
self.cursor_rect.set(8, n*(font_size+10)-5, @cursor_width, (font_size+10))
else
self.cursor_rect.empty
end
end
#--------------------------------------------------------------------------
# ● 通常文字色の取得
#--------------------------------------------------------------------------
def normal_color
# ふきだしモード時に設定を適用
if $mes_id != nil and $mes_id != ""
nil_color = Color.new(0,0,0,0)
if FUKI::FUKI_COLOR != nil_color
color = FUKI::FUKI_COLOR
else
color = super
end
return color
else
# 非ふきだし時には通常文字色
return super
end
end
end
#==============================================================================
# ■ Interpreter
#==============================================================================
class Interpreter
#--------------------------------------------------------------------------
# ● イベントのセットアップ
# event_id : イベント ID
#--------------------------------------------------------------------------
alias setup_fuki setup
def setup(list, event_id)
setup_fuki(list, event_id)
# 戦闘中でなければ
if !($game_temp.in_battle)
# イベントIDを記録
$active_event_id = event_id
end
end
end
#==============================================================================
# ■ Scene_Map
#==============================================================================
class Scene_Map
#--------------------------------------------------------------------------
# ● メイン処理
#--------------------------------------------------------------------------
def main
# スプライトセットを作成
@spriteset = Spriteset_Map.new
# メッセージウィンドウを作成
@message_window = Window_FukiMessage.new
# トランジション実行
Graphics.transition
# メインループ
loop do
# ゲーム画面を更新
Graphics.update
# 入力情報を更新
Input.update
# フレーム更新
update
# 画面が切り替わったらループを中断
if $scene != self
break
end
end
# トランジション準備
Graphics.freeze
# スプライトセットを解放
@spriteset.dispose
# メッセージウィンドウを解放
@message_window.dispose
# タイトル画面に切り替え中の場合
if $scene.is_a?(Scene_Title)
# 画面をフェードアウト
Graphics.transition
Graphics.freeze
end
end
end
#==============================================================================
# ■ Window_InputNumber
#==============================================================================
class Window_InputNumber < Window_Base
#--------------------------------------------------------------------------
# ● オブジェクト初期化
# digits_max : 桁数
#--------------------------------------------------------------------------
def initialize(digits_max)
@digits_max = digits_max
@number = 0
# 数字の幅からカーソルの幅を計算 (0～9 は等幅と仮定)
dummy_bitmap = Bitmap.new(32, 32)
dummy_bitmap.font.size = FUKI::MES_FONT_SIZE
@cursor_width = dummy_bitmap.text_size("0").width + 8
dummy_bitmap.dispose
super(0, 0, @cursor_width * @digits_max + 32, 64)
self.contents = Bitmap.new(width - 32, height - 32)
self.contents.font.size = FUKI::MES_FONT_SIZE
self.z += 9999
self.opacity = 0
@index = 0
refresh
update_cursor_rect
end
end

复制代码

叮当 · 发表于 2006-9-13 11:18:26

#==============================================================================
#　＋＋＋　コラボレーション「＋ふきだし表示」　ver.1.13　＋＋＋
# Script by
# パラ犬　　[url]http://2d6.parasite.jp/[/url]
# ×
# 桜雅在土 [url]http://xms.rdy.jp/[/url]
#
#------------------------------------------------------------------------------
# ほぼどんなメッセージウィンドウに対しても後付け可能な「ふきだし表示」です。
# また、テール部分のみの自動追尾機能を持ちます。
#==============================================================================
# ふきだし表示をするには、
# テール用画像「(スキン名)-top」「(スキン名)-under」を
# 「Graphics/Windowskins」フォルダにインポートしておく必要があります。
#------------------------------------------------------------------------------
#
# ［ふきだし表示の使い方］
# イベントコマンド「スクリプト」で「$mes_id」にイベントIDを代入することで
# そのイベントにふきだしがポップするようになります。
# （記述例： $mes_id=4 ）
# IDに0を代入するとプレイヤー、 nil代入すると、通常のメッセージ表示に戻ります。
# 表示位置はイベント「文章オプション」で変更できます。
# 表示位置に「中央」を指定すると、イベントの位置に関係なく
# 画面中央に表示されます。
#
#==============================================================================
#==============================================================================
# □ カスタマイズポイント
#==============================================================================
class Window_Message < Window_Selectable
#--------------------------------------------------------------------------
# ふきだしモード時のスキン設定
#--------------------------------------------------------------------------
# スキン名（元のウインドウスキンと同じものを使うときは「""」）
FUKI_SKIN_NAME = "001-Blue01"
# ウインドウ背景の不透明度（デフォルトは160）
FUKI_OPACITY = 255
end
#==============================================================================
# ■ Window_Message
#==============================================================================
class Window_Message < Window_Selectable
#--------------------------------------------------------------------------
# ● メッセージ終了処理
#--------------------------------------------------------------------------
alias parashelf_terminate_message terminate_message
def terminate_message
# 呼び戻す
parashelf_terminate_message
# ふきだしの消去
del_tail
end
#--------------------------------------------------------------------------
# ● リフレッシュ
#--------------------------------------------------------------------------
alias parashelf_refresh refresh
def refresh
# 呼び戻す
parashelf_refresh
# ふきだしの再設定
del_tail
set_tail
end
#--------------------------------------------------------------------------
# ● ウィンドウの位置と不透明度の設定
#--------------------------------------------------------------------------
alias parashelf_reset_window reset_window
def reset_window
# 呼び戻す
parashelf_reset_window
# テールの位置を変更
if $mes_id != nil and @tail != nil
tale_pos = get_tale_pos
@tail.x = tale_pos[0]
@tail.y = tale_pos[1]
end
end
#--------------------------------------------------------------------------
# ● フレーム更新
#--------------------------------------------------------------------------
alias parashelf_update update
def update
# 呼び戻す
parashelf_update
# ふきだしテールの更新
update_tail
# メッセージ表示中の場合
if @contents_showing
# テールがある場合はポーズサインを非表示
if @tail != nil
self.pause = false
end
end
# メッージ終了時にスキン設定が戻っていない場合
if $game_temp.message_window_showing == false and @def_skin_name != nil
# スキンを戻す
reset_fuki_skin
end
end
#--------------------------------------------------------------------------
# ○ フレーム更新 (ふきだしテール)
#--------------------------------------------------------------------------
def update_tail
# ふきだしモードではイベントの動きに追従
if $mes_id != nil and @tail != nil
tale_pos = get_tale_pos
@tail.x = tale_pos[0]
@tail.y = tale_pos[1]
skin = $game_system.windowskin_name
case @message_position
when 0 # 上
@tail.bitmap = RPG::Cache.windowskin(skin + "-top")
when 2 # 下
@tail.bitmap = RPG::Cache.windowskin(skin + "-under")
end
end
end
#--------------------------------------------------------------------------
# ○ ふきだしテールを表示
#--------------------------------------------------------------------------
def set_tail
# $mes_id が空のときと戦闘中はふきだしを表示しない
if $mes_id == nil or $game_temp.in_battle
del_tail
# スキンを戻す
reset_fuki_skin
else
# スキンをセット
set_fuki_skin
# ふきだしのテールを描画
skin = $game_system.windowskin_name
if $game_system.message_frame == 0
# 位置を取得
tale_pos = get_tale_pos
@tail = Sprite.new
case $game_system.message_position
when 0 # 上
@tail.bitmap = RPG::Cache.windowskin(skin + "-top")
@tail.x = tale_pos[0]
@tail.y = tale_pos[1]
@tail.z = self.z + 1
when 1 # 中
@tail.dispose
@tail = nil
when 2 # 下
@tail.bitmap = RPG::Cache.windowskin(skin + "-under")
@tail.x = tale_pos[0]
@tail.y = tale_pos[1]
@tail.z = self.z + 1
end
# エクストラスプライトに登録
@extra_sprites = [] if @extra_sprites.nil?
@extra_sprites.push(@tail) if @tail != nil
end
end
end
#--------------------------------------------------------------------------
# ○ テールの位置を計算
#--------------------------------------------------------------------------
def get_tale_pos
character = get_character($mes_id)
x = [[character.screen_x - 16, self.x].max, self.x + self.width - 32].min
case $game_system.message_position
when 0
y = self.y + self.height - 16
else
y = self.y - 16
end
return [x, y]
end
#--------------------------------------------------------------------------
# ○ キャラクターの取得
# parameter : パラメータ
#--------------------------------------------------------------------------
def get_character(parameter)
# パラメータで分岐
case parameter
when 0 # プレイヤー
return $game_player
else # 特定のイベント
events = $game_map.events
return events == nil ? nil : events[parameter]
end
end
#--------------------------------------------------------------------------
# ○ ふきだしを破棄
#--------------------------------------------------------------------------
def del_tail
if @tail != nil
@tail.dispose
@tail = nil
end
end
#--------------------------------------------------------------------------
# ○ スキンの設定
#--------------------------------------------------------------------------
def set_fuki_skin
# ウインドウスキンを変更
if FUKI_SKIN_NAME != "" and FUKI_SKIN_NAME != $game_system.windowskin_name
@def_skin_name = $game_system.windowskin_name
$game_system.windowskin_name = FUKI_SKIN_NAME
self.windowskin = RPG::Cache.windowskin($game_system.windowskin_name)
end
# 不透明度を変更
if self.back_opacity != FUKI_OPACITY
@def_back_opacity = self.back_opacity
self.back_opacity = FUKI_OPACITY
end
end
#--------------------------------------------------------------------------
# ○ スキンを戻す
#--------------------------------------------------------------------------
def reset_fuki_skin
# ウインドウスキンを戻す
if @def_skin_name != nil
$game_system.windowskin_name = @def_skin_name
self.windowskin = RPG::Cache.windowskin($game_system.windowskin_name)
@def_skin_name = nil
end
# 不透明度を戻す
if @def_back_opacity != nil
self.back_opacity = @def_back_opacity
@def_back_opacity = nil
end
end
end

复制代码

叮当 · 发表于 2006-10-17 10:36:02

#==============================================================================
# ■ オートマッピング
#------------------------------------------------------------------------------
# ver 1.00(05/04/27) by 箱入小屋 http://aea.to/hako/
#==============================================================================
=begin
■ 主に使用するメソッド
automaps[id] : id番のオートマップを参照。
visible : 真のとき表示。
scope : 描画範囲。
complete : すべて通行した状態にする。
delete : 通行記録を消す。
move(x,y[,center]) : (x,y)に移動。centerが真のとき原点中心。
=end
class Game_AutoMap
#--------------------------------------------------------------------------
# ● 定数
#--------------------------------------------------------------------------
# オートマップの作成を許可するマップIDの配列
AUTOMAPS_ID = [1, 2, 3, 4, 5]
# 1タイルあたりの一辺の長さ(pixel単位)
TILE_SIZE = 5
# 通行済みと判断される範囲の大きさ(タイル単位)
SCOPE = 0
end
class Sprite_AutoMap < Sprite
#--------------------------------------------------------------------------
# ● 定数
#--------------------------------------------------------------------------
# ※不透明度(アルファ値)を0にすると無効になります。
#-----------------------------------------------
# 通行済みエリアの色(Red, Green, Blue[, Alpha])
COLOR_FLOOR = Color.new(100, 100, 255, 120)
# 未通行/通行不可のエリアの色
COLOR_WALL = Color.new(0, 0, 50, 100)
# プレイヤーシンボルの色
COLOR_PLAYER = Color.new(255, 255, 0, 255)
#-----------------------------------------------
# 通行済みエリアに貼り付けるピクチャファイル, 不透明度
PASSED_FILE = ["filename", 0]
# 未通行/通行不可エリアに貼り付けるピクチャファイル, 不透明度
IMPASSABLE_FILE = ["filename", 0]
# プレイヤーシンボルとして表示するピクチャファイル, 不透明度
PLAYER_FILE = ["filename", 0]
end
#==============================================================================
# ■ Interpreter
#==============================================================================
class Interpreter
#--------------------------------------------------------------------------
# ● オートマップのデータを取得
#--------------------------------------------------------------------------
def automaps
$game_screen.automaps
end
end
#==============================================================================
# ■ Game_Screen
#==============================================================================
class Game_Screen
attr_accessor :automaps # Game_AutoMapオブジェクトを格納するHash
alias automapping_100_initialize initialize
def initialize
@automaps = {}
automapping_100_initialize
end
end
#==============================================================================
# ■ Game_AutoMap
#==============================================================================
class Game_AutoMap
attr_accessor :player_pos # プレイヤー座標
attr_accessor :showing # オートマップ表示フラグ
attr_accessor :scope # 描画範囲(プレイヤーからの距離)
attr_accessor :recording # オートマップ記録開始フラグ
attr_reader :calling # 外部オートマップ呼び出しフラグ
attr_reader :drawn_floor # オートマップの描画情報
attr_reader :x # 表示位置x
attr_reader :y # 表示位置y
attr_reader :tile_size # タイルの大きさ
attr_reader :width # マップの幅
attr_reader :height # マップの高さ
attr_reader :passable # 通行可能座標
attr_reader :id # マップのID
attr_reader :name # マップの名前
attr_reader :permission # オートマップ作成許可フラグ
#--------------------------------------------------------------------------
# ● オブジェクト初期化(新しいマップに移動したとき実行)
#--------------------------------------------------------------------------
def initialize
@permission = AUTOMAPS_ID.include?($game_map.map_id)
return if not @permission
@recording = false
@showing = false
@calling = false
@player_pos = [-1, -1]
@drawn_floor = Table.new($game_map.width, $game_map.height)
@x = 0
@y = 0
@scope = SCOPE
@tile_size = TILE_SIZE
@width = $game_map.width
@height = $game_map.height
@passable = Table.new(@width, @height)
for x in 0..@width
for y in 0..@height
if $game_map.passable?(x, y, 0)
@passable[x, y] = 1 # 通行可能であれば 1
end
end
end
@id = $game_map.map_id
mapinfo = load_data("Data/MapInfos.rxdata") # RPG::MapInfo(Hash, key:id)
@name = mapinfo[$game_map.map_id].name.dup
end
#--------------------------------------------------------------------------
# ● オートマップの記録開始
#--------------------------------------------------------------------------
def setup
@calling = false
@player_pos = [-1, -1]
@recording = true
return true
end
#--------------------------------------------------------------------------
# ● オートマップの表示/非表示
#--------------------------------------------------------------------------
def visible
return @showing
end
def visible=(visible)
@calling = (@id != $game_map.map_id)
@recording = true
@player_pos = [-1, -1]
@showing = visible
end
#--------------------------------------------------------------------------
# ● オートマップの完成
#--------------------------------------------------------------------------
def complete
for x in 0..@width
for y in 0..@height
@drawn_floor[x, y] = 1 if @passable[x, y] == 1
end
end
return true
end
#--------------------------------------------------------------------------
# ● オートマップの消去
#--------------------------------------------------------------------------
def delete
for x in 0..@width
for y in 0..@height
@drawn_floor[x, y] = 0
end
end
@showing = false
@player_pos = [-1, -1]
@calling = false
return true
end
#--------------------------------------------------------------------------
# ● オートマップの移動
#--------------------------------------------------------------------------
def move(x, y, center = false)
if center
@x = (640 - @width * @tile_size) / 2
@y = (480 - @height * @tile_size) / 2
else
@x = x
@y = y
end
return true
end
end
#==============================================================================
# ■ Spriteset_Map
#==============================================================================
class Spriteset_Map
alias automapping_100_initialize initialize
def initialize
amaps = $game_screen.automaps
# 現在のマップのオートマップが存在しない
if not amaps.include?($game_map.map_id)
# マップIDをキーとして、Game_AutoMapオブジェクトを生成
amaps[$game_map.map_id] = Game_AutoMap.new
# オートマップの作成が許可されていない場合
if not amaps[$game_map.map_id].permission
amaps.delete($game_map.map_id)
end
end
if amaps.include?($game_map.map_id)
# 0番に現在のマップを関連付ける
amaps.delete(0)
amaps[0] = amaps[$game_map.map_id]
# プレイヤー位置の記録を開始
amaps[$game_map.map_id].setup
end
@viewport_automap = Viewport.new(0, 0, 640, 480)
@viewport_automap.z = 198 # オートマップのZ座標
@automap_sprites = []
# これまでに作成されたすべてのオートマップのスプライト生成
for map_id in amaps.keys
next if map_id == 0
@automap_sprites << Sprite_AutoMap.new(@viewport_automap, amaps[map_id])
end
automapping_100_initialize
end
alias automapping_100_dispose dispose
def dispose
for sprite in @automap_sprites
sprite.dispose
end
automapping_100_dispose
@viewport_automap.dispose
end
alias automapping_100_update update
def update
for sprite in @automap_sprites
sprite.update
end
automapping_100_update
@viewport_automap.update
end
end
#==============================================================================
# ■ Sprite_AutoMap
#==============================================================================
class Sprite_AutoMap < Sprite
#--------------------------------------------------------------------------
# ● オブジェクト初期化
# viewport :ビューポート, automap :Game_AutoMap
#--------------------------------------------------------------------------
def initialize(viewport, automap)
super(viewport)
@automap = automap
w = @automap.width * @automap.tile_size
h = @automap.height * @automap.tile_size
self.bitmap = Bitmap.new(w, h)
# 転送用の矩形
@rect = Rect.new(0, 0, 0, 0)
# オートマップの画像
if PASSED_FILE[1] > 0
@floor_bitmap = RPG::Cache.picture(PASSED_FILE[0])
end
if IMPASSABLE_FILE[1] > 0
@wall_bitmap = RPG::Cache.picture(IMPASSABLE_FILE[0])
end
# プレイヤーシンボル描画
@player_symbol = Sprite.new(viewport)
if PLAYER_FILE[1] > 0
@player_symbol.bitmap = RPG::Cache.picture(PLAYER_FILE[0])
@player_symbol.ox=(@player_symbol.bitmap.width - @automap.tile_size)/2
@player_symbol.oy = @player_symbol.bitmap.height / 2
@player_symbol.visible = false
else
@player_symbol.bitmap = Bitmap.new(w, h)
end
update
end
#--------------------------------------------------------------------------
# ● フレーム更新
#--------------------------------------------------------------------------
def update
if not @automap.recording
return
end
# プレイヤーの位置が同じ(移動していない)場合
if @automap.player_pos == [$game_player.x, $game_player.y]
return
end
self.x = @player_symbol.x = @automap.x
self.y = @player_symbol.y = @automap.y
self.visible = @player_symbol.visible = @automap.showing
@automap.player_pos = [$game_player.x, $game_player.y]
len = @automap.tile_size
# 別マップからの呼び出しの場合
if @automap.calling
# 通行済みエリア描画
if PASSED_FILE[1] > 0
draw_passable_picture(len)
elsif COLOR_FLOOR.alpha > 0
draw_passable(len)
end
# 未通行/通行不可エリア描画
if IMPASSABLE_FILE[1] > 0
draw_impassable_picture(len)
elsif COLOR_WALL.alpha > 0
draw_impassable(len)
end
return
end
# 描画範囲取得
x_min = [0, $game_player.x - @automap.scope].max
x_max = [@automap.width, $game_player.x + @automap.scope].min
y_min = [0, $game_player.y - @automap.scope].max
y_max = [@automap.height, $game_player.y + @automap.scope].min
for x in x_min..x_max
for y in y_min..y_max
# 未通行 and 通行可能
if @automap.drawn_floor[x, y] == 0 and @automap.passable[x, y] == 1
# その座標を保存
@automap.drawn_floor[x, y] = 1
end
end
end
if @automap.showing
self.bitmap.clear
# 通行済みエリア描画
if PASSED_FILE[1] > 0
draw_passable_picture(len)
elsif COLOR_FLOOR.alpha > 0
draw_passable(len)
end
# 未通行/通行不可エリア描画
if IMPASSABLE_FILE[1] > 0
draw_impassable_picture(len)
elsif COLOR_WALL.alpha > 0
draw_impassable(len)
end
# プレイヤーシンボル更新
if PLAYER_FILE[1] > 0 or COLOR_PLAYER.alpha > 0
player_symbol_update
end
end
end
#--------------------------------------------------------------------------
# ● 通行エリア描画
#--------------------------------------------------------------------------
def draw_passable(len)
for x in 0..@automap.width
for y in 0..@automap.height
# 保存された座標が 1 の場合
if @automap.drawn_floor[x, y] == 1
# タイル描画
self.bitmap.fill_rect(x*len, y*len, len, len, COLOR_FLOOR)
end
end
end
end
#--------------------------------------------------------------------------
# ● 通行エリア(ピクチャ)描画
#--------------------------------------------------------------------------
def draw_passable_picture(len)
for x in 0..@automap.width
for y in 0..@automap.height
# 保存された座標が 1 の場合
if @automap.drawn_floor[x, y] == 1
@rect.set((x*len)%@floor_bitmap.width, (y*len)%@floor_bitmap.height,
len, len)
# タイル描画
self.bitmap.blt(x*len, y*len,
@floor_bitmap, @rect, PASSED_FILE[1])
end
end
end
end
#--------------------------------------------------------------------------
# ● 未通行/通行不可エリア描画
#--------------------------------------------------------------------------
def draw_impassable(len)
for x in 0..@automap.width
for y in 0..@automap.height
# 保存された座標が 0 の場合
if @automap.drawn_floor[x, y] == 0
# タイル描画
self.bitmap.fill_rect(x*len, y*len, len, len, COLOR_WALL)
end
end
end
end
#--------------------------------------------------------------------------
# ● 未通行/通行不可エリア(ピクチャ)描画
#--------------------------------------------------------------------------
def draw_impassable_picture(len)
for x in 0..@automap.width
for y in 0..@automap.height
# 保存された座標が 0 の場合
if @automap.drawn_floor[x, y] == 0
@rect.set((x*len)%@wall_bitmap.width, (y*len)%@wall_bitmap.height,
len, len)
# タイル描画
self.bitmap.blt(x*len, y*len, @wall_bitmap, @rect, IMPASSABLE_FILE[1])
end
end
end
end
#--------------------------------------------------------------------------
# ● プレイヤーシンボル更新
#--------------------------------------------------------------------------
def player_symbol_update
len = @automap.tile_size
x = $game_player.x * len
y = $game_player.y * len
# ピクチャ
if PLAYER_FILE[1] > 0
@player_symbol.x += x
@player_symbol.y += y
@player_symbol.opacity = PLAYER_FILE[1]
else
@player_symbol.bitmap.clear
@player_symbol.bitmap.fill_rect(x, y, len, len, COLOR_PLAYER)
end
end
#--------------------------------------------------------------------------
# ● 解放
#--------------------------------------------------------------------------
def dispose
if self.bitmap != nil
# 別のマップに移動した場合は非表示にする
if $scene.is_a?(Scene_Map)
@automap.showing = false
@automap.recording = false
end
@automap.player_pos = [-1, -1]
self.bitmap.dispose
self.bitmap = nil
@player_symbol.bitmap.dispose
@player_symbol.bitmap = nil
end
super
end
end

复制代码

叮当 · 发表于 2006-10-17 11:04:08

使用行走图做战斗图

ljy7506205 · 发表于 2006-10-17 18:31:24

那个,这些脚本要放哪里,是说那个升级提示的,我蛮喜欢的 [s:4]

		自动登录	找回密码
密码			立即注册

话说...实用脚本收集

貌似是用步行图来横版战斗

还是拿步行图做战斗图,可纵版和设定移动

还是拿步行图做战斗图,可纵版和设定移动

好象是升级提示,貌似很有用

好象|| 是同时呼出2个对话框

类似于风林系列的地图[走过的会被标亮]

本帖子中包含更多资源

声命组金赏