| 下のような感じでいけると思います。
一応テストはしましたが、何かしらのバグがあるかも知れません。
敵にも対応させたい場合は、下で味方と書かれている部分を敵に直したものをコピペして貼り付けてください。
*ターン 全 味方:
#霊力持ちのユニットの現在位置を取得
ForEach 味方
If Plana() > 0 Then
Set 現在位置Ｘ[対象ユニットＩＤ] X()
Set 現在位置Ｙ[対象ユニットＩＤ] Y()
EndIf
Next
Exit
*行動終了 味方:
Local 前回位置Ｘ 前回位置Ｙ
Set 前回位置Ｘ 現在位置Ｘ[対象ユニットＩＤ]
Set 前回位置Ｙ 現在位置Ｙ[対象ユニットＩＤ]
Set 現在位置Ｘ[対象ユニットＩＤ] X()
Set 現在位置Ｙ[対象ユニットＩＤ] Y()
If Plana() > 0 Then
Local 移動距離
移動距離 = Abs((前回位置Ｘ - 現在位置Ｘ[対象ユニットＩＤ])) + Abs((前回位置Ｙ - 現在位置Ｙ[対象ユニットＩＤ]))
Plana() = Plana() - 移動距離
EndIf
Exit
|
新着情報