catman/heutekeinkoenig
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

base player tokens reduziert, upkeep tank reduziert, sniper durch robot ersetzt

Browse Source
This commit is contained in:
Maximilian Wagner 2023-06-23 17:53:45 +02:00
parent 26fcb310be
commit c5908336ea
2 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
daten.pl
View File

@ -11,9 +11,9 @@ feldType(water, 3, blue).
% einheit(type, attack, defense, action multiplier, upkeep, symbol)
% der multiplier ist der angewandte faktor für boni/mali
einheit(infantry, 2, 2, 2, 1, i).
einheit(sniper, 3, 1, 3, 1, s).
einheit(robot, 3, 1, 3, 1, s).
einheit(motorized, 4, 3, 2, 2, m).
einheit(tank, 5, 5, 3, 3, t).
einheit(tank, 5, 5, 3, 2, t).
% Startpositionen der Spieler mit jeweils -1 auf die coords
% Damit ist die init_player universell
@ -22,7 +22,7 @@ player(1).
player(2).
% Die Anzahl an tokens die pro Runde an die Spieler verteilt wird
player_tokens(10).
player_tokens(8).
% Der Turncounter
turn_counter(1).

4
gui.pl
View File

@ -4,7 +4,7 @@
% new(@specifier, dialog('windowname'))
% send(@specifiert, append(text_item(name)))
window :-
heutekeinkoenig :-
new(D, dialog("Game")),
openingscreen(D),
show_image(D),
@ -49,7 +49,7 @@ process_choose_units(D, P1U1, P1U2, P1U3, P2U1, P2U2, P2U3) :-
choose_units :-
new(D, dialog('Waehle Einheiten')),
send(D, append, new(Label0, label(name,'Waehlen Sie Ihre Einheiten. Moegliche Optionen sind: infantry, sniper, tank, motorized'))),
send(D, append, new(Label0, label(name,'Waehlen Sie Ihre Einheiten. Moegliche Optionen sind: infantry, robot, tank, motorized'))),
send(D, append, new(Label1, label(name,'Spieler 1'))),
send(D, append, new(P1U1,text_item('Unit 1'))),
send(D, append, new(P1U2,text_item('Unit 2'))),