🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Thread View: comp.lang.postscript
1 messages
1 total messages Started by mcsbc4sg Fri, 20 Nov 1992 12:43
PROBLEM -- Bitmap fonts
#5761
Author: mcsbc4sg
Date: Fri, 20 Nov 1992 12:43
113 lines
4632 bytes
Hello,

Can anyone help me ..... I am trying to creat 8x16 bitmap fonts.

I copied the method of generating the fonts from the PostScript Tutorial and
Cookbook but the program does not want to work!!!

I even typed in the example program ...still no joy (same errors though).

Is there a subtle error in the file? 

Or can anyone suggest a method that works for creating bitmap fonts??

advTHANXance.

Stephen.

----------------------------------------------------

The errors....

Error: /invalidfont in [/.notdef ......../.notdef]
Operand stack:
    -dicttype-  /Bitfont
Execution stack:
    operator_200539ec    --nostringval--  --nostringval--  false
--nostringval-
-  --nostringval--  false  --nostringval--  --nostringval--  --nostringval--
Dictionary stack:
    337/401  3/200



here is the program ........

 
%!PS-Adobe-3.0
9 dict dup begin

/FontType 3 def
/FontMatrix [1 0 0 1 0 0] def
/FontBBox [0 0 0 0] def % do not make assumptions about bbox
/Encoding 256 array def
0 1 255 {Encoding exch /.notdef put} for
Encoding
dup  65 /A put dup  66 /B put dup  67 /C put dup  68 /D put 
dup  69 /E put dup  70 /F put dup  71 /G put dup  72 /H put dup  73 /I put 
dup  74 /J put dup  75 /K put dup  76 /L put dup  77 /M put dup  78 /N put 
dup  79 /O put dup  80 /P put dup  81 /Q put dup  82 /R put dup  83 /S put 
dup  84 /T put dup  85 /U put dup  86 /V put dup  87 /W put dup  88 /X put 
dup  89 /Y put dup  90 /Z put 

%% this builds a character when not found in the font cache
%% (thats what it said in the book!!)

/BuildChar
{0 begin
  /char exch def
  /fontdict exch def
  /charname fontdict /Encoding get char get def
  /charinfo fontdict /CharData get charname get def
  /wx charinfo 0 get def
  /charbbox charinfo 1 4 getinterval def
  wx 0 charbbox aload pop setcachedevice
  charinfo 5 get charinfo 6 get true
  fontdict /imagemaskmatrix get
    dup 4 charinfo 7 get put
    dup 5 charinfo 8 get put
  charinfo 9 1 getinterval cvx
  imagemask
 end
} def

/BuildChar load 0 6 dict put
/imagemaskmatrix [8 0 0 -16 0 0] def

/CharData 27 dict def
CharData begin
 /A [.64 .04 0 .56 .56 8 16 0 15.5 <0000183c6666667e6666666666000000>] def
 /B [.64 .04 0 .56 .56 8 16 0 15.5 <0000fc6666667c6666666666fc000000>] def
 /C [.64 .04 0 .56 .56 8 16 0 15.5 <00003c6666606060606066663c000000>] def
 /D [.64 .04 0 .56 .56 8 16 0 15.5 <0000f8646666666666666664f8000000>] def
 /E [.64 .04 0 .56 .56 8 16 0 15.5 <00007e626060607c606060627e000000>] def
 /F [.64 .04 0 .56 .56 8 16 0 15.5 <0000fe6260607c6060606060f0000000>] def
 /G [.64 .04 0 .56 .56 8 16 0 15.5 <00003c6260606e66666666663c000000>] def
 /H [.64 .04 0 .56 .56 8 16 0 15.5 <0000666666667e666666666666000000>] def
 /I [.64 .04 0 .56 .56 8 16 0 15.5 <00003c1818181818181818183c000000>] def
 /J [.64 .04 0 .56 .56 8 16 0 15.5 <00001e0606060606066666663c000000>] def
 /K [.64 .04 0 .56 .56 8 16 0 15.5 <0000ccccccc8f0c8ccccccccce000000>] def
 /L [.64 .04 0 .56 .56 8 16 0 15.5 <0000606060606060606060627e000000>] def
 /M [.64 .04 0 .56 .56 8 16 0 15.5 <0000c6c6eeeed6d6d6c6c6c6c6000000>] def
 /N [.64 .04 0 .56 .56 8 16 0 15.5 <000066666676766e6e66666666000000>] def
 /O [.64 .04 0 .56 .56 8 16 0 15.5 <00003c6666666666666666663c000000>] def
 /P [.64 .04 0 .56 .56 8 16 0 15.5 <0000fc666666667c60606060f0000000>] def
 /Q [.64 .04 0 .56 .56 8 16 0 15.5 <00003c666666666666666a643a010000>] def
 /R [.64 .04 0 .56 .56 8 16 0 15.5 <0000f8ccccccf8ccccccccccce000000>] def
 /S [.64 .04 0 .56 .56 8 16 0 15.5 <00003a66626030180c0646665c000000>] def
 /T [.64 .04 0 .56 .56 8 16 0 15.5 <00007e5a181818181818181818000000>] def
 /U [.64 .04 0 .56 .56 8 16 0 15.5 <0000e66666666666666666663c000000>] def
 /V [.64 .04 0 .56 .56 8 16 0 15.5 <0000e666666666666664687060000000>] def
 /W [.64 .04 0 .56 .56 8 16 0 15.5 <0000c6c6c6c6d6d6d6feeec682000000>] def
 /X [.64 .04 0 .56 .56 8 16 0 15.5 <00006666243c18183c24666666000000>] def
 /Y [.64 .04 0 .56 .56 8 16 0 15.5 <000066666666663c181818183c000000>] def
 /Z [.64 .04 0 .56 .56 8 16 0 15.5 <00007e460c0c1818303060627e000000>] def
 /.notdef [.64 0 0 0 0 1 0 0 <>] def
end
/UniqueID 2 def
end
/Bitfont exch definefont pop

/Bitfont findfont 12 scalefont setfont
72 500 moveto (HELLOTHERE) show
showpage
Thread Navigation

This is a paginated view of messages in the thread with full content displayed inline.

Messages are displayed in chronological order, with the original post highlighted in green.

Use pagination controls to navigate through all messages in large threads.

Back to All Threads