home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
64'er Special 9
/
64er_Magazin_Sonderheft_09_86-09_1986_Markt__Technik_de_Side_A.d64
/
c64.input#.bas
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-10-26
|
237b
|
15 lines
1 x$="123456789,"
2 for i=1 to 25:y$=y$+x$:next
3 y$=y$+"12345"
4 :
5 rem *** string schreiben ***
10 open 1,8,2,"test,s,w"
20 print#1,y$
30 close1
40 :
45 rem *** string lesen ***
50 open 1,8,2,"test,s,r"
60 sys 49152,1,a$
70 close 1
80 print a$