Hello all, this is a little glow/blur snippet I made for my game (see the attached file). You can add more plains if you want more glow
sync on
sync rate 60
randomize timer()
rem create a seconde camera
make camera 1 : color backdrop 1,rgb(0,0,0)
color backdrop 0
rem render the scene (use 128,256 or 512)
set camera to image 1,1,128,128
rem create 2 plains for make the glow effect
fov=62
for object=1 to 2
shift=5*object
dist#=(screen height()/2)/tan(FOV/2)-shift
make object plain object,screen width(),screen height()
ghost object on object : disable object zwrite object
set object light object,0
position object object,0,0,dist#
lock object on object
texture object object,1
hide object object
next object
rem create the scene
for c=3 to 100
if rnd(1)=0 then make object cube c,20+rnd(10) else make object sphere c,20+rnd(20)
position object c,200-rnd(400),50-rnd(100),200-rnd(400)
color object c,rgb(rnd(255),rnd(255),rnd(255))
next c
set ambient light 0 : set point light 0,0,0,0
do
set cursor 0,0 : print "fps : ",screen fps()
set cursor 0,60 : print "spacekey : glow on/off"
rem move the light
inc angle
position light 0,100*sin(angle),100*cos(angle),100*sin(angle*2)
rem move the cameras
fov#=62+10*sin(angle) : set camera fov fov# : set camera fov 1,fov#
ax#=wrapvalue(ax#+mousemovey()*0.2)
ay#=wrapvalue(ay#+mousemovex()*0.2)
rotate camera ax#,ay#,0 : rotate camera 1,ax#,ay#,0
move camera 0,(upkey()-downkey())
position camera 1,camera position x(0),camera position y(0),camera position z(0)
rem set the glow on or off
if spacekey()=1
if pressed=0
pressed=1
glow=not glow
if glow=1
for o=1 to 2 : show object o : next o
else
for o=1 to 2 : hide object o : next o
endif
endif
else
pressed=0
endif
sync
loop
