home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Columbia Kermit
/
kermit.zip
/
archives
/
luxorabc80.tar.gz
/
luxorabc80.tar
/
kermquit.bas
< prev
next >
Wrap
BASIC Source File
|
1990-07-08
|
356b
|
13 lines
100 REM +++++++++++++++++++++++++++++++
110 REM ! Program .... KERMQUIT
120 REM ! Utg}va 1.0 87-09-20
130 REM ! av Anders Franz`n <5258>
140 REM +++++++++++++++++++++++++++++++
150 REM
160 REM Medf|r }terhopp till KERM.
170 REM
180 ; 'Tryck CTRL-C f|r BASIC,'
190 ; 'annars }ter till KERM.'
200 GET A$
210 Z%=CALL(PEEK(65063%)+256%*PEEK(65064%)+16%)