How to create a glow effect

Blitz3D Forums/Blitz3D Programming/How to create a glow effect

Rook Zimbabwe
 #1
I had this in my archives:
Open in online IDE
Graphics3D 800,600,16,2
SetBuffer BackBuffer()
 
camera=CreateCamera()
MoveEntity camera,0,0,-30

planet=CreateSphere()

glow=CreateSprite()

ScaleSprite glow,2,2 ; cange the scale for more or less glow

light=CreateLight(2)
MoveEntity light,100,100,-100


tex=CreateTexture(64,64,48+2+512)
SetBuffer TextureBuffer(tex)
For i=1 To 64
	Color i*3,i*3,i*4
	Oval i/2,i/2,64-i,64-i,1
Next
EntityTexture glow,tex
EntityBlend glow,3

While Not KeyHit(1)


	PositionEntity glow,EntityX(planet),EntityY(planet),EntityZ(planet)
	PointEntity glow,camera
	MoveEntity glow,0,0,-.5

If KeyDown(200) = True Then ; UP ARROW
	y = y + 1
	MoveEntity planet,0,y,0
EndIf

If KeyDown(208) = True Then ; DOWN ARROW
	y = y - 1
	MoveEntity planet,0,y,0
EndIf
If y > 12 Then y = 12
If y < -12 Then y = -12

UpdateWorld
RenderWorld

Color 255,255,255

Text 0,0,"PLANET X: "+EntityX(planet)
Text 20,20,"PLANET Y: "+EntityY(planet)

Flip

Wend

End
Anyone know why the text refuses to print???