home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
64'er Special 18
/
64er_Magazin_Sonderheft_18_19xx_Markt__Technik_de_Side_A.d64
/
sonderz.802
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-10-26
|
237b
|
12 lines
10 rem --- druck von grafik ---
20 rem - auf dem mps 802-
30 open 5,4,5
40 for i=1 to 8:reada:a$=a$+chr$(a):next
50 print#5,a$
60 close 5
70 open 4,4
80 print#4,chr$(254);" 1986 by 64'er"
90 close 4
100 rem daten des sonderzeichens
110 data 60,66,153,165,165,129,66,60