1%!
2% Common definitions for the Hershey fonts.
3
4/MakeHersheyFont where
5 { pop 80 string
6    { currentfile 1 index readline pop
7       (%END) eq { exit } if
8    } loop pop
9 } if
10
11userdict begin
12/HersheyBuildDict 10 dict def
13
14/BuildHersheyChar {
15	exch begin
16		PenWidth setlinewidth
17		Encoding exch get
18		dup CharData exch known not { pop /.notdef } if
19		CharData exch get
20	end
21	/cd exch def
22
23	/llx 99 def /lly 99 def /urx -99 def /ury -99 def
24	true
25
26	cd 2 get {
27		exch {
28			dup 32 eq {
29				pop true
30			} {
31				82 sub cd 0 get sub
32
33				dup llx lt {
34					dup /llx exch def
35				} if
36				dup urx gt {
37					dup /urx exch def
38				} if
39				pop false
40			} ifelse
41		} {
42			neg 91 add
43
44			dup lly lt {
45				dup /lly exch def
46			} if
47			dup ury gt {
48				dup /ury exch def
49			} if
50			pop true
51		} ifelse
52	} forall pop
53
54	cd 1 get cd 0 get sub 0 llx 1 sub lly 1 sub urx 1 add ury 1 add
55	setcachedevice
56
57	/domove true def
58	true
59
60	cd 2 get {
61		exch {
62			dup 32 eq {
63				pop true
64				/domove true def
65			} {
66				82 sub cd 0 get sub
67				false
68			} ifelse
69		} {
70			neg 91 add
71			domove {
72				moveto
73				/domove false def
74			} {
75				lineto
76			} ifelse
77			true
78		} ifelse
79	} forall pop
80
81	1 setmiterlimit 1 setlinejoin 1 setlinecap
82	stroke
83} bind def
84
85/MakeHersheyFont {
86	10 dict begin
87	/ItalicAngle exch def
88	/PenWidth exch def
89	/UniqueID exch def
90	/FontName exch def
91	/CharData exch def
92
93	/FontType 3 def
94	/FontMatrix
95		[1 33 div
96		0
97		ItalicAngle neg dup sin exch cos div 33 div
98		1 33 div
99		0 0] def
100	/Encoding StandardEncoding def
101	/BuildChar {HersheyBuildDict begin BuildHersheyChar end} def
102	/FontBBox {-10 -10 30 30} def
103
104	FontName currentdict end definefont pop
105} bind def
106end		% userdict
107%END
108
109150 dict dup begin
110/fraction [-11 11 ([BIb)] def
111/currency [-11 11 (IIJKKOKUJYI[ [IZKYOYUZY[[ IIKJOKUKYJ[I I[KZOYUYYZ[[)] def
112/periodcentered [-5 5 (RQQRRSSRRQ)] def
113/bullet [-2 2 (QPPQPSQTSTTSTQSPQP RQQRRSSRRQ)] def
114/slash [-7 7 (K^YF)] def
115/backslash [-7 7 (KFY^)] def
116/underscore [-8 8 (J]Z])] def
117/tilde [-8 8 (LTLRMPOPUSWSXR LRMQOQUTWTXRXP)] def
118/A [-11 11 (RFK[ RFY[ RIX[ MUVU I[O[ U[[[)] def
119/B [-12 12 (LFL[ MFM[ IFUFXGYHZJZLYNXOUP UFWGXHYJYLXNWOUP MPUPXQYRZTZWYYXZU[I[ UPWQXRYTYWXYWZU[)] def
120/C [-10 10 (NFN[ OFO[ KFZFZLYF K[R[)] def
121/D [-11 11 (RFJ[ RFZ[ RIY[ KZYZ J[Z[)] def
122/E [-12 11 (LFL[ MFM[ SLST IFYFYLXF MPSP I[Y[YUX[)] def
123/F [-11 11 (XFK[ YFL[ LFKLKFYF K[Y[YUX[)] def
124/G [-13 13 (KFK[ LFL[ XFX[ YFY[ HFOF UF\\F LPXP H[O[ U[\\[)] def
125/H [-12 12 (QFNGLIKKJOJRKVLXNZQ[S[VZXXYVZRZOYKXIVGSFQF QFOGMILKKOKRLVMXOZQ[ S[UZWXXVYRYOXKWIUGSF OMOT UMUT OPUP OQUQ)] def
126/I [-6 7 (RFR[ SFS[ OFVF O[V[)] def
127/J [-13 11 (KFK[ LFL[ YFLS QOY[ POX[ HFOF UF[F H[O[ U[[[)] def
128/K [-11 11 (RFK[ RFY[ RIX[ I[O[ U[[[)] def
129/L [-13 14 (KFK[ LFRX KFR[ YFR[ YFY[ ZFZ[ HFLF YF]F H[N[ V[][)] def
130/M [-12 13 (LFL[ MFYY MHY[ YFY[ IFMF VF\\F I[O[)] def
131/N [-12 12 (KEJJ ZEYJ ONNS VNUS KWJ\\ ZWY\\ KGYG KHYH OPUP OQUQ KYYY KZYZ)] def
132/O [-12 12 (QFNGLIKKJOJRKVLXNZQ[S[VZXXYVZRZOYKXIVGSFQF QFOGMILKKOKRLVMXOZQ[ S[UZWXXVYRYOXKWIUGSF)] def
133/P [-13 13 (KFK[ LFL[ XFX[ YFY[ HF\\F H[O[ U[\\[)] def
134/Q [-12 12 (LFL[ MFM[ IFUFXGYHZJZMYOXPUQMQ UFWGXHYJYMXOWPUQ I[P[)] def
135/R [-11 12 (KFRPJ[ JFQP JFYFZLXF KZXZ J[Y[ZUX[)] def
136/S [-10 11 (RFR[ SFS[ LFKLKFZFZLYF O[V[)] def
137/T [-10 11 (KKKILGMFOFPGQIRMR[ KIMGOGQI ZKZIYGXFVFUGTISMS[ ZIXGVGTI O[V[)] def
138/U [-11 12 (RFR[ SFS[ PKMLLMKOKRLTMUPVUVXUYTZRZOYMXLUKPK PKNLMMLOLRMTNUPV UVWUXTYRYOXMWLUK OFVF O[V[)] def
139/V [-11 11 (KFX[ LFY[ YFK[ IFOF UF[F I[O[ U[[[)] def
140/W [-12 13 (RFR[ SFS[ IMJLLMMQNSOTQU JLKMLQMSNTQUTUWTXSYQZM[L TUVTWSXQYM[L\\M OFVF O[V[)] def
141/X [-12 12 (JXK[O[MWKSJPJLKIMGPFTFWGYIZLZPYSWWU[Y[ZX MWLTKPKLLINGPF TFVGXIYLYPXTWW KZNZ VZYZ)] def
142/a [-12 13 (QMNNLPKRJUJXKZN[P[RZUWWTYPZM QMONMPLRKUKXLZN[ QMSMUNVPXXYZZ[ SMTNUPWXXZZ[[[)] def
143/b [-12 11 (TFQGOIMMLPKTJZIb TFRGPINMMPLTKZJb TFVFXGYHYKXMWNTOPO VFXHXKWMVNTO POTPVRWTWWVYUZR[P[NZMYLV POSPURVTVWUYTZR[)] def
144/c [-11 11 (IPKNMMOMQNROSRSVRZOb JOLNPNRO ZMYPXRSYP^Nb YMXPWRSY)] def
145/d [-10 11 (VNTMRMONMQLTLWMYNZP[R[UZWWXTXQWOSJRHRFSEUEWFYH RMPNNQMTMXNZ R[TZVWWTWPVNTKSISGTFVFYH)] def
146/e [-10 10 (XPVNTMPMNNNPPRSS PMONOPQRSS SSNTLVLXMZP[S[UZWX SSOTMVMXNZP[)] def
147/f [-10 10 (TFRGQHQIRJUKZKZJWKSMPOMRLULWMYP[S]T_TaSbQbPa ULQONRMUMWNYP[)] def
148/g [-12 12 (HQIOKMNMONOPNTL[ MMNNNPMTK[ NTPPRNTMVMXNYOYRXWUb VMXOXRWWTb)] def
149/h [-13 12 (GQHOJMMMNNNPMUMXNZO[ LMMNMPLULXMZO[Q[SZUXWUXRYMYIXGVFTFRHRJSMUPWRZT SZUWVUWRXMXIWGVF)] def
150/i [-7 7 (RMPTOXOZP[S[UYVW SMQTPXPZQ[)] def
151/j [-11 11 (NMJ[ OMK[ XMYNZNYMWMUNQROSMS OSQTSZT[ OSPTRZS[U[WZYW)] def
152/k [-11 11 (KFMFOGPHQJWXXZY[ MFOHPJVXWZY[Z[ RMJ[ RMK[)] def
153/l [-13 12 (MMGb NMHb MPLVLYN[P[RZTXVU XMUXUZV[Y[[Y\\W YMVXVZW[)] def
154/m [-11 11 (NML[ OMNSMXL[ YMXQVU ZMYPXRVUTWQYOZL[ KMOM)] def
155/n [-10 9 (TFRGQHQIRJUKXK UKQLOMNONQPSSTVT UKRLPMOOOQQSST STOUMVLXLZN\\S^T_TaRbPb STPUNVMXMZO\\S^)] def
156/o [-10 10 (RMONMQLTLWMYNZP[R[UZWWXTXQWOVNTMRM RMPNNQMTMXNZ R[TZVWWTWPVN)] def
157/p [-12 12 (PNL[ PNM[ VNV[ VNW[ IPKNNM[M IPKONN[N)] def
158/q [-11 10 (LVMYNZP[R[UZWWXTXQWOVNTMRMONMQLTHb R[TZVWWTWPVN RMPNNQMTIb)] def
159/r [-11 12 ([MQMNNLQKTKWLYMZO[Q[TZVWWTWQVOUNSM QMONMQLTLXMZ Q[SZUWVTVPUN UN[N)] def
160/s [-11 11 (SNP[ SNQ[ JPLNOMZM JPLOONZN)] def
161/t [-11 11 (IQJOLMOMPNPPNVNYP[ NMONOPMVMYNZP[Q[TZVXXUYRYOXMWNXOYR XUYO)] def
162/u [-12 12 (ONMOKQJTJWKYLZN[Q[TZWXYUZRZOXMVMTORSPXMb JWLYNZQZTYWWYU ZOXNVNTPRSPYNb)] def
163/v [-10 10 (KMMMONPPU_VaWb MMNNOPT_UaWbYb ZMYOWRM]K`Jb)] def
164/w [-13 12 (UFOb VFNb GQHOJMMMNNNPMUMXOZRZTYWVYS LMMNMPLULXMZO[R[TZVXXUYS[M)] def
165/x [-13 12 (JQLOONNMLNJQITIWJZK[M[OZQWRT IWJYKZMZOYQW QTQWRZS[U[WZYWZTZQYNXMWNYOZQ QWRYSZUZWYYW)] def
166/space [-8 8 ()] def
167/Y [-9 9 ()] def
168/Z [-10 10 ()] def
169/y [-11 11 ()] def
170/z [-12 12 ()] def
171/zero [-10 10 (QFNGLJKOKRLWNZQ[S[VZXWYRYOXJVGSFQF QFOGNHMJLOLRMWNYOZQ[ S[UZVYWWXRXOWJVHUGSF)] def
172/one [-10 10 (NJPISFS[ RGR[ N[W[)] def
173/two [-10 10 (LJMKLLKKKJLHMGPFTFWGXHYJYLXNUPPRNSLUKXK[ TFVGWHXJXLWNTPPR KYLXNXSZVZXYYX NXS[W[XZYXYV)] def
174/three [-10 10 (LJMKLLKKKJLHMGPFTFWGXIXLWNTOQO TFVGWIWLVNTO TOVPXRYTYWXYWZT[P[MZLYKWKVLUMVLW WQXTXWWYVZT[)] def
175/four [-10 10 (THT[ UFU[ UFJUZU Q[X[)] def
176/five [-10 10 (MFKP KPMNPMSMVNXPYSYUXXVZS[P[MZLYKWKVLUMVLW SMUNWPXSXUWXUZS[ MFWF MGRGWF)] def
177/six [-10 10 (WIVJWKXJXIWGUFRFOGMILKKOKULXNZQ[S[VZXXYUYTXQVOSNRNOOMQLT RFPGNIMKLOLUMXOZQ[ S[UZWXXUXTWQUOSN)] def
178/seven [-10 10 (KFKL KJLHNFPFUIWIXHYF LHNGPGUI YFYIXLTQSSRVR[ XLSQRSQVQ[)] def
179/eight [-10 10 (PFMGLILLMNPOTOWNXLXIWGTFPF PFNGMIMLNNPO TOVNWLWIVGTF POMPLQKSKWLYMZP[T[WZXYYWYSXQWPTO PONPMQLSLWMYNZP[ T[VZWYXWXSWQVPTO)] def
180/nine [-10 10 (XMWPURRSQSNRLPKMKLLINGQFSFVGXIYLYRXVWXUZR[O[MZLXLWMVNWMX QSORMPLMLLMIOGQF SFUGWIXLXRWVVXTZR[)] def
181/period [-5 5 (RYQZR[SZRY)] def
182/comma [-5 5 (R[QZRYSZS\\R^Q_)] def
183/colon [-5 5 (RMQNROSNRM RYQZR[SZRY)] def
184/semicolon [-5 5 (RMQNROSNRM R[QZRYSZS\\R^Q_)] def
185/exclam [-5 5 (RFQHRTSHRF RHRN RYQZR[SZRY)] def
186/question [-9 9 (MJNKMLLKLJMHNGPFSFVGWHXJXLWNVORQRT SFUGVHWJWLVNTP RYQZR[SZRY)] def
187/ring [-7 7 (QFOGNINKOMQNSNUMVKVIUGSFQF)] def
188/asterisk [-8 8 (RFRR MIWO WIMO)] def
189/parenleft [-7 5 (VBTDRGPKOPOTPYR]T`Vb TDRHQKPPPTQYR\\T`)] def
190/parenright [-5 7 (NBPDRGTKUPUTTYR]P`Nb PDRHSKTPTTSYR\\P`)] def
191/bracketleft [-7 7 (OBOb PBPb OBVB ObVb)] def
192/bracketright [-7 7 (TBTb UBUb NBUB NbUb)] def
193/braceleft [-7 7 (TBRCQDPFPHQJRKSMSOQQ RCQEQGRISJTLTNSPORSTTVTXSZR[Q]Q_Ra QSSUSWRYQZP\\P^Q`RaTb)] def
194/bar [-7 7 (PBRCSDTFTHSJRKQMQOSQ RCSESGRIQJPLPNQPURQTPVPXQZR[S]S_Ra SSQUQWRYSZT\\T^S`RaPb)] def
195/braceright [-7 7 (PBRCSDTFTHSJRKQMQOSQ RCSESGRIQJPLPNQPURQTPVPXQZR[S]S_Ra SSQUQWRYSZT\\T^S`RaPb)] def
196/hyphen [-13 13 (IR[R)] def
197/plus [-13 13 (RIR[ IR[R)] def
198/equal [-13 13 (IO[O IU[U)] def
199/less [-12 12 (ZIJRZ[)] def
200/greater [-12 12 (JIZRJ[)] def
201/asciitilde [-12 12 (IUISJPLONOPPTSVTXTZS[Q ISJQLPNPPQTTVUXUZT[Q[O)] def
202/breve [-10 10 (KFLHNJQKSKVJXHYF KFLINKQLSLVKXIYF)] def
203/quoteright [-5 5 (RHQGRFSGSIRKQL)] def
204/quotesingle [-5 5 (RHQGRFSGSIRKQL)] def
205/quoteleft [-5 5 (SFRGQIQKRLSKRJ)] def
206/asciicircum [-8 8 (PLRITL MORJWO RJR[)] def
207/percent [-12 12 ([FI[ NFPHPJOLMMKMIKIIJGLFNFPGSHVHYG[F WTUUTWTYV[X[ZZ[X[VYTWT)] def
208/ampersand [-12 13 ([NZO[P\\O\\N[MZMYNXPVUTXRZP[M[JZIXIUJSPORMSKSIRGPFNGMIMKNNPQUXWZZ[[[\\Z\\Y M[KZJXJUKSMQ MKNMVXXZZ[)] def
209/at [-13 14 (WNVLTKQKOLNMMPMSNUPVSVUUVS QKOMNPNSOUPV WKVSVUXVZV\\T]Q]O\\L[JYHWGTFQFNGLHJJILHOHRIUJWLYNZQ[T[WZYYZX XKWSWUXV)] def
210/dollar [-10 10 (PBP_ TBT_ XIWJXKYJYIWGTFPFMGKIKKLMMNOOUQWRYT KKMMONUPWQXRYTYXWZT[P[MZKXKWLVMWLX)] def
211/numbersign [-10 11 (SFLb YFRb LQZQ KWYW)] def
212/section [-8 8 (UITJUKVJVIUGSFQFOGNINKOMQOVR OMTPVRWTWVVXTZ PNNPMRMTNVPXU[ NVSYU[V]V_UaSbQbOaN_N^O]P^O_)] def
213/dagger [-8 8 (RFQHRJSHRF RFRb RQQTRbSTRQ LMNNPMNLLM LMXM TMVNXMVLTM)] def
214/daggerdbl [-8 8 (RFQHRJSHRF RFRT RPQRSVRXQVSRRP RTRb R^Q`RbS`R^ LMNNPMNLLM LMXM TMVNXMVLTM L[N\\P[NZL[ L[X[ T[V\\X[VZT[)] def
215/quotedbl [-9 9 (NFMGMM NGMM NFOGMM WFVGVM WGVM WFXGVM)] def
216/.notdef [ 0 0 () ] def		% not defined
217end
218/Hershey-Greek-Complex 4293200 0.6 0 MakeHersheyFont
219