Camera - GameCreators Forum

Author

Message

Indicium

16

Years of Service

User Offline

Joined: 26th May 2008

Location:

Posted: 6th Jun 2009 01:03

Link

Hello, im not too good with 3d, but i want to learn,

ive written this bit of code but ive ran into, what i think, is a strange problem.

+ Code Snippet

Make Matrix 1,500,500,50,50
sync on: sync rate 50
make object cube 1,20

do
gosub Getinput
gosub Movementandcamera
sync
loop

getinput:
if upkey()=1 then up=1 else up=0
if rightkey()=1 then right=1 else right=0
if leftkey()=1 then left=1 else left=0
return

movementandcamera:
if right=1 then turn object right 1,1
if left=1 then turn object left 1,1
if up=1 then move object 1,1

set camera to follow object position x(1), object position y(1), object position z(1),object angle y(1),100,20,1,1
return

if you ran this you would see that once you pass around 180 degrees the camera turns in the wrong direction. can anybody please explain this? thanks

Omricon W.I.P

Back to top

Profile PM

Kira Vakaan

15

Years of Service

User Offline

Joined: 1st Dec 2008

Location: MI, United States

Posted: 6th Jun 2009 08:28

Link

Your problem exists in the commands you use to turn the cube. The turn object right, left, etc commands are intended to rotate an object independent of any axis. And so, when doing something so seemingly harmless as turning the cube left, you could actually be affecting all three axes. Actually, that's exactly what happens. In this case, when you turn the cube right or left to +/- 90 degrees, the object's angles about the other two axes flip. I'd just avoid this by using something like this to turn your cube:

+ Code Snippet

`Turn the cube right
yrotate object 1,wrapvalue(object angle y(1)+1)

Back to top

Profile PM Email

Vathelokai

15

Years of Service

User Offline

Joined: 3rd May 2009

Location:

Posted: 6th Jun 2009 09:03

Link

It's the "set camera to follow" command that is causing it. The angle you are providing "object angle y(1)" should be changed to something else, but I'm not sure what. Changing it to "180" gave better results, but still not great.

...

Try this version. I think it's what you are looking for.

+ Code Snippet

Make Matrix 1,500,500,50,50
sync on
make object cube 1,20
position object 1, 250, 10, 250

do

if upkey()=1 then up=1
if downkey()=1 then up=-1
if upkey()=0 and downkey()=0 then up=0

if rightkey()=1 then rotate=rotate+1
if leftkey()=1 then rotate=rotate-1
if rotate>360 then rotate=0
if rotate<0 then rotate=360

rotate object 1, 0, rotate, 0
move object 1,up

set camera to follow object position x(1), object position y(1), object position z(1), rotate, 200,50,10,1
sync
loop

Back to top

Profile PM

Indicium

16

Years of Service

User Offline

Joined: 26th May 2008

Location:

Posted: 6th Jun 2009 15:47

Link

Thank you Kira Vakaan
that bit of code worked perfectly
ill remember not to use turn object in the future

Omricon W.I.P

Back to top

Profile PM

Kira Vakaan

15

Years of Service

User Offline

Joined: 1st Dec 2008

Location: MI, United States

Posted: 6th Jun 2009 20:15

Link

@Vathelokai:

Quote: "It's the "set camera to follow" command that is causing it."

It's not. Your snippet works fine like this:

+ Code Snippet

Make Matrix 1,500,500,50,50
sync on
make object cube 1,20
position object 1, 250, 10, 250

do

up=0
if upkey()=1 then up=1
if downkey()=1 then up=-1

if rightkey()=1 then rotate=wrapvalue(rotate+1)
if leftkey()=1 then rotate=wrapvalue(rotate-1)

rotate object 1, 0, rotate, 0
move object 1,up

set camera to follow object position x(1), object position y(1), object position z(1),object angle y(1), 200,50,10,1
sync
loop

@Mad Nightmare:
Glad that did the trick.

But I didn't mean to turn you off to those functions entirely. I mean, they do have their uses.

Back to top

Profile PM Email

Indicium

16

Years of Service

User Offline

Joined: 26th May 2008

Location:

Posted: 7th Jun 2009 17:07 Edited at: 7th Jun 2009 17:11

Link

hey, this is the same code, but ive added to it, so i guessed i should post here too. well ive changed the cube to a cone so i can see what direction its facing, but unless its just my comp, the cone seems to be disappearing..

help please?

+ Code Snippet

Make Matrix 1,500,500,50,50
sync on: sync rate 60
make object cone 1,20
xrotate object 1,90
fix object pivot 1

do
sync
gosub Getinput
gosub Movementandcamera
loop

getinput:
if upkey()=1 then up=1 else up=0
if rightkey()=1 then right=1 else right=0
if leftkey()=1 then left=1 else left=0
if inkey$()="a" then a=1 else a=0
if inkey$()="d" then d=1 else d=0
return

movementandcamera:
if right=1 then yrotate object 1,wrapvalue(object angle y(1)+1)
if left=1 then yrotate object 1,wrapvalue(object angle y(1)-1)
if up=1 then move object 1,1

if a=1 then zrotate object 1,wrapvalue(object angle z(1)-1)
if d=1 then zrotate object 1,wrapvalue(object angle z(1)+1)

set camera to follow object position x(1), object position y(1), object position z(1),object angle y(1),100,20,1,1
return

Edit:
I removed the pivot code and it works fine, any ideas?

Omricon W.I.P

Back to top

Profile PM

Indicium

16

Years of Service

User Offline

Joined: 26th May 2008

Location:

Posted: 7th Jun 2009 17:14

Link

ahh, now i have problems with this, same problem, its disappearing.

+ Code Snippet

Make Matrix 1,500,500,50,50
sync on: sync rate 60
make object cone 1,20
`xrotate object 1,90
`fix object pivot 1
autocam on

do
sync
gosub Getinput
gosub Movementandcamera
loop

getinput:
if upkey()=1 then up=1 else up=0
if rightkey()=1 then right=1 else right=0
if leftkey()=1 then left=1 else left=0

if inkey$()="a" then a=1 else a=0
if inkey$()="d" then d=1 else d=0
if inkey$()="s" then s=1 else s=0
if inkey$()="w" then w=1 else w=0
return

movementandcamera:
if right=1 then yrotate object 1,wrapvalue(object angle y(1)+1)
if left=1 then yrotate object 1,wrapvalue(object angle y(1)-1)
if up=1 then move object 1,1

if a=1 then zrotate object 1,wrapvalue(object angle z(1)-1)
if d=1 then zrotate object 1,wrapvalue(object angle z(1)+1)
if s=1 then xrotate object 1,wrapvalue(object angle x(1)+1)
if w=1 then xrotate object 1,wrapvalue(object angle x(1)-1)

set camera to follow object position x(1), object position y(1), object position z(1),object angle y(1),100,20,1,1
return

Omricon W.I.P

Back to top

Profile PM

bobbel

15

Years of Service

User Offline

Joined: 5th Jan 2009

Location: In my DBPro case xD

Posted: 7th Jun 2009 17:55

Link

the cone has no bottom face. that means, it has no polygon at its bottom. if you make the cone a box, you'll see that it just works. if you want to use a cone, make one in a moddeling program and make sure it has a bottom polygon cause dbp doesn;t generate one.

*ding ding*

Back to top

Profile PM Website

Indicium

16

Years of Service

User Offline

Joined: 26th May 2008

Location:

Posted: 7th Jun 2009 20:46

Link

oh right, thanks

Omricon W.I.P

Back to top

Profile PM

Sorry your browser is not supported!

Newcomers DBPro Corner / Camera