home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
64'er Special 94
/
64er_Magazin_Sonderheft_94_19xx_Markt__Technik_de_Side_A.d64
/
demo1
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-10-26
|
231b
|
18 lines
2 (NULL) 1:print" grafik demo 1"
10 (NULL)0
20 (NULL)
30 (NULL) 3,0
40 fori=0to250
50 (NULL) i,80,o,o
60 o=o+2:ifo=>50theno=2:i=i+50
70 next
71 geta$:ifa$=""then71
75 (NULL)0:(NULL)
90 (NULL) 1
100 fori=0to99
110 (NULL) 0,i,319-i,i
120 next
130 (NULL) 0,0,319,199
135 geta$:ifa$=""then135
1010 (NULL)