Hello Latch,
I was just about to post my progress as you posted your advice lol
I have go it to nearly work but the problem I am having I think I can fix by setting the orientation of the cone to the animal orientation like you advised so I will try that now.
Anyway here is my progress I was about to post:
rem Setup Environment
autocam off
hide mouse
sync on
rem Make Matrix
make matrix 1,5000,5000,70,70
randomize matrix 1,20
rem Texture Matrix
load bitmap "Mossy05.bmp",1
get image 1, 0,0,256,256
delete bitmap 1
prepare matrix texture 1,1,5,5
rem load Animal 1
load object "C:\Users\Ben\Desktop\Game\Models\Animal\rhino_3ds\rhino.3ds", 1
scale object 1, 10000,10000,10000
yrotate object 1,180
position object 1, 2500, 90, 2500
rem Position Camera
position camera 2500,50,2000
make object cone 2, 500
position object 2, 2495,110,2200
xrotate object 2, 90
do
rem Move Camera Forward with Arrow Keys
if upkey()=1
move camera 10
endif
if downkey()=1
move camera -10
endif
rem Turn Camera with Mouse
yang#=wrapvalue(camera angle y()+mousemovex())
yrotate camera yang#
rem turn rhino and cone
obposx# = object position x(1)
obposy# = object position y(1)
obposz# = object position z(1)
angle#=object angle y(1)
if leftkey()=1
angle#=wrapvalue(angle#-2)
x#=newxvalue(object position x(1), object angle x(1), 0)
y#=newyvalue(object position y(1), object angle y(1), 0)
z#=newzvalue(object position z(1), object angle y(1), 300)
position object 2, x#,y#+20,z#
endif
if rightkey()=1
angle#=wrapvalue(angle#+2)
x#=newxvalue(object position x(1), object angle x(1), 0)
y#=newyvalue(object position y(1), object angle y(1), 0)
z#=newzvalue(object position z(1), object angle y(1), 300)
position object 2, x#,y#+20,z#
endif
yrotate object 1,angle#
zrotate object 2,wrapvalue(angle#-180)
sync
loop
Many thanks