| 行動終了後、残り移動可能量に応じて再移動できるようにこんなインクルを組んでみました。
*ターン 全 全:
ForEach 全
ClearStatus 対象ユニットＩＤ 攻撃不能
RemoveItem 対象ユニットＩＤ 再移動修正[対象ユニットＩＤ]
UnSet 再移動判定[対象ユニットＩＤ]
UnSet 再移動修正[対象ユニットＩＤ]
If Skill(対象パイロット,再移動) = 1 or IsAvailable(対象ユニットＩＤ,騎兵) Then
Set 初期座標[Ｘ,対象パイロット] X(対象ユニットＩＤ)
Set 初期座標[Ｙ,対象パイロット] Y(対象ユニットＩＤ)
EndIf
Next
Exit
*行動終了 全:
再移動＿処理:
Local 移動後 移動量
Switch 再移動判定[対象ユニットＩＤ]
Case "" 0
If Skill(対象パイロット,再移動) = 1 or IsAvailable(対象ユニットＩＤ,騎兵) Then
Set 移動後座標[Ｘ,対象パイロット] X(対象ユニットＩＤ)
Set 移動後座標[Ｙ,対象パイロット] Y(対象ユニットＩＤ)
移動量[対象ユニットＩＤ] = Abs(初期座標[Ｘ,対象パイロット] - 移動後[Ｘ,対象パイロット]) + Abs(初期座標[Ｙ,対象パイロット] - 移動後[Ｙ,対象パイロット])
If 移動量[対象ユニットＩＤ] < Info(対象ユニットＩＤ,移動力) Then
再移動修正[対象ユニットＩＤ] = "移動" & "−$(移動量[対象ユニットＩＤ])"
SpecialPower 対象ユニットＩＤ 再移動
SetStatus 攻撃不能 -1
If Party(対象ユニットＩＤ) = 味方 Then
Item 再移動修正[対象ユニットＩＤ]
Endif
Equip 対象ユニットＩＤ 再移動修正[対象ユニットＩＤ]
Set 再移動判定[対象ユニットＩＤ]
EndIf
EndIf
Case 1
ClearStatus 対象ユニットＩＤ 攻撃不能
RemoveItem 対象ユニットＩＤ 再移動修正[対象ユニットＩＤ]
UnSet 再移動判定[対象ユニットＩＤ]
UnSet 再移動修正[対象ユニットＩＤ]
Endsw
Exit
で、アイテムに
移動−4
移動−4, 固定, 非表示
特殊能力なし
0, 0, 0, 0, -4
みたいなのを何パターンも作って、ＦＥ風の再移動スキルを再現してみてます。
これで味方の再移動は可能となったのですが、敵や中立などコンピューター操作の陣営が思うように再移動してくれません。
理想としては、コンピューター陣営がこの再移動システムを使ってヒット＆アウェイをしてくれることなんですが……。
現在の仕様でそれは可能でしょーか？
教えてください。
|
新着情報