Schriftmuster

Fur den Druck eines Blattes mit Schriftmustern der verfügbaren Schriften ist zunächst einmal die Feststellung wichtig, dass mit Ausnahme der Schrift Lineprinter alle anderen residenten Schriften (die über eine Schriftnummer anwählbaren) auch in in der Liste der skalierbaren Schriften enthalten sind.

Von daher reicht es, die Schrift Lineprinter sowie alle skalierbaren Schriften anzudrucken. Im nachfolgend gelisteten Prescribe-Datenstrom werden für jede Schrift die Groß- und Kleinbuchstaben sowie die Ziffern angedruckt.

Bei der Anwahl der dicktengleichen Schriften (feste Teilung) mit dem Kommando SFNT ist zu beachten, dass nur die Schriftgrösse, aber nicht die Laufweite ausgewählt wird. Deshalb ist nach dem SFNT-Kommando noch das SCPI-Kommando zum Setzen der Laufweite notwendig.

Die Schrift Lineprinter wird als einzige mit dem Kommando FONT über ihre Schriftnummer angewählt.

Bei den drei Symbolschriften Symbol, ITCZapfDingbats und Wingdings ist beachten, dass sie nur in einem festen Zeichensatz gedruckt werden können. Deshalb wird mit dem Kommando CSET für jede Schrift vorher der Zeichensatz umgeschaltet. Damit wieder normaler Text gedruckt werden kann, muss diese Umschaltung dann auch wieder zurückgesetzt werden.

schriftmuster.prs
!R! RES; UNIT C;
 
MAP  .5,  2; SFNT 'Courier', 12; SCPI 12; TEXT 'Courier';
MAP 5.5,  2; TEXT 'ABCDEFGHIJKLMNOPQRST abcdefghijklmnopqrstuvw 0123456789';
 
MAP  .5,  3; SFNT 'LetterGothic', 12; SCPI 12; TEXT 'Letter Gothic';
MAP 5.5,  3; TEXT 'ABCDEFGHIJKLMNOPQRST abcdefghijklmnopqrstuvw 0123456789';
 
MAP  .5,  4; FONT 88; TEXT 'Lineprinter';
MAP 5.5,  4; TEXT 'ABCDEFGHIJKLMNOPQRST abcdefghijklmnopqrstuvw 0123456789';
 
MAP  .5,  5; SFNT 'CGTimes', 12; TEXT 'CGTimes';
MAP 5.5,  5; TEXT 'ABCDEFGHIJKLMNOPQRST abcdefghijklmnopqrstuvw 0123456789';
 
MAP  .5,  6; SFNT 'CGOmega', 12; TEXT 'CGOmega';
MAP 5.5,  6; TEXT 'ABCDEFGHIJKLMNOPQRST abcdefghijklmnopqrstuvw 0123456789';
 
MAP  .5,  7; SFNT 'Coronet', 12; TEXT 'Coronet';
MAP 5.5,  7; TEXT 'ABCDEFGHIJKLMNOPQRST abcdefghijklmnopqrstuvw 0123456789';
 
MAP  .5,  8; SFNT 'Clarendon-Cd', 12; TEXT 'Clarendon';
MAP 5.5,  8; TEXT 'ABCDEFGHIJKLMNOPQRST abcdefghijklmnopqrstuvw 0123456789';
 
MAP  .5,  9; SFNT 'Univers-Md', 12; TEXT 'Univers';
MAP 5.5,  9; TEXT 'ABCDEFGHIJKLMNOPQRST abcdefghijklmnopqrstuvw 0123456789';
 
MAP  .5, 10; SFNT 'Univers-MdCd', 12; TEXT 'Univers Condensed';
MAP 5.5, 10; TEXT 'ABCDEFGHIJKLMNOPQRST abcdefghijklmnopqrstuvw 0123456789';
 
MAP  .5, 11; SFNT 'AntiqueOlive', 12; TEXT 'AntiqueOlive';
MAP 5.5, 11; TEXT 'ABCDEFGHIJKLMNOPQRST abcdefghijklmnopqrstuvw 0123456789';
 
MAP  .5, 12; SFNT 'GaramondAntiqua', 12; TEXT 'GaramondAntiqua';
MAP 5.5, 12; TEXT 'ABCDEFGHIJKLMNOPQRST abcdefghijklmnopqrstuvw 0123456789';
 
MAP  .5, 13; SFNT 'Marigold', 12; TEXT 'Marigold';
MAP 5.5, 13; TEXT 'ABCDEFGHIJKLMNOPQRST abcdefghijklmnopqrstuvw 0123456789';
 
MAP  .5, 14; SFNT 'Albertus-Md', 12; TEXT 'Albertus';
MAP 5.5, 14; TEXT 'ABCDEFGHIJKLMNOPQRST abcdefghijklmnopqrstuvw 0123456789';
 
MAP  .5, 15; SFNT 'Arial', 12; TEXT 'Arial';
MAP 5.5, 15; TEXT 'ABCDEFGHIJKLMNOPQRST abcdefghijklmnopqrstuvw 0123456789';
 
MAP  .5, 16; SFNT 'TimesNewRoman', 12; TEXT 'TimesNewRoman';
MAP 5.5, 16; TEXT 'ABCDEFGHIJKLMNOPQRST abcdefghijklmnopqrstuvw 0123456789';
 
MAP  .5, 17; SFNT 'Helvetica', 12; TEXT 'Helvetica';
MAP 5.5, 17; TEXT 'ABCDEFGHIJKLMNOPQRST abcdefghijklmnopqrstuvw 0123456789';
 
MAP  .5, 18; SFNT 'Helvetica-Nr', 12; TEXT 'Helvetica Narrow';
MAP 5.5, 18; TEXT 'ABCDEFGHIJKLMNOPQRST abcdefghijklmnopqrstuvw 0123456789';
 
MAP  .5, 19; SFNT 'Palatino', 12; TEXT 'Palatino';
MAP 5.5, 19; TEXT 'ABCDEFGHIJKLMNOPQRST abcdefghijklmnopqrstuvw 0123456789';
 
MAP  .5, 20; SFNT 'ITCAvantGardeGothic-Bk', 12; TEXT 'ITCAvantGardeGothic';
MAP 5.5, 20; TEXT 'ABCDEFGHIJKLMNOPQRST abcdefghijklmnopqrstuvw 0123456789';
 
MAP  .5, 21; SFNT 'ITCBookman-Lt', 12; TEXT 'ITCBookman';
MAP 5.5, 21; TEXT 'ABCDEFGHIJKLMNOPQRST abcdefghijklmnopqrstuvw 0123456789';
 
MAP  .5, 22; SFNT 'NewCenturySchoolbookRom', 12; TEXT 'NewCenturySchoolbook';
MAP 5.5, 22; TEXT 'ABCDEFGHIJKLMNOPQRST abcdefghijklmnopqrstuvw 0123456789';
 
MAP  .5, 23; SFNT 'Times-Rom', 12; TEXT 'Times-Roman';
MAP 5.5, 23; TEXT 'ABCDEFGHIJKLMNOPQRST abcdefghijklmnopqrstuvw 0123456789';
 
MAP  .5, 24; SFNT 'ITCZapfChancery-MdIt', 12; TEXT 'ITCZapfChancery';
MAP 5.5, 24; TEXT 'ABCDEFGHIJKLMNOPQRST abcdefghijklmnopqrstuvw 0123456789';
 
MAP  .5, 25; SFNT 'Univers-Md', 12; CSET 0N; TEXT 'Symbol';
             SFNT 'Symbol', 12; CSET 19M;
MAP 5.5, 25; TEXT 'ABCDEFGHIJKLMNOPQRST abcdefghijklmnopqrstuvw 0123456789';
 
MAP  .5, 26; SFNT 'Univers-Md', 12;  CSET 0N; TEXT 'ITCZapfDingbats';
             SFNT 'ITCZapfDingbats', 12; CSET 14L;
MAP 5.5, 26; TEXT 'ABCDEFGHIJKLMNOPQRST abcdefghijklmnopqrstuvw 0123456789';
 
MAP  .5, 27; SFNT 'Univers-Md', 12;  CSET 0N; TEXT 'Wingdings';
             SFNT 'Wingdings', 12; CSET 579L;
MAP 5.5, 27; TEXT 'ABCDEFGHIJKLMNOPQRST abcdefghijklmnopqrstuvw 0123456789';
 
PAGE;
EXIT;


Ausdruck