home *** CD-ROM | disk | FTP | other *** search
/ Club Amiga de Montreal - CAM / CAM_CD_1.iso / files / 037.lha / DU / MyType.def < prev    next >
Text File  |  1987-05-16  |  1KB  |  39 lines
  1. DEFINITION MODULE MyType;
  2.  
  3.  
  4. (* Written by Greg Browne from ideas in duIII.c - many thanks to
  5.      Chris Nicotra, Dave Jobusch, Ed Alford, and many others whose
  6.      names I have not seen on the source files who have worked on
  7.      the development and extension of that fine directory utility program.
  8.  
  9.    PURPOSE      A self-contained, IMPORTable pair of procedures to allow
  10.                 a screen display - or printer copy - in Hex or ASCII of
  11.                 any disk files.
  12.  
  13.    CHANGES      1/24/87         Built original.
  14.                 4/25/87         Added restart at beginning option.
  15.                 45/11/87        Compacted some redundant code 4 speed.
  16.  
  17.                                                                         *)
  18.  
  19. (*COMMENTS*)
  20.  
  21. (* This module tries to open the DOSLibrary for use in case it is not open.
  22.    IT DOES NOT CLOSE IT.  The user is left with that chore.             *)
  23.  
  24. (* All constants and variables are internal.  Nothing but two PROCEDURES
  25.    are available to the user.                                           *)
  26.  
  27.  
  28.  
  29. PROCEDURE DisplayASCII(VAR filnam:ARRAY OF CHAR;ToScreen:BOOLEAN);
  30. (*      Produces an ASCII dump of a file - either to the screen,
  31.          if ToScreen is TRUE, or to the PRT: device if ToScreen
  32.          is FALSE.  The filename is any literal or variable     *)
  33.  
  34. PROCEDURE DisplayHex(VAR filnam:ARRAY OF CHAR;ToScreen:BOOLEAN);
  35. (*      Same stuff only in 'filezap' style hex dump format      *)
  36.  
  37.  
  38. END MyType.
  39.