"Fossies" - the Fresh Open Source Software Archive 
"Fossies" - the Fresh Open Source Software Archive 1 %! 2 systemdict begin 3 % Common definitions for the Hershey fonts. 4 5 /makeHersheyFontGS993 where 6 { pop 80 string 7 { currentfile 1 index readline pop 8 (%END) eq { exit } if 9 } loop pop 10 } if 11 12 userdict begin 13 /HersheyBuildDict 10 dict def 14 15 /BuildHersheyChar { 16 exch begin 17 PenWidth setlinewidth 18 Encoding exch get 19 dup CharData exch known not { pop /.notdef } if 20 CharData exch get 21 end 22 /cd exch def 23 24 /llx 99 def /lly 99 def /urx -99 def /ury -99 def 25 true 26 27 cd 2 get { 28 exch { 29 dup 32 eq { 30 pop true 31 } { 32 82 sub cd 0 get sub 33 34 dup llx lt { 35 dup /llx exch def 36 } if 37 dup urx gt { 38 dup /urx exch def 39 } if 40 pop false 41 } ifelse 42 } { 43 neg 91 add 44 45 dup lly lt { 46 dup /lly exch def 47 } if 48 dup ury gt { 49 dup /ury exch def 50 } if 51 pop true 52 } ifelse 53 } forall pop 54 55 cd 1 get cd 0 get sub 0 llx 1 sub lly 1 sub urx 1 add ury 1 add 56 setcachedevice 57 58 /domove true def 59 true 60 61 cd 2 get { 62 exch { 63 dup 32 eq { 64 pop true 65 /domove true def 66 } { 67 82 sub cd 0 get sub 68 false 69 } ifelse 70 } { 71 neg 91 add 72 domove { 73 moveto 74 /domove false def 75 } { 76 lineto 77 } ifelse 78 true 79 } ifelse 80 } forall pop 81 82 1 setmiterlimit 1 setlinejoin 1 setlinecap 83 stroke 84 } bind def 85 86 /makeHersheyFontGS993 { 87 10 dict begin 88 /Encoding exch def 89 /ItalicAngle exch def 90 /PenWidth exch def 91 /XUID exch def 92 /UniqueID exch def 93 /FontName exch def 94 /CharData exch def 95 96 /FontType 3 def 97 /FontMatrix 98 [1 33 div 99 0 100 ItalicAngle neg dup sin exch cos div 33 div 101 1 33 div 102 0 0] def 103 /BuildChar {HersheyBuildDict begin BuildHersheyChar end} def 104 /FontBBox {-10 -10 30 30} def 105 106 FontName currentdict end definefont pop 107 } bind def 108 end % userdict 109 %END 110 111 150 dict dup begin 112 /A [-8 9 (RFJ[ RFZ[ MTWT)] def 113 /B [-10 10 (KFK[ KFTFWGXHYJYLXNWOTP KPTPWQXRYTYWXYWZT[K[)] def 114 /C [-9 11 (ZKYIWGUFQFOGMILKKNKSLVMXOZQ[U[WZYXZV)] def 115 /D [-10 10 (KFK[ KFRFUGWIXKYNYSXVWXUZR[K[)] def 116 /E [-9 9 (LFL[ LFYF LPTP L[Y[)] def 117 /F [-9 8 (LFL[ LFYF LPTP)] def 118 /G [-9 11 (ZKYIWGUFQFOGMILKKNKSLVMXOZQ[U[WZYXZVZS USZS)] def 119 /H [-10 11 (KFK[ YFY[ KPYP)] def 120 /I [-3 4 (RFR[)] def 121 /J [-7 8 (VFVVUYTZR[P[NZMYLVLT)] def 122 /K [-10 10 (KFK[ YFKT POY[)] def 123 /L [-9 7 (LFL[ L[X[)] def 124 /M [-11 12 (JFJ[ JFR[ ZFR[ ZFZ[)] def 125 /N [-10 11 (KFK[ KFY[ YFY[)] def 126 /O [-10 11 (PFNGLIKKJNJSKVLXNZP[T[VZXXYVZSZNYKXIVGTFPF)] def 127 /P [-10 10 (KFK[ KFTFWGXHYJYMXOWPTQKQ)] def 128 /Q [-10 11 (PFNGLIKKJNJSKVLXNZP[T[VZXXYVZSZNYKXIVGTFPF SWY])] def 129 /R [-10 10 (KFK[ KFTFWGXHYJYLXNWOTPKP RPY[)] def 130 /S [-9 10 (YIWGTFPFMGKIKKLMMNOOUQWRXSYUYXWZT[P[MZKX)] def 131 /T [-8 8 (RFR[ KFYF)] def 132 /U [-11 11 (KFKULXNZQ[S[VZXXYUYF)] def 133 /V [-9 10 (JFR[ ZFR[)] def 134 /W [-13 12 (HFM[ RFM[ RFW[ \\FW[)] def 135 /X [-10 10 (KFY[ YFK[)] def 136 /Y [-9 9 (JFRPR[ ZFRP)] def 137 /Z [-10 10 (YFK[ KFYF K[Y[)] def 138 /a [-8 10 (XMX[ XPVNTMQMONMPLSLUMXOZQ[T[VZXX)] def 139 /b [-9 9 (LFL[ LPNNPMSMUNWPXSXUWXUZS[P[NZLX)] def 140 /c [-8 9 (XPVNTMQMONMPLSLUMXOZQ[T[VZXX)] def 141 /d [-8 10 (XFX[ XPVNTMQMONMPLSLUMXOZQ[T[VZXX)] def 142 /e [-8 9 (LSXSXQWOVNTMQMONMPLSLUMXOZQ[T[VZXX)] def 143 /f [-4 7 (WFUFSGRJR[ OMVM)] def 144 /g [-8 10 (XMX]W`VaTbQbOa XPVNTMQMONMPLSLUMXOZQ[T[VZXX)] def 145 /h [-8 10 (MFM[ MQPNRMUMWNXQX[)] def 146 /i [-3 4 (QFRGSFREQF RMR[)] def 147 /j [-4 5 (RFSGTFSERF SMS^RaPbNb)] def 148 /k [-8 8 (MFM[ WMMW QSX[)] def 149 /l [-3 4 (RFR[)] def 150 /m [-14 15 (GMG[ GQJNLMOMQNRQR[ RQUNWMZM\\N]Q][)] def 151 /n [-8 10 (MMM[ MQPNRMUMWNXQX[)] def 152 /o [-8 10 (QMONMPLSLUMXOZQ[T[VZXXYUYSXPVNTMQM)] def 153 /p [-9 9 (LMLb LPNNPMSMUNWPXSXUWXUZS[P[NZLX)] def 154 /q [-8 10 (XMXb XPVNTMQMONMPLSLUMXOZQ[T[VZXX)] def 155 /r [-6 7 (OMO[ OSPPRNTMWM)] def 156 /s [-7 9 (XPWNTMQMNNMPNRPSUTWUXWXXWZT[Q[NZMX)] def 157 /t [-5 7 (RFRWSZU[W[ OMVM)] def 158 /u [-8 10 (MMMWNZP[S[UZXW XMX[)] def 159 /v [-7 8 (LMR[ XMR[)] def 160 /w [-11 11 (JMN[ RMN[ RMV[ ZMV[)] def 161 /x [-7 9 (MMX[ XMM[)] def 162 /y [-7 8 (LMR[ XMR[P_NaLbKb)] def 163 /z [-7 9 (XMM[ MMXM M[X[)] def 164 /zero [-10 10 (QFNGLJKOKRLWNZQ[S[VZXWYRYOXJVGSFQF)] def 165 /one [-10 10 (NJPISFS[)] def 166 /two [-10 10 (LKLJMHNGPFTFVGWHXJXLWNUQK[Y[)] def 167 /three [-10 10 (MFXFRNUNWOXPYSYUXXVZS[P[MZLYKW)] def 168 /four [-10 10 (UFKTZT UFU[)] def 169 /five [-10 10 (WFMFLOMNPMSMVNXPYSYUXXVZS[P[MZLYKW)] def 170 /six [-10 10 (XIWGTFRFOGMJLOLTMXOZR[S[VZXXYUYTXQVOSNRNOOMQLT)] def 171 /seven [-10 10 (YFO[ KFYF)] def 172 /eight [-10 10 (PFMGLILKMMONSOVPXRYTYWXYWZT[P[MZLYKWKTLRNPQOUNWMXKXIWGTFPF)] def 173 /nine [-10 10 (XMWPURRSQSNRLPKMKLLINGQFRFUGWIXMXRWWUZR[P[MZLX)] def 174 /period [-5 5 (RYQZR[SZRY)] def 175 /comma [-5 5 (SZR[QZRYSZS\\R^Q_)] def 176 /colon [-5 5 (RMQNROSNRM RYQZR[SZRY)] def 177 /semicolon [-5 5 (RMQNROSNRM SZR[QZRYSZS\\R^Q_)] def 178 /exclam [-7 7 (RFRT RYQZR[SZRY)] def 179 /question [-9 9 (LKLJMHNGPFTFVGWHXJXLWNVORQRT RYQZR[SZRY)] def 180 /quotedbl [-8 8 (NFNM VFVM)] def 181 /ring [-7 7 (QFOGNINKOMQNSNUMVKVIUGSFQF)] def 182 /dollar [-10 10 (PBP_ TBT_ YIWGTFPFMGKIKKLMMNOOUQWRXSYUYXWZT[P[MZKX)] def 183 /fraction [-11 11 ([BIb)] def 184 /parenleft [-7 5 (VBTDRGPKOPOTPYR]T`Vb)] def 185 /parenright [-5 7 (NBPDRGTKUPUTTYR]P`Nb)] def 186 /bar [-4 4 (RBRb)] def 187 /hyphen [-13 13 (IR[R)] def 188 /plus [-13 13 (RIR[ IR[R)] def 189 /equal [-13 13 (IO[O IU[U)] def 190 /periodcentered [-5 5 (RQQRRSSRRQ)] def 191 /quoteleft [-5 5 (SFRGQIQKRLSKRJ)] def 192 /quoteright [-5 5 (RHQGRFSGSIRKQL)] def 193 /numbersign [-10 11 (SBLb YBRb LOZO KUYU)] def 194 /ampersand [-13 13 (\\O\\N[MZMYNXPVUTXRZP[L[JZIYHWHUISJRQNRMSKSIRGPFNGMIMKNNPQUXWZY[[[\\Z\\Y)] def 195 /bullet [-2 2 (QPPQPSQTSTTSTQSPQP RQQRRSSRRQ)] def 196 /slash [-7 7 (K^YF)] def 197 /backslash [-7 7 (KFY^)] def 198 /underscore [-8 8 (J]Z])] def 199 /tilde [-8 8 (LTLRMPOPUSWSXR LRMQOQUTWTXRXP)] def 200 /bracketleft [-7 7 (OBOb PBPb OBVB ObVb)] def 201 /bracketright [-7 7 (TBTb UBUb NBUB NbUb)] def 202 /braceleft [-7 7 (TBRCQDPFPHQJRKSMSOQQ RCQEQGRISJTLTNSPORSTTVTXSZR[Q]Q_Ra QSSUSWRYQZP\\P^Q`RaTb)] def 203 /braceright [-7 7 (PBRCSDTFTHSJRKQMQOSQ RCSESGRIQJPLPNQPURQTPVPXQZR[S]S_Ra SSQUQWRYSZT\\T^S`RaPb)] def 204 /asterisk [-8 8 (RFRR MIWO WIMO)] def 205 /less [-12 12 (ZIJRZ[)] def 206 /greater [-12 12 (JIZRJ[)] def 207 /asciitilde [-12 12 (IUISJPLONOPPTSVTXTZS[Q ISJQLPNPPQTTVUXUZT[Q[O)] def 208 /asciicircum [-11 11 (JTROZT JTRPZT)] def 209 /breve [-10 10 (KFLHNJQKSKVJXHYF KFLINKQLSLVKXIYF)] def 210 /percent [-12 12 ([FI[ NFPHPJOLMMKMIKIIJGLFNFPGSHVHYG[F WTUUTWTYV[X[ZZ[X[VYTWT)] def 211 /at [-13 14 (WNVLTKQKOLNMMPMSNUPVSVUUVS QKOMNPNSOUPV WKVSVUXVZV\\T]Q]O\\L[JYHWGTFQFNGLHJJILHOHRIUJWLYNZQ[T[WZYYZX XKWSWUXV)] 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 /space [-4 4 ()] def 216 /quotesingle [-4 5 (SFRGRM SGRM SFTGRM)] def 217 /.notdef [ 0 0 () ] def % not defined 218 end 219 /Hershey-Plain-Simplex 5066560 [107 0 5066560] 220 0.8 0 StandardEncoding makeHersheyFontGS993 221 end