If you really want to impress your mates, use real lights!
(Media attached)...
Hide Mouse
Sync On: Sync Rate 0
CLS 0
Set Spot Light 0,16,30
Color Light 0,rgb(255,255,255)
Point Light 0,0,0,0
Make Light 1
Set Point Light 1,10,10,-30
Color Light 1,rgb(5,5,5)
Load Object "wall.x",1
Scale Object 1,5000,5000,100
Position Object 1,0,0,255
Fade Object 1,1000
Make Object cone 2,1
Hide Object 2
Position Camera 0,10,-30
Point Camera 0,10,0
Set Ambient light 0
Color Backdrop 0
Do
CX#=Camera Angle X(): CY#=Camera Angle Y(): CZ#=Camera Angle Z()
CX#=Wrapvalue(CX#+mousemovey())
CY#=Wrapvalue(CY#+mousemovex())
Rotate Camera CX#,CY#,CZ#
If Mouseclick()=1 Then Move Camera 1
If Mouseclick()=2 Then Move Camera -1
Position Object 2,Camera Position X(),Camera Position Y(),Camera Position Z()
Set Object To Camera Orientation 2
Set Light To Object Position 0,2
Set Light To Object Orientation 0,2
Sync
Loop
TDK_Man