% TW -- ligatures 2. generation (C)1991 Thomas Weinmann % fe beginchar(oct"220",25.4 ut#,39 ut#,19ut#); pickup va_pen; % z1=(0ut,18ut); z2=(12ut,37ut); z3=(9ut,39ut); z4=(3ut,31ut); z5=(-7ut,-19ut); z6=(-10ut,10ut); z7=(7ut,6ut); z8=(18ut,18ut); z9=(16ut,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{an}..z2{up}..z3{left}...z4{z5-z4}--z5; draw z6..z15{z14-z11}..z10{left}..z14{z11-z14} ..z12{right}..z16--z13; % % labels(range 1 thru 13); endchar; % he beginchar(oct"221",34.4 ut#,39 ut#,0); pickup va_pen; % z1=(0ut,18ut); z2=(10ut,36ut); z3=(7ut,39ut); z4=(3ut,34ut); z5=(-4ut,0ut); z6=(11ut,19ut); z7=(13ut,15ut); z8=(11ut,3ut); z9=(17ut,2ut); z10=(17.3ut,((17.3*8/7+(2-17.3*8/7))+0.3)*ut); z11=(25ut,0ut); z12=(4ut,19ut)+z11; z13=(-2ut,7ut)+z11; z14=(3ut,0ut)+z11; z15=(9.3ut,(9.3*8/9-6)*ut)+z11; z16=(-1ut,13ut)+z11; z17=(8ut,13ut)+z11; z18=(9ut,2ut)+z11; % % draw z1{an}..z2{up}..z3{left}..z4..z1--z5 & z5{z1-z5}..z6{right}..z7{down}..z8{down}..z9 ..z17{z16-z13}..z12{left}..z16{z13-z16} ..z14{right}..z18--z15; % % labels(range 1 thru 18); endchar; % ht beginchar(oct"222",48 ut#,39 ut#,0); pickup va_pen; % z1=(0ut,18ut); z2=(10ut,36ut); z3=(7ut,39ut); z4=(3ut,34ut); z5=(-4ut,0ut); z6=(11ut,19ut); z7=(13ut,15ut); z8=(11ut,3ut); z9=(17ut,2ut); z10=(17.3ut,((17.3*8/7+(2-17.3*8/7))+0.3)*ut); z11=(20ut,0ut); z12=(0ut,18ut)+z11; z13=(14ut,39ut)+z11; z14=(7ut,0ut)+z11; z15=(-3ut,19ut)+z11; z16=(28ut,18ut)+z11; % % draw z1{an}..z2{up}..z3{left}..z4..z1--z5 & z5{z1-z5}..z6{right}..z7{down}..z8{down}..z9 ..z13{(0,1)} & z13-- z14; draw z15{dir 340}..z16{dir 60}; % % labels(range 1 thru 16); endchar; % me beginchar(oct"223",47.4 ut#,19 ut#,0); pickup va_pen; % z1=(0ut,19ut); z2=(-5ut,0ut); z3=(10ut,19ut); z4=(14ut,16ut); z5=(10ut,0ut); z6=(24ut,19ut); z7=(27ut,16ut); z8=(24ut,3ut); z9=(26ut,0ut); z10=(30.3ut,(30.3*16/15+(-30))*ut); z11=(30ut,2ut); z12=(38ut,0ut); z13=(4ut,19ut)+z12; z14=(-2ut,7ut)+z12; z15=(3ut,0ut)+z12; z16=(9.3ut,(9.3*8/9-6)*ut)+z12; z17=(-1ut,13ut)+z12; z18=(8ut,13ut)+z12; z19=(9ut,2ut)+z12; % % draw z1--z2 & z2{z1-z2}..z3{right}..z4--z5 & z5{z4-z5}..z6{right}..z7--z8..z9{right} ..z18{z17-z14}..z13{left}..z17{z14-z17} ..z15{right}..z19--z16; % % labels(range 1 thru 19); endchar; % ke beginchar(oct"224", 31.4 ut#, 39ut#,0); pickup va_pen; % z1=(0ut,18ut); z2=(11ut,36ut); z3=(8ut,39ut); z4=(1ut,28ut); z5=(-4ut,0ut); z6=(10ut,19ut); z7=(11ut,17ut); z8=(3ut,9ut); z9=(11ut,0ut); z10=(16.3ut,(16.3*16/13+(2-16*16/13))*ut); z11=(16ut,2ut); z12=(22ut,0ut); z13=(4ut,19ut)+z12; z14=(-2ut,7ut)+z12; z15=(3ut,0ut)+z12; z16=(9.3ut,(9.3*8/9-6)*ut)+z12; z17=(-1ut,13ut)+z12; z18=(8ut,13ut)+z12; z19=(9ut,2ut)+z12; % % draw z1{an}..z2{up}..z3{left}...z4{z5-z4}--z5 & z5{z1-z5}..z6{dir -20}..z7{down}..z8 & z8..z9{right}..z11 ..z18{z17-z14}..z13{left}..z17{z14-z17} ..z15{right}..z19--z16; % % labels(range 1 thru 19); endchar; % je beginchar(oct"225",21.4 ut#,19 ut#,19ut#); pickup va_pen; % z1=(2.5ut,28ut); z2=(0ut,19ut); z3=(-5ut,-3ut); z4=(-13ut,-19ut); z5=(17ut,18ut); z6=(12ut,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 z2--z3{z3-z2}...z4{left}..z3{z5-z3} ..z12{(z11-z8)}..z7{left}..z11{z8-z11} ..z9{right}..z13--z10; pickup pencircle scaled 4ut; drawdot z1; % % labels(range 1 thru 13); endchar; % ze beginchar(oct"226",32.4 ut#,19 ut#,0ut#); pickup va_pen; % z1=(0ut,18ut); z2=(11ut,0ut); z3=(-5ut,0ut); z4=(13ut,19ut); z5=((18*7/8)*ut,(18-13.7*8/7)*ut); 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--z4--z3{(1,0)}..z2 ..z12{z11-z8}..z7{left}..z11{z8-z11} ..z9{right}..z13--z10; % % labels(range 1 thru 13); endchar; % ffe beginchar(oct"227",41.4 ut#,39 ut#,19ut#); pickup va_pen; % z1=(0ut,18ut); z2=(11ut,37ut); z3=(9ut,39ut); z4=(3ut,31ut); z5=(-7ut,-19ut); z6=(-9ut,8ut); z7=(7ut,3ut)+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; z15=(32ut,0ut); z16=(4ut,19ut)+z15; z17=(-2ut,7ut)+z15; z18=(3ut,0ut)+z15; z19=(9.3ut,(9.3*8/9-6)*ut)+z15; z20=(-1ut,13ut)+z15; z21=(8ut,13ut)+z15; z22=(9ut,2ut)+z15; % % draw z1{an}..z2{up}..z3{left}...z4{z5-z4}--z5 ..z10{an}..z11{up}..z12{left}...z13{z14-z13}--z14; draw z6..z7 ..z21{z20-z17}..z16{left}..z20{z17-z20} ..z18{right}..z22--z19; % % labels(range 1 thru 22); endchar; % ue beginchar(oct"230",38.4 ut#,19 ut#,0); %u-Umlaut pickup va_pen; % z1=(0ut,19ut); z2=(-3ut,3ut); z3=(2ut,0ut); z4=(15ut,19ut); z5=(12ut,3ut); z6=(14ut,0ut); z7=(29ut,0ut); z8=(18ut,2ut); z9=(4ut,26ut); z10=(12ut,26ut); z11=(4ut,19ut)+z7; z12=(-2ut,7ut)+z7; z13=(3ut,0ut)+z7; z14=(9.3ut,(9.3*8/9-6)*ut)+z7; z15=(-1ut,13ut)+z7; z16=(8ut,13ut)+z7; z17=(9ut,2ut)+z7; % % draw z1--z2{z2-z1}..z3{right}..z4{z4-z5} & z4--z5{(1,-0.7)} ..z16{z15-z12}..z11{left}..z15{z12-z15} ..z13{right}..z17--z14; % % labels(range 1 thru 17); endchar; % tte beginchar(oct"231",42.4 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); z8=(33ut,0ut); z9=(4ut,19ut)+z8; z10=(-2ut,7ut)+z8; z11=(3ut,0ut)+z8; z12=(9.3ut,(9.3*8/9-6)*ut)+z8; z13=(-1ut,13ut)+z8; z14=(8ut,13ut)+z8; z15=(9ut,2ut)+z8; % % draw z1{an}..z2 & z2-- z3; draw z6--z7; draw z4{dir 340} ..z14{z13-z10}..z9{left}..z13{z10-z13} ..z11{right}..z15--z12; % % labels(range 1 thru 15); endchar; % ste beginchar(oct"232",42.4 ut#,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=(-2ut,8ut)+z7; z12=(28ut,18ut)+z7; z13=(33ut,0ut); z14=(4ut,19ut)+z13; z15=(-2ut,7ut)+z13; z16=(3ut,0ut)+z13; z17=(9.3ut,(9.3*8/9-6)*ut)+z13; z18=(-1ut,13ut)+z13; z19=(8ut,13ut)+z13; z20=(9ut,2ut)+z13; % % draw z11{dir 340} ..z19{z18-z15}..z14{left}..z18{z15-z18} ..z16{right}..z20--z17; % draw z1--z2 & z2{z3-z2}..z3{down}..z4{left}..z5{dir 60}...z8{an}..z9 & z9-- z10; % labels(range 1 thru 20); endchar; % ste beginchar(oct"233",42.4 ut#,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=(-2ut,8ut)+z7; z12=(28ut,18ut)+z7; z13=(33ut,0ut); z14=(4ut,19ut)+z13; z15=(-2ut,7ut)+z13; z16=(3ut,0ut)+z13; z17=(9.3ut,(9.3*8/9-6)*ut)+z13; z18=(-1ut,13ut)+z13; z19=(8ut,13ut)+z13; z20=(9ut,2ut)+z13; % % draw z2{z3-z2}..z3{down}..z4{left}..z5{dir 60}...z8{an}..z9 & z9-- z10; draw z11{dir 340} ..z19{z18-z15}..z14{left}..z18{z15-z18} ..z16{right}..z20--z17; % labels(range 1 thru 20); endchar; % llt beginchar(oct"234",59 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=(15ut,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); z16=(31ut,0ut); z17=(0ut,18ut)+z16; z18=(14ut,39ut)+z16; z19=(7ut,0ut)+z16; z20=(-2ut,15ut)+z16; z21=(28ut,18ut)+z16; % % draw z1{an}..z2{up}..z3{left}..z1{z4-z3}..z4{right}..z6 ..z10{up}..z11{left}..z9{z12-z11}..z12{right}..z14 ..z18{up} & z18-- z19; draw z20{dir 340}..z21{dir 60}; % % labels(range 1 thru 21); endchar; % llte beginchar(oct"235",62.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=(15ut,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); z16=(31ut,0ut); z17=(0ut,18ut)+z16; z18=(14ut,39ut)+z16; z19=(7ut,0ut)+z16; z20=(-2ut,19ut)+z16; z21=(28ut,18ut)+z16; z22=(53ut,0ut); z23=(4ut,19ut)+z22; z24=(-2ut,7ut)+z22; z25=(3ut,0ut)+z22; z26=(9.3ut,(9.3*8/9-6)*ut)+z22; z27=(-1ut,13ut)+z22; z28=(8ut,13ut)+z22; z29=(9ut,2ut)+z22; % % % draw z1{an}..z2{up}..z3{left}..z1{z4-z3}..z4{right}..z6 ..z10{up}..z11{left}..z9{z12-z11}..z12{right}..z14 ..z18{up} & z18-- z19; draw z20{dir 340} ..z28{z27-z24}..z23{left}..z27{z24-z27} ..z25{right}..z29--z26; % % labels(range 1 thru 29); endchar; % hte beginchar(oct"236",51.4 ut#,39 ut#,0); pickup va_pen; % z1=(0ut,18ut); z2=(10ut,36ut); z3=(7ut,39ut); z4=(3ut,34ut); z5=(-4ut,0ut); z6=(11ut,19ut); z7=(13ut,15ut); z8=(11ut,3ut); z9=(17ut,2ut); z10=(17.3ut,((17.3*8/7+(2-17.3*8/7))+0.3)*ut); z11=(19ut,0ut); z12=(0ut,18ut)+z11; z13=(14ut,39ut)+z11; z14=(7ut,0ut)+z11; z15=(-2ut,15ut)+z11; z16=(28ut,18ut)+z11; z17=(41ut,0ut); z18=(4ut,19ut)+z17; z19=(-2ut,7ut)+z17; z20=(3ut,0ut)+z17; z21=(9.3ut,(9.3*8/9-6)*ut)+z17; z22=(-1ut,13ut)+z17; z23=(8ut,13ut)+z17; z24=(9ut,2ut)+z17; % % % draw z1{an}..z2{up}..z3{left}..z4..z1--z5 & z5{z1-z5}..z6{right}..z7{down}..z8{down}..z9 ..z13{(0,1)} & z13-- z14; draw z15{dir 340} ..z23{z22-z19}..z18{left}..z22{z19-z22} ..z20{right}..z24--z21; % % labels(range 1 thru 24); endchar; % re beginchar(oct"237", 28.4 ut#,19 ut#,0); pickup va_pen; % z1=(0ut,19ut); z2=2/3*((-3ut,-2ut)+z1); z3=(7ut,19ut); z4=(19ut,18ut); z5=(-5ut,0ut); z6=(19ut,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--z5; draw z2..z3 & z3{dir 320}..z12{z11-z8}; draw z11{z8-z11}..z12{z11-z8}..z7{left}..z11{z8-z11} ..z9{right}..z13--z10; % % labels(range 1 thru 13); endchar;