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 % Aktuellen Spieler herausfinden
current_player(Player), current_player(Player),
% Tokens die Pro Runde dazukommen hinzufügen % Tokens die Pro Runde dazukommen herausfinden
player_tokens(Player, Tcurrent),
player_tokens_per_turn(Player,Tturn), player_tokens_per_turn(Player,Tturn),
Tadd is Tcurrent + Tturn, % Tokens aus der letzten und vorletzten Runde holen
% Tokens aus der vorletzten Runde entfernen
last_turn(LastTurn), last_turn(LastTurn),
PreLastTurn is LastTurn - 1, PreLastTurn is LastTurn - 1,
player_turn(Player, LastTurn, Tlast)
player_turn(Player, PreLastTurn, Tprelast), player_turn(Player, PreLastTurn, Tprelast),
% Neue Anzahl der Tokens ausgeben % Neue Anzahl der Tokens ausgeben
Tokens is Tadd - Tprelast. Tokens is Tlast + Tturn - Tprelast.