% Vereinfachte Ausgangsschrift weva % Walter Entenmann % 11.09.2011 % 13.09.2012 % Grossbuchstaben % beginchar("A",44.031ut#,Ht#,0); pickup weva_pen; A_char; zeigen; endchar; beginchar("B",25ut#,Ht#,0); pickup weva_pen; xpos:=0; gerade(Ht,Ht,sporn,xpos); gerade(0,0,sporn,xpos-sporn); stamm(Ht,0,xpos); gerade(Ht,Ht,flach,xpos); Bauch(Ht,ht,16ut-flach,xpos); gerade(ht,ht,Flach,xpos-flach); Bauch(ht,0,19ut-Flach,xpos); gerade(0,0,Flach,xpos-Flach); xpos:=sporn+19ut; zeigen; endchar; beginchar("C",30.625ut#,Ht#,0); pickup weva_pen; xpos:=0; C_form(xpos); schweif(0,ht-Delta,20ut-Delta/m,0,angle(1,m),1.5,xpos); zeigen; endchar; beginchar("D",31ut#,Ht#,0); pickup weva_pen; xpos:=0; gerade(Ht,Ht,sporn,xpos); stamm(Ht,0,xpos); gerade(0,0,sporn,xpos-sporn); gerade(Ht,Ht,flach,xpos); Bauch(Ht,0,25ut-flach,xpos); gerade(0,0,flach,xpos-flach); xpos:=sporn+25ut; zeigen; endchar; beginchar("E",30.625ut#,Ht#,0); pickup weva_pen; xpos:=0; E_form(xpos); schweif(0,ht-Delta,20ut-Delta/m,0,angle(1,m),1.2,xpos); zeigen; endchar; beginchar("F",27.5ut#,Ht#,0); pickup weva_pen; xpos:=0; gerade(Ht,Ht,2*A,xpos); stamm(Ht,0,xpos-2*A+7.5ut); schweif(ht-2ut,ht-Delta,25ut-Delta/m,-20,angle(1,m),2,xpos-5ut); xpos:=2*A; zeigen; endchar; beginchar("G",38.125ut#,Ht#,dt#); pickup weva_pen; xpos:=0; G_form(xpos); stamm(ht,0,xpos); uschl(xpos); strich(xpos); zeigen; endchar; beginchar("H",42.5ut#,Ht#,0); pickup weva_pen; xpos:=0; stamm(Ht,0,xpos+5ut); stamm(Ht,0,xpos+H_breit); schweif(ht-5ut,ht-Delta,H_breit+5ut+15ut,-45,angle(1,m),2,xpos-H_breit-5ut); zeigen; endchar; beginchar("I",17.5ut#,Ht#,0); pickup weva_pen; xpos:=0; gerade(Ht,Ht,15ut,xpos+2.5ut); stamm(Ht,10ut,xpos); bogen(10ut,0,3ut,-17.5ut,0.57,-90,140,1,1,xpos); xpos:=17.5ut; zeigen; endchar; beginchar("J",28.125ut#,Ht#,dt#); pickup weva_pen; xpos:=0; gerade(Ht,Ht,15ut,xpos); stamm(Ht,0,xpos); uschl(xpos); strich(xpos); zeigen; endchar; beginchar("K",34.125ut#,Ht#,0); pickup weva_pen; xpos:=0; stamm(Ht,0,xpos); gerade(ht,Ht,ht,xpos); bogen(ht,0,ht-Delta,35ut-Delta/m,0.57,-45,angle(1,m),3,3,xpos-ht+1ut); zeigen; endchar; beginchar("L",34.125ut#,Ht#,0); pickup weva_pen; xpos:=0; stamm(Ht-10ut,10ut,xpos+2.5ut); schweif(Ht-10ut,Ht,flach,90,angle(1,0.4),1,xpos); schweif(0,10ut,2.5ut,angle(H_breit,Ht),90,1,xpos-flach-2.5ut); welle(ht,xpos-2.5ut); schweif(0,ht-Delta,16ut-Delta/m,0,angle(1,m),2.5,xpos); zeigen; endchar; beginchar("M",62.375ut#,Ht#,0); pickup weva_pen; xpos:=0; schweif(0,yauf,mxauf,0,angle(Ht/2,Ht),1,xpos); gerade(yauf,Ht,Ht/2-yauf/2,xpos); stamm(Ht,0,xpos); gerade(0,Ht,Ht/2,xpos); stamm(Ht,r,xpos); stock(xpos); zeigen; endchar; beginchar("N",30ut#,Ht#,0); pickup weva_pen; xpos:=0; schweif(0,5ut,2.5ut,45,90,1,xpos); stamm(Ht,5ut,xpos); gerade(Ht,0,2*C,xpos); stamm(Ht-5ut,0,xpos); schweif(Ht-5ut,Ht,2.5ut,90,45,1,xpos); zeigen; endchar; beginchar("O",27.5ut#,Ht#,0); pickup weva_pen; xpos:=0; Oval(xpos); zeigen; endchar; beginchar("P",25ut#,Ht#,0); pickup weva_pen; xpos:=0; gerade(Ht,Ht,sporn,xpos); stamm(Ht,0,xpos); gerade(Ht,Ht,Flach,xpos); Bauch(Ht,ht,19ut-Flach,xpos); gerade(ht,ht,Flach,xpos-Flach); xpos:=sporn+19ut; zeigen; endchar; beginchar("Q",41.875ut#,Ht#,0); pickup weva_pen; xpos:=0; Oval(xpos); bogen(12.5ut,0,ht-Delta,30ut-Delta/m,0.42,-45,angle(1,m),1.5,2.5,xpos-A); zeigen; endchar; beginchar("R",42.625ut#,Ht#,0); pickup weva_pen; xpos:=0; gerade(Ht,Ht,sporn,xpos); stamm(Ht,0,xpos); gerade(Ht,Ht,flach,xpos); Bauch(Ht,ht,16ut-flach,xpos); gerade(ht,ht,flach,xpos-flach); bogen(ht,0,ht-Delta,37.5ut-Delta/m,0.57,-45,angle(1,m),3,3,xpos-flach+1ut); zeigen; endchar; beginchar("S",21ut#,Ht#,0); pickup weva_pen; xpos:=0; S_char(xpos); zeigen; endchar; beginchar("T",27.5ut#,Ht#,0); pickup weva_pen; xpos:=0; gerade(Ht,Ht,2*A,xpos); stamm(Ht,0,xpos-A); xpos:=2*A; zeigen; endchar; beginchar("U",43.125ut#,Ht#,0); pickup weva_pen; U_char; zeigen; endchar; beginchar("V",32.25ut#,Ht#,0); pickup weva_pen; xpos:=0; stamm(Ht,0,xpos); gerade(0,Ht-5ut,V_breit-5ut/m,xpos); schweif(Ht-5ut,Ht,flach,angle(1,m),15,1,xpos); zeigen; endchar; beginchar("W",48.2ut#,Ht#,0); pickup weva_pen; xpos:=0; stamm(Ht,0,xpos); gerade(0,Ht,H_breit,xpos); stamm(Ht,0,xpos); gerade(0,Ht-5ut,19.7ut,xpos); schweif(Ht-5ut,Ht,flach,angle(H_breit,Ht),angle(1,0.5),1,xpos); zeigen; endchar; beginchar("X",42.125ut#,Ht#,0); pickup weva_pen; xpos:=0; gerade(0,Ht,2*A,xpos); gerade(Ht,ht,11.25ut,xpos-2*A+2.5ut); bogen(ht,0,ht-Delta,30.25ut-Delta/m,0.465,angle(11.25ut,-ht),angle(1,m),3.5,3,xpos); zeigen; endchar; beginchar("Y",38.125ut#,Ht#,dt#); pickup weva_pen; xpos:=0; stamm(Ht,ht/2,xpos); bogen(ht/2,0,1.5*ht,2*C,0.375,-90,90,1,1.2,xpos); stamm(Ht,0,xpos); uschl(xpos); strich(xpos); zeigen; endchar; beginchar("Z",36.625ut#,Ht#,0); pickup weva_pen; xpos:=0; gerade(0,Ht,H_breit,xpos); gerade(Ht,Ht,-H_breit,xpos); welle(H_breit,xpos); schweif(0,ht-Delta,16ut-Delta/m,0,angle(1,m),2.5,xpos); zeigen; endchar; % Umlaute %\"A beginchar(oct"304",44.031ut#,45ut#,0); pickup weva_pen; xpos:=0; Umlaut(25ut,xpos); A_char; zeigen; endchar; %\"O beginchar(oct"326",27.5ut#,45ut#,0); pickup weva_pen; xpos:=0; Umlaut(10ut,xpos); Oval(xpos); zeigen; endchar; %\"U beginchar(oct"334",43.125ut#,45ut#,0); pickup weva_pen; xpos:=0; Umlaut(10ut,xpos); U_char; zeigen; endchar; %%%%%%%%%%%%%%%%%% End of File %%%%%%%%%%%%%%%%%%