home *** CD-ROM | disk | FTP | other *** search
/ OpenStep 4.2 / Openstep-4.2-Intel-User.iso / NextLibrary / PS2Resources / Lib / Start
Encoding:
Text File  |  1997-03-29  |  5.9 KB  |  94 lines
  1. %!PS-Adobe-3.0 Resource-File
  2. %%BeginResource: file (Lib/Start)
  3. %%Title: (Lib/Start)
  4. %%Version: 0.402
  5. %%Copyright: ------------------------------------------------------------
  6. %%Copyright: Copyright 1990-1994 Adobe Systems Incorporated.
  7. %%Copyright: All rights reserved.
  8. %%Copyright:
  9. %%Copyright: Patents Pending
  10. %%Copyright:
  11. %%Copyright: NOTICE: All information contained herein is the property
  12. %%Copyright: of Adobe Systems Incorporated. Many of the intellectual
  13. %%Copyright: and technical concepts contained herein are proprietary
  14. %%Copyright: to Adobe, are protected as trade secrets, and are made
  15. %%Copyright: available only to Adobe licensees for their internal use.
  16. %%Copyright: Any reproduction or dissemination of this software is
  17. %%Copyright: strictly forbidden unless prior written permission is
  18. %%Copyright: obtained from Adobe.
  19. %%Copyright:
  20. %%Copyright: PostScript and Display PostScript are trademarks of
  21. %%Copyright: Adobe Systems Incorporated which may be registered in
  22. %%Copyright: certain jurisdictions.
  23. %%Copyright: ------------------------------------------------------------
  24. %%EndComments
  25. userdict begin/lib_extensions 40 dict def/lib_level2 systemdict/languagelevel
  26. known def lib_level2{/lib_findresource/findresource load def
  27. /lib_defineresource/defineresource load def}if end lib_level2{currentpacking
  28. currentglobal false setpacking false setglobal}if lib_extensions begin
  29. /lib_vmState 10 dict def/lib_vmDepth 0 def/lib_packingState 10 dict def
  30. /lib_packingDepth 0 def/lib_sstr1 256 string def/lib_strIncrement 128 def
  31. /lib_genericResourceDir systemdict/currentsystemparams known{
  32. currentsystemparams/GenericResourceDir known}{false}ifelse{currentsystemparams
  33. /GenericResourceDir get}{(Resource/)}ifelse def/lib_doesUPRMapping
  34. lib_genericResourceDir(%resource%)eq def/lib_genericResourceParentDir
  35. lib_doesUPRMapping{()}{lib_genericResourceDir(Resource/)search{exch pop exch
  36. pop}{()}ifelse}ifelse def/lib_fontResourceDir systemdict/currentsystemparams
  37. known{currentsystemparams/FontResourceDir known}{false}ifelse{
  38. currentsystemparams/FontResourceDir get}{(fonts/)}ifelse def/lib_classChange
  39. 14 dict begin/charstrings(Charstring)def/CID null def/demo null def/encodings
  40. (Encoding)def/FS null def/fsupp(FSupp)def/Lib null def/PGF null def/pgfonts
  41. (PGFont)def/pgfsupp(PGFSupp)def/Readme null def/Sys null def/Usr null def/temp
  42. null def currentdict end def/lib_nativeMode lib_level2{/CIDInitN/ProcSet
  43. resourcestatus{pop 0 eq/lib_compatibilityMode where{pop lib_compatibilityMode
  44. not}{true}ifelse and}{false}ifelse}{false}ifelse def lib_level2{true
  45. setpacking}if/lib_vmSaveState{lib_level2{lib_vmState lib_vmDepth currentglobal
  46. put/lib_vmDepth lib_vmDepth 1 add def setglobal}{pop}ifelse}bind def
  47. /lib_vmRestoreState{lib_level2{lib_vmDepth 0 gt{/lib_vmDepth lib_vmDepth 1 sub
  48. def lib_vmState lib_vmDepth get setglobal}if}if}bind def/lib_packingSaveState{
  49. lib_level2{lib_packingState lib_packingDepth currentpacking put
  50. /lib_packingDepth lib_packingDepth 1 add def setpacking}{pop}ifelse}bind def
  51. /lib_packingRestoreState{lib_level2{lib_packingDepth 0 gt{/lib_packingDepth
  52. lib_packingDepth 1 sub def lib_packingState lib_packingDepth get setglobal}if}
  53. if}bind def/lib_SaveVMInstances{lib_level2{false lib_vmSaveState
  54. /lib_categoryDict 0 dict def/lib_category exch def(*){/lib_instanceName exch
  55. def lib_instanceName lib_category resourcestatus pop pop dup 0 eq exch 1 eq or
  56. {lib_categoryDict lib_instanceName dup lib_category lib_findresource put}if}
  57. lib_sstr1 lib_category resourceforall lib_vmRestoreState}{pop}ifelse}bind def
  58. /lib_RestoreVMInstances{lib_level2{currentglobal lib_vmSaveState/lib_category
  59. exch def lib_categoryDict{dup gcheck setglobal lib_category lib_defineresource
  60. pop}forall lib_vmRestoreState currentdict/lib_categoryDict undef}{pop}ifelse}
  61. bind def/lib_reportStop{erasepage/Courier findfont 14 scalefont setfont 25
  62. currentpagedevice/PageSize get 1 get 36 sub moveto(%%[ Error: Sys/Start )show
  63. show( ; Offending Command: stop ]%%)show showpage}bind def/lib_Strcpy{
  64. currentdict 2 index 2 copy known{get type/dicttype ne}{pop pop true}ifelse{1
  65. index 4 lib_level2{currentglobal currentdict gcheck setglobal exch dict exch
  66. setglobal}{dict}ifelse def}if 1 index load begin/lib_strUsed 0 def
  67. /lib_strIncrement lib_strIncrement def currentdict/lib_strMaximum known not{
  68. /lib_strMaximum -1 def/lib_strText null def}if end lib_Strcat}bind def
  69. /lib_Strcat{dup type/nametype eq{lib_sstr1 cvs}if 1 index load begin dup
  70. length lib_strUsed add dup lib_strMaximum gt{dup lib_strIncrement idiv 1 add
  71. lib_strIncrement mul dup lib_level2{currentglobal currentdict gcheck setglobal
  72. exch string exch setglobal lib_strText currentdict/lib_strText undef}{string
  73. lib_strText}ifelse dup null ne{1 index copy}if pop/lib_strText exch def
  74. /lib_strMaximum exch def}if exch lib_strText exch lib_strUsed exch putinterval
  75. /lib_strUsed exch def end}bind def/lib_Strget{load begin lib_strText 0
  76. lib_strUsed getinterval end}bind def/lib_PrependRoot{count 1 lt{
  77. /lib_PrependRoot errordict/stackunderflow get exec stop}if dup type/stringtype
  78. ne{/lib_PrependRoot errordict/typecheck get exec stop}if dup(/)search{dup
  79. (fonts)eq{pop pop exch pop/lib_dstr1 lib_fontResourceDir lib_Strcpy exch
  80. lib_Strcat lib_Strget}{lib_classChange 1 index 2 copy known{lib_doesUPRMapping
  81. {get dup null ne{exch}if pop/lib_dstr1 lib_genericResourceDir lib_Strcpy exch
  82. lib_Strcat exch lib_Strcat exch lib_Strcat exch pop lib_Strget}{
  83. lib_genericResourceParentDir()ne{pop pop pop pop pop/lib_dstr1
  84. lib_genericResourceParentDir lib_Strcpy exch lib_Strcat lib_Strget}{pop pop
  85. pop pop pop}ifelse}ifelse}{pop pop pop pop pop/lib_dstr1
  86. lib_genericResourceDir lib_Strcpy exch lib_Strcat lib_Strget}ifelse}ifelse}{
  87. pop}ifelse}bind def/lib_AppendName{/lib_dstr2 exch lib_Strcpy 1 index
  88. lib_Strcat lib_Strget}bind def end userdict begin/cid_PrependRoot{
  89. lib_extensions begin lib_PrependRoot end}bind def/PrependRoot{cid_PrependRoot}
  90. bind def/cid_AppendName{lib_extensions begin lib_AppendName end}bind def
  91. /AppendName{cid_AppendName}bind def end lib_level2{setglobal setpacking}if
  92. %%EndResource
  93. %%EOF
  94.