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