Controlling animation; start and stop character.

Blitz3D Forums/Blitz3D Beginners Area/Controlling animation; start and stop character.

gerald (Posted 2014) [#1]

Hi, I can make the legs move but I seem to have to set continuous animation loop, or stop animation exclusively. Milkshape animated entity. I tried the animate command with a movement key link but it only stops and does not start. How is movement animation started and stopped on command? Any input? Gerald

Kryzon (Posted 2014) [#2]

- http://www.blitzbasic.com/Community/posts.php?topic=100268#1182709 - http://www.blitzbasic.com/Community/posts.php?topic=94440#1084358

Guy Fawkes (Posted 2014) [#3]

Nice tutorial, Kryzon! :)

gerald (Posted 2014) [#4]

Hi, I'm an if/then beginner but I'll try to desipher this. It is not in the book at all. Thanks, Gerald

Guy Fawkes (Posted 2014) [#5]

Updated the tutorial a bit to HOPEFULLY make it easier for you. I used to be the same as you, but I have learned ALOT from the Blitz veterans. Here's the tutorial. Read the comments that begin with ";" & hopefully you'll understand much easier! Good luck with your training & I hope this helps! Kirby_Animation_Tutorial.bb: Graphics3D 800, 600, 0, 2 ;set up 3D gfx SetBuffer BackBuffer() ;double buffering... Const TYPE_KIRBY = 1 ;entity types for collisions Const TYPE_LEVEL = 2 ;entity types for collisions Global camera = CreateCamera() ;make a camera MoveEntity camera,0,10,-10 ;move it up and backwards by 10 Y & -10 Z units Global level = CreatePlane() ;make a level EntityType level,TYPE_LEVEL ;set the collision type Global kirby = LoadAnimMesh("kirby.b3d") ;load kirby! TranslateEntity kirby,0,1,0 ;move kirby off the ground EntityType kirby,TYPE_KIRBY ;set the collision type PointEntity camera,kirby ;makes for an easy 3rd person camera EntityParent,camera,kirby ;makes for an easy 3rd person camera ;This is to extract the frames from the Kirby 3D model starting at frame 1, ending at frame 10 ;As that is how many frames it takes to animate Kirby's stance Global kirbyanimstand = ExtractAnimSeq(kirby,1,10) ;Same as above, only jumping this time Global kirbyanimjump = ExtractAnimSeq(kirby,11,20) ;name each animation ;Same as above, only running this time Global kirbyanimrun = ExtractAnimSeq(kirby,21,30) ;name each animation Global kirbysob$ = "standing" ;create a variable for Kirby's State of Being, set it to "standing" Collisions TYPE_KIRBY,TYPE_LEVEL,2,3 ;set collisions ;^-----------We want to collide any and all objects which are TYPE_KIRBY, TYPE_LEVEL. ;Ex. We want to collide "KIRBY" with the "LEVEL" & we want it to be a polygonal collision ;With a "stopping" action when colliding against the level ;MAIN LOOP ;---------------------------- While Not KeyDown(1) GetNewKirbySOB() ;The function is below UpdateKirby() ;The Function is below PointEntity camera,kirby UpdateWorld RenderWorld Flip Wend ClearWorld End ;FUNCTIONS LIST ;--------------------------------- Function GetNewKirbySOB() ;Get's Kirby's new State of Being, changes kirbysob$ variable ;First, let's see if kirby should be running If kirbysob$ <> "jump" Or kirbysob$ <> "floating" ;kirby can only run or jump while on the ground If Not KeyDown(RIGHT_KEY) ;If we're not pushing the right key If Not KeyDown(LEFT_KEY) ;If we're not pushing the left key kirbysob$ = "standing" ;Kirby should now be standing EndIf EndIf If KeyDown(RIGHT_KEY) ;If we're pushing the right key If Not KeyDown(LEFT_KEY) ;we can't push both keys at the same time kirbysob$ = "runright" ;Kirby should now be running right EndIf EndIf If KeyDown(LEFT_KEY) ;If we're pushing the left key If Not KeyDown(RIGHT_KEY) ;we can't push both keys at the same time kirbysob$ = "runleft" ;Kirby should now be running left EndIf EndIf If KeyDown(RIGHT_KEY) And KeyDown(LEFT_KEY) ;If we are pushing both keys kirbysob$ = "standing" ;Just make Kirby stand EndIf ;Next, see if he should jump If KeyHit(SPACE_BAR) kirbysob$ = "jump" ;Kirby should now leap off the ground EndIf EndIf End Function Function UpdateKirby() ;Make Kirby do new actions based on his new State of Being Select kirbysob$ ;Open a Select Command (like multiple "if"s) Case "standing" ;If Kirby should be standing If AnimSeq(kirby) <> kirbyanimstand ;If Kirby isn't already animated to stand Animate kirby,kirbyanimstand ;Animate Kirby to stand EndIf Case "runright" ;If Kirby should be running right If AnimSeq(kirby) <> kirbyanimrun ;If Kirby isn't already animated to run Animate kirby,kirbyanimrun ;Animate Kirby to run EndIf RotateEntity kirby,0,90,0 ;Turn Kirby to the right. At least, I think this is to the right? MoveEntity kirby,0,0,1 ;Run Kirby forward (to the right) 1 unit per loop Case "runleft" ;If Kirby should be running left If AnimSeq(kirby) <> kirbyanimrun ;If Kirby isn't already animated to run Animate kirby,kirbyanimrun ;Animate Kirby to run EndIf RotateEntity kirby,0,-90,0 ;Turn Kirby to the left. At least, I think this is to the left? MoveEntity kirby,0,0,1 ;Run Kirby forward (to the left) 1 unit per loop Case "jump" ;If Kirby should be jumping If AnimSeq(kirby) <> kirbyanimjump ;If Kirby isn't already animated to jump Animate kirby,kirbyanimjump ;Animate Kirby to jump EndIf TranslateEntity kirby,0,50,0 ;Shoot Kirby up in the air! kirbysob$ = "floating" ;After Kirby's in the air, float to the ground Case "floating" ;if Kirby should be floating TranslateEntity kirby,0,-1,0 ;Gravity... If EntityCollided(kirby,TYPE_LEVEL) ;If Kirby touches the ground kirbysob$ = "standing" ;Kirby should now be standing EndIf ;As always, feel free to add any more Cases here with actions to go along with each case End Select End Function Sincerely, ~GF

gerald (Posted 2014) [#6]

Hi, I got a simple switch to work. Load 2 main characters (guns) have one animated 1,30,0,0 and the second not animated 0,20,0,0. Then in the movement code (if keydown(up_key) then hideentity/showentity). This works, the moving entity shows when moving and the nonmoving entity shows when not moving. Just needed to set show/hide for the characters. thanks Gerald

Guy Fawkes (Posted 2014) [#7]

Good job, @gerald! :)