font_identifier:="GOSIGN"; font_size 50pt#; size#:=50pt#; u#:=size#/18; % 50/18pt# for gosign50.pxl/tfm % u#:=10/18pt#; % 10/18pt# for gosign10.pxl/tfm mode_setup; beginchar(0,18u#,18u#,0); pickup pencircle scaled .1pt; x1=.5/18w; y1=14/18h; x2=2/18w; y2=16/18h; x3=17/18w; y3=15/18h; x4=x3; y4=y1; fill z1--z2--z3--z4--cycle; x5=2/18w; y5=7/18h; x6=3/18w; y6=8.2/18h; x7=16/18w; y7=8/18h; x8=x7; y8=7/18h; fill z5--z6--z7--z8--cycle; x9=4/18w; y9=16/18h; x10=6/18w; y10=17/18h; x11=7/18w; y11=8/18h; x12=6/18w; y12=y11; fill z9--z10{(1,-2)}..z11--z12..{(-2,3)}cycle; x13=13.5/18w; y13=17/18h; x14=15/18w; y14=16/18h; x15=11.7/18w; y15=8/18h; x16=11/18w; y16=y15; fill z13--z14{(-1,-2)}..z15--z16..{(2,3)}cycle; x17=6/18w; y17=11.5/18h; x18=x17; y18=13/18h; x19=12/18w; y19=y18; x20=x19; y20=y17; fill z17--z18--z19--z20--cycle; x21=x17; y21=9/18h; x22=x17; y22=10.5/18h; x23=x19; y23=y22; x24=x19; y24=y21; fill z21--z22--z23--z24--cycle; x25=6/18w; y25=7/18h; x26=7.5/18w; y26=y25; x27=1.5/18w; y27=1.5/18h; x28=0/18w; y28=2.5/18h; fill z25--z26{(-1,-2)}..{(-3,-1)}z27--z28{right}..{(1,2)}cycle; x29=10.5/18w; y29=7/18h; x30=11.7/18w; y30=y29; x31=18/18w; y31=2/18h; x32=16.5/18w; y32=1/18h; fill z29--z30{(2,-2)}..{right}z31--z32{(-3,2)}..{(-2,3)}cycle; x33=6.5/18w; y33=5/18h; x34=x33; y34=6/18h; x35=11.5/18w; y35=y34; x36=x35; y36=y33; fill z33--z34--z35--z36--cycle; x37=7/18w; y37=5/18h; x38=8/18w; y38=y37; x39=5/18w; y39=0.5/18h; x40=4/18w; y40=1/18h; fill z37--z38{(-1,-2)}..{left}z39--z40{right}..{(1,2)}cycle; x41=13/18w; y41=4/18h; x42=12/18w; y42=3/18h; % fill z37--z38{(1,-1)}...{right}z41--z42{left}...z47...z48...{(-1,2)}cycle; x43=11.5/18w; y43=2/18h; x44=x42; y44=1/18h; fill z41--z42--z43--z44--cycle; x45=8.5/18w; y45=0.7/18h; x46=9.2/18w; y46=y43; fill z43--z44--z45--z46--cycle; x47=9/18w; y47=3.3/18h; x48=8/18w; y48=y47; fill z45--z46--z47--z48--cycle; fill z37--z38{(1,-1)}...{right}z41--z42{left}...z47...z48...{(-1,2)}cycle; pickup pencircle scaled .01pt; x100=0/18w; x101=1/18w; x102=2/18w; x103=3/18w; x104=4/18w; x105=5/18w; x106=6/18w; x107=7/18w; x108=8/18w; x109=9/18w; x110=10/18w; x111=11/18w; x112=12/18w; x113=13/18w; x114=14/18w; x115=15/18w; x116=16/18w; x117=17/18w; x118=18/18w; y100=0/18h; y101=1/18h; y102=2/18h; y103=3/18h; y104=4/18h; y105=5/18h; y106=6/18h; y107=7/18h; y108=8/18h; y109=9/18h; y110=10/18h; y111=11/18h; y112=12/18h; y113=13/18h; y114=14/18h; y115=15/18h; y116=16/18h; y117=17/18h; y118=18/18h; % draw (x100,y100)--(x118,y100); % draw (x100,y101)--(x118,y101); % draw (x100,y102)--(x118,y102); % draw (x100,y103)--(x118,y103); % draw (x100,y104)--(x118,y104); % draw (x100,y105)--(x118,y105); % draw (x100,y106)--(x118,y106); % draw (x100,y107)--(x118,y107); % draw (x100,y108)--(x118,y108); % draw (x100,y109)--(x118,y109); % draw (x100,y110)--(x118,y110); % draw (x100,y111)--(x118,y111); % draw (x100,y112)--(x118,y112); % draw (x100,y113)--(x118,y113); % draw (x100,y114)--(x118,y114); % draw (x100,y115)--(x118,y115); % draw (x100,y116)--(x118,y116); % draw (x100,y117)--(x118,y117); % draw (x100,y118)--(x118,y118); % % draw (x100,y100)--(x100,y118); % draw (x101,y100)--(x101,y118); % draw (x102,y100)--(x102,y118); % draw (x103,y100)--(x103,y118); % draw (x104,y100)--(x104,y118); % draw (x105,y100)--(x105,y118); % draw (x106,y100)--(x106,y118); % draw (x107,y100)--(x107,y118); % draw (x108,y100)--(x108,y118); % draw (x109,y100)--(x109,y118); % draw (x110,y100)--(x110,y118); % draw (x111,y100)--(x111,y118); % draw (x112,y100)--(x112,y118); % draw (x113,y100)--(x113,y118); % draw (x114,y100)--(x114,y118); % draw (x115,y100)--(x115,y118); % draw (x116,y100)--(x116,y118); % draw (x117,y100)--(x117,y118); % draw (x118,y100)--(x118,y118); endchar; end; # added Dec. 16, 2012 by karl@tug.org