home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
64'er
/
64ER_CD.iso
/
sh2x
/
sh24a.d64
/
demo1
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
1995-03-30
|
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)