for DBP
I had mouse help me out with this awhile ago figgured i'd post it.
sync on : sync rate 300
gosub _return
do
if returnkey()=1
for p=1 to 4
delete particles p
next p
gosub _return
endif
if upkey()=1 then pitch camera up 5
if downkey()=1 then pitch camera down 5
if leftkey()=1 then turn camera left 5
if rightkey()=1 then turn camera right 5
sync
loop
_return:
for p=1 to 4
make particles p,0,15,15
color particles p,rnd(255),rnd(255),rnd(255)
rotate particles p,rnd(10000),rnd(10000),rnd(10000)
set particle emissions p,rnd(255)
set particle floor p,rnd(2)
set particle gravity p,10
next p
return
Use the up down right and left arrow keys to move the camera left right up or down (not in that order) and use the enter key to make new particles appear.
When we talk to god, we're praying. When god talks to us, we're schizophrenic.
Fortune never calls on those that have no balls.