pls help about playing object animation code

Author

Message

CuCuMBeR

21

Years of Service

User Offline

Joined: 11th Jan 2003

Location: Turkey

Posted: 4th Dec 2003 18:47

Link

can anyone tell me please why this object insist on not to play the falling animation when pressed on the control key?
by the way this is the player model of the alien competition,nothin to compete but just the only animated model i have

+ Code Snippet

player_motion_1:
angle#=object angle y(1)
if upkey()=1 then move object 1,move : walk = 1 : idle = 0
if downkey()=1 then move object 1,-move : walk = 1 : idle = 0
if leftkey()=1 then yrotate object 1,wrapvalue(angle#)-1
if rightkey()=1 then yrotate object 1,wrapvalue(angle#)+1
if controlkey()=1 then fall=1 : walk = 0 : idle = 0

if walk = 1
set object speed 1,100 : loop object 1,670,720
else if idle = 1
set object speed 1,50 : loop object 1,0,100
else if fall = 1
play object 1,100,150
endif
endif
endif
walk = 0 : idle = 1 : fall = 0
x#=object position x(1)
z#=object position z(1)
y#=get ground height (1,x#,z#)
position object 1,x#,y#,z#
set camera to follow x#,y#,z#,angle#,150,objsizey#+15,25,0
return

Back to top

Profile PM

ReD_eYe

21

Years of Service

User Offline

Joined: 9th Mar 2003

Location: United Kingdom

Posted: 4th Dec 2003 20:04

Link

just a guess here, but try putting a stop object 1, just before the play object 1,100,150
maybe the fact that its already looping may stop it playing anything else.

GO TO THE ETERNAL DESTINY FORUMS!!! http://forums.eternaldestinyonline.com
Do it now!!!

Back to top

Profile PM Email Website

CuCuMBeR

21

Years of Service

User Offline

Joined: 11th Jan 2003

Location: Turkey

Posted: 4th Dec 2003 20:55

Link

didnt work, i also tried to use scancode() , inkey() , keystate()...etc

and never works

i suppose there is something wrong with the variables and needs a professional somewhere out there to solve it for me:p

Back to top

Profile PM

TheSquid

21

Years of Service

User Offline

Joined: 29th Sep 2003

Location: Ohio

Posted: 4th Dec 2003 21:03

Link

might it be that you don't have enough endif statements? Structure your code like this:

+ Code Snippet

player_motion_1:
angle#=object angle y(1)
if upkey()=1 
	move object 1,move  
	walk = 1  
	idle = 0
endif

if downkey()=1 
	move object 1,-move
	walk = 1 
	idle = 0
endif

if leftkey()=1 
	yrotate object 1,wrapvalue(angle#)-1
endif

if rightkey()=1 
	yrotate object 1,wrapvalue(angle#)+1
endif

if controlkey()=1 
	fall=1 
	walk = 0 
	idle = 0
endif

if walk = 1
	set object speed 1,100 
	loop object 1,670,720
else if idle = 1
		set object speed 1,50 
		loop object 1,0,100
		else if fall = 1
			play object 1,100,150
		     endif
		endif
      endif
endif

walk = 0 : idle = 1 : fall = 0

x#=object position x(1)
z#=object position z(1)
y#=get ground height (1,x#,z#)
position object 1,x#,y#,z#
set camera to follow x#,y#,z#,angle#,150,objsizey#+15,25,0
return

Back to top

Profile PM Email Website

CuCuMBeR

21

Years of Service

User Offline

Joined: 11th Jan 2003

Location: Turkey

Posted: 4th Dec 2003 23:16

Link

thank you,but i think this solved my problem pretty enough and i did it myself with very much help and thanks to TheSquid

maybe others would like to use it too eh?

+ Code Snippet

player_motion_1:
angle#=object angle y(1)
mode=2

if upkey()=1 and letmove=1
   rem walk mode
   move object 1,move : mode=1
endif



if downkey()=1 and letmove=1
   rem walk mode
   move object 1,-move : mode=1
endif



if leftkey()=1 and letmove=1
   rem walk mode
   yrotate object 1,wrapvalue(angle#)-1 : mode=1
endif



if rightkey()=1 and letmove=1
   rem walk mode
   yrotate object 1,wrapvalue(angle#)+1 : : mode=1
endif



if controlkey()=1
   rem dance mode
   mode=3
   letmove=0
endif

if mode = 1
   set object speed 1,100
   loop object 1,670,720
endif

if mode = 2
   set object speed 1,50
   loop object 1,0,100
endif


if mode = 3
   loop object 1,100,150
endif



x#=object position x(1)
z#=object position z(1)
y#=get ground height (1,x#,z#)
position object 1,x#,y#,z#
set camera to follow x#,y#,z#,angle#,150,objsizey#+15,25,0
return

Back to top

Profile PM

Sorry your browser is not supported!

Newcomers DBPro Corner / pls help about playing object animation code