home *** CD-ROM | disk | FTP | other *** search
/ OpenStep 4.0 (User) / OS_user_4.0.iso / NextLibrary / Fonts / Default.font / Default < prev   
Encoding:
Text File  |  1994-11-01  |  2.5 KB  |  136 lines
  1. %!
  2. %    Generated by `Ugly Font'
  3. %    FontName: Default
  4. %
  5. /newfont 16 dict def
  6. newfont begin
  7.     /FontInfo 8 dict dup begin
  8.     /version (001.001) readonly def
  9.     /FullName (Default) readonly def
  10.     /FamilyName (Default) readonly def
  11.     /Weight (Medium) readonly def
  12.     /ItalicAngle 0 def
  13.     /isFixedPitch false def
  14.     /UnderlinePosition -100 def
  15.     /UnderlineThickness 50 def
  16.     end readonly def
  17. /FontName /Default def
  18. /FullName (Default) def
  19. /FamilyName (Default) def
  20. /Weight (Medium) def
  21. /PaintType 0 def
  22. /FontType 3 def
  23. /FontMatrix [0.001 0 0 0.001 0 0] readonly def
  24. /CharProcs 256 dict def
  25. CharProcs begin
  26.     /.notdef {} def
  27.   % File: space.ufc (520) [ 0 0 0 0 ]
  28.   /Space {
  29.     % null path
  30.     } def
  31.   % File: box.ufc (520) [ 36 -4 484 664 ]
  32.   /Box {
  33.     40 660 moveto
  34.     40 0 lineto
  35.     480 0 lineto
  36.     480 660 lineto
  37.     72 628 moveto
  38.     460 628 lineto
  39.     460 20 lineto
  40.     72 20 lineto
  41.     closepath fill } def
  42.   % File: boxUp.ufc (520) [ 36 306 484 664 ]
  43.   /BoxUp {
  44.     40 660 moveto
  45.     40 310 lineto
  46.     480 310 lineto
  47.     480 660 lineto
  48.     72 628 moveto
  49.     460 628 lineto
  50.     460 330 lineto
  51.     72 330 lineto
  52.     closepath fill } def
  53.   % File: boxDown.ufc (520) [ 36 -4 484 354 ]
  54.   /BoxDown {
  55.     40 350 moveto
  56.     40 0 lineto
  57.     480 0 lineto
  58.     480 350 lineto
  59.     72 316 moveto
  60.     460 316 lineto
  61.     460 20 lineto
  62.     72 20 lineto
  63.     closepath fill } def
  64.   % File: geta.ufc (660) [ 156 126 504 554 ]
  65.   /Geta {
  66.     160 550 moveto
  67.     160 400 lineto
  68.     500 400 lineto
  69.     500 550 lineto
  70.     160 280 moveto
  71.     160 130 lineto
  72.     500 130 lineto
  73.     500 280 lineto
  74.     closepath fill } def
  75.   % File: blackBox.ufc (520) [ 36 -4 484 664 ]
  76.   /BlackBox {
  77.     72 628 moveto
  78.     460 628 lineto
  79.     460 20 lineto
  80.     72 20 lineto
  81.     closepath fill } def
  82. end % of CharProcs
  83.  
  84. /Encoding 256 array def
  85.     0 1 255 { Encoding exch /.notdef put } for
  86.     Encoding
  87.     dup 32 /Space put
  88.     dup 33 /Box put
  89.     dup 34 /BoxUp put
  90.     dup 35 /BoxDown put
  91.     dup 36 /Geta put
  92.      37 /BlackBox put
  93. % end of Encoding
  94.  
  95. /Metrics 256 dict def
  96. Metrics begin
  97.     /Space 520 def
  98.     /Box 520 def
  99.     /BoxUp 520 def
  100.     /BoxDown 520 def
  101.     /Geta 660 def
  102.     /BlackBox 520 def
  103.     /.notdef 0 def
  104. end    % Metrics
  105.  
  106. /BBox 256 dict def
  107. BBox begin
  108.     /Space [0 0 0 0] def
  109.     /Box [36 -4 484 664] def
  110.     /BoxUp [36 306 484 664] def
  111.     /BoxDown [36 -4 484 354] def
  112.     /Geta [156 126 504 554] def
  113.     /BlackBox [36 -4 484 664] def
  114.     /.notdef [0 0 0 0] def
  115. end % BBox
  116.  
  117. /FontBBox [0 -4 504 664] def
  118.  
  119. /BuildChar
  120. {
  121.     /char exch def
  122.     /fontdict exch def
  123.     /charname
  124.         fontdict /Encoding get char get
  125.             def
  126.     fontdict /Metrics get charname get 0
  127.     fontdict /BBox get charname get aload
  128.     pop
  129.     setcachedevice
  130.     fontdict /CharProcs get charname get
  131.     0 setlinewidth
  132.     exec
  133. } def
  134. end    % of newfont
  135. /Default newfont definefont pop
  136.