home *** CD-ROM | disk | FTP | other *** search
/ jppd.dyndns.org / jppd.dyndns.org.tar / jppd.dyndns.org / QUERYPRO / Impressora_PDF / converter.exe / GPLGS / decrypt.ps < prev    next >
Text File  |  2002-02-22  |  369b  |  16 lines
  1. %!
  2. % Decrypt an eexec-encoded file.
  3. % $Id: decrypt.ps,v 1.6 2002/02/21 21:49:28 giles Exp $
  4.  
  5. (t.in) (r) file /in exch def
  6. (t.out) (w) file /out exch def
  7. 256 string /buf exch def
  8. 55665        % eexec encryption seed
  9.  { in buf readhexstring /more exch def
  10.    dup .type1decrypt out exch writestring
  11.    more not { exit } if
  12.  } loop
  13. in closefile
  14. out closefile
  15. quit
  16.