Hallo Strider...try this piece of code...Good luck !!
robertochafari@hotmail.com
`another FPS
SYNC ON
SYNC RATE 0
HIDE MOUSE
`LOAD OBJECTS TO BE USED AS WALLS
MAKE OBJECT BOX 1000,2000,100,5
POSITION OBJECT 1000,1000,0,0
ROTATE OBJECT 1000,0,90,0
MAKE OBJECT BOX 1001,2000,100,5
POSITION OBJECT 1001,-1000,0,0
ROTATE OBJECT 1001,0,90,0
MAKE OBJECT BOX 1002,2000,100,5
POSITION OBJECT 1002,0,0,1000
MAKE OBJECT BOX 1003,2000,100,5
POSITION OBJECT 1003,0,0,-1000
`LOAD OBJECTS TO BE USED AS FLOOR
MAKE OBJECT BOX 1004,2000,1,2000
`POSITION CAMERA
`POSITION CAMERA 0,500,-500
`POINT CAMERA 0,0,0
`MAKE MAIN CHARACTER
MAKE OBJECT SPHERE 1,10
COLOR OBJECT 1,RGB(000,255,000)
`START OF DO LOOP COMMAND
DO
`CONTROL CHARACTER
IF UPKEY()=1 THEN MOVE OBJECT 1,.5
IF DOWNKEY()=1 THEN MOVE OBJECT 1,-.5
IF LEFTKEY()=1 THEN TURN OBJECT LEFT 1,.7
IF RIGHTKEY()=1 THEN TURN OBJECT RIGHT 1,.7
rem ****** NEW PIECE OF CODE*****************
if leftkey() then turn camera left 0.7
if rightkey() then turn camera right 0.7
rem ****************************************
`CONTROL CAMERA TO FOLLOW OBJECT
X#=OBJECT POSITION X(1)
Y#=OBJECT POSITION Y(1)
Z#=OBJECT POSITION Z(1)
A#=OBJECT ANGLE Y(1)
D#=250.0
H#=185.0
S#=1.0
rem **************NEW PIECE OF CODE*****************
position camera x#,5,z#
move camera -20
point camera x#,5,z#
rem ***********************************************
rem SET CAMERA TO FOLLOW X#,Y#,Z#,A#,D#,H#,S#,1
`SET CAMERA TO OBJECT ORIENTATION 1
`A DIFFERENT ATTEMPT AT MAKING CAMERA
`POSITION CAMERA 0,100,100
`IF UPKEY()=1 THEN MOVE CAMERA .5
`IF DOWNKEY()=1 THEN MOVE CAMERA -.5
`IF LEFTKEY()=1 THEN TURN CAMERA LEFT .7
`IF RIGHTKEY()=1 THEN TURN CAMERA RIGHT -.7
SYNC
LOOP
oh my god
