| summaryrefslogtreecommitdiff |
diff options
| -rw-r--r-- | src/battle/src/View/Controlled.elm | 37 |
1 files changed, 23 insertions, 14 deletions
diff --git a/src/battle/src/View/Controlled.elm b/src/battle/src/View/Controlled.elm index aa34b48..4f6a378 100644 --- a/src/battle/src/View/Controlled.elm +++ b/src/battle/src/View/Controlled.elm @@ -180,23 +180,32 @@ end_turn_button char_turn = (Html.button [ ( - if - ( - (temporary_path /= registered_path) - || - ( + let + is_aiming_at_something = (Struct.CharacterTurn.is_aiming_at_something char_turn) - && (action /= Struct.CharacterTurn.Attacking) - && (action /= Struct.CharacterTurn.UsingSkill) - ) - || + in + if ( - (registered_path == []) - && (action == Struct.CharacterTurn.None) + (temporary_path /= registered_path) + || + ( + is_aiming_at_something + && (action /= Struct.CharacterTurn.Attacking) + && (action /= Struct.CharacterTurn.UsingSkill) + ) + || + ( + (not is_aiming_at_something) + && (action == Struct.CharacterTurn.Attacking) + ) + || + ( + (registered_path == []) + && (action == Struct.CharacterTurn.None) + ) ) - ) - then (Html.Attributes.class "disabled") - else (Html.Events.onClick Struct.Event.TurnEnded) + then (Html.Attributes.class "disabled") + else (Html.Events.onClick Struct.Event.TurnEnded) ), (Html.Attributes.class "action-button"), (Html.Attributes.class "end-turn-button"), |