% TW -- signs 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; labels(range 1 thru 4); endchar; beginchar("-",30ut#,20ut#, 0ut#); pickup va_pen; z1=(10ut,15ut); z2=(25ut,15ut); draw z1..z2; labels(range 1 thru 2); endchar; beginchar(oct"173",35ut#,20 ut#, 0ut#); pickup va_pen_small; z1=(10ut,15ut); z2=(30ut,15ut); draw z1..z2; labels(range 1 thru 2); endchar; beginchar(oct"174",45ut#,20 ut#, 0ut#); pickup va_pen_small; z1=(10ut,15ut); z2=(40ut,15ut); draw z1..z2; labels(range 1 thru 2); endchar; beginchar("*",30 ut#,20 ut#, 0ut#); pickup va_pen; z9=(15ut,15ut); z1=z9+(0ut,-10ut); z2=z9+(10ut,0ut); z3=z9+(0ut,10ut); z4=z9+(-10ut,0ut); z5=z9+(-6ut,-6ut); z6=z9+(6ut,-6ut); z7=z9+(6ut,6ut); z8=z9+(-6ut,6ut); % draw z1..z3; draw z2..z4; draw z5..z7; draw z6..z8; labels(range 1 thru 9); endchar; beginchar(":",15 ut#,20 ut#, 0ut#); pickup pencircle scaled 5ut; % z1=(10ut,19ut); z2=(9ut,9ut); % drawdot z1; drawdot z2; % labels(range 1 thru 2); endchar; beginchar("<",30 ut#,20 ut#,0 ut#); pickup va_pen; % z1=(30ut,25ut); z2=(10ut,15ut); z3=(28ut,5ut); % draw z1..z2 & z2..z3; % labels(range 1 thru 3); endchar; beginchar(">", 30ut#, 20ut#, 0ut#); pickup va_pen; % z1=(11ut,25ut); z2=(30ut,15ut); z3=(10ut,5ut); % draw z1..z2 & z2..z3; % 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; % labels(range 1 thru 4); endchar; beginchar("(", 20ut#, 40ut#, 0ut#); pickup va_pen; % z1=(10ut,40ut); z2=(0ut,-5ut); % draw z1{dir -115}..z2{dir -80}; % labels(range 1 thru 2); endchar; beginchar(")",27 ut#,40 ut#, 0ut#); % 27 statt 20 pickup va_pen; % % z1=(10ut,40ut); % z2=(0ut,-5ut); z1=(17ut,40ut); z2=(7ut,-5ut); % draw z1{dir -80}..z2{dir -115}; % labels(range 1 thru 2); endchar; beginchar("/",20 ut#,40 ut#, 0ut#); pickup va_pen; % z1=(12ut,40ut); z2=(0ut,-5ut); % draw z1..z2; % labels(range 1 thru 2); endchar; beginchar(oct"5",20 ut#,20 ut#, 0ut#); %Anfuehrungsstr. unten pickup va_pen; % z1=(5ut,10ut); z2=(3ut,0ut); z3=(x1+10ut,y1); z4=(x2+10ut,y2); % draw z1{dir -90}..z2; draw z3{dir -90}..z4; % labels(range 1 thru 4); endchar; beginchar(oct"175", 20ut#, 40ut#, ut#); % Anfueyrungsstr. oben pickup va_pen; % z1=(5ut,40ut); z2=(3ut,30ut); z3=(x1+10ut,y1); z4=(x2+10ut,y2); % draw z1{dir -90}..z2; draw z3{dir -90}..z4; % labels(range 1 thru 4); endchar; beginchar(oct"42", 20ut#, 40ut#, ut#); % Anfuehrungsstr. oben rechts pickup va_pen; % z1=(5ut,40ut); z2=(3ut,30ut); z3=(x1+10ut,y1); z4=(x2+10ut,y2); % draw z1{dir -90}..z2; draw z3{dir -90}..z4; % labels(range 1 thru 4); endchar; beginchar(oct"134", 20ut#, 40ut#, 0ut#); % Anfuehrungsstr. oben links pickup va_pen; % z1=(5ut,40ut); z2=(7ut,30ut); z3=(x1+10ut,y1); z4=(x2+10ut,y2); % draw z1{dir -90}..z2; draw z3{dir -90}..z4; % labels(range 1 thru 4); endchar; beginchar(oct"140", 7ut#, 40ut#, 0ut#); % einf. Strich oben links pickup va_pen; % z1=(5ut,40ut); z2=(7ut,30ut); z3=(x1+10ut,y1); z4=(x2+10ut,y2); % draw z1{dir -90}..z2; % labels(range 1 thru 4); endchar; beginchar(oct"177",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; labels(range 1 thru 4); endchar; beginchar("?", 40ut#,39 ut#,0 ut#); pickup va_pen; % z0=(5ut,0ut); z1=(4ut,32ut)+z0; z2=(15ut,40ut)+z0; z3=(26ut,32ut)+z0; z4=(11ut,15ut)+z0; z5=(10ut,5ut)+z0; % draw z1{dir 80}..z2{right}..z3{dir -100}..z4{dir -100}; pickup pencircle scaled 5ut; drawdot z5; % labels(range 0 thru 5); endchar; beginchar("!",25 ut#,39 ut#, 0ut#); pickup va_pen; % z0=(5ut,0ut); z1=(10ut,39ut)+z0; z2=(5ut,11ut)+z0; z3=(4ut,3ut)+z0; % draw z1..z2; pickup pencircle scaled 5ut; drawdot z3; % labels(range 0 thru 3); endchar; beginchar(";",11 ut#,20 ut#,19 ut#); pickup va_pen; % z1=(11ut,14ut); z2=(10ut,5ut); z3=(5ut,-8ut); draw z2{dir -90}..z3{dir -110}; % pickup pencircle scaled 5ut; drawdot z1; % labels(range 1 thru 3); endchar; beginchar(".",10 ut#,10 ut#,0 ut#); %pickup va_pen_big; pickup pencircle scaled 5ut; % z1=(4ut,0ut); % drawdot z1; % labels(range 1 thru 2); endchar; beginchar(",", 20ut#, 10ut#,6 ut#); pickup va_pen; % z1=(14ut,9ut); z2=(8ut,-6ut); % drawdot z1; draw z1+(1ut,0ut){dir -80}..z2{dir -125}; % labels(range 1 thru 2); endchar; beginchar(oct"47", 10ut#, 40ut#,0 ut#); % Komma oben pickup va_pen; % z1=(4ut,35ut); z2=(0ut,25ut); % drawdot z1; draw z1+(1ut,0ut){dir -80}..z2{dir -125}; % labels(range 1 thru 8); endchar;