|
DataMuseum.dkPresents historical artifacts from the history of: DKUUG/EUUG Conference tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about DKUUG/EUUG Conference tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - downloadIndex: T b
Length: 1410 (0x582) Types: TextFile Names: »btoi.ps«
└─⟦a05ed705a⟧ Bits:30007078 DKUUG GNU 2/12/89 └─⟦ff23ba0e6⟧ »./ghostscript-1.3.tar.Z« └─⟦a24a58cd3⟧ └─⟦this⟧ »btoi.ps«
% Copyright (C) 1989 Aladdin Enterprises. All rights reserved. % Distributed by Free Software Foundation, Inc. % % This file is part of Ghostscript. % % Ghostscript is distributed in the hope that it will be useful, but % WITHOUT ANY WARRANTY. No author or distributor accepts responsibility % to anyone for the consequences of using it or for whether it serves any % particular purpose or works at all, unless he says so in writing. Refer % to the Ghostscript General Public License for full details. % % Everyone is granted permission to copy, modify and redistribute % Ghostscript, but only under the conditions described in the Ghostscript % General Public License. A copy of this license is supposed to have been % given to you along with Ghostscript so you can know your rights and % responsibilities. It should be in a file named COPYING. Among other % things, the copyright notice and this notice must be preserved on all % copies. % Convert a (fixed-pitch) bitmap font to outline form. (uglyfont.bit) %%%%%% REPLACE THIS WITH THE FILE NAME 5 dict begin 1000 string /s exch def (r) file /f exch def (%stdout) (w) file /o exch def f token pop /w exch def f token pop /h exch def w =only ( ) print h = (\n) print {f token not {exit} if =only ( ) print f token pop w h s imagecharpath pop (<) print o exch writehexstring (>\n) print flush } loop end flush quit