% Copyright Makoto Fujiwara % Distributed under GPL2; designsize:=10; mode_setup; em#:= 10pt#; cap# := 7pt#; thin# := 1/3pt#; thick# := 5/6pt#; o# := 1/5pt#; w# := 1/5pt#; u# := pt#; define_pixels(u,cap,dp); beginchar("A", 5u#, 8u#, 2u#); "sample"; pickup pencircle scaled .1u; x0 = 0; x1 = .5w; x2 = w; y0 = y2 = 0; y1 = h; draw z0--z1--z2; z3 = whatever[z0,z1]; z4 = whatever[z1,z2]; y3=y4=.2h; draw z3--z4; endchar; beginchar("C", 1.6em#,cap#,0); pickup pencircle scaled 0.5pt; a := 1.2pt; b := 1.2pt; c := 0.11pt ; x16 = 0 + c; x5 = 0 + c * 5; x1 = a ; x15 = a + 2 * c; x6 = a + 4 * c; x4 = a + 6 * c; x2 = a * 2 + c; x3 = a * 2 + 5 * c; x11 = a * 4 + c ; x10 = a * 4 + 5 * c; x12 = a * 5 ; x14 = a * 5 + c * 2; x7 = a * 5 + c * 4; x9 = a * 5 + c * 6; x13 = a * 6 + c; x8 = a * 6 + c * 5; y1 = y12 = 0 ; y16 = y2 = y11 = y13 = b ; y15 = y14 = b * 2 ; y6 = y7 = b * 4 ; y5 = y3 = y10 = y8 = b * 5 ; y4 = y9 = b * 6 ; % % * * 6 % 4 9 % * * * * 5 % 5 3 10 8 % * * 4 % 6 7 % % * * 2 % 15 14 % * * * * 1 % 16 2 11 13 % * * 0 % 1 12 draw z1 .. z2 .. tension 1.5 .. z3 .. z4 .. z5 .. z6 .. tension 1.5 .. z7 .. z8 .. z9 .. z10 ..tension 1.5 .. z11 .. z12 .. z13 .. z14 .. tension 1.5 .. z15 .. z16 .. cycle; endchar; end;