program sdemo;
{ (c) 1991 by H.-J. Schloáarek }
uses crt,dos,schrift;
begin
clrscr;
text_links(1,2,150,'Dieser Text kommt von links');
readln;
text_rechts(52,4,150,'Und nun von rechts');
readln;
lauf_schrift(1,6,70,100,'Eine Laufschrift bringt Bewegung auf den Monitor.');
text_mitte(9,8,150,'Dieser Text wird von der Mitte aus auf'+
' den Monitor geschrieben.');
readln;
doppel_schrift(1,10,79,100,'Dieser Text l„uft in Zeile 10.',1,12,79,'Der '+
'zweite Text l„uft in Zeile 12.');
text_mitte(5,14,150,'Jetzt wird der Bildschirm'+
' gel”scht und ein Text erscheint in Kreisform');
delay(500);
beben;
kreis_text(yellow,'DISK-EDV-REPORT 1/92');
readln;
end.