calc_tokens bugfix
This commit is contained in:
parent
2c73fdc3d3
commit
bea4988138
11
logik.pl
11
logik.pl
@ -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.
|
||||||
|
Loading…
x
Reference in New Issue
Block a user