home *** CD-ROM | disk | FTP | other *** search
/ Columbia Kermit / kermit.zip / luxorabc80 / kermquit.bas < prev    next >
BASIC Source File  |  2020-01-01  |  356b  |  13 lines

  1. 100 REM +++++++++++++++++++++++++++++++
  2. 110 REM ! Program ....   KERMQUIT
  3. 120 REM ! Utg}va  1.0    87-09-20
  4. 130 REM ! av Anders Franz`n <5258>
  5. 140 REM +++++++++++++++++++++++++++++++
  6. 150 REM
  7. 160 REM Medf|r }terhopp till KERM.
  8. 170 REM
  9. 180 ; 'Tryck CTRL-C f|r BASIC,'
  10. 190 ; 'annars }ter till KERM.'
  11. 200 GET A$
  12. 210 Z%=CALL(PEEK(65063%)+256%*PEEK(65064%)+16%)
  13.