% LLA-Input-File Zeichensatz beginchar(oct"030",0ut#,19ut#,0); %Linien fr Wortzwischenr„ume pickup va_pen; make_l(-45ut); endchar; beginchar(oct"031",0ut#,19ut#,0); %Linien fr Wortzwischenr„ume pickup va_pen; %Sonderbehandlung bei "-" make_l(-45ut); endchar; beginchar("1",14ut#,26ut#,0); pickup va_pen; x18=0 ut; y18=19ut; x24=11ut; y24=26ut; x28=5 ut; y28=0 ut; draw z18--z24 & z24{ab}--z28; make_l(14ut); penlabels(18,24,28); endchar; beginchar("2",20ut#,26ut#,0); pickup va_pen; x22=17ut*.52; y22=0*.52; x23=29ut*.52; y23=7 ut*.52; x24=22ut*.52; y24=50ut*.52; x28=6ut*.52; y28=7ut*.52; x29=30ut*.52; y29=46ut*.52; x34=6 ut*.52; y34=40ut*.52; x38=22ut*.52; y38=22ut*.52; x281=0ut*.52; y281=0ut*.52; draw z34..z24{right}..z29..z38..z28{dir 225}..z281 & z281{z28-z281}..z22{dir 330}..{an}z23; make_l(20ut); penlabels(22,23,24,28,29,34,38,281); endchar; beginchar("3",20ut#,50ut#,0); pickup va_pen; x1=0ut*.52; y1=4ut*.52; x17=24ut*.52; y17=10ut*.52; x19=12ut*.52; y19=27ut*.52; x22=13ut*.52; y22=0 ut*.52; x24=22ut*.52; y24=50ut*.52; x34=6 ut*.52; y34=40ut*.52; x38=22ut*.52; y38=22ut*.52; draw z34..z24{right}..z19{left} & z19{right}..z38..z17..z22{left}..z1; make_l(20ut); penlabels(1,17,19,22,24,34,38); endchar; beginchar("4",18ut#,50ut#,0); pickup va_pen; x4=27ut*.52; y4=16ut*.52; x22=13ut*.52; y22=0 ut*.52; x24=15ut*.52; y24=50ut*.52; x30=19ut*.52; y30=27ut*.52; x32=16ut*.52; y32=-22ut*.52; x56=-3ut*.52; y56=16ut*.52; draw z24{ab}--z56 & z56{dir 10}--z4; draw z30--z22; make_l(18ut); penlabels(4,22,24,30,32,56); endchar; beginchar("5",24ut#,50ut#,0); pickup va_pen; x2=8ut*.52; y2=0ut*.52; x31=0 ut*.52; y31=7 ut*.52; x35=12ut*.52; y35=50ut*.52; x38=28ut*.52; y38=22ut*.52; x58=35ut*.52; y58=50ut*.52; x66=2 ut*.52; y66=25ut*.52; draw z35--z58; draw z35--z66 & z66{dir 20}..z38{down}..z2{left}..z31; make_l(24ut); penlabels(2,31,35,38,58,66); endchar; beginchar("6",17ut#,50ut#,0); pickup va_pen; x23=21ut*.52; y23=8ut*.52; x24=22ut*.52; y24=50ut*.52; x30=15ut*.52; y30=27ut*.52; x56=-5ut*.52; y56=15ut*.52; x57=8ut*.52; y57=0 ut*.52; draw z56..z30..z23..z57{left}..z56{up}..z24{an}; make_l(17ut); penlabels(23,24,30,56,57); endchar; beginchar("7",21ut#,50ut#,0); pickup va_pen; x19=12ut*.52; y19=27ut*.52; x20=30ut*.52; y20=27ut*.52; x28=6 ut*.52; y28=0 ut*.52; x36=25ut*.52; y36=46ut*.52; x37=32ut*.52; y37=50ut*.52; x60=3 ut*.52; y60=43ut*.52; x61=11 ut*.52; y61=50ut*.52; draw z60..z61{right}..z36{right}..z37 & z37--z28; draw z19--z20; make_l(21ut); penlabels(19,20,28,36,37,60,61); endchar; beginchar("8",22ut#,50ut#,0); pickup va_pen; x19=12ut*.52; y19=27ut*.52; x23=25ut*.52; y23=8ut*.52; x31=0 ut*.52; y31=9 ut*.52; x33=11ut*.52; y33=-18ut*.52; x34=6 ut*.52; y34=40ut*.52; x38=22ut*.52; y38=22ut*.52; x57=10ut*.52; y57=0 ut*.52; x67=27ut*.52; y67=42ut*.52; x68=18ut*.52; y68=50ut*.52; x1=27ut*.52; y1=50ut*.52; x2=31ut*.52; y2=42ut*.52; x3=39ut*.52; y3=50ut*.52; draw z31{up}..z19..z67{up}..z68{left}..z34{down}..z38..z23..z57{left}..z31{up}; draw z1{dir -70}..z2{right}..z3; make_l(22ut); penlabels(19,23,31,33,34,38,57,67,68,1,2,3); endchar; beginchar("9",20ut#,50ut#,0); pickup va_pen; x1=0*.52; y1=4ut*.52; x3=29ut*.52; y3=50ut*.52; x11=32ut*.52; y11=50ut*.52; x34=6 ut*.52; y34=40ut*.52; x37=29ut*.52; y37=40ut*.52; x38=25ut*.52; y38=29ut*.52; x57=10ut*.52; y57=0 ut*.52; x68=18ut*.52; y68=50ut*.52; x69=15ut*.52; y69=22ut*.52; x70=26ut*.52; y70=40ut*.52; draw z68{left}..z34..z69{right}..z70..z68{left}; draw z3{ab}..z38{dir 255}..z57{left}..z1; make_l(20ut); penlabels(1,3,11,34,37,38,57,68,69,70); endchar; beginchar("0",24ut#,50ut#,0); pickup va_pen; x1=30ut*.52; y1=50ut*.52; x2=34ut*.52; y2=42ut*.52; x3=42ut*.52; y3=50ut*.52; x17=23ut*.52; y17=10ut*.52; x20=30ut*.52; y20=41ut*.52; x24=23ut*.52; y24=50ut*.52; x46=28ut*.52; y46=22ut*.52; x56=0ut*.52; y56=15ut*.52; x57=11ut*.52; y57=0 ut*.52; x58=36ut*.52; y58=50ut*.52; draw z20..z24{left}..z56{down}..z57{right}..z17..z46..cycle; draw z1{dir -70}..z2{right}..z3; make_l(24ut); penlabels(1,2,3,17,20,24,46,56,57,58); endchar; beginchar("+",30ut#,20ut#, 0ut#); pickup va_pen; z1=(10ut,15ut); z2=(25ut,15ut); z3=(17ut,7ut); z4=(18ut,23ut); draw z1..z2; draw z3..z4; make_l(30ut); labels(range 1 thru 4); endchar; beginchar("-",30ut#,20ut#, 0ut#); pickup va_pen; z1=(10ut,15ut); z2=(25ut,15ut); draw z1..z2; make_l(30ut); labels(range 1 thru 2); endchar; beginchar(oct"025",35ut#,20 ut#, 0ut#); %Gedankenstrich kurz pickup va_pen_small; z1=(10ut,15ut); z2=(30ut,15ut); draw z1..z2; make_l(35ut); labels(range 1 thru 2); endchar; beginchar(oct"026",40ut#,20 ut#, 0ut#); %Gedankenstrich lang pickup va_pen_small; z1=(10ut,15ut); z2=(35ut,15ut); draw z1..z2; make_l(40ut); labels(range 1 thru 2); endchar; beginchar("*",30 ut#,20 ut#, 0ut#); pickup va_pen; z9=(15ut,15ut); z1=z9+(0ut,-8ut); z2=z9+(8ut,0ut); z3=z9+(0ut,8ut); z4=z9+(-8ut,0ut); z5=z9+(-5ut,-5ut); z6=z9+(5ut,-5ut); z7=z9+(5ut,5ut); z8=z9+(-5ut,5ut); % draw z1..z3; draw z2..z4; draw z5..z7; draw z6..z8; make_l(30ut); labels(range 1 thru 9); endchar; beginchar(":",15 ut#,20 ut#, 0ut#); pickup pencircle scaled str_i; % z1=(10ut,15ut); z2=(9ut,5ut); % drawdot z1; drawdot z2; % make_l(15ut); labels(range 1 thru 2); endchar; beginchar("<",30 ut#,20 ut#,0 ut#); pickup va_pen; % z1=(28ut,23ut); z2=(10ut,15ut); z3=(26ut,7ut); % draw z1..z2 & z2..z3; % make_l(30ut); labels(range 1 thru 3); endchar; beginchar(">", 30ut#, 20ut#, 0ut#); pickup va_pen; % z1=(13ut,23ut); z2=(30ut,15ut); z3=(12ut,7ut); % draw z1..z2 & z2..z3; % make_l(30ut); labels(range 1 thru 3); endchar; beginchar("=", 30ut#,20 ut#, 0ut#); pickup va_pen; % z1=(10ut,15ut); z2=(25ut,15ut); z3=(x1,y1-8ut); z4=(x2,y2-8ut); % draw z1..z2 ; draw z3..z4; % make_l(30ut); labels(range 1 thru 4); endchar; beginchar("(", 13ut#, 34ut#, 0ut#); pickup va_pen; % z1=(11ut,34ut); z2=(3ut,-2ut); % draw z1{dir -115}..{dir -80}z2; % make_l(13ut); labels(range 1 thru 2); endchar; beginchar(")",13 ut#,34 ut#, 0ut#); pickup va_pen; % z1=(11ut,34ut); z2=(3ut,-2ut); % draw z1{dir -80}..{dir -115}z2; % make_l(13ut); labels(range 1 thru 2); endchar; beginchar("/",15 ut#,34 ut#, 0ut#); pickup va_pen; % z1=(12ut,34ut); z2=(3ut,-2ut); % draw z1..z2; % make_l(15ut); labels(range 1 thru 2); endchar; beginchar(oct"022",18 ut#,20 ut#, 7ut#); %Anfuehrungsstr. unten pickup va_pen; % z1=(5ut,3ut); z2=(3ut,-7ut); z3=(x1+8ut,y1); z4=(x2+8ut,y2); % draw z1{dir -90}..z2; draw z3{dir -90}..z4; % make_l(18ut); labels(range 1 thru 4); endchar; beginchar(oct"021", 18ut#, 36ut#, ut#); % Anfueyrungsstr. oben pickup va_pen; % z1=(5ut,36ut); z2=(3ut,26ut); z3=(x1+8ut,y1); z4=(x2+8ut,y2); % draw z1{dir -90}..z2; draw z3{dir -90}..z4; % make_l(18ut); labels(range 1 thru 4); endchar; beginchar(oct"20", 18ut#, 36ut#, ut#); % Anfuehrungsstr. oben rechts pickup va_pen; % z1=(5ut,36ut); z2=(3ut,26ut); z3=(x1+8ut,y1); z4=(x2+8ut,y2); % draw z1{dir -90}..z2; draw z3{dir -90}..z4; % make_l(18ut); labels(range 1 thru 4); endchar; beginchar(oct"042", 18ut#, 36ut#, ut#); % Anfueyrungsstr. oben links pickup va_pen; % z1=(5ut,36ut); z2=(7ut,26ut); z3=(x1+8ut,y1); z4=(x2+8ut,y2); % draw z1{dir -90}..z2; draw z3{dir -90}..z4; % make_l(18ut); labels(range 1 thru 4); endchar; beginchar(oct"140", 7ut#, 36ut#, ut#); % einf. Strich oben links pickup va_pen; % z1=(5ut,36ut); z2=(7ut,26ut); % draw z1{dir -90}..z2; % make_l(7ut); labels(range 1 thru 2); endchar; beginchar(oct"000", 7ut#, 36ut#, ut#); % einf. Strich oben links pickup va_pen; % z1=(5ut,36ut); z2=(7ut,26ut); % draw z1{dir -90}..z2; % make_l(7ut); labels(range 1 thru 2); endchar; beginchar(oct"004",18ut#,15ut#,0ut#); % Tuedelchen pickup va_pen_big; z1=(-3ut,22ut); z2=z1+(9ut,0ut); z3=z1+(-1ut,-1ut); z4=z2+(-1ut,-1ut); draw z1..z3; draw z2..z4; make_l(18ut); labels(range 1 thru 4); endchar; beginchar("?", 26ut#,34 ut#,0 ut#); pickup va_pen; % z1=(10ut,30ut); z2=(18ut,34ut); z3=(23ut,30ut); z4=(15ut,20ut); z5=(8ut,10ut); z6=(14ut,6ut); z7=(21ut,10ut); z8=(15ut,1ut); % draw z1..z2{right}..z3..tension1.4..z4..tension1.4..z5{down}..z6{right}..z7; pickup pencircle scaled str_i; drawdot z8; % make_l(26ut); labels(range 1 thru 8); endchar; beginchar("!",16 ut#,34 ut#, 0ut#); pickup va_pen; % z1=(16ut,32ut); z2=(9ut,9ut); z3=(8ut,2ut); % draw z1..z2; pickup pencircle scaled str_i; drawdot z3; % make_l(16ut); labels(range 1 thru 3); endchar; beginchar(";",7 ut#,20 ut#,10 ut#); pickup va_pen; % z1=(6ut,5ut); z2=(6ut,1ut); z3=(2ut,-7ut); draw z2{dir -90}..z3{dir -110}; % pickup pencircle scaled str_i; drawdot z1; % make_l(7ut); labels(range 1 thru 3); endchar; beginchar(".",6 ut#,10 ut#,0 ut#); %pickup va_pen_big; pickup pencircle scaled str_i; % z1=(5ut,1ut); % drawdot z1; % make_l(6ut); labels(range 1 thru 2); endchar; beginchar(",", 7ut#, 10ut#,7 ut#); pickup va_pen; % z1=(6ut,3ut); z2=(2ut,-7ut); % drawdot z1; draw z1+(1ut,0ut){dir -80}..z2{dir -125}; % make_l(7ut); labels(range 1 thru 2); endchar; beginchar(oct"47", 7ut#, 40ut#,0 ut#); % Komma oben pickup va_pen; % z1=(6ut,35ut); z2=(2ut,27ut); % drawdot z1; draw z1+(1ut,0ut){dir -80}..z2{dir -125}; % make_l(7ut); labels(range 1 thru 8); endchar; beginchar(oct"001", 7ut#, 40ut#,0 ut#); % Komma oben pickup va_pen; % z1=(6ut,35ut); z2=(2ut,27ut); % drawdot z1; draw z1+(1ut,0ut){dir -80}..z2{dir -125}; % make_l(7ut); labels(range 1 thru 8); endchar; %beginchar(oct"040",20 ut#,19ut#,0); %Leerzeichen mit Linien %pickup va_pen; %make_l(20ut); %endchar; beginchar("a",18 ut#,19 ut#,0); %a pickup va_pen; z1=(6ut,19ut); z2=(-4.5ut,8ut); z3=(0ut,0ut); z4=(10ut,13ut); z5=(13ut,19ut); z6=(8ut,5ut); z7=(10ut,0ut); z8=(18ut,6ut); % draw z1{dir 190}..{dir 250}z2{dir 250}..z3{right}..{dir 70}z4{dir 70}..cycle; draw z5--z6{z6-z5}..z7{dir 10}..{dir 55}z8; % make_l(18ut); labels(range 1 thru 8); endchar; beginchar(oct"344",18 ut#,30ut#,0); %a-Umlaut pickup va_pen; z1=(6ut,19ut); z2=(-4.5ut,8ut); z3=(0ut,0ut); z4=(10ut,13ut); z5=(13ut,19ut); z6=(8ut,5ut); z7=(10ut,0ut); z8=(18ut,6ut); z9=(4ut,24ut); z10=(9ut,24ut); z11=(6.0ut,30ut); z12=(11.0ut,30ut); % draw z1{dir 190}..{dir 250}z2{dir 250}..z3{right}..{dir 70}z4{dir 60}..cycle; draw z5--z6{z6-z5}..z7{dir 10}..{dir 55}z8; % draw z9--z11; draw z10--z12; % make_l(18ut); labels(range 1 thru 12); endchar; beginchar("b",12 ut#,34 ut#,0); pickup va_pen; % z1=(0ut,13ut); z2=(12ut,31ut); z3=(9ut,34ut); z4=(4ut,0ut); z5=(12ut,19ut); z6=(25ut,15ut); z7=(3ut,23ut); % draw z1{dir 50}..z2{up}..z3{dir 220}..z7..{dir 260}z1{dir 260} ..z4{dir 10}..z5{dir 110}; %& z5{dir 320}..z6; % % make_l(12ut); labels(range 1 thru 7); endchar; beginchar("c",10 ut#,19 ut#,0); pickup va_pen; % z1=(10ut,18ut); z2=(6ut,19ut); z3=(-4.5ut,8ut); z4=(2ut,0ut); z5=(10ut,6ut); % draw z1..z2{dir 190}..{dir 250}z3{dir 250}..z4{dir 10}..{dir 55}z5; % make_l(10ut); labels(range 1 thru 5); endchar; beginchar("d",18 ut#,34 ut#,0); pickup va_pen; % z1=(6ut,19ut); z2=(-4.5ut,8ut); z3=(0ut,0ut); z4=(11ut,13ut); z5=(18ut,34ut); z6=(9ut,5ut); z7=(10ut,0ut); z8=(25ut,6ut); z9=(18ut,6ut); % draw z1{dir 190}..{dir 250}z2{dir 250}..z3{right}..z4{dir 70}..cycle; draw z5--z6{z6-z5}..z7{dir 10}..z9{dir 55}; % make_l(18ut); labels(range 1 thru 9); endchar; beginchar("e",13 ut#,19 ut#,0); pickup va_pen; % z1=(6ut,19ut); z2=(4ut,0ut); z3=(13ut,6ut); z4=(0ut,6ut); z5=(7ut,12ut); z6=(0ut,7ut); % draw z4{dir 45}..z5 ..z1{dir 210}..{dir 250}z6{dir 250}..z2{dir 10}..z3{dir 55}; % make_l(13ut); labels(range 1 thru 6); endchar; beginchar(oct"037",21 ut#,19 ut#,0); % e nach b,r usw. pickup va_pen; % z1=(15ut,19ut); z2=(7ut,12ut); z3=(12ut,0ut); z4=(21ut,6ut); z5=(14ut,10ut); z6=(18ut,14ut); z7=(8ut,8ut); z8=(0ut,19ut); % draw z8{dir -70}..z2..z5..z6..z1{left} ..{dir 260}z7{dir 260}..z3{right}..z4{dir 55}; % make_l(21ut); labels(range 1 thru 8); endchar; beginchar("f",9 ut#,34 ut#,15ut#); pickup va_pen; % z1=(0ut,13ut); z2=(12ut,32ut); z3=(9ut,34ut); z4=(4ut,26ut); z5=(-7ut,-15ut); z6=(-4ut,5ut); z7=(3ut,2ut); z8=(9ut,6ut); % draw z1{dir 50}..z2{up}..z3{dir 220}...z4{z5-z4}--z5; draw z6..z7...z8{dir 55}; % make_l(9ut); labels(range 1 thru 8); endchar; beginchar("g",17 ut#,19 ut#,15ut#); pickup va_pen; % z1=(11ut,13ut); z2=(0ut,0ut); z3=(-4.5ut,8ut); z4=(6ut,19ut); z10=(13ut,19ut); z11=(5ut,-6ut); z12=(0ut,-15ut); z13=(-3ut,-11ut); z14=(1ut,-5ut); z15=(17ut,6ut); % draw z1{dir 250}..z2{left}..{dir 70}z3{dir 70}..{dir 10}z4..cycle; draw z10--z11{z11-z10}..z12{left}..z13{up}..z14...z15{dir 55}; %{an}; % make_l(17ut); labels(range 1 thru 15); endchar; beginchar("h",20 ut#,34 ut#,0); pickup va_pen; % z1=(0ut,13ut); z2=(12ut,31ut); z3=(9ut,34ut); z4=(3ut,23ut); z5=(-4ut,0ut); z6=(11ut,17ut); z7=(13ut,15ut); z8=(10ut,3ut); z9=(12ut,0ut); z10=(20ut,6ut); % draw z1{dir 50}..z2{up}..z3{dir 220}..z4..z1--z5 & z5{dir 70}..tension1.3..z6{right}..z7{down}..z8{z8-z7}..z9{dir 10}..z10{dir 55}; % make_l(20ut); labels(range 1 thru 10); endchar; beginchar("i",5 ut#,19 ut#,0); pickup va_pen; % z1=(0ut,19ut); z2=(-5ut,4ut); z3=(-3ut,0ut); z4=(5ut,6ut); z5=(2.5ut,28ut); % draw z1--z2{z2-z1}..z3{dir 10}..z4{dir 55}; %pickup va_pen_big; pickup pencircle scaled str_i; drawdot z5; % make_l(5ut); labels(range 1 thru 5); endchar; beginchar("j",7 ut#,19 ut#,15ut#); pickup va_pen; % z1=(2.5ut,28ut); z2=(0ut,19ut); z3=(-4ut,0ut); z4=(-12ut,-15ut); z5=(7ut,6ut); % draw z2--z3{z3-z2}...z4{left}..z3{z5-z3}...{dir 55}z5; pickup pencircle scaled str_i; drawdot z1; % make_l(7ut); labels(range 1 thru 5); endchar; beginchar("k", 19 ut#, 34ut#,0); pickup va_pen; % z1=(0ut,13ut); z2=(12ut,31ut); z3=(9ut,34ut); z4=(3ut,23ut); z5=(-4ut,0ut); z6=(11ut,17ut); z7=(13ut,15ut); z8=(3ut,9ut); z9=(11ut,0ut); z10=(19ut,6ut); z11=(16ut,2ut); % draw z1{dir 50}..z2{up}..z3{dir 220}...z4{z5-z4}--z5 & z5{dir 70}..tension1.3..z6{right}..z7{down}..z8 & z8{right}..z9{dir 10}..z10{dir 55}; % make_l(19ut); labels(range 1 thru 11); endchar; beginchar("l",9 ut#,34 ut#,0); pickup va_pen; % z1=(0ut,13ut); z2=(12ut,31ut); z3=(9ut,34ut); z4=(1ut,0ut); z5=(9ut,6ut); z6=(7ut,2ut); z7=(3ut,23ut); % draw z1{dir 50}..z2{up}..z3{dir 220}..z7{z1-z7}..z1{z1-z7} %{z4-z3} ..{right}z4{dir 10}..z5{dir 55}; % make_l(9ut); labels(range 1 thru 7); endchar; beginchar("m",36 ut#,19 ut#,0); pickup va_pen; % z1=(5ut,15ut); z2=(0ut,0ut); z3=(16.5ut,19ut); z4=(18.5ut,16ut); z5=(13.5ut,0ut); z6=(29ut,19ut); z7=(31ut,16ut); z8=(27ut,3ut); z9=(28ut,0ut); z10=(36ut,6ut); z11=(0ut,15ut); z12=(4ut,19ut); % draw z11{dir 50}..{curl4}z12{curl6}..{z2-z1}z1--z2; draw z2{z1-z2}..tension1.3..{curl2}z3{curl4}..{z5-z4}z4--z5; draw z5{z4-z5}..tension1.3..{curl2}z6{curl4}..{z8-z7}z7 --z8{z8-z7}..z9{dir 10}..z10{dir 55}; % make_l(36ut); labels(range 1 thru 12); endchar; beginchar("n",24 ut#,19 ut#,0); pickup va_pen; % z1=(5ut,15ut); z2=(0ut,0ut); z3=(17ut,19ut); z4=(19.3ut,16ut); z5=(15ut,3ut); z6=(16ut,0ut); z7=(24ut,6ut); z8=(0ut,15ut); z9=(4ut,19ut); % draw z8{dir 50}..{curl4}z9{curl6}..{z2-z1}z1--z2; draw z2{z1-z2}..tension1.3..{curl2}z3{curl4} ..{z5-z4}z4--z5{z5-z4}..z6{dir 10}..z7{dir 55}; % make_l(24ut); labels(range 1 thru 9); endchar; beginchar("o",11 ut#,19 ut#,0); pickup va_pen; % z1=(11ut,16ut); z2=(0ut,0ut); z3=(-4.5ut,8ut); z4=(6ut,19ut); %z5=(13ut,19ut); %z6=(24ut,15ut); % draw z1{dir -75}..z2{left}..{dir 70}z3{dir 70} ..{dir 10}z4..cycle; % make_l(11ut); labels(range 1 thru 4); endchar; beginchar(oct"366",11 ut#,30 ut#,0); %o-Umlaut pickup va_pen; % z1=(11ut,16ut); z2=(0ut,0ut); z3=(-4.5ut,8ut); z4=(6ut,19ut); %z5=(13ut,19ut); %z6=(24ut,15ut); z5=(6ut,24ut); z6=(11ut,24ut); z7=(8.0ut,30ut); z8=(13.0ut,30ut); % draw z1{dir -75}..z2{left}..{dir 70}z3{dir 70} ..{dir 10}z4..cycle; % draw z5--z7; draw z6--z8; % make_l(11ut); labels(range 1 thru 8); endchar; beginchar("p",18 ut#,19 ut#,15ut#); pickup va_pen; % z1=(0ut,19ut); z2=(-10ut,-15ut); z3=(-4.5ut,4ut); z4=(11.5ut,19ut); z5=(13.0ut,15ut); z6=(9ut,4ut); z7=(10ut,0ut); z8=(17ut,1ut); z9=(18ut,6ut); z10=(6ut,16ut); % draw z1--z2; draw z3{dir 50}..z10..z4{right}..z5{z6-z5}--z6{z6-z5}..z7{dir 10}..z9{dir 55}; % make_l(19ut); labels(range 1 thru 10); endchar; beginchar("q",23 ut#,19 ut#,15ut#); pickup va_pen; % z1=(9ut,13ut); z2=(0ut,0ut); z3=(-4.5ut,8ut); z4=(6ut,19ut); z5=(11ut,19ut); z6=(1ut,-15ut); z7=(6ut,0ut); z8=(23ut,19ut); % draw z1{dir 250}..z2{left}..{dir 70}z3{dir 70}..{dir 10}z4..cycle; draw z5--z6; draw z7{dir 40}..z8{dir 70}; % make_l(23ut); labels(range 1 thru 8); endchar; beginchar("r", 10ut#,19 ut#,0); %ALTE BREITE 27 pickup va_pen; % z1=(5ut,15ut); z2=(4ut,11ut); % 2/3*((-3ut,-1ut)+z1); z3=(10ut,19ut); z4=(0ut,0ut); z5=(0ut,15ut); z6=(4ut,19ut); % draw z5{dir 50}..{curl4}z6{curl6}..{z4-z1}z1--z4; draw z2..z3; % make_l(10ut); labels(range 1 thru 6); endchar; beginchar("s",4 ut#,19 ut#,0); pickup va_pen; % z1=(-10ut,7ut); z2=(0ut,19ut); z3=(3ut,6ut); z4=(-2ut,0ut); z5=(-6ut,2ut); % draw z2{dir 260}..tension0.8..z3{down}..z4{left}..z5; % make_l(4ut); labels(range 1 thru 5); endchar; beginchar("t",7 ut#,34 ut#,0); pickup va_pen; % z1=(4ut,27ut); z2=(-3.5ut,3ut); z3=(-1ut,0ut); z4=(7ut,6ut); z5=(-4ut,18ut); z6=(7ut,18ut); % draw z1..z2{z2-z1}..z3{dir 10}..z4{dir 55}; draw z5--z6; % make_l(7ut); labels(range 1 thru 6); endchar; beginchar("u",19 ut#,19 ut#,0); pickup va_pen; % z1=(0ut,19ut); z2=(-5ut,3ut); z3=(0ut,0ut); z4=(14ut,19ut); z5=(9ut,3ut); z6=(11ut,0ut); z7=(19ut,6ut); z8=(17ut,2ut); % draw z1--z2{z2-z1}..z3{dir 20}..tension1.3..z4{z4-z5} & z4--z5{z5-z4}..z6{dir 10}..{dir 55}z7; % make_l(19ut); labels(range 1 thru 8); endchar; beginchar(oct"374",19 ut#,30 ut#,0); %u-Umlaut pickup va_pen; % z1=(0ut,19ut); z2=(-5ut,3ut); z3=(0ut,0ut); z4=(14ut,19ut); z5=(9ut,3ut); z6=(11ut,0ut); z7=(19ut,6ut); z8=(6ut,24ut); z9=(11ut,24ut); z10=(7.5ut,30ut); z11=(12.5ut,30ut); % draw z1--z2{z2-z1}..z3{dir 20}..tension1.3..z4{z4-z5} & z4--z5{z5-z4}..z6{dir 10}..{dir 55}z7; % draw z8--z10; draw z9--z11; % make_l(19ut); labels(range 1 thru 12); endchar; beginchar("v",17 ut#,19 ut#,0); pickup va_pen; % z1=(7ut,15ut); z2=(3ut,5ut); z3=(9ut,0ut); z4=(17ut,19ut); z5=(30ut,15ut); z6=(0ut,15ut); z7=(4ut,19ut); % draw z6{dir 50}..z7{right}..{z2-z1}z1..z2{z2-z1}..z3{dir 20}..z4; % & z4{dir 320}..z5; % make_l(17ut); labels(range 1 thru 7); endchar; beginchar("w",29 ut#,19 ut#,0); pickup va_pen; % z1=(8ut,15ut); z2=(5ut,6ut); z3=(7ut,0ut); z4=(16ut,7ut); z5=(19ut,19ut); z6=(21ut,0ut); z7=(29ut,19ut); z8=(42ut,15ut); z9=(0ut,15ut); z10=(4ut,19ut); % draw z9{dir 50}..z10{right}..{z2-z1}z1--z2{z2-z1}..z3{right}..z4--z5 & z5--z4..z6{right}..z7{dir 100}; % & z7{dir 320}..z8; % make_l(29ut); labels(range 1 thru 8); endchar; beginchar("x",19 ut#,19 ut#,0); pickup va_pen; % z1=(0ut,15ut); z2=(5ut,19ut); z3=(9.5ut,13ut); z4=(7.5ut,6ut); z5=(0ut,0ut); z6=(1ut,6ut); z7=(13ut,10ut); z8=(16ut,19ut); z9=(11ut,0ut); z10=(19ut,6ut); % draw z1{dir 50}..z2{right}..{z4-z3}z3--z4{z4-z3}..z5{left}..{z7-z6}z6; draw z6--z7{z7-z6}..z8{left}..{z4-z3}z3; draw z4{z4-z3}..z9{dir 10}..z10{dir 55}; % make_l(19ut); labels(range 1 thru 10); endchar; beginchar("y",19 ut#,19 ut#,15ut#); pickup va_pen; % z1=(0ut,19ut); z2=(-4.4ut,5ut); z3=(-2ut,0ut); z4=(12ut,19ut); z5=(2ut,-13ut); z6=(-1ut,-15ut); z7=(-4ut,-12ut); z8=(1ut,-5ut); z9=(19ut,6ut); % draw z1--z2{z2-z1}..z3{dir 20}..z4{z4-z5} & z4--z5..z6{left}..z7{up}..z8{z9-z8}..z9{dir 55}; % make_l(19ut); labels(range 1 thru 9); endchar; beginchar("z",18 ut#,19 ut#,0ut#); pickup va_pen; % z1=(0ut,15ut); z2=(3ut,19ut); z3=(11ut,17ut); z4=(16ut,19ut); z5=(-3ut,0ut); z6=(0ut,3ut); z7=(10ut,0ut); z8=(18ut,6ut); % draw z1{dir 50}..z2{right}..z3..z4{dir 55} & z4--z5 & z5{dir 30}..z6{right}..z7{dir 10}..z8{dir 55}; % make_l(18ut); labels(range 1 thru 8); endchar; beginchar("A",35ut#,34ut#,0); pickup va_pen; z1=(0ut,2ut); z2=(12ut,6ut); z3=(35ut,34ut); z4=(26ut,0ut); z5=(12ut,14ut); z6=(27ut,6ut); z7=(26ut,28ut); z8=(22ut,16ut); z9=(22ut,3ut); z10=(35ut,6ut); z11=(3ut,0ut); % draw z1{down}..z11..z2..z7..z3 & z3--z4; draw z6{dir 100}..z8..z5..z9..{dir 55}z10; % make_l(35ut); labels(range 1 thru 11); endchar; beginchar(oct"304",35ut#,44ut#,0); % A-Umlaut pickup va_pen; z1=(0ut,2ut); z2=(12ut,6ut); z3=(35ut,34ut); z4=(26ut,0ut); z5=(12ut,14ut); z6=(27ut,6ut); z7=(26ut,28ut); z8=(22ut,16ut); z9=(22ut,3ut); z10=(35ut,6ut); z11=(3ut,0ut); z12=(32ut,38ut); z13=(33.5ut,44ut); z14=(37ut,38ut); z15=(38.5ut,44ut); % draw z1{down}..z11..z2..z7..z3 & z3--z4; draw z6{dir 100}..z8..z5..z9..{dir 55}z10; draw z12..z13; draw z14..z15; % make_l(35ut); labels(range 1 thru 15); endchar; beginchar("B",45ut#,34ut#,0); pickup va_pen; z1=(8ut,28ut); z2=(24ut,32ut); z3=(31ut,28ut); z4=(31ut,8ut); z5=(0ut,2ut); z6=(21ut,34ut); z7=(23ut,0ut); z8=(16ut,2ut); z9=(12ut,6ut); z10=(6ut,0ut); z11=(21ut,18ut); z12=(20ut,30ut); % draw z1..z6{right}..z3{down}..z11{left} & z11{right}..z4{down}..z7{left}..z8; draw z12--z9..z10..z5; make_l(45ut); labels(range 1 thru 12); endchar; beginchar("C",19ut#,34ut#,0ut#); pickup va_pen; z1=(24ut,26ut); z2=(20ut,34ut); z3=(1ut,10ut); z4=(7ut,0ut); z5=(19ut,6ut); z6=(14ut,2ut); z7=(12ut,20ut); z8=(0ut,24ut); z9=(6ut,23ut); % draw z8..z7..z1..z2{left}..z9..z3{z3-z9}..z4{right}..z6..{dir 55}z5; make_l(19ut); labels(range 1 thru 9); endchar; beginchar("D",39ut#,34ut#,0ut#); pickup va_pen; z1=(3ut,30ut); z2=(21ut,32ut); z3=(26ut,20ut); z4=(18ut,0ut); z5=(15ut,30ut); z6=(8ut,6ut); z7=(3ut,0ut); z8=(0ut,3ut); z9=(14ut,34ut); % draw z5--z6{z7-z6}..z7..z8..{right}z6{z4-z6}..z4{dir 30}..z3{up}..z2..z9..z1; make_l(39ut); labels(range 1 thru 9); endchar; beginchar("E",20ut#,34ut#,0ut#); pickup va_pen; z1=(23ut,31ut); z2=(6ut,25ut); z3=(15ut,18ut); z4=(0ut,7ut); z5=(9ut,0ut); z6=(20ut,6ut); % draw z1..z2{down}..z3 & z3{left}..z4..z5{right}..{dir 55}z6; %{an} make_l(20ut); labels(range 1 thru 6); endchar; beginchar("F",32ut#,34ut#,0ut#); pickup va_pen; z1=(14ut,34ut); z2=(12ut,8ut); z3=(2ut,22ut); z4=(32ut,34ut); z5=(9ut,18ut); z6=(21ut,18ut); z7=(18ut,31ut); z8=(6ut,0ut); z9=(0ut,2ut); % draw z3{up}..z1{right}..z4; draw z7--z2{z2-z7}..z8..z9; draw z5--z6; make_l(32ut); labels(range 1 thru 9); endchar; beginchar("G",25ut#,34ut#,15ut#); pickup va_pen; z1=(22ut,26ut); z2=(19ut,34ut); z3=(0ut,8ut); z4=(5ut,0ut); z5=(20ut,16ut); z6=(15ut,0ut); z7=(3ut,-15ut); z8=(1ut,-11ut); z9=(8ut,-4ut); z10=(25ut,6ut); z11=(0ut,23ut); % draw z11{dir -30}..z1..z2{left}..z3{down}..z4{right}..z5{z5-z6} & z5--z6{z6-z5}..z7{left}..z8..z9{z6-z9}..{dir 55}z10; make_l(25ut); labels(range 1 thru 11); endchar; beginchar("H",30ut#,34ut#,0ut#); pickup va_pen; z1=(1ut,29ut); z2=(5ut,34ut); z3=(10ut,32ut); z4=(15ut,34ut); z5=(10ut,12ut); z6=(4ut,0ut); z7=(-1ut,4ut); z8=(7ut,14ut); z9=(27ut,24ut); z10=(31ut,31ut); z11=(27ut,34ut); z12=(23ut,31ut); z13=(17ut,6ut); z14=(22ut,0ut); z15=(30ut,6ut); % draw z1..z2{right}..z3..z4; draw z4--z5{dir 260}..z6..z7..z8{dir 35}--z9{dir 35}..z10..z11..z12--z13; draw z13{dir 260}..z14{dir 10}..{dir 55}z15; make_l(30ut); labels(range 1 thru 15); endchar; beginchar("I",29ut#,34ut#,0ut#); pickup va_pen; z1=(9ut,34ut); z2=(25ut,34ut); z3=(17ut,8ut); z4=(9ut,0ut); z5=(1ut,3ut); z6=(20ut,32ut); z7=(6ut,31ut); % draw z7{dir 80}..z1{right}..z6..z2{right} & z2--z3{z3-z2}..z4{left}..z5; make_l(29ut); labels(range 1 thru 7); endchar; beginchar("J",22ut#,34ut#,-15ut#); pickup va_pen; z1=(9ut,34ut); z2=(25ut,34ut); z3=(13ut,0ut); z4=(4ut,-15ut); z5=(0ut,-11ut); z6=(7ut,-4ut); z7=(22ut,6ut); z8=(6ut,31ut); z9=(20ut,32ut); % draw z8..z1{right}..z9..z2{right} & z2--z3{z3-z2}...z4{left}..z5{dir 70}..z6{z3-z6}..{dir 55}z7; make_l(22ut); labels(range 1 thru 9); endchar; beginchar("K",34ut#,34ut#,0ut#); pickup va_pen; z1=(5ut,30ut); z2=(9ut,34ut); z3=(14ut,32ut); z4=(19ut,34ut); z5=(12ut,8ut); z6=(6ut,0ut); z7=(0ut,2ut); z8=(16ut,19ut); z9=(28ut,30ut); z10=(35ut,34ut); z11=(35ut,37ut); z12=(20ut,6ut); z13=(26ut,0ut); z14=(34ut,6ut); % draw z1..z2{right}..z3..z4; draw z4--z5{z5-z4}..z6..z7; draw z8{dir 20}..z9{z9-z8}..z10{dir 20}; draw z8--z12{z12-z8}..z13{dir 10}..{dir 55}z14; make_l(34ut); labels(range 1 thru 14); endchar; beginchar("L",27ut#,34ut#,0ut#); pickup va_pen; z1=(6ut,23ut); z2=(27ut,26ut); z3=(27ut,6ut); z4=(20ut,0ut); z5=(17ut,29ut); z6=(9ut,7ut); z7=(4ut,0ut); z8=(0ut,3ut); z9=(22ut,34ut); % draw z1{dir 330}..z2..z9..{z6-z5}z5--z6{z6-z5}..z7..z8{up} ..z6{right}..z4{dir 10}..{dir 55}z3; make_l(27ut); labels(range 1 thru 9); endchar; beginchar("M",53ut#,34ut#,0ut#); pickup va_pen; z1=(0ut,1ut); z2=(10ut,6ut); z3=(31ut,34ut); z4=(24ut,0ut); z5=(48ut,34ut); z6=(40ut,4ut); z7=(45ut,0ut); z8=(53ut,6ut); z9=(49ut,2ut); z10=(4ut,0ut); z11=(24ut,26ut); % draw z1..z10..{z11-z2}z2..z11{z11-z2}..z3 & z3--z4 & z4--z5 &z5--z6{z6-z5}..z7{dir 10}..{dir 55}z8; make_l(53ut); labels(range 1 thru 11 ); endchar; beginchar("N",45ut#,34ut#,0ut#); pickup va_pen; z1=(0ut,1ut); z2=(9ut,5ut); z3=(28ut,34ut); z4=(23ut,0ut); z5=(43ut,31ut); z6=(48ut,34ut); z7=(4ut,0ut); z8=(23ut,28ut); % draw z1..z7..{z8-z2}z2..z8{z3-z2}..z3 & z3--z4 & z4--z5{z5-z4}..z6{dir 20}; make_l(45ut); labels(range 1 thru 9); endchar; beginchar("O",34ut#,34ut#,0ut#); pickup va_pen; z1=(24ut,23ut); z2=(9ut,0ut); z3=(1ut,16ut); z4=(18ut,34ut); z5=(23ut,34ut); z6=(28ut,29ut); z7=(33ut,34ut); % draw z1{down}..z2{left}..z3{dir 80}..z4{right}..cycle; draw z5.{down}..z6..{dir 50}z7; make_l(34ut); labels(range 1 thru 7); endchar; beginchar(oct"326",34ut#,46ut#,0ut#); % O-Umlaut pickup va_pen; z1=(24ut,23ut); z2=(9ut,0ut); z3=(1ut,16ut); z4=(18ut,34ut); z5=(23ut,34ut); z6=(28ut,29ut); z7=(33ut,34ut); z8=(16.5ut,44ut); z9=(21.5ut,44ut); z10=(15ut,38ut); z11=(20ut,38ut); % draw z1{down}..z2{left}..z3{dir 80}..z4{right}..cycle; draw z5.{down}..z6..{dir 50}z7; % draw z8..z10; draw z9..z11; make_l(34ut); labels(range 1 thru 11); endchar; beginchar("P",32ut#,34ut#,0ut#); pickup va_pen; z1=(0ut,2ut); z2=(6ut,0ut); z3=(12ut,8ut); z4=(18ut,30ut); z5=(4ut,24ut); z6=(19ut,34ut); z7=(32ut,26ut); z8=(18ut,19ut); % draw z1..z2{right}..z3{z4-z3}...z4; draw z5{dir 60}..z6{right}..{down}z7{down}..{dir 180}z8; make_l(32ut); labels(range 1 thru 8); endchar; beginchar("Q",37ut#,34ut#,0ut#); pickup va_pen; z1=(24ut,23ut); z2=(9ut,0ut); z3=(1ut,16ut); z4=(18ut,34ut); z5=(10ut,4ut); z6=(17ut,6ut); z7=(23ut,0ut); z8=(37ut,19ut); z9=(23ut,34ut); z10=(26ut,29ut); z11=(32ut,34ut); % draw z1{down}..z2{left}..z3{dir 80}..z4{right}..cycle; draw z5..z6{right}..z7{dir 40}..{dir 70}z8; draw z9.{down}..z10..{dir 50}z11; make_l(37ut); labels(range 1 thru 11); endchar; beginchar("R",36ut#,34ut#,0ut#); pickup va_pen; z1=(0ut,2ut); z2=(6ut,0ut); z3=(12ut,8ut); z4=(18ut,30ut); z5=(4ut,25ut); z6=(17ut,34ut); z7=(32ut,26ut); z8=(18.5ut,19ut); z9=(21.5ut,18ut); z10=(26ut,4ut); z11=(30ut,0ut); z12=(36ut,6ut); % draw z1..z2{right}..z3{z4-z3}...z4; draw z5..z6{right}..{dir 270}z7{dir 270}..{dir 185}z8; draw z9{z12-z9}--z10{z10-z9}..z11{dir 10}..{dir 55}z12; make_l(36ut); labels(range 1 thru 12); endchar; beginchar("S",27ut#,34ut#,0ut#); pickup va_pen; z1=(7ut,24ut); z2=(22ut,22ut); z3=(27ut,34ut); z4=(17ut,27ut); z5=(15ut,19ut); z6=(12ut,8ut); z7=(6ut,0ut); z8=(0ut,2ut); % draw z1{dir -40}..z2..z3{left}..z4{z6-z4}..z5{z6-z4}..z6{z6-z4}..z7{left}..z8; make_l(27ut); labels(range 1 thru 8); endchar; beginchar("T",31ut#,34ut#,0ut#); pickup va_pen; z1=(15ut,34ut); z2=(12ut,8ut); z3=(2ut,24ut); z4=(31ut,34ut); z5=(17.5ut,30ut); z6=(6ut,0ut); z7=(0ut,2ut); % draw z3{up}..z1{right}..z4; draw z5--z2{z2-z5}..z6..z7; % make_l(31ut); labels(range 1 thru 7); endchar; beginchar("U",33ut#,34ut#,0ut#); pickup va_pen; z1=(7ut,34ut); z2=(4ut,8ut); z3=(9ut,0ut); z4=(24.5ut,15ut); z5=(29ut,34ut); z6=(22ut,5ut); z7=(25ut,0ut); z8=(0ut,30ut); z9=(33ut,6ut); z10=(10ut,31ut); % draw z8{dir 70}..z1{right}..z10{z2-z10}--z2{z2-z10}..z3{dir 15}..z4; draw z5--z6{z6-z5}..z7{dir 10}..{dir 55}z9; make_l(33ut); labels(range 1 thru 10); endchar; beginchar(oct"334",33ut#,44ut#,0ut#); % U-Umlaut pickup va_pen; z1=(7ut,34ut); z2=(4ut,8ut); z3=(9ut,0ut); z4=(24.5ut,15ut); z5=(29ut,34ut); z6=(22ut,5ut); z7=(25ut,0ut); z8=(0ut,30ut); z9=(33ut,6ut); z10=(10ut,31ut); z11=(19.5ut,44ut); z12=(18ut,38ut); z13=(24.5ut,44ut); z14=(23ut,38ut); % draw z8{dir 70}..z1{right}..z10{z2-z10}--z2{z2-z10}..z3{dir 15}..z4; draw z5--z6{z6-z5}..z7{dir 10}..{dir 55}z9; draw z11..z12; draw z13..z14; make_l(33ut); labels(range 1 thru 14); endchar; beginchar("V",32ut#,34ut#,0ut#); pickup va_pen; z1=(0ut,30ut); z2=(7ut,34ut); z3=(10ut,31ut); z4=(3ut,8ut); z5=(9ut,0ut); z6=(20ut,10ut); z7=(24ut,34ut); z8=(27ut,29ut); z9=(32ut,34ut); % draw z1{dir 70}..z2{right}..z3{z4-z3}..z4{z4-z3}..z5{dir 10}..z6{z8-z6}..z7 & z7{down}..z8..{dir 50}z9; make_l(32ut); labels(range 1 thru 9); endchar; beginchar("W",55ut#,34ut#,0ut#); pickup va_pen; z1=(1ut,30ut); z2=(8ut,34ut); z3=(11ut,31ut); z4=(5ut,8ut); z5=(10ut,0ut); z6=(23ut,15ut); z7=(28ut,34ut); z8=(23ut,15ut); z9=(31ut,0ut); z10=(41ut,12ut); z11=(41ut,34ut); z12=(45ut,29ut); z13=(50ut,34ut); % draw z1{dir 70}..z2{right}..z3{z4-z3}..z4{z4-z3}..z5{right}..z6{z7-z6}..z7; draw z8{z8-z7}..z9{right}..z10{z12-z10}..z11 & z11{down}..z12..{dir 50}z13; % make_l(55ut); labels(range 1 thru 13); endchar; beginchar("X",26ut#,34ut#,0ut#); pickup va_pen; z1=(6ut,30ut); z2=(13ut,34ut); z3=(18ut,22ut); z4=(15ut,12ut); z5=(7ut,0ut); z6=(3ut,6ut); z7=(16ut,16ut); z8=(30ut,28ut); z9=(26ut,34ut); z10=(20ut,0ut); z11=(26ut,6ut); % draw z1{dir 60}..z2{right}..z3{z4-z3}..z4{z4-z3}..z5{left}..z6{up}..{dir30}z7; draw z7{dir 30}..z8{up}..z9{left}..z3{z4-z3}..z4{z4-z3} ..z10{dir 10}..{dir 55}z11; make_l(26ut); labels(range 1 thru 11); endchar; beginchar("Y",29ut#,34ut#,15ut#); pickup va_pen; z1=(9ut,31ut); z2=(1ut,8ut); z3=(5ut,0ut); z4=(26ut,34ut); z5=(16ut,-5ut); z6=(9ut,-15ut); z7=(6ut,-12ut); z8=(9ut,-6ut); z9=(29ut,6ut); z10=(0ut,30ut); z11=(7ut,34ut); % draw z10{up}..z11{right}..z1--z2{z2-z1}..z3{right}...z4{z4-z5} & z4--z5{z5-z4}..z6{left}..z7..z8{z9-z8}..{dir 55}z9; make_l(29ut); labels(range 1 thru 11); endchar; beginchar("Z",29ut#,34ut#,0ut#); pickup va_pen; z1=(3ut,29ut); z2=(11ut,34ut); z3=(29ut,6ut); z4=(21ut,0ut); z5=(23ut,31ut); z6=(9ut,6ut); z7=(2ut,0ut); z8=(0ut,3ut); z9=(29ut,34ut); z10=(12ut,18ut); z11=(26ut,18ut); % draw z1{dir 60}..z2{right}..z5{z9-z5}..z9 &z9{z6-z9}--z6{z6-z9}..z7..z8..z6{z4-z6}..z4{dir 10}..{dir 55}z3; draw z10--z11; make_l(29ut); labels(range 1 thru 11); endchar; beginchar(oct"377",16ut#,34ut#,15ut#); pickup va_pen; % z1=(-1ut*.87,19ut*.87); z2=(3ut*.87,29ut*.87); z3=(-7ut*.87,-18ut*.87); z4=(13ut*.87,39ut*.87); z5=(19ut*.87,32ut*.87); z6=(7ut*.87,21ut*.87); z7=(18ut*.87,8ut*.87); z8=(10ut*.87,0ut*.87); z9=(4ut*.87,2ut*.87); % draw z3--z2{z2-z3}..z4{right}..z5{down}..z6{left} & z6{right}..z7{down}..z8{left}..z9; % make_l(16ut); labels(range 1 thru 9); endchar;