Mmmmmmm. Vomit....
` vomit v1.0
` for the official sofa thread
sync on : sync rate 60 : autocam off
for f=0 to 63
for g=0 to 63
ink rgb(255,rnd(255),rnd(255)),0
dot f,g
next g
next f
get image 1,0,0,64,64
make object sphere 1,10
color object 1,RGB(255,128,128)
make object plain 2,5,20
move object 2,5
move object down 2,11
pitch object up 2,10
texture object 2,1
make object sphere 3,1.5
position object 3,-1.5,1.1,-4
make object sphere 4,1.5
position object 4,1.5,1.1,-4
make object sphere 5,1
position object 5,0,0,-5
color object 5,rgb(0,0,0)
position camera 0,0,-15
do
control camera using arrowkeys 0,1,1
scroll object texture 2,0,-0.005
sync
loop
Boo!