home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
64'er 1989 July
/
64er_Magazin_89-07_1989_Markt__Technik_de_Side_A.d64
/
nummernspeicher
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-10-26
|
262b
|
19 lines
5 a=4
10 dima$(4)
15 dim b$(4)
20 fori=1to4
30 read a$(i)
35 readb$(i)
40 next
45 input "dateiname";r$
50 open1,8,2,r$+",s,w"
60 for i=1toa
70 print#1,a$(i)
75 print#1,b$(i)
80 next
90 close1
500 data peter, 0123/45678
510 data tanja, 0123/98765
520 data james, 0123/007
530 data katja, 0123/76543