Not sure what sort of movement type you are after. Here is your code amended a little.
Rem Project: forumtest
Rem Created: Wednesday, August 18, 2010
Rem ***** Main Source File *****
set display mode 640,480,32,1
sync on
make object cube 1,5
position camera 0,100,0
point camera 0,0,0
speed=10
do
if upkey()=1
move object 1,1
endif
if downkey()=1
move object 1,-1
endif
if rightkey()=1
inc ang#,speed
yrotate object 1,curveangle(ang#+camera angle y(),object angle y(1),4)
endif
if leftkey()=1
dec ang#,speed
yrotate object 1,curveangle(ang#+camera angle y(),object angle y(1),4)
endif
sync
loop
You can change the speed variable to alter the rotation speed.
http://s6.bitefight.org/c.php?uid=103081