XProfan

CLS
' Q: https://www.blindtextgenerator.de/#    or.
'https://germantestdrive.wordpress.com/2009/07/09/langer-Test-Text/
var txt$="Dies is a Typoblindtext. on it can see, whether any letters \n"+\
"Da are and How tappt im dunkeln looks. sometimes using one words How Hamburgefonts,\n"+\
"Rafgenduks or Handgloves, circa Schriften To testing, - sometimes Sätze, The\n"+\
"alle letters the Alphabets include - one name such Sätze »Pangrams«.\n"+\
"Sehr famous is this: The quick brown fox jumps over the lazy old dog. \n"+\
" \n"+\
"Oft go in Typoblindtexte too fremdsprachige Satzteile installed (AVAIL®\n"+\
"and Wefox™ are testing aussi la Kerning), around the effect in others Languages\n"+\
"zu testing. In latin sees to that example almost each Font well from:\n"+\
"\n"+\
"                       Quod erat demonstrandum.\n"+\
"\n"+\
"Seit 1975 are missing into most Testtexten the numbers, and so to Typo-\n"+\
"Gb. 204 § ex the year 2034 numbers in 86 Texten to duty made go.\n"+\
"Nichteinhaltung is with up to 245 € or 368 $ bestraft.\n"+\
"\n"+\
"Genauso important in are in the meantime too Âçcèñtë, The in neueren Schriften\n"+\
"aber almost always include are. One wichtiges, but difficult To integrie-\n"+\
"rendes area are OpenType-Funktionalitäten. according to software-Voreinstellungen\n"+\
"können installed Kapitälchen, Kerning or Ligaturen (very neat) not \n"+\
"richtig displayed go. or too:\n\n"+\
"Zwei flinke boxers hunt The quirlige Eva and ihren Mops through Sylt. Franz\n"+\
"jagt in the complete verwahrlosten taxi across bavaria. twelve Boxkämpfer hunt\n"+\
"Viktor across whom large Sylter Deich. bird Quax zwickt Johnys horse Bim.\n"+\
"\n"+\
"Sylvia venture quick whom Jux with Pforzheim. Polyfon zwitschernd aßen Mäxchens\n"+\
"Vögel Rüben, yoghurt and curd. "+chr $(34)+"Fix, Schwyz!"+chr $(34)+"quäkt Jürgen stupid of pass.\n"+\
"Victor hunt twelve Boxkämpfer across whom large Sylter Deich. Wrong Üben\n"+\
"By Xylophonmusik torments each more Zwerg. Heizölrückstoßabdämpfung. two \n"+\
"flinke boxers hunt The quirlige Eva and ihren Mops through Sylt."

Repeat

    font 0:Window Title "FONT 0":print txt$;:waitinput:cls
    font 1:Window Title "FONT 1"::print txt$;:waitinput:cls
    font 2:Window Title "FONT 2"::print txt$;:waitinput:cls

Until 0