home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
64'er
/
64ER_CD.iso
/
sh2x
/
sh24b.d64
/
eingabe
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
1995-03-30
|
147b
|
7 lines
1 REM EINGABE - UNTERPROGRAMM
2 REM CREATED BY CHRISTOPH BERGMANN
3 REM
60000 SYS 42336:E$="":Z=512
60010 P=PEEK(Z):IF P THEN E$=E$+CHR$(P):Z=Z+1:GOTO60010
60020 RETURN