program patriot;
uses    dos,hymnen,crt;
var     year,month,date,dayofweek:word;
        f:text;
        s:string;
begin
  playhymne(deutsche);
  writeln;
  writeln;
  writeln('Patriot, (c) 1997, 1998 by Timo Baumann');
  writeln('all rights reserved / alle Rechte vorbehalten');
end.