开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 通讯/手机编程 > 传真(Fax)编程 > 查看源码
cover.templ
资源名称：hylafax-5.3.0.tar.gz　[点击查看]
上传用户：weiyuanprp
上传日期：2020-05-20
资源大小：1169k
文件大小：10k
源码类别：

传真(Fax)编程

开发平台：

C/C++

cover.templ：源码内容
  1. %!PS-Adobe-2.0 EPSF-2.0
  2. %%BoundingBox: 21 3 588 788
  3. %%Title: 
  4. %%CreationDate: 11:05 AM January  4, 1993
  5. %%Pages: 1 +1
  6. %%EndComments
  7. % $Id: cover.templ,v 1.1.1.1 2005/11/11 21:32:03 faxguy Exp $
  8. %
  9. % HylaFAX Facsimile Software
  10. %
  11. % Copyright (c) 1990-1996 Sam Leffler
  12. % Copyright (c) 1991-1996 Silicon Graphics, Inc.
  13. % HylaFAX is a trademark of Silicon Graphics, Inc.
  14. % 
  15. % Permission to use, copy, modify, distribute, and sell this software and 
  16. % its documentation for any purpose is hereby granted without fee, provided
  17. % that (i) the above copyright notices and this permission notice appear in
  18. % all copies of the software and related documentation, and (ii) the names of
  19. % Sam Leffler and Silicon Graphics may not be used in any advertising or
  20. % publicity relating to the software without the specific, prior written
  21. % permission of Sam Leffler and Silicon Graphics.
  22. % 
  23. % THE SOFTWARE IS PROVIDED "AS-IS" AND WITHOUT WARRANTY OF ANY KIND, 
  24. % EXPRESS, IMPLIED OR OTHERWISE, INCLUDING WITHOUT LIMITATION, ANY 
  25. % WARRANTY OF MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE.  
  26. % 
  27. % IN NO EVENT SHALL SAM LEFFLER OR SILICON GRAPHICS BE LIABLE FOR
  28. % ANY SPECIAL, INCIDENTAL, INDIRECT OR CONSEQUENTIAL DAMAGES OF ANY KIND,
  29. % OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS,
  30. % WHETHER OR NOT ADVISED OF THE POSSIBILITY OF DAMAGE, AND ON ANY THEORY OF 
  31. % LIABILITY, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE 
  32. % OF THIS SOFTWARE.
  33. %
  34. 1 setlinejoin
  35. /nullstring () def
  36. /IS {
  37.     dup where {
  38. pop
  39. load dup nullstring ne {S} {pop} ifelse
  40.     } {pop} ifelse
  41. } bind def
  42. /M  { moveto } bind def /S { show  } bind def
  43. /R { rmoveto } bind def /L { lineto } bind def
  44. /B { newpath 0 0 M 0 1 L 1 1 L 1 0 L closepath } bind def
  45. /CS { closepath stroke } bind def
  47. /showcaseisoencoding [
  48. /.notdef /.notdef /.notdef /.notdef
  49. /.notdef /.notdef /.notdef /.notdef
  50. /.notdef /.notdef /.notdef /.notdef
  51. /.notdef /.notdef /.notdef /.notdef
  52. /.notdef /.notdef /.notdef /.notdef
  53. /.notdef /.notdef /.notdef /.notdef
  54. /.notdef /.notdef /.notdef /.notdef
  55. /.notdef /.notdef /.notdef /.notdef
  56. /space /exclam /quotedbl /numbersign
  57. /dollar /percent /ampersand /quoteright
  58. /parenleft /parenright /asterisk /plus
  59. /comma /minus /period /slash
  60. /zero /one /two /three /four /five /six /seven
  61. /eight /nine /colon /semicolon
  62. /less /equal /greater /question
  63. /at /A /B /C /D /E /F /G
  64. /H /I /J /K /L /M /N /O
  65. /P /Q /R /S /T /U /V /W
  66. /X /Y /Z /bracketleft
  67. /backslash /bracketright /asciicircum /underscore
  68. /quoteleft /a /b /c /d /e /f /g
  69. /h /i /j /k /l /m /n /o
  70. /p /q /r /s /t /u /v /w
  71. /x /y /z /braceleft
  72. /bar /braceright /asciitilde /guilsinglright
  73. /fraction /florin /quotesingle /quotedblleft
  74. /guilsinglleft /fi /fl /endash
  75. /dagger /daggerdbl /bullet /quotesinglbase
  76. /quotedblbase /quotedblright /ellipsis /trademark
  77. /dotlessi /grave /acute /circumflex
  78. /tilde /macron /breve /dotaccent
  79. /dieresis /perthousand /ring /cedilla
  80. /Ydieresis /hungarumlaut /ogonek /caron
  81. /emdash /exclamdown /cent /sterling
  82. /currency /yen /brokenbar /section
  83. /dieresis /copyright /ordfeminine /guillemotleft
  84. /logicalnot /hyphen /registered /macron
  85. /degree /plusminus /twosuperior /threesuperior
  86. /acute /mu /paragraph /periodcentered
  87. /cedilla /onesuperior /ordmasculine /guillemotright
  88. /onequarter /onehalf /threequarters /questiondown
  89. /Agrave /Aacute /Acircumflex /Atilde
  90. /Adieresis /Aring /AE /Ccedilla
  91. /Egrave /Eacute /Ecircumflex /Edieresis
  92. /Igrave /Iacute /Icircumflex /Idieresis
  93. /Eth /Ntilde /Ograve /Oacute
  94. /Ocircumflex /Otilde /Odieresis /multiply
  95. /Oslash /Ugrave /Uacute /Ucircumflex
  96. /Udieresis /Yacute /Thorn /germandbls
  97. /agrave /aacute /acircumflex /atilde
  98. /adieresis /aring /ae /ccedilla
  99. /egrave /eacute /ecircumflex /edieresis
  100. /igrave /iacute /icircumflex /idieresis
  101. /eth /ntilde /ograve /oacute
  102. /ocircumflex /otilde /odieresis /divide
  103. /oslash /ugrave /uacute /ucircumflex
  104. /udieresis /yacute /thorn /ydieresis ] def
  105. /Helvetica-Bold findfont
  106. dup length dict begin
  107.   {1 index /FID ne {def} {pop pop} ifelse} forall
  108.   /Encoding showcaseisoencoding def
  109.   currentdict
  110. end
  111. /Helvetica-Bold-SHOWISO exch definefont pop
  112. /Helvetica findfont
  113. dup length dict begin
  114.   {1 index /FID ne {def} {pop pop} ifelse} forall
  115.   /Encoding showcaseisoencoding def
  116.   currentdict
  117. end
  118. /Helvetica-SHOWISO exch definefont pop
  119. /Courier findfont
  120. dup length dict begin
  121.   {1 index /FID ne {def} {pop pop} ifelse} forall
  122.   /Encoding showcaseisoencoding def
  123.   currentdict
  124. end
  125. /Courier-SHOWISO exch definefont pop
  126. /Times-Bold findfont
  127. dup length dict begin
  128.   {1 index /FID ne {def} {pop pop} ifelse} forall
  129.   /Encoding showcaseisoencoding def
  130.   currentdict
  131. end
  132. /Times-Bold-SHOWISO exch definefont pop
  133. %%EndProlog
  134. %%Page: label 1
  135. newpath clippath pathbbox
  136. /URy exch def
  137. /URx exch def
  138. /LLy exch def
  139. /LLx exch def
  140. /Width  URx LLx sub 0.005 sub def
  141. /Height URy LLy sub 0.005 sub def
  142. LLx LLy translate
  143. Width 612 div Height 792 div gt
  144.     { /Y_size Height def
  145.       /X_size 612 792 div Y_size mul def
  146.       /Scale Height 792 div def }
  147.     { /X_size Width def
  148.       /Y_size 792 612 div X_size mul def
  149.       /Scale Width 612 div def } ifelse
  150. Width  X_size sub 2 div
  151. Height Y_size sub 2 div translate
  152. Scale Scale scale
  153. gsave
  154. 0 0 0 setrgbcolor
  155. gsave
  156. newpath
  157. 11.9999 3.00039 M -8.00007 787 L 618 787 L 618 3.00039 L
  158. closepath clip newpath
  159. /Helvetica-SHOWISO findfont 14 scalefont setfont
  161. % tom-baby's logo stuff:
  163. /inch {72 mul} def
  164. /width {.375 inch} def
  165. /r {.3 inch} def
  166. /d {r 30 cos mul neg} def
  167. /R {2 inch} def
  168. 1 setlinejoin
  170. /pnta { r 30 cos mul r 30 sin mul } def
  171. /pntb { R 90 cos mul d 90 sin mul sub R 90 sin mul d 90 cos mul add } def
  172. /pntc { R 30 cos mul d 30 sin mul add R 30 sin mul d 30 cos mul sub } def
  173. /pntd { r 90 cos mul r 90 sin mul } def
  174. /pnte { R 150 cos mul d 150 sin mul sub R 150 sin mul d 150 cos mul add } def
  175. /pntf { R 90 cos mul d 90 sin mul add R 90 sin mul d 90 cos mul sub } def
  176. /pntg { r 150 cos mul r 150 sin mul } def
  177. /pnth { R 210 cos mul d 210 sin mul sub R 210 sin mul d 210 cos mul add } def
  178. /pnti { R 150 cos mul d 150 sin mul add R 150 sin mul d 150 cos mul sub } def
  179. /pntj { r 210 cos mul r 210 sin mul } def
  180. /pntk { R 270 cos mul d 270 sin mul sub R 270 sin mul d 270 cos mul add } def
  181. /pntl { R 210 cos mul d 210 sin mul add R 210 sin mul d 210 cos mul sub } def
  182. /pntm { r 270 cos mul r 270 sin mul } def
  183. /pntn { R 330 cos mul d 330 sin mul sub R 330 sin mul d 330 cos mul add } def
  184. /pnto { R 270 cos mul d 270 sin mul add R 270 sin mul d 270 cos mul sub } def
  185. /pntp { r 330 cos mul r 330 sin mul } def
  186. /pntq { R 30 cos mul d 30 sin mul sub R 30 sin mul d 30 cos mul add } def
  187. /pntr { R 330 cos mul d 330 sin mul add R 330 sin mul d 330 cos mul sub } def
  189. /logo { newpath
  190.      pnta moveto pntb lineto pntc lineto pntd lineto pnte lineto
  191.      pntf lineto pntg lineto pnth lineto pnti lineto pntj lineto
  192.      pntk lineto pntl lineto pntm lineto pntn lineto pnto lineto
  193.      pntp lineto pntq lineto pntr lineto
  194.      closepath
  195. } def
  197. /drawlogo {
  198. gsave
  199.  .8 inch 10.2 inch translate
  200.  .2 .2 scale
  201.  width setlinewidth
  203.  logo stroke
  205.  width 1.13 mul setlinewidth
  206.  1 setgray
  207.  newpath
  208.  pntc moveto pntd lineto pnte lineto stroke
  209.  newpath
  210.  pnti moveto pntj lineto pntk lineto stroke
  211.  newpath
  212.  pnto moveto pntp lineto pntq lineto stroke
  214.  width setlinewidth
  215.  0 setgray
  216.  newpath
  217.  pntb moveto pntc lineto pntd lineto pnte lineto pntf lineto stroke
  218.  newpath
  219.  pnth moveto pnti lineto pntj lineto pntk lineto pntl lineto stroke
  220.  newpath
  221.  pntn moveto pnto lineto pntp lineto pntq lineto pntr lineto stroke
  223. grestore
  224. } def
  226. /drawtext {
  227. gsave
  229.  1.4 inch 10.2 inch moveto
  230.  /Helvetica-BoldOblique findfont 23 scalefont setfont
  231.  (SiliconGraphics) show
  232.  1.42 inch 9.95 inch moveto
  233.  /Helvetica-Bold findfont 14 scalefont setfont
  234.  (Computer Systems) show
  236. grestore
  237. } def
  239. /BreakIntoLines {
  240. 30 dict begin
  241.   /proc exch def
  242.   /linewidth exch def
  243.   /text exch def
  244.   /wordbreak ( ) def
  245.   /breakwidth wordbreak stringwidth pop def
  247.   /breakLines {
  248.     /textstring exch def
  249.     /curwidth 0 def
  250.     /lastwordbreak 0 def
  251.     /startchar 0 def
  252.     /restoftext textstring def
  253.     { restoftext wordbreak search % post match pre bool
  254.       exch /nextword exch def % post match bool
  255.       /wordwidth nextword stringwidth pop def % post match bool
  256.       { pop % post
  257. /restoftext exch def % -
  258. curwidth wordwidth add linewidth gt {
  259.   textstring startchar lastwordbreak startchar sub getinterval proc
  260.   /startchar lastwordbreak def
  261.   /curwidth wordwidth breakwidth add def
  262. } {
  263.   /curwidth curwidth wordwidth add breakwidth add def
  264. } ifelse
  265. /lastwordbreak lastwordbreak nextword length add 1 add def
  266.       } { exit } ifelse
  267.     } loop
  268.     curwidth wordwidth add linewidth gt {
  269.       textstring startchar lastwordbreak startchar sub getinterval proc
  270.       /startchar lastwordbreak def
  271.     } if
  272.     /lastchar textstring length def
  273.     textstring startchar lastchar startchar sub getinterval proc
  274.   } def
  276.   { text (n) search % post match pre bool
  277.     { breakLines % post match
  278.       pop % post
  279.       /text exch def % -
  280.     } { exit } ifelse % string
  281.   } loop
  282.   breakLines
  283. end
  284. } def
  286. drawlogo
  287. drawtext
  289. 0 0 0 setrgbcolor
  290. /Helvetica-Bold-SHOWISO findfont 24 scalefont setfont
  291. %164.063 644 M 168.356 644 M (Applications Consulting) S
  292. %gsave 164.063 642 M 442 642 L stroke grestore
  293. 210.875 586 M (Fax Cover Sheet) S
  294. 176.222 499 M (To:) S
  295. 226.744 499 M (________________________) S 226.744 499 M /to IS
  296. 58.3641 457 M (Fax Number:) S
  297. %108.837 457 M (Number:) S
  298. 225.744 457 M (________________________) S 225.744 457 M /to-fax-number IS
  299. /Times-Bold-SHOWISO findfont 10 scalefont setfont
  300. /Helvetica-Bold-SHOWISO findfont 24 scalefont setfont
  301. 95.5068 415 M (Company:) S
  302. 225.744 415 M (________________________) S 225.744 415 M /to-company IS
  303. 146.199 373 M (From:) S
  304. 227.744 373 M (________________________) S 227.744 373 M /from IS
  305. 176.823 331 M (Re:) S
  306. 228.744 331 M (________________________) S 228.744 331 M /regarding IS
  307. 59.3601 289 M (Today's Date:) S
  308. 231.744 289 M (________________________) S 231.744 289 M /todays-date IS
  309. 31 247 M (# of pages to follow this sheet:) S
  310. 403.216 247 M (___________) S 403.216 247 M /page-count IS
  311. /Helvetica-Bold-SHOWISO findfont 14 scalefont setfont
  312. 31 189 M (Comments:) S
  313. /Helvetica-Bold-SHOWISO findfont 24 scalefont setfont
  314. /rule (_______________________________) def
  315. /y 189 def /x 141.336 def
  316. y -29 73 { x exch M rule S } for
  317. comments rule stringwidth pop { x y M S /y y 29 sub def } BreakIntoLines
  318. grestore
  319. grestore
  320. showpage