Commodore MPS 1200 - Page 61

1~) Dp en 1 , 4, 7
20 sc:$:::=cht~$ (27)
::::0 pt"int#l, "CPI::::Chi::u-'actet~s Pet~ Inch":pt~int#l
40 pt~int#l, sc$"M"; sc$; cht~$ (l~j) ;
50 pt~int#l~"Elite Campt~eS5E?d:20 CPI"
60 pt~int#l, sc$"P"; sc$; cht~$ (15);
70 pt~int#l, "Pica Compt~essed: 17 CPI"
80 pt'int#l? sC$"@"; sC$"M";
90 pt~int:f:l:l, "Elite Standat"d: 1,2 CPI"
1(":1 pt"int#l, sc$"P";
11,0 pt~inUl=l~ "Pica Standat'd: H' CPI"
12') pt~int#l, sc:$"M"; sc$; ct'w$ (15); sc$"W1,";
13') p t~ i nt#l, "E 1. i te Compt~essed E:':panded: H' CP I"
14(' pt~int#l, sc$"P"; cht~$ (27) ; cht~$ (15) ;
15(' P t~i nt#l , "P i ca Camp t~e!5sed E:·:pandf?d: 8.5 CF'I"
16(1 pt~int#l, sc$"M"; sC$; cht~$ (18) ;
17':' pt'i.nt#l, "EI i te E:':p,:anded: 6 CPI"
18':' pt'int#l, sc$"P";
19') pt'int#l, "Pica E:':panded:5 CPI"
2(":' pt·, i n t# 1" 5C$" W(," ;
2H' c IDsel
CPI=Characters Per Inch
Elite CoIpressed:20 CPI
Pica Compressed: 17 CPI
Elite Standard: 12 CPI
Pica Standard: 10 CPI
Elite Compressed Expanded: 10 CPI
Pica Compressed Expanded:8.5 CPI
E1~te Expanded:6 CPI
p~c~ Exp~nd~d=5 CPI
3-11