Animation/Camera Problem - GameCreators Forum

Author

Message

castek

17

Years of Service

User Offline

Joined: 15th Aug 2007

Location: Right behind you!

Posted: 10th Feb 2009 18:35

Link

Hey guys! I have a problem, I want to make a 3d model of a guy walk around it was already animated (I got it from fpsc) so I got the walking easily enough but then i decide to make it jump but when I try to make it jump it doesn't work.

sync on
sync rate 60
make matrix 1,600,600,30,30

`Setting up the variables
up=0
down=0
space=0
jump=0

`Load Object and add animation data
load object "C:\Program Files\The Game Creators\FPS Creator\Files\entitybank\ww2\characters\officer.X", 1
append object "C:\Program Files\The Game Creators\FPS Creator\Files\entitybank\ww2\characters\officer.X",1,total object frames(1)+1

`___________________________
`MAIN LOOP
`---------------------------

do

`Controls
if upkey ()= 1 then up=1
if upkey ()= 0 then up=0
if downkey()=1 then down = 1
if downkey()=0 then down = 0
if spacekey()=1 then space=1
if Spacekey()=0 then space=0

`Animation
if up=1 or down=1
   loop object 1,235,257
   else up=0 and down=0
   if up=0 or down=0 then stop object 1
   if up=0 or down=0 then set object frame 1,228
endif

`Moving
if down=1 and space=0 then move object 1,3
if up=1 And Space=0 then move object 1,-4
if leftkey ()= 1 then turn object left 1, 2
if rightkey ()= 1 then turn object right 1, 2

`___________________________
`JUMPING

if space=1
   play object 1,190,209
else space=0

`___________________________
   `CAMERA
`___________________________

set camera to follow object position x(1),object position y(1),object position z(1),45,170,100,10,1

endif
sync
loop

+ Code Snippet

sync on
sync rate 60
make matrix 1,600,600,30,30



`Setting up the variables
up=0
down=0
space=0
jump=0

`Load Object and add animation data
load object "C:\Program Files\The Game Creators\FPS Creator\Files\entitybank\ww2\characters\officer.X", 1
append object "C:\Program Files\The Game Creators\FPS Creator\Files\entitybank\ww2\characters\officer.X",1,total object frames(1)+1



`___________________________
`MAIN LOOP
`---------------------------

do


`Controls
if upkey ()= 1 then up=1
if upkey ()= 0 then up=0
if downkey()=1 then down = 1
if downkey()=0 then down = 0
if spacekey()=1 then space=1
if Spacekey()=0 then space=0


`Animation
if up=1 or down=1
   loop object 1,235,257
   else up=0 and down=0
   if up=0 or down=0 then stop object 1
   if up=0 or down=0 then set object frame 1,228
endif

`Moving
if down=1 and space=0 then move object 1,3
if up=1 And Space=0 then move object 1,-4
if leftkey ()= 1 then turn object left 1, 2
if rightkey ()= 1 then turn object right 1, 2



`___________________________
`JUMPING

if space=1
   play object 1,190,209
else space=0


`___________________________
   `CAMERA
`___________________________


set camera to follow object position x(1),object position y(1),object position z(1),45,170,100,10,1

endif
sync
loop

the problem is that when I hold space it will just freeze on 1 frame in mid air and it looks wierd. Also another smaller problem is that I cant get the camera too turn with the guy any help would be apreciated

I'll post the model but I'm not sure if I'm allowed to since it's from fpsc.

"The Beginning is the end."
Windows Vista Ultimate SP1
INTEL PENTIUM DUAL E2200 2.2 GHz 2 Gb RAM GeForce 9600 512 mb

Back to top

Profile PM Email

ShaunRW

DBPro Developer

16

Years of Service

User Offline

Joined: 7th Jan 2008

Location: Brisbane, Australia

Posted: 11th Feb 2009 07:48

Link

It freezes on one frame because it checks if space=1 every loop and replays animation every time space=1.

Maybe change it to something like this?

+ Code Snippet

if space=1 and animation playing(1)=0
	play object 1,19,209
endif

Back to top

Profile PM Email

castek

17

Years of Service

User Offline

Joined: 15th Aug 2007

Location: Right behind you!

Posted: 11th Feb 2009 16:49 Edited at: 11th Feb 2009 23:59

Link

it gives me an error saying that the animation doesn't exist.

EDIT:

I'm Pretty sure that command only works with a video file and not an actual 3d model animation. since it's in the same folder as load animation and it's not under basic3D

Snippet from help file

+ Code Snippet

LOAD ANIMATION 

This command loads an animation file into the specified animation number. The animation file must be of the MPEG, AVI, Quicktime, 
WAV, AIFF, AU or SND format.

"The Beginning is the end."
Windows Vista Ultimate SP1
INTEL PENTIUM DUAL E2200 2.2 GHz 2 Gb RAM GeForce 9600 512 mb

Back to top

Profile PM Email

=PRoF=

21

Years of Service

User Offline

Joined: 17th Mar 2003

Location: Milton Keynes, UK

Posted: 13th Feb 2009 00:11 Edited at: 13th Feb 2009 00:12

Link

just use a variable as a flag

+ Code Snippet

if space=1 and jumping=0
    play object 1,19,209
    jumping=1
endif

Just remember to reset jumping back to 0 when he's landed back on the ground

Without Music or Love the world would be a very empty place... Thank god I still have music.. --'-<@

Back to top

Profile PM Email Website

castek

17

Years of Service

User Offline

Joined: 15th Aug 2007

Location: Right behind you!

Posted: 13th Feb 2009 06:51

Link

that still doesnt work

I think it's doing this since i have a walk and a jump animation.

Also another problem is that I cant get the camera too turn with the guy.

"The Beginning is the end."
Windows Vista Ultimate SP1
INTEL PENTIUM DUAL E2200 2.2 GHz 2 Gb RAM GeForce 9600 512 mb

Back to top

Profile PM Email

=PRoF=

21

Years of Service

User Offline

Joined: 17th Mar 2003

Location: Milton Keynes, UK

Posted: 13th Feb 2009 08:36

Link

i'll have a more in depth look at your code when I get home.

Without Music or Love the world would be a very empty place... Thank god I still have music.. --'-<@

Back to top

Profile PM Email Website

Robert The Robot

17

Years of Service

User Offline

Joined: 8th Jan 2007

Location: Fireball XL5

Posted: 13th Feb 2009 09:46

Link

Try something like this:

+ Code Snippet

if space=1 and Object playing(1)=0
	play object 1,19,209
endif

Object Playing returns whether or not the 3d object is playing its animation. The "Animation playing" command is for avi video files.

"I wish I was a spaceman, the fastest guy alive. I'd fly you round the universe, in Fireball XL5..."

Back to top

Profile PM Website

castek

17

Years of Service

User Offline

Joined: 15th Aug 2007

Location: Right behind you!

Posted: 14th Feb 2009 01:32

Link

It still does not work

I think it's doing this since i have a walk AND a jump animation.

Also I need to figure out how to get the camera to turn and work better. any help would be COOL!!!!!

"The Beginning is the end."
Windows Vista Ultimate SP1
INTEL PENTIUM DUAL E2200 2.2 GHz 2 Gb RAM GeForce 9600 512 mb

Back to top

Profile PM Email

BMacZero

18

Years of Service

User Offline

Joined: 30th Dec 2005

Location: E:/ NA / USA

Posted: 14th Feb 2009 01:50 Edited at: 14th Feb 2009 01:51

Link

This line might cause problems:

else up=0 and down=0

When you use an IF statement, you of course have

IF Condition

And if the condition is true it does all the stuff between the IF and the ENDIF. However, when you use ELSE this changes. If the condition is true, all the stuff between the IF and ELSE is done, while if it is false all the stuff between the ELSE and the ENDIF is done.

So if you wanted the animation to run when up or down is pressed and to stop when neither is pressed, you'd want something more like this:

+ Code Snippet

`Animation
if up=1 or down=1
   loop object 1,235,257
   else
   stop object 1
   set object frame 1,228
endif

Looks like you have a similar problem with the jumping part of the code.

Also, you'll want to make sure that if space is pressed, and up or down is pressed, the space takes priority, so change this to:

+ Code Snippet

`Animation
if space=0
   if up=1 or down=1
      loop object 1,235,257
      else
      stop object 1
      set object frame 1,228
   endif
endif

Back to top

Profile PM Email Website

castek

17

Years of Service

User Offline

Joined: 15th Aug 2007

Location: Right behind you!

Posted: 14th Feb 2009 01:59

Link

THANK YOU!!!!!! I got it too work! Thanks so much!

Now I still have the camera problem where I can't get it to turn, any suggestions?

"The Beginning is the end."
Windows Vista Ultimate SP1
INTEL PENTIUM DUAL E2200 2.2 GHz 2 Gb RAM GeForce 9600 512 mb

Back to top

Profile PM Email

BMacZero

18

Years of Service

User Offline

Joined: 30th Dec 2005

Location: E:/ NA / USA

Posted: 14th Feb 2009 02:05

Link

Cool

.

For camera positioning, I don't like using the built-in camera-following commands. They do weird things when the player makes a U-turn. So I use this method:

+ Code Snippet

position camera object position x(1),object position y(1),object position z(1)
xrotate camera 30
yrotate camera object angle y(1)
move camera -20

This puts the camera at the object's position. It rotates the camera to point the same way as the object and a little bit down. Then it moves the camera backwards. This all happens between syncs, so it seems to the player that the camera is just hovering behind the player.

Back to top

Profile PM Email Website

castek

17

Years of Service

User Offline

Joined: 15th Aug 2007

Location: Right behind you!

Posted: 14th Feb 2009 02:15 Edited at: 14th Feb 2009 02:16

Link

OK cool! there's only one slight problem. the camera will turn the oposite way when I turn. Should I just make this lline

yrotate camera object angle y(1)

IN to this?

yrotate camera -object angle y(1)

"The Beginning is the end."
Windows Vista Ultimate SP1
INTEL PENTIUM DUAL E2200 2.2 GHz 2 Gb RAM GeForce 9600 512 mb

Back to top

Profile PM Email

BMacZero

18

Years of Service

User Offline

Joined: 30th Dec 2005

Location: E:/ NA / USA

Posted: 14th Feb 2009 02:21

Link

Hmm, that's weird. I guess you can try the negative sign. If that doesn't work, could you post the new revised code?

Back to top

Profile PM Email Website

castek

17

Years of Service

User Offline

Joined: 15th Aug 2007

Location: Right behind you!

Posted: 14th Feb 2009 02:23 Edited at: 14th Feb 2009 02:24

Link

ok, it works for the most part but when I keep on turning in any direction for about a full turn the camera starts going the opposite way for another full turn the locks on again. It's really weird

Here is my current code

sync on
sync rate 60
autocam off

`Setting up the variables
up=0
down=0
space=0
jumping=0
speed=4
set ambient light 50
`Load Object and add animation data
load object "C:\Users\Caleb\Documents\ratifylevel1.x",32
position object 32, 500,1150,500
scale object 32,30,30,30
load object "C:\Program Files\The Game Creators\FPS Creator\Files\entitybank\ww2\characters\officer.X", 1
append object "C:\Program Files\The Game Creators\FPS Creator\Files\entitybank\ww2\characters\officer.X",1,total object frames(1)+1

`___________________________
`MAIN LOOP
`---------------------------
do

TEXT 0,0,"FPS - "+str$(screen fps())

`Controls
if upkey ()= 1 then up=1
if upkey ()= 0 then up=0
if downkey()=1 then down = 1
if downkey()=0 then down = 0
if spacekey()=1 then space=1
if Spacekey()=0 then space=0
if keystate(17)=1 then move object up 1,3
if keystate(18)=1 then move object down 1,3

`Animation
if space=0
   if up=1 or down=1
      loop object 1,235,257
      else
      stop object 1
      set object frame 1,228
   endif
endif

`Moving + moving slower while jumping
if down=1 and space=0 then move object 1,3
if up=1 And Space=0 then move object 1,-speed +0.3
if down=1 and space=1 then move object 1,0.5
if up=1 And Space=1 then move object 1,-1

if leftkey ()= 1 then turn object left 1, 2.5
if rightkey ()= 1 then turn object right 1, 2.5

rem crosshair
sw=screen width()/2
sh=screen height()/2
line sw-10,sh,sw+10,sh
line sw,sh-10,sw,sh+10

`___________________________
`JUMPING

if space=1 and Object playing(1)=0
   play object 1,190,209
endif

`___________________________
   `CAMERA
`___________________________

position camera object position x(1),object position y(1),object position z(1)
xrotate camera 30
yrotate camera -object angle y(1)
move camera -150

sync
loop

+ Code Snippet

sync on
sync rate 60
autocam off


`Setting up the variables
up=0
down=0
space=0
jumping=0
speed=4
set ambient light 50
`Load Object and add animation data
load object "C:\Users\Caleb\Documents\ratifylevel1.x",32
position object 32, 500,1150,500
scale object 32,30,30,30
load object "C:\Program Files\The Game Creators\FPS Creator\Files\entitybank\ww2\characters\officer.X", 1
append object "C:\Program Files\The Game Creators\FPS Creator\Files\entitybank\ww2\characters\officer.X",1,total object frames(1)+1



`___________________________
`MAIN LOOP
`---------------------------
do

TEXT 0,0,"FPS - "+str$(screen fps())

`Controls
if upkey ()= 1 then up=1
if upkey ()= 0 then up=0
if downkey()=1 then down = 1
if downkey()=0 then down = 0
if spacekey()=1 then space=1
if Spacekey()=0 then space=0
if keystate(17)=1 then move object up 1,3
if keystate(18)=1 then move object down 1,3


`Animation
if space=0
   if up=1 or down=1
      loop object 1,235,257
      else
      stop object 1
      set object frame 1,228
   endif
endif



`Moving + moving slower while jumping
if down=1 and space=0 then move object 1,3
if up=1 And Space=0 then move object 1,-speed +0.3
if down=1 and space=1 then move object 1,0.5
if up=1 And Space=1 then move object 1,-1




if leftkey ()= 1 then turn object left 1, 2.5
if rightkey ()= 1 then turn object right 1, 2.5

rem crosshair
sw=screen width()/2
sh=screen height()/2
line sw-10,sh,sw+10,sh
line sw,sh-10,sw,sh+10

`___________________________
`JUMPING

if space=1 and Object playing(1)=0
   play object 1,190,209
endif

`___________________________
   `CAMERA
`___________________________

position camera object position x(1),object position y(1),object position z(1)
xrotate camera 30
yrotate camera -object angle y(1)
move camera -150


sync
loop

"The Beginning is the end."
Windows Vista Ultimate SP1
INTEL PENTIUM DUAL E2200 2.2 GHz 2 Gb RAM GeForce 9600 512 mb

Back to top

Profile PM Email

=PRoF=

21

Years of Service

User Offline

Joined: 17th Mar 2003

Location: Milton Keynes, UK

Posted: 14th Feb 2009 02:28

Link

wrapvalue() is a command you should look up.

And consider using a variable to store the angle

Without Music or Love the world would be a very empty place... Thank god I still have music.. --'-<@

Back to top

Profile PM Email Website

castek

17

Years of Service

User Offline

Joined: 15th Aug 2007

Location: Right behind you!

Posted: 14th Feb 2009 02:32

Link

Quote: "wrapvalue() is a command you should look up."

I looked it up but I dont really understand it/how i would use it.

"The Beginning is the end."
Windows Vista Ultimate SP1
INTEL PENTIUM DUAL E2200 2.2 GHz 2 Gb RAM GeForce 9600 512 mb

Back to top

Profile PM Email

BMacZero

18

Years of Service

User Offline

Joined: 30th Dec 2005

Location: E:/ NA / USA

Posted: 14th Feb 2009 02:38 Edited at: 14th Feb 2009 02:45

Link

I actually don't use wrapvalue often. I've found that if you put a value into a command as an angle greater than 360 it automatically wrapvalues for you.

(All it does is if you put in a value greater than 360, it wraps it around so it is back in the range of 0-360. For example, if you put in 410 it would return 50. 1000 would return 280)

It probably could cause problems in some cases, but in this case it seems to be the way you're turning the object. You're using the Freeflight commands TURN OBJECT LEFT and TURN OBJECT RIGHT, which are well known for not working correctly with angle-based stuff. When I changed your rotation code to:

+ Code Snippet

if leftkey ()= 1 then yrotate object 1, object angle y(1)+2.5
if rightkey ()= 1 then yrotate object 1, object angle y(1)-2.5

and the 3rd line in my camera follow code to:

+ Code Snippet

yrotate camera object angle y(1)+180

It seemed to work correctly.

Whew. This is why I hate angles

.

Back to top

Profile PM Email Website

castek

17

Years of Service

User Offline

Joined: 15th Aug 2007

Location: Right behind you!

Posted: 14th Feb 2009 02:46

Link

Thank you so much again!! I got it too work! Thank you!!!!!!!!!!

If anyone cares here is my code:

sync on
sync rate 60
autocam off

`Setting up the variables
up=0
down=0
space=0
jumping=0
speed=4
set ambient light 50
`Load Object and add animation data
load object "C:\Users\Caleb\Documents\ratifylevel1.x",32
position object 32, 500,1150,500
scale object 32,30,30,30
load object "C:\Program Files\The Game Creators\FPS Creator\Files\entitybank\ww2\characters\officer.X", 1
append object "C:\Program Files\The Game Creators\FPS Creator\Files\entitybank\ww2\characters\officer.X",1,total object frames(1)+1

`___________________________
`MAIN LOOP
`---------------------------
do

TEXT 0,0,"FPS - "+str$(screen fps())

`Controls
if upkey ()= 1 then up=1
if upkey ()= 0 then up=0
if downkey()=1 then down = 1
if downkey()=0 then down = 0
if spacekey()=1 then space=1
if Spacekey()=0 then space=0
if keystate(17)=1 then move object up 1,3
if keystate(18)=1 then move object down 1,3

`Animation
if space=0
   if up=1 or down=1
      loop object 1,235,257
      else
      stop object 1
      set object frame 1,228
   endif
endif

`Moving + moving slower while jumping
if down=1 and space=0 then move object 1,3
if up=1 And Space=0 then move object 1,-speed +0.3
if down=1 and space=1 then move object 1,0.5
if up=1 And Space=1 then move object 1,-1

if leftkey ()= 1 then yrotate object 1, object angle y(1)-2
if rightkey ()= 1 then yrotate object 1, object angle y(1)+2

rem crosshair
sw=screen width()/2
sh=screen height()/2
line sw-10,sh,sw+10,sh
line sw,sh-10,sw,sh+10

`___________________________
`JUMPING

if space=1 and Object playing(1)=0
   play object 1,190,209
endif

`___________________________
   `CAMERA
`___________________________

position camera object position x(1),object position y(1)+55,object position z(1)
xrotate camera 30
yrotate camera object angle y(1)+180
move camera -150

sync
loop

+ Code Snippet

sync on
sync rate 60
autocam off


`Setting up the variables
up=0
down=0
space=0
jumping=0
speed=4
set ambient light 50
`Load Object and add animation data
load object "C:\Users\Caleb\Documents\ratifylevel1.x",32
position object 32, 500,1150,500
scale object 32,30,30,30
load object "C:\Program Files\The Game Creators\FPS Creator\Files\entitybank\ww2\characters\officer.X", 1
append object "C:\Program Files\The Game Creators\FPS Creator\Files\entitybank\ww2\characters\officer.X",1,total object frames(1)+1



`___________________________
`MAIN LOOP
`---------------------------
do

TEXT 0,0,"FPS - "+str$(screen fps())

`Controls
if upkey ()= 1 then up=1
if upkey ()= 0 then up=0
if downkey()=1 then down = 1
if downkey()=0 then down = 0
if spacekey()=1 then space=1
if Spacekey()=0 then space=0
if keystate(17)=1 then move object up 1,3
if keystate(18)=1 then move object down 1,3


`Animation
if space=0
   if up=1 or down=1
      loop object 1,235,257
      else
      stop object 1
      set object frame 1,228
   endif
endif



`Moving + moving slower while jumping
if down=1 and space=0 then move object 1,3
if up=1 And Space=0 then move object 1,-speed +0.3
if down=1 and space=1 then move object 1,0.5
if up=1 And Space=1 then move object 1,-1


if leftkey ()= 1 then yrotate object 1, object angle y(1)-2
if rightkey ()= 1 then yrotate object 1, object angle y(1)+2


rem crosshair
sw=screen width()/2
sh=screen height()/2
line sw-10,sh,sw+10,sh
line sw,sh-10,sw,sh+10

`___________________________
`JUMPING

if space=1 and Object playing(1)=0
   play object 1,190,209
endif

`___________________________
   `CAMERA
`___________________________

position camera object position x(1),object position y(1)+55,object position z(1)
xrotate camera 30
yrotate camera object angle y(1)+180
move camera -150


sync
loop

"The Beginning is the end."
Windows Vista Ultimate SP1
INTEL PENTIUM DUAL E2200 2.2 GHz 2 Gb RAM GeForce 9600 512 mb

Back to top

Profile PM Email

Sorry your browser is not supported!

Newcomers DBPro Corner / Animation/Camera Problem