% TW -- ligatures 1. generation (C)1991 Thomas Weinmann % ff beginchar(oct"200",34 ut#,39 ut#,19ut#); pickup va_pen; % z1=(0ut,18ut); z2=(11ut,37ut); z3=(9ut,39ut); z4=(3ut,31ut); z5=(-7ut,-19ut); z6=(-9ut,5ut); z7=(7ut,6ut)+1.1*z9; z8=(18ut,18ut)+z9; z9=(16ut, 0ut); z10=z1+z9-(0ut,3ut); z11=z2+z9; z12=z3+z9; z13=z4+z9; z14=z5+z9; % draw z1{an}..z2{up}..z3{left}...z4{z5-z4}--z5 ..z10{an}..z11{up}..z12{left}...z13{z14-z13}--z14; draw z6..z7---z8{an}; % % labels(range 1 thru 14); endchar; %ie beginchar(oct"201",21 ut#,19 ut#,0); pickup va_pen; % z1=(0ut,19ut); z2=(-4ut,4ut); z3=(-1ut,0ut); z4=(3ut,2ut); z5=(3.3ut,2.3ut); z6=(2.5ut,28ut); z7=(11.7ut,0ut); z8=(4ut,19ut)+z7; z9=(-2ut,7ut)+z7; z10=(3ut,0ut)+z7; z11=(9.3ut,(9.3*8/9-6)*ut)+z7; z12=(-1ut,13ut)+z7; z13=(8ut,13ut)+z7; z14=(9ut,2ut)+z7; % draw z1--z2..z3{right}..z13{z12-z9}..z8{left}..z12{z9-z12} ..z10{right}..z14--z11; % %pickup va_pen_big; pickup pencircle scaled 4ut; drawdot z6; % % labels(range 1 thru 14); endchar; % le beginchar(oct"202",23.4 ut#,39 ut#,0); pickup va_pen; % z1=(0ut,18ut); z2=(14ut,36ut); z3=(11ut,39ut); z4=(1ut,0ut); z5=(21ut,18ut); z6=(6ut,2ut); z7=(14ut,0); z8=(4ut,19ut)+z7; z9=(-2ut,7ut)+z7; z10=(3ut,0ut)+z7; z11=(9.3ut,(9.3*8/9-6)*ut)+z7; z12=(-1ut,13ut)+z7; z13=(8ut,13ut)+z7; z14=(9ut,2ut)+z7; % draw z1{an}..z2{up}..z3{left}..z1{z4-z3}..z4{right} ..z13{z12-z9}..z8{left}..z12{z9-z12} ..z10{right}..z14--z11; ; % % labels(range 1 thru 14); endchar; % ll beginchar(oct"203",36 ut#,39 ut#,0); pickup va_pen; % z1=(0ut,18ut); z2=(12.7ut,36ut); z3=(11ut,39ut); z4=(1ut,0ut); z5=(16ut,18ut); z6=(6ut,2ut); z7=(6.1ut,(6.1*16/15+(2-64/15))*ut); z8=(17ut,0); z9=z8+z1; z10=z2+z8; z11=z3+z8; z12=z4+z8; z13=z5+z8+(2ut,0); z14=z6+z8; z15=z8+z1+(6.5ut,0); % draw z1{an}..z2{up}..z3{left}..z1{z4-z3}..z4{right}..z6 ..z10{up}..z11{left}..z9{z12-z11}..z12{right}..z14--z13; % % labels(range 1 thru 6); endchar; % lle beginchar(oct"204",42.4 ut#,39 ut#,0); pickup va_pen; % z1=(0ut,18ut); z2=(12.7ut,36ut); z3=(11ut,39ut); z4=(1ut,0ut); z5=(16ut,18ut); z6=(6ut,2ut); z7=(6.1ut,(6.1*16/15+(2-64/15))*ut); z8=(17ut,0); z9=z8+z1; z10=z2+z8; z11=z3+z8; z12=z4+z8+(4ut,0ut); % damit es nicht ganz so eckig aussieht z13=z5+z8+(1ut,0); z14=z6+z8; z15=z8+z1+(6.5ut,0); z16=(33ut,0ut); z17=(4ut,19ut)+z16; z18=(-2ut,7ut)+z16; z19=(3ut,0ut)+z16; z20=(9.3ut,(9.3*8/9-6)*ut)+z16; z21=(-1ut,13ut)+z16; z22=(8ut,13ut)+z16; z23=(9ut,2ut)+z16; % draw z1{an}..z2{up}..z3{left}..z1{z4-z3}..z4{right} ..z6..z10{up}..z11{left}..z9{z12-z11}..z12{right} ..z22{z21-z18}..z17{left}..z21{z18-z21} ..z19{right}..z23--z20; % % labels(range 1 thru 23); endchar; % se 1. Fall beginchar(oct"205",27.4 ut#,19ut#,0ut#); % s mit Anstrich und Endung pickup va_pen; % z1=(-10ut,8ut); z2=(0ut,19ut); z3=(5ut,5ut); z4=(0ut,0ut); z5=(-3ut,4ut); z6=(18ut,18ut); z7=(18ut,0ut); z8=(4ut,19ut)+z7; z9=(-2ut,7ut)+z7; z10=(3ut,0ut)+z7; z11=(9.3ut,(9.3*8/9-6)*ut)+z7; z12=(-1ut,13ut)+z7; z13=(8ut,13ut)+z7; z14=(9ut,2ut)+z7; z15=z9+(1ut,0ut); % % draw z1--z2 & z2{z3-z2}..z3{down}..z4{left}..z5{dir 70}..z15{z9-z12}; draw z12{z9-z12}..z13{z12-z9}..z8{left}..z12{z9-z12} ..z10{right}..z14--z11; % labels(range 1 thru 15); endchar; % se 2. Fall beginchar(oct"206",27.4 ut#,19ut#,0ut#); % s mit Endung pickup va_pen; % z1=(-10ut,8ut); z2=(0ut,19ut); z3=(5ut,5ut); z4=(0ut,0ut); z5=(-3ut,4ut); z6=(18ut,18ut); z7=(18ut,0ut); z8=(4ut,19ut)+z7; z9=(-2ut,7ut)+z7; z10=(3ut,0ut)+z7; z11=(9.3ut,(9.3*8/9-6)*ut)+z7; z12=(-1ut,13ut)+z7; z13=(8ut,13ut)+z7; z14=(9ut,2ut)+z7; z15=z9+(1ut,0ut); % % draw z2{z3-z2}..z3{down}..z4{left}..z5{dir 70}..z15{z9-z12}; draw z12{z9-z12}..z13{z12-z9}..z8{left}..z12{z9-z12} ..z10{right}..z14--z11; % labels(range 1 thru 15); endchar; % st beginchar(oct"207",37ut#,39ut#,0ut#); % s mit Anstrich und Endung pickup va_pen; % z1=(-10ut,8ut); z2=(0ut,19ut); z3=(5ut,5ut); z4=(0ut,0ut); z5=(-3ut,4ut); z7=(9ut,0ut); z8=(5ut,18ut)+z7; z9=(14ut,39ut)+z7; z10=(7ut,0ut)+z7; z11=(-1ut,8ut)+z7; z12=(28ut,18ut)+z7; % draw z8{an}..z9 & z9-- z10; draw z11{dir 340}..z12{dir 60}; % draw z1--z2 & z2{z3-z2}..z3{down}..z4{left}..z5{dir 60}...z8{an}..z9 & z9-- z10; draw z11{dir 340}..z12{dir 60}; % labels(range 1 thru 12); endchar; % st beginchar(oct"210",37ut#,39ut#,0ut#); % s mit Endung pickup va_pen; % z1=(-10ut,8ut); z2=(0ut,19ut); z3=(5ut,5ut); z4=(0ut,0ut); z5=(-3ut,4ut); z7=(9ut,0ut); z8=(5ut,18ut)+z7; z9=(14ut,39ut)+z7; z10=(7ut,0ut)+z7; z11=(-1ut,8ut)+z7; z12=(28ut,18ut)+z7; % draw z8{an}..z9 & z9-- z10; draw z11{dir 340}..z12{dir 60}; % draw z2{z3-z2}..z3{down}..z4{left}..z5{dir 60}...z8{an}..z9 & z9-- z10; draw z11{dir 340}..z12{dir 60}; % labels(range 1 thru 12); endchar; % tt beginchar(oct"211",38 ut#,39 ut#,0); pickup va_pen; % z1=(0ut,18ut); z2=(14ut,39ut); z3=(7ut,0ut); z4=(-2ut,11ut); z5=(38ut,18ut); z6=(24ut,39ut); z7=(17ut,0ut); % draw z1{an}..z2 & z2-- z3; draw z6--z7; draw z4{dir 340}..z5{dir 60}; % % labels(range 1 thru 7); endchar; % de beginchar(oct"212",33.4 ut#,40 ut#,0); pickup va_pen; % z1=(5ut,19ut); z2=(-4ut,6ut); z3=(1ut,0ut); z4=(11ut,13ut); z5=(17ut,40ut); z6=(10ut,5ut); z7=(12ut,0ut); z8=(16.3ut,(16.3*8/7+(2-16*8/7))*ut); z9=(16ut,2ut); z10=(24ut,0ut); z11=(4ut,19ut)+z10; z12=(-2ut,7ut)+z10; z13=(3ut,0ut)+z10; z14=(9.3ut,(9.3*8/9-6)*ut)+z10; z15=(-1ut,13ut)+z10; z16=(8ut,13ut)+z10; z17=(9ut,2ut)+z10; % % draw z1{left}..z2{down}..z3{right}..z4{up}..cycle; draw z5--z6{z6-z5}..z7{right} ..z16..z11{left}..z15{z12-z15} % z16{z15-z12} ..z13{right}..z17--z14; % labels(range 1 thru 17); endchar; % ge beginchar(oct"213",33.4 ut#,19 ut#,19ut#); pickup va_pen; % z1=(11ut,13ut); z2=(1ut,0ut); z3=(-5ut,7ut); z4=(5ut,19ut); z10=(12ut,19ut); z11=(7ut,-10ut); z12=(0ut,-19ut); z13=(-4ut,-15ut); z14=(0ut,-9ut); z15=(29ut,18ut); z16=(24ut,0ut); z17=(4ut,19ut)+z16; z18=(-2ut,7ut)+z16; z19=(3ut,0ut)+z16; z20=(9.3ut,(9.3*8/9-6)*ut)+z16; z21=(-1ut,13ut)+z16; z22=(8ut,13ut)+z16; z23=(9ut,2ut)+z16; % % draw z1{down}..z2{left}..z3{up}..z4{right}..cycle; draw z10--z11{z11-z10}..z12{left}..z13{up}..z14 ..z22{z21-z18}..z17{left}..z21{z18-z21} ..z19{right}..z23--z20; % % labels(range 1 thru 23); endchar; % gee beginchar(oct"214",52.4 ut#,19 ut#,19ut#); pickup va_pen; % z1=(11ut,13ut); z2=(1ut,0ut); z3=(-5ut,7ut); z4=(5ut,19ut); z10=(12ut,19ut); z11=(7ut,-10ut); z12=(0ut,-19ut); z13=(-4ut,-15ut); z14=(0ut,-9ut); z15=(29ut,18ut); z16=(24ut,0ut); z17=(4ut,19ut)+z16; z18=(-2ut,7ut)+z16; z19=(3ut,0ut)+z16; z20=(9.3ut,(9.3*8/9-6)*ut)+z16; z21=(-1ut,13ut)+z16; z22=(8ut,13ut)+z16; z23=(9ut,2ut)+z16; z24=(43ut,0ut); z25=(4ut,19ut)+z24; z26=(-2ut,7ut)+z24; z27=(3ut,0ut)+z24; z28=(9.3ut,(9.3*8/9-6)*ut)+z24; z29=(-1ut,13ut)+z24; z30=(8ut,13ut)+z24; z31=(9ut,2ut)+z24; % % % draw z1{down}..z2{left}..z3{up}..z4{right}..cycle; draw z10--z11{z11-z10}..z12{left}..z13{up}..z14 ..z22{z21-z18}..z17{left}..z21{z18-z21} ..z19{right} ..z30..z25{left}..z29{z26-z29} ..z27{right}..z31--z28; % % labels(range 1 thru 31); endchar; % dt beginchar(oct"215",50 ut#,40 ut#,0); pickup va_pen; % z1=(5ut,19ut); z2=(-4ut,6ut); z3=(1ut,0ut); z4=(11ut,13ut); z5=(17ut,40ut); z6=(10ut,5ut); z7=(12ut,0ut); z8=(16.3ut,(16.3*8/7+(2-16*8/7))*ut); z9=(16ut,2ut); z10=(22ut,0ut); z11=(0ut,18ut)+z10; z12=(14ut,39ut)+z10; z13=(7ut,0ut)+z10; z14=(-4ut,14ut)+z10; z15=(28ut,18ut)+z10; % % draw z1{left}..z2{down}..z3{right}..z4{up}..cycle; draw z5--z6{z6-z5}..z7{right} ..z12{up} & z12-- z13; draw z14{dir 340}..z15{dir 60}; % labels(range 1 thru 15); endchar; % te beginchar(oct"216",32.4 ut#,39 ut#,0); pickup va_pen; % z1=(0ut,18ut); z2=(14ut,39ut); z3=(7ut,0ut); z4=(-4ut,11ut); z5=(28ut,18ut); z6=(23ut,0ut); z7=(4ut,19ut)+z6; z8=(-2ut,7ut)+z6; z9=(3ut,0ut)+z6; z10=(9.3ut,(9.3*8/9-6)*ut)+z6; z11=(-1ut,13ut)+z6; z12=(8ut,13ut)+z6; z13=(9ut,2ut)+z6; % % draw z1{an}..z2 & z2-- z3; draw z4{dir 340} ..z12{z11-z8}..z7{left}..z11{z8-z11} ..z9{right}..z13--z10; % % labels(range 1 thru 13); endchar; % ne beginchar(oct"217",36.4 ut#,19 ut#,0); pickup va_pen; % z1=(0ut,19ut); z2=(-4ut,0ut); z3=(10ut,19ut); z4=(15ut,15ut); z5=(12ut,3ut); z6=(15ut,0ut); z7=(18ut,1ut); z8=(18.3ut,(18.3*17/16+(1-9*17/8))*ut); z9=(27ut,0ut); z10=(4ut,19ut)+z9; z11=(-2ut,7ut)+z9; z12=(3ut,0ut)+z9; z13=(9.3ut,(9.3*8/9-6)*ut)+z9; z14=(-1ut,13ut)+z9; z15=(8ut,13ut)+z9; z16=(9ut,2ut)+z9; % % draw z1--z2 & z2{z1-z2}..z3{right}..z4{down}--z5..z6{right}..z7 ..z15{z14-z11}..z10{left}..z14{z11-z14} ..z12{right}..z16--z13; % % labels(range 1 thru 16); endchar;