home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Sauce 'n' Code 3
/
sauce-n-code-03.adf
/
Source_Code
/
Planet_Squarez.asc
< prev
next >
Wrap
Text File
|
1996-01-21
|
560b
|
31 lines
' Planet M. Squarez
' cODED bY ßudda/NFA
' StARtEd : 15/10/1995
' FiNiSHed: 15/10/1995
' Idea from the start of "Planet M." demo by Melon!
'
Screen Open 0,336,256,16,Lowres
Flash Off
Curs Off
Hide On
Palette $0,$111,$222,$333,$444,$555,$666,$777,$888,$999,$AAA,$BBB,$CCC,$DDD,$EEE,$FFF
For Y=0 To Screen Height Step 8
For X=0 To Screen Width Step 8
Ink Rnd(15)
Bar X,Y To X+8,Y+8
Next X
Next Y
Shift Down 4,0,15,1
' Because the routine requires NO code to keep running you can use it
' to make a blank screen intresting whilst loading a file!