diff options
Diffstat (limited to 'font/devps/symbolsl.ps')
| -rw-r--r-- | font/devps/symbolsl.ps | 42 |
1 files changed, 42 insertions, 0 deletions
diff --git a/font/devps/symbolsl.ps b/font/devps/symbolsl.ps new file mode 100644 index 0000000..ac3810e --- /dev/null +++ b/font/devps/symbolsl.ps @@ -0,0 +1,42 @@ +%!PS-Adobe-3.0 Resource-Font +%%DocumentNeededResources: font Symbol +%%EndComments + +% newfontname matrix oldfontname MakeTransformedFont + +/MakeTransformedFont { + findfont dup maxlength dict begin + { + exch dup dup /FID ne exch /UniqueID ne and { + exch def + } { + pop pop + } ifelse + } forall + % first copy FontBBox + /FontBBox + % FontBBox sometimes seems to have the executable + % attribute set + % so to get the array on the stack, we have to do this + currentdict /FontBBox get + 4 array copy def + % now transform it + FontBBox aload pop + 4 index transform 4 2 roll + 4 index transform 4 2 roll + FontBBox astore pop + % matrix + % now transform FontMatrix + FontMatrix exch matrix concatmatrix + /FontMatrix exch def + dup /FontName exch def + currentdict end + definefont pop +} bind def + +%%IncludeResource: font Symbol + +/Symbol-Slanted +[.89 0.0 15.5 dup sin exch cos div .89 0.0 0.0] +/Symbol +MakeTransformedFont |