I made this for fun , so why not post it
love it or hate it
sync on : sync rate 40 : hide mouse : backdrop on : color backdrop rgb(0,0,0)
autocam off : for a=0 to 300 : dot rnd(256),rnd(256) : next a : get image 1,0,0,256,256
for i=1 to 6 : make object plain 10+i,640,480 : position object 10+i,0,0,i+100 : texture object 10+i,1 : set object transparency 10+i,1
scroll object texture 10+i,i*0.1,i*0.1 : next i : set camera fov 120 : make camera 1 : set current camera 1
color backdrop rgb(30,30,40) : set camera view 320,240,640,480 : kut#=0 : do : for i=1 to 6
scroll object texture 10+i,i*0.001,0 : next i : x#=100*cos(kut#) : z#=100+100*sin(kut#) : position camera 1,x#,0,z#
point camera 0,0,103 : sync : kut#=wrapvalue(kut#+0.5)
`oooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooo
`o o
`o i tried to write a 20-line prog but my inspiration betrayed me o
`o o
`oooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooooo
loop
