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

gui changes

Browse Source
This commit is contained in:
xxsoca 2023-05-22 16:45:00 +02:00
parent 4ee16dcf06
commit 35cab67ab5
2 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
gui.pl
View File

@ -1,13 +1,13 @@
% erstmal nur experimentell, der bums kommt zum schluss % erstmal nur experimentell, der bums kommt zum schluss
% falls noch zeit sein sollte jedenfalls % falls noch zeit sein sollte jedenfalls
% new(@specifier, dialog('windowname')) % new(@specifier, dialog('windowname'))
% send(@specifiert, append(text_item(name))) % send(@specifiert, append(text_item(name)))
window(Name) :- window(Name) :-
new(D, dialog(Name)), new(D, dialog(Name)),
send(D, append, button(init, message(@prolog, init_feld1))), send(D, append, button(init, message(@prolog, init_feld1))),
send(D, append, button(show, message(@prolog, window3, 'Spielfeld'))), send(D, append, button(show, message(@prolog, window3, 'Spielfeld'))),
send(D, append, button(newbutton, message(@prolog, new_butt, D))),
send(D, open). send(D, open).
window2(Name) :- window2(Name) :-
@ -21,6 +21,9 @@ window2(Name) :-
send(D, open). send(D, open).
new_butt(D) :-
send(D, append, button(penis, message(@prolog, init_feld1))).
% Specific für window3/1 % Specific für window3/1
:- use_module(library(tabular)). :- use_module(library(tabular)).
:- use_module(library(autowin)). :- use_module(library(autowin)).

2
logik.pl
View File

@ -12,6 +12,6 @@ player_turn(Player) :-
% end of turn
% save remaining ap % save remaining ap
save_action_points(Player) save_action_points(Player)