home *** CD-ROM | disk | FTP | other *** search
- %%BeginResource: file Pscript_TextFE 5.0 0
- /FDV/FDepVector d/pd_GetAdoNotDefFont{U(AdoNotDefFont)2 copy known{get}{@ 11
- dict `/FontName 1 ^ d/FontMatrix matrix d/FontType 0 d/FMapType 2 d/Encoding[0
- 0 0 0]d/FDepVector[/NotDefFont findfont]d & E definefont @ 4 1 $ put}?}b
- /pd_FCIsCovered{@/SubsVector get @ 0 ~{add}forall 256 ge{! ! T}{length 1 sub ~
- /Encoding get ~ get F}?}b/pd_CoverFCRange{@ pd_FCIsCovered not{~ @ FDV 2 copy
- get @ 6 -1 $ pd_GetAdoNotDefFont put put}if}b/pd_IsModeSwitchAble{F
- /resourcestatus where{!/CIDParams/ProcSet 2 copy resourcestatus{! !
- findresource @/SetBuildCompatible known ~/GetBuildCompatible known and ~ 0}if !
- !}if}b/pd_LParams 8 dict d/pd_DefLocalParams{pd_LParams `/pd_InstName ~ d
- /pd_Incr 0 d @/pd_charset ~ d/pd_SwitchAble pd_IsModeSwitchAble d
- /pd_PreviousMode T d ! & E}b/pd_IsCID-KeyedFont{/resourcestatus where{!{/CMap
- resourcestatus}stopped{! ! ! F}{{! !/CIDFont resourcestatus{! ! T}{F}?}{! F}?}
- ?}{! ! F}?}b/pd_SwitchToNative{F pd_SwitchAble{!/CIDParams/ProcSet findresource
- @/GetBuildCompatible get exec F 3 -1 $/SetBuildCompatible get exec}if
- /pd_PreviousMode ~ d}b/pd_IsCIDCapable{/CIDInit/ProcSet resourcestatus @{! ! !
- T}if}b/pd_mF_Finally{fM @ 4 0 put @ 5 5 -1 $ put makefont Pscript_Windows_Font
- 3 1 $ put}b/pd_SwitchToPrevious{pd_SwitchAble{pd_PreviousMode/CIDParams/ProcSet
- findresource/SetBuildCompatible get exec}if}b/pd_fem90msnotfound{[
- (This job requires the 90ms font used in this document.)100 500 12/Times-Roman
- LH(%%[ PrinterError: font not found ]%%)= T FatalErrorIf}b/mF_FE{6 -1 $ ! 6 ^
- pd_DefLocalParams ` 2 copy pd_IsCID-KeyedFont{4 -1 $ ! 6 -1 $ !
- pd_SwitchToNative 4 ^ ~[4 -1 $]composefont ~ ! pd_mF_Finally
- pd_SwitchToPrevious}{@/90ms-RKSJ-H eq{pd_fem90msnotfound}if ! !/0 3 1 $ mF}? E}
- b
- %%EndResource
-