Ill post this here to save another topic
Can anyone see whats wrong with this, probably something I have overlooked but I remember something similar to this working in dbc,
make object cube 1,1
hide mouse
y=0
do
position mouse 320,240
camx = camera position x()
camz = camera position z()
camangy = camera angle y()
Rem Camera Input
if inkey$()="w"
x = newxvalue(camx,camangy,0.1)
z = newzvalue(camz,camangy,0.1)
endif
if inkey$()="s"
x = newxvalue(camx,wrapvalue(camangy-180),0.1)
z = newzvalue(camz,wrapvalue(camangy-180),0.1)
endif
If inkey$()="a"
x = newxvalue(camx,wrapvalue(camangy-90),0.1)
z = newzvalue(camz,wrapvalue(camangy-90),0.1)
Endif
if inkey$()="d"
x = newxvalue(camx,wrapvalue(camangy+90),0.1)
z = newzvalue(camz,wrapvalue(camangy+90),0.1)
endif
rem Rotate Camera
yrotate camera camera angle y() + mousemovex()*0.3
xrotate camera camera angle x() + mousemovey()*0.3
position camera x,y,z
sync
loop
I just wanted to get it working again
Thanks RefuG