home *** CD-ROM | disk | FTP | other *** search
/ CP/M / CPM_CDROM.iso / lambda / soundpot / f / g-l.lbr / GENINFO.BZS / GENINFO.BAS
Encoding:
BASIC Source File  |  1993-10-26  |  512 b   |  13 lines
  1. %NOLIST
  2.     REMARK  MODIFIED BY J.A.WOOLLEY,12/81
  3. 700    REMARK    *******  LOAD GENERAL INFORMATION  *******
  4.     READ #Y9;G1,G2,G3.0,G4,G5,G2$(1),G2$(2),G2$(3),G2$(4),G2$(5),\
  5.     G3(1),G3(2),G3(3),G3(4),G3(5),MSTR.RECORDS,HISTORY.RECORDS,JOB.RECORDS
  6.     RETURN
  7.  
  8. 720    REMARK    *******  SAVE GENERAL INFORMATION  *******
  9.     PRINT #Y9;G1,G2,G3.0,G4,G5,G2$(1),G2$(2),G2$(3),G2$(4),G2$(5),\
  10.     G3(1),G3(2),G3(3),G3(4),G3(5),MSTR.RECORDS,HISTORY.RECORDS,JOB.RECORDS
  11.     RETURN
  12. %LIST
  13.