home *** CD-ROM | disk | FTP | other *** search
/ CP/M / CPM_CDROM.iso / simtel / sigm / vols000 / vol026 / qso.bas < prev    next >
Encoding:
BASIC Source File  |  1984-04-29  |  626 b   |  20 lines
  1. 1    PRINT
  2.     PRINT "******************** QSO RECORDS *********************"
  3.     PRINT "               By WA2USS, January 1980":PRINT
  4. 2    PRINT:PRINT "Select from the following"
  5.     PRINT "    1. Scan per page and change."
  6.     PRINT " 2. Find any string."
  7.     PRINT "    3. List file (for printout)"
  8.     PRINT "    4. Enter new QSO's, sort, merge."
  9.     PRINT "    5. End (back to CP/M)"
  10.     PRINT:INPUT "Which number/item you select? ";A
  11.     IF A>0 OR A<6 THEN 3
  12.     PRINT "Select by number from '1' to '5' !":GOTO 2
  13. 3    ON A GOTO 1000, 2000, 3000, 4000, 9999
  14. %INCLUDE QSOSCAN
  15. %INCLUDE QSOFIND
  16. %INCLUDE QSOLIST
  17. %INCLUDE QSOEDIT
  18. %INCLUDE QSOMERGE
  19. 9999    END
  20.