home *** CD-ROM | disk | FTP | other *** search
/ ftp.barnyard.co.uk / 2015.02.ftp.barnyard.co.uk.tar / ftp.barnyard.co.uk / cpm / walnut-creek-CDROM / CPM / PROGRAMS / LIST / HB15-PT1.ARK / BANNER.VAR < prev    next >
Text File  |  1986-10-21  |  896b  |  23 lines
  1. { Copyright (C) 1986 Adam Fritz, 133 Main St., Afton, N.Y. 13730 }
  2.  
  3. var
  4.                                 { banner variables }
  5.      iBanner        : integer ;
  6.      nBanner        : integer ;
  7.      Banner         : string[128] ;
  8.      NBLines        : integer ;
  9.                                 { font name }
  10.      fName          : NAME ;
  11.                                 { font index }
  12.      fiName         : string[15] ;
  13.      fiID           : text ;
  14.      fIndex         : array[0..127] of fINDEXn ;
  15.                                 { font data }
  16.      fdName         : string[15] ;
  17.      fdID           : file ;
  18.      fOffset        : integer ;
  19.      fData          : array[0..32767] of byte ;
  20.      nRec           : integer ;
  21.  
  22. { Copyright (C) 1986 Adam Fritz, 133 Main St., Afton, N.Y. 13730 }
  23.