From e39c44eabaea7bafa58aa85593b80a6c55f907a3 Mon Sep 17 00:00:00 2001 From: nsensfel Date: Tue, 23 Apr 2019 18:26:09 +0200 Subject: ... --- src/battle/struct/btl_player_turn.erl | 17 ++++++++++++++++- 1 file changed, 16 insertions(+), 1 deletion(-) (limited to 'src/battle/struct/btl_player_turn.erl') diff --git a/src/battle/struct/btl_player_turn.erl b/src/battle/struct/btl_player_turn.erl index 6bd823f..fb0c2b7 100644 --- a/src/battle/struct/btl_player_turn.erl +++ b/src/battle/struct/btl_player_turn.erl @@ -23,7 +23,8 @@ ( [ new/2, - next/2 + next/2, + ataxia_next/2 ] ). @@ -109,3 +110,17 @@ next (Players, CurrentPlayerTurn) -> end, new(NextTurnNumber, NextPlayerIX). + +-spec ataxia_next + ( + orddict:orddict(non_neg_integer(), btl_player:type()), + type() + ) + -> {type(), ataxic:basic()}. +ataxia_next (Players, CurrentPlayerTurn) -> + Next = next(Players, CurrentPlayerTurn), + + { + Next, + ataxic:constant(Next) + }. -- cgit v1.2.3-70-g09d2