Da du keine Fehlermeldungen postest, schreib ich mal die Fehler die ich gefunden habe:
Delphi-Quellcode:
repeat
eingangsabfrage;
brettanalyse;
zuganalyse;
ki;
Hier rufst du Prozeduren auf die du jedoch vorher so deklariert hast:
Delphi-Quellcode:
procedure brettanalyse(x, y: Integer);
procedure zuganalyse(x, y: Integer);
procedure ki(x, y: Integer);
Sie erwarten also alle jeweils zwei Parameter vom Typ integer.
Ein korrekter Aufruf müsste dann z.B so aussehen:
Delphi-Quellcode:
repeat
eingangsabfrage;
brettanalyse(2,4);
ki(1,2);
zugangsanalyse(1,3);
WriteLn gewinner + (' hat gewonnen');
Das muss, falls "gewinner" eine Variable vom Typ string ist, so aussehen:
Writeln(gewinner + ' hat gewonnen');
.
Denke jetz sind ein paar Fehler behoben, aber poste einfach deine konkreten Fehlermeldungen, die du nicht lösen kannst dann kann man dir besser helfen.