use the arrow keys up / down to move the light
change the colour of the light and fiddle to make it how you want it to appear.
sync on
sync rate 60
set ambient light 20
color ambient light rgb(255,255,255)
color backdrop rgb(50,50,80)
ink rgb(155,255,155),1
box 0,0,32,32
get image 1,0,0,32,32
make matrix 1,200,200,50,50
position matrix 1,-100,0,-100
prepare matrix texture 1,1,1,1
set matrix 1,0,0,1,1,1,1,1
update matrix 1
make object cube 1,5
position object 1,0,0,0
position light 0,0,50,-50
set directional light 0,0,50,-50
point light 0,0,0,0
color light 0,rgb(255,255,0)
make light 1
set spot light 1,45,101
color light 1,rgb(255,255,255)
position light 1,0,30,0
point light 1,0,0,0
set light range 1,90
set normalization off
position camera 0,60,-60
point camera 0,0,0
disable escapekey
while escapekey()=0
if upkey()=1
move object 1,1
endif
if downkey()=1
move object 1,-1
endif
position light 1,object position x(1),30 + object position y(1),object position z(1)
point light 1,object position x(1),object position y(1),object position z(1)
sync
endwhile
delete matrix 1
delete object 1
delete light 1
end
