| おはようございます、ヒロキです。
ちょこっと書いてみたんで参考にでもして下さい。
それでは
*攻撃 味方 敵: If IsAvailable(相手ユニット,バリアA) = 0 Exit For i = 1 to Info(ユニット,UnitID(),武器数) If IsDisable(Unit(),Info(ユニット,UnitID(),武器,i)) = 0 And Info(ユニット,UnitID(),武器,i,属性所有,"無") And Info(ユニット,UnitID(),武器,i,修得) Then Incr バリアA無効化 Disable Unit(相手ユニット) 耐性 Disable Unit(相手ユニット) 弱点 Exit EndIf Next Exit
IsDisable: Return (Eval("Disable($(Args(1)),$(Args(2)))") Or Eval("Disable($(Args(2)))"))
|