like this:
sync on
sync rate 40
line 40,0,40,38
line 40,42,40,80
line 0,40,38,40
line 42,40,80,40
circle 40,40,25
get image 1,0,0,95,95,1
cls
hide mouse
autocam off
make matrix 1,2000,2000,10,10
position matrix 1,-1000,0,0
for x=1 to 10
make object box x,rnd(200)+50,rnd(200)+50,rnd(200)+50
position object x,rnd(2000)-1000,50,rnd(1500)+500
next x
position camera 0,100,0
fov#=90
x#=0
y#=0
sprite 1,screen width()/2,screen height()/2,1
offset sprite 1,sprite width(1)/2,sprite height(1)/2
do
x#=wrapvalue(x#+mousemovey()*fov#/100)
y#=wrapvalue(y#+mousemovex()*fov#/100)
if upkey()=1 then move camera 5
if downkey()=1 then move camera -5
if spacekey()=0 then spacepressed=0
if spacekey() and spacepressed=0
spacepressed=1
zoom=1-zoom
endif
if zoom and spacekey()
fov#=curvevalue(5,fov#,15)
endif
if zoom=0
fov#=curvevalue(90,fov#,10)
endif
set camera fov fov#
rotate camera x#,y#,0
sync
loop
I bet you could of figured that out.