home *** CD-ROM | disk | FTP | other *** search
/ Hall of Fame / HallofFameCDROM.cdr / dos / pcs.lzh / EXIT.PCS < prev    next >
Encoding:
Text File  |  1982-10-27  |  256 b   |  9 lines
  1. 1 WIDTH 80:COLOR  8,1,7:CLS:CLEAR:KEY(2) ON:ON KEY(2) GOSUB 65140
  2. 65130 E=ERR:RESUME NEXT
  3. 65140 ON ERROR GOTO 65130:RUN"menu
  4. 65150 IF E<>71 THEN RUN"control
  5. 65160 RUN"A:TRANSFER
  6. 65170 SYSTEM
  7. 30 E=ERR:RESUME NEXT
  8. 65140 ON ERROR GOTO 65130:RUN"menu
  9.