summaryrefslogtreecommitdiff |
diff options
author | nsensfel <SpamShield0@noot-noot.org> | 2018-07-11 17:54:14 +0200 |
---|---|---|
committer | nsensfel <SpamShield0@noot-noot.org> | 2018-07-11 17:54:14 +0200 |
commit | fde827cba1ff3d889135c74ee1978098465fd200 (patch) | |
tree | d6022f800aa8226bf79a26a19189965c8cbfb2fe /src/battlemap/struct/bm_turn_result.erl | |
parent | df59024199c387903e3d4a901171939a358489d3 (diff) |
"Battlemap" -> "Battle".
Diffstat (limited to 'src/battlemap/struct/bm_turn_result.erl')
-rw-r--r-- | src/battlemap/struct/bm_turn_result.erl | 215 |
1 files changed, 0 insertions, 215 deletions
diff --git a/src/battlemap/struct/bm_turn_result.erl b/src/battlemap/struct/bm_turn_result.erl deleted file mode 100644 index 79fd7f3..0000000 --- a/src/battlemap/struct/bm_turn_result.erl +++ /dev/null @@ -1,215 +0,0 @@ --module(bm_turn_result). - -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -%% TYPES %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -%%% --record -( - switched_weapon, - { - character_ix :: bm_character:id() - } -). - --record -( - moved, - { - character_ix :: bm_character:id(), - path :: list(bm_direction:enum()), - new_location :: bm_location:type() - } -). - --record -( - attacked, - { - attacker_ix :: bm_character:id(), - defender_ix :: bm_character:id(), - sequence :: list(bm_attack:type()) - } -). - --record -( - player_won, - { - player_ix :: non_neg_integer() - } -). - --record -( - player_lost, - { - player_ix :: non_neg_integer() - } -). - --record -( - player_turn_started, - { - player_ix :: non_neg_integer() - } -). - --opaque type() :: ( - #switched_weapon{} - | #moved{} - | #attacked{} - | #player_won{} - | #player_lost{} - | #player_turn_started{} -). - -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -%% EXPORTS %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% --export_type([type/0]). - --export -( - [ - new_player_won/1, - new_player_lost/1, - new_player_turn_started/1, - new_character_switched_weapons/1, - new_character_moved/3, - new_character_attacked/3 - ] -). - --export -( - [ - encode/1 - ] -). - -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -%% LOCAL FUNCTIONS %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -%% EXPORTED FUNCTIONS %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% --spec new_player_won (non_neg_integer()) -> type(). -new_player_won (PlayerIX) -> - #player_won { player_ix = PlayerIX }. - --spec new_player_lost (non_neg_integer()) -> type(). -new_player_lost (PlayerIX) -> - #player_lost { player_ix = PlayerIX }. - --spec new_player_turn_started (non_neg_integer()) -> type(). -new_player_turn_started (PlayerIX) -> - #player_turn_started { player_ix = PlayerIX }. - --spec new_character_switched_weapons (bm_character:id()) -> type(). -new_character_switched_weapons (CharacterIX) -> - #switched_weapon { character_ix = CharacterIX }. - --spec new_character_moved - ( - bm_character:id(), - list(bm_direction:enum()), - bm_location:type() - ) - -> type(). -new_character_moved (CharacterIX, Path, NewLocation) -> - #moved - { - character_ix = CharacterIX, - path = Path, - new_location = NewLocation - }. - --spec new_character_attacked - ( - bm_character:id(), - bm_character:id(), - list(bm_attack:type()) - ) - -> type(). -new_character_attacked (AttackerIX, DefenderIX, AttackSequence) -> - #attacked - { - attacker_ix = AttackerIX, - defender_ix = DefenderIX, - sequence = AttackSequence - }. - --spec encode (type()) -> {list(any())}. -encode (TurnResult) when is_record(TurnResult, switched_weapon) -> - CharacterIX = TurnResult#switched_weapon.character_ix, - - { - [ - {<<"t">>, <<"swp">>}, - {<<"ix">>, CharacterIX} - ] - }; -encode (TurnResult) when is_record(TurnResult, moved) -> - CharacterIX = TurnResult#moved.character_ix, - Path = TurnResult#moved.path, - NewLocation = TurnResult#moved.new_location, - - EncodedPath = lists:map(fun bm_direction:encode/1, Path), - EncodedNewLocation = bm_location:encode(NewLocation), - - { - [ - {<<"t">>, <<"mv">>}, - {<<"ix">>, CharacterIX}, - {<<"p">>, EncodedPath}, - {<<"nlc">>, EncodedNewLocation} - ] - }; -encode (TurnResult) when is_record(TurnResult, attacked) -> - AttackerIX = TurnResult#attacked.attacker_ix, - DefenderIX = TurnResult#attacked.defender_ix, - Sequence = TurnResult#attacked.sequence, - - EncodedSequence = lists:map(fun bm_attack:encode/1, Sequence), - - { - [ - {<<"t">>, <<"atk">>}, - {<<"aix">>, AttackerIX}, - {<<"dix">>, DefenderIX}, - {<<"seq">>, EncodedSequence} - ] - }; -encode (TurnResult) when is_record(TurnResult, player_won) -> - PlayerIX = TurnResult#player_won.player_ix, - - { - [ - {<<"t">>, <<"pwo">>}, - {<<"ix">>, PlayerIX} - ] - }; -encode (TurnResult) when is_record(TurnResult, player_lost) -> - PlayerIX = TurnResult#player_lost.player_ix, - - { - [ - {<<"t">>, <<"plo">>}, - {<<"ix">>, PlayerIX} - ] - }; -encode (TurnResult) when is_record(TurnResult, player_turn_started) -> - PlayerIX = TurnResult#player_turn_started.player_ix, - - { - [ - {<<"t">>, <<"pts">>}, - {<<"ix">>, PlayerIX} - ] - }; -encode (Other) -> - io:format("~n invalid encode param\"~p\"~n", [Other]), - true = Other. |