🚀 go-pugleaf

$B$3$3FsF|$P$+$jG:$s$G$$$k$s$G(B$B$9$,(B...

$BFs$D$N(B Type1 $B%U%)%s%H$r9g@.$7$F?7$7$$(B Type1 $B%U%)%s%H$r:n$j$?(B
$B$$$s(B$B$G$9$,!"$=$l$>$l$N%U%)%s%H<-=qFb$N(B CharStrings $B$,$&$^$/(B
$B9g@.$G$-$^$;$s!#(B$B$d$C$F$_$?$N$O(B (A $B$H(B B $B$r9g@.$7$F(B C $B$r:n$k!K!'(B
 1. C $B$N(B Encoding $B$N8eH>$K(B A $B$N(B Encoding $B$r%3%T!<!J$=$N:]$"(B
	$B$H$G(B B $B$N(B Encoding $BFb$N%-!<$H$V$D$+$i$J$$$h$&$K(B$B?7$7(B
	$B$$%-!<$r$D$/$C$FCV$-49$($k!#Nc$($P(B cA0 $B$H$$$&%-!<$O(B 
	dA0 $B$H$7$?!K(B
 2. C $B$N(B CharStrings $B$K(B A $B$N(B CharStrings $B$r%3%T!<!J$?$@$7%-!<(B
	$B$OA0%9%F%C%W$GCV(B$B$-49$($?%-!<$r;H$&!"$^$?(B CharStrings 
	$B<-=q$NMFNL$rA}$d$7$F$*$/!K(B
 3. C $B$N(B Encoding $B$N8eH>$r(B B $B$N(B Encoding $B$NA0H>$GCV$-49$($k(B
 4. C $B$N(B CharStrings $B$K(B B $B$N(B CharStrings $B$r%3%T!<(B

$B$3$l$G$G$-$?(B C $B%U%)%s%H$r;H$&$H(B 128-255 $B$N%3!<%I$NJ8;z$K$D(B$B$$(B
$B$F$O$A$c$s$H$b$H$N(B B $B$N%U%)%s%H$G0u:~$G$-$k$s$G$9$,!"(B0-127 
$B$NJ8;z$^(B$B$G(B B $B$N%U%)%s%H$G$7$+0u:~$G$-$^$;$s!#$I$&$d$i(B 
CharStrings $BFb$N3F%-!<$KBP(B$B1~$9$k!V(BType1$B0E9f2=J8;zNs!W$,JQ$J(B
$B$3$H$K$J$C$A$c$C$F$$$k$h$&$G$9!#(B

$B$J(B$B$K$,$$$1$J$$$N$G$7$g$&$+!)$b$H$b$H$3$s$J$3$H$O$G$-$J$$$N$G(B
$B$7$g$&$+!)(B

$B!]!]!!$1$s$A$c$s!w#E#T#L(B
      handa@etl.go.jp

$B$3$l$,<B:]$N%3!<%I$G$9!#(B

/str 100 string def

/copyfont {	% font  COPYFONT  font
    dup length 1 add dict begin {
	1 index /FID ne 2 index /UniqueID ne and {def} {pop pop} ifelse
    } forall
    currentdict
    end
} bind def

/C
    A findfont copyfont begin
    [ Encoding {
	dup /.notdef ne {
	    str cvs dup dup 0 get 1 add 0 exch put cvn
	} if
    } forall 256 128 roll ] /Encoding exch def
    256 dict begin CharStrings {
	exch dup /.notdef ne {
	    str cvs dup dup 0 get 1 add 0 exch put cvn
	} if
	exch def
    } forall currentdict end /CharStrings exch def
    B findfont begin Encoding CharStrings end
    CharStrings begin { def } forall end
    128 128 getinterval Encoding 0 3 -1 roll putinterval    
    currentdict end
    definefont pop