calc_tokens bugfix

This commit is contained in:
Maximilian Wagner 2023-06-23 15:00:28 +02:00
parent 2c73fdc3d3
commit bea4988138

View File

@ -225,16 +225,15 @@ calc_tokens(Tokens) :-
% Aktuellen Spieler herausfinden
current_player(Player),
% Tokens die Pro Runde dazukommen hinzufügen
player_tokens(Player, Tcurrent),
% Tokens die Pro Runde dazukommen herausfinden
player_tokens_per_turn(Player,Tturn),
Tadd is Tcurrent + Tturn,
% Tokens aus der vorletzten Runde entfernen
% Tokens aus der letzten und vorletzten Runde holen
last_turn(LastTurn),
PreLastTurn is LastTurn - 1,
player_turn(Player, LastTurn, Tlast)
player_turn(Player, PreLastTurn, Tprelast),
% Neue Anzahl der Tokens ausgeben
Tokens is Tadd - Tprelast.
Tokens is Tlast + Tturn - Tprelast.