printBoard([L1,L2,L3,L4]):-
  write('          PLAYER 1 (0)'),
  nl,
  write('-----------------------------'),
  nl,
  write('| '),
  printLine(L1),
  write(' | a'),
  nl,
  write('| '),
  printLine(L2),
  write(' | b'),
  nl,
  write('|---------------------------|'),
  nl,
  write('| A | B | C | D | E | F | G |'),
  nl,
  write('|---------------------------|'),
  nl,
  write('| '),
  printLine(L3),
  write(' | c'),
  nl,
  write('| '),
  printLine(L4),
  write(' | d'),
  nl,
  write('-----------------------------'),
  nl,
  write('          PLAYER 2 (0)').

printLine([C|[]]):-
  write(C).

printLine([C|L]):-
  write(C),
  write(' | '),
printLine(L).