Sprite glitch while animated - GameCreators Forum

Author

Message

Janku Ayanami

8

Years of Service

User Offline

Joined: 31st Aug 2015

Location: Namibia

Posted: 15th Sep 2015 16:54

Link

I am building a platformer and I am trying to get some mechanics going. The problem is that while a sprite is animated I cannot use setSpritePhysicsVelocity().

If the sprite is not animated the setSpritePhysicsVelocity() works fine, however, while its animated the sprite only seems to "jump" about half way to when its not animated.

Here is my code:

function CheckPlayerCollision()
	i_Return as integer
	i_Return = 0
	
	i_Return = GetPhysicsCollision(g_spLevel, g_spPlayer)
endfunction i_Return

function DoMovement()
	if g_IsDesktop = 1
		g_intJump = GetRawKeyPressed(g_ScanCodes.KEY_SPACE)
	else
		g_intJump = GetVirtualButtonPressed(g_btnJump)
	endif
	
	if CheckPlayerCollision() = 1
		g_intJumpCount = 0
		b_boolDoJumpCheck = 0
		g_intAirborn =0
		g_boolDidAirJump = 0
		g_Control.KeyStateJump = 0
		if g_Control.KeyStateJumpResume = 1 and g_Control.KeyStateJump = 1
			g_Control.KeyStateJump = 0
		endif
	else
		g_intJumpCount = 1
		g_intAirborn = 1
	endif
	
	CheckSpriteAnimation()
	
	if g_IsDesktop = 1
		if g_intJump > 0
			if g_intAirborn = 1
				if g_boolDidAirJump = 0
					g_boolDidAirJump = 1
					StopSprite(g_spPlayer)
					g_ADT.Animated = 0
					g_Control.KeyStateJumpResume = 1
					setSpritePhysicsVelocity(g_spPlayer,getSpritePhysicsVelocityX(g_spPlayer),-g_intJump*200)
					g_Control.KeyStateJump = 1
				endif
			else
				StopSprite(g_spPlayer)
				g_ADT.Animated = 0
				g_Control.KeyStateJumpResume = 1
				setSpritePhysicsVelocity(g_spPlayer,getSpritePhysicsVelocityX(g_spPlayer),-g_intJump*200)
				g_Control.KeyStateJump = 1
			endif
		endif
		
		rem move boxman
		setSpritePhysicsVelocity(g_spPlayer,(GetRawKeyState(39)-GetRawKeyState(37))*100,getSpritePhysicsVelocityY(g_spPlayer))
		
	else
		if g_intJump > 0
			if g_intAirborn = 1
				if g_boolDidAirJump = 0
					g_boolDidAirJump = 1
					setSpritePhysicsVelocity(g_spPlayer,getSpritePhysicsVelocityX(g_spPlayer),-g_intJump*200)
				endif
			else
				setSpritePhysicsVelocity(g_spPlayer,getSpritePhysicsVelocityX(g_spPlayer),-g_intJump*200)
			endif
		endif
		
		rem move boxman
		setSpritePhysicsVelocity(g_spPlayer,GetVirtualJoystickX(g_joyMove)*100,getSpritePhysicsVelocityY(g_spPlayer))
	endif
    
    
endfunction

function CheckSpriteAnimation()
	
	i_NewDirection as integer = 0
	i_DirectionCheck as integer = 0
	
	if g_Control.KeyStateJumpResume = 1
		if CheckPlayerCollision() = 1
			select g_ADT.Direction
				case g_ADT.DirDown:
					PlaySprite(g_spPlayer,5,1,1,4)
					g_ADT.Animated = 1
				endcase
				
				case g_ADT.DirLeft:
					PlaySprite(g_spPlayer,5,1,5,8)
					g_ADT.Animated = 1
				endcase
				
				case g_ADT.DirRight:
					PlaySprite(g_spPlayer,5,1,9,12)
					g_ADT.Animated = 1
				endcase
				
				case g_ADT.DirUp:
					PlaySprite(g_spPlayer,5,1,13,16)
					g_ADT.Animated = 1
				endcase
			endSelect
		endif
		
		g_Control.KeyStateJumpResume = 0
	else
		if g_IsDesktop = 1
			if GetRawKeyPressed(g_Control.Left) = 1
				g_Control.KeyStateLeft = 1
				i_NewDirection = 1
			endif
			
			if GetRawKeyReleased(g_Control.Left) = 1
				g_Control.KeyStateLeft = 0
			endif
			
			if GetRawKeyPressed(g_Control.Right) = 1
				g_Control.KeyStateRight = 1
				i_NewDirection = 1
			endif
			
			if GetRawKeyReleased(g_Control.Right) = 1
				g_Control.KeyStateRight = 0
			endif
			
			//if GetRawKeyPressed(g_Control.Left)
			//	i_Left = 1
			//endif
		else
			
		endif
		
		if i_NewDirection = 1
			StopSprite(g_spPlayer)
			
			select g_ADT.Direction
				case g_ADT.DirDown:
					SetSpriteFrame(g_spPlayer,2)
				endcase
				
				case g_ADT.DirLeft:
					SetSpriteFrame(g_spPlayer,6)
				endcase
				
				case g_ADT.DirRight:
					SetSpriteFrame(g_spPlayer,10)
				endcase
				
				case g_ADT.DirUp:
					SetSpriteFrame(g_spPlayer,14)
				endcase
			endSelect
			
			if g_Control.KeyStateLeft = 1 and g_Control.KeyStateRight = 1
				SetSpriteFrame(g_spPlayer,2)
				g_ADT.Animated = 0
			else
				if g_Control.KeyStateLeft = 1 and i_NewDirection = 1
					PlaySprite(g_spPlayer,5,1,5,8)
					g_ADT.Animated = 1
				endif
				
				if g_Control.KeyStateRight = 1 and i_NewDirection = 1
					PlaySprite(g_spPlayer,5,1,9,12)
					g_ADT.Animated = 1
				endif
			endif
		else
			
		endif
	endif
	
	if g_ADT.Animated = 1
		
	endif
endfunction

+ Code Snippet

function CheckPlayerCollision()
	i_Return as integer
	i_Return = 0
	
	i_Return = GetPhysicsCollision(g_spLevel, g_spPlayer)
endfunction i_Return

function DoMovement()
	if g_IsDesktop = 1
		g_intJump = GetRawKeyPressed(g_ScanCodes.KEY_SPACE)
	else
		g_intJump = GetVirtualButtonPressed(g_btnJump)
	endif
	
	if CheckPlayerCollision() = 1
		g_intJumpCount = 0
		b_boolDoJumpCheck = 0
		g_intAirborn =0
		g_boolDidAirJump = 0
		g_Control.KeyStateJump = 0
		if g_Control.KeyStateJumpResume = 1 and g_Control.KeyStateJump = 1
			g_Control.KeyStateJump = 0
		endif
	else
		g_intJumpCount = 1
		g_intAirborn = 1
	endif
	
	CheckSpriteAnimation()
	
	if g_IsDesktop = 1
		if g_intJump > 0
			if g_intAirborn = 1
				if g_boolDidAirJump = 0
					g_boolDidAirJump = 1
					StopSprite(g_spPlayer)
					g_ADT.Animated = 0
					g_Control.KeyStateJumpResume = 1
					setSpritePhysicsVelocity(g_spPlayer,getSpritePhysicsVelocityX(g_spPlayer),-g_intJump*200)
					g_Control.KeyStateJump = 1
				endif
			else
				StopSprite(g_spPlayer)
				g_ADT.Animated = 0
				g_Control.KeyStateJumpResume = 1
				setSpritePhysicsVelocity(g_spPlayer,getSpritePhysicsVelocityX(g_spPlayer),-g_intJump*200)
				g_Control.KeyStateJump = 1
			endif
		endif
		
		rem move boxman
		setSpritePhysicsVelocity(g_spPlayer,(GetRawKeyState(39)-GetRawKeyState(37))*100,getSpritePhysicsVelocityY(g_spPlayer))
		
	else
		if g_intJump > 0
			if g_intAirborn = 1
				if g_boolDidAirJump = 0
					g_boolDidAirJump = 1
					setSpritePhysicsVelocity(g_spPlayer,getSpritePhysicsVelocityX(g_spPlayer),-g_intJump*200)
				endif
			else
				setSpritePhysicsVelocity(g_spPlayer,getSpritePhysicsVelocityX(g_spPlayer),-g_intJump*200)
			endif
		endif
		
		rem move boxman
		setSpritePhysicsVelocity(g_spPlayer,GetVirtualJoystickX(g_joyMove)*100,getSpritePhysicsVelocityY(g_spPlayer))
	endif
    
    
endfunction

function CheckSpriteAnimation()
	
	i_NewDirection as integer = 0
	i_DirectionCheck as integer = 0
	
	if g_Control.KeyStateJumpResume = 1
		if CheckPlayerCollision() = 1
			select g_ADT.Direction
				case g_ADT.DirDown:
					PlaySprite(g_spPlayer,5,1,1,4)
					g_ADT.Animated = 1
				endcase
				
				case g_ADT.DirLeft:
					PlaySprite(g_spPlayer,5,1,5,8)
					g_ADT.Animated = 1
				endcase
				
				case g_ADT.DirRight:
					PlaySprite(g_spPlayer,5,1,9,12)
					g_ADT.Animated = 1
				endcase
				
				case g_ADT.DirUp:
					PlaySprite(g_spPlayer,5,1,13,16)
					g_ADT.Animated = 1
				endcase
			endSelect
		endif
		
		g_Control.KeyStateJumpResume = 0
	else
		if g_IsDesktop = 1
			if GetRawKeyPressed(g_Control.Left) = 1
				g_Control.KeyStateLeft = 1
				i_NewDirection = 1
			endif
			
			if GetRawKeyReleased(g_Control.Left) = 1
				g_Control.KeyStateLeft = 0
			endif
			
			if GetRawKeyPressed(g_Control.Right) = 1
				g_Control.KeyStateRight = 1
				i_NewDirection = 1
			endif
			
			if GetRawKeyReleased(g_Control.Right) = 1
				g_Control.KeyStateRight = 0
			endif
			
			//if GetRawKeyPressed(g_Control.Left)
			//	i_Left = 1
			//endif
		else
			
		endif
		
		if i_NewDirection = 1
			StopSprite(g_spPlayer)
			
			select g_ADT.Direction
				case g_ADT.DirDown:
					SetSpriteFrame(g_spPlayer,2)
				endcase
				
				case g_ADT.DirLeft:
					SetSpriteFrame(g_spPlayer,6)
				endcase
				
				case g_ADT.DirRight:
					SetSpriteFrame(g_spPlayer,10)
				endcase
				
				case g_ADT.DirUp:
					SetSpriteFrame(g_spPlayer,14)
				endcase
			endSelect
			
			if g_Control.KeyStateLeft = 1 and g_Control.KeyStateRight = 1
				SetSpriteFrame(g_spPlayer,2)
				g_ADT.Animated = 0
			else
				if g_Control.KeyStateLeft = 1 and i_NewDirection = 1
					PlaySprite(g_spPlayer,5,1,5,8)
					g_ADT.Animated = 1
				endif
				
				if g_Control.KeyStateRight = 1 and i_NewDirection = 1
					PlaySprite(g_spPlayer,5,1,9,12)
					g_ADT.Animated = 1
				endif
			endif
		else
			
		endif
	endif
	
	if g_ADT.Animated = 1
		
	endif
endfunction

Back to top

Profile PM Email Website

Crazy Programmer

AGK Developer

19

Years of Service

User Offline

Joined: 6th Sep 2004

Location: Lost in AGK

Posted: 16th Sep 2015 01:52

Link

Here is how I have my platformer movement setup / animation on my character. Note: It is only the walking animation.

//Make a player
	
	Character = CreateSprite(14)
SetSpriteSize(Character, 100, 100)

SetSpritePosition(Character, 100, 500)
SetSpritePhysicsOn(Character, 2)
SetSpritePhysicsCanRotate(Character, 0)
SetSpriteShape (Character, 3)
  //Load Character Run Animation Frames
    AddSpriteAnimationFrame ( Character, LoadImage ( "skeleton-run1_0.png" ) )
    AddSpriteAnimationFrame ( Character, LoadImage ( "skeleton-run1_1.png" ) )
    AddSpriteAnimationFrame ( Character, LoadImage ( "skeleton-run1_2.png" ) )
    AddSpriteAnimationFrame ( Character, LoadImage ( "skeleton-run1_3.png" ) )
    AddSpriteAnimationFrame ( Character, LoadImage ( "skeleton-run1_4.png" ) )
    AddSpriteAnimationFrame ( Character, LoadImage ( "skeleton-run1_5.png" ) )
    AddSpriteAnimationFrame ( Character, LoadImage ( "skeleton-run1_6.png" ) )
    /////////////////////////////////////////////////////////////////
    
   //////Load Movement buttons////////////
			 
			 If DeviceType$ = "android" 
			 LeftButton = CreateSprite(36)
              SetSpriteSize(LeftButton,125,125)
             SetSpritePosition (LeftButton,100,650)
    
             SetSpriteFlip(LeftButton,1,0)

RightButton = CreateSprite(36)
                  SetSpriteSize (RightButton,125,125)
                   SetSPritePosition (RightButton,210,650)
                
                   
           
                   
                     FixSpriteToScreen(LeftButton,2)
			  FixSpriteToScreen(RightButton,1)
		
			   
			   AddVirtualButton(9,900,713,125)
			   SetVirtualButtonImageUp (9,40)
			   SetVirtualButtonImageDown(9,40)
			      SetVirtualButtonAlpha(9,255)
			   endif

+ Code Snippet

 //Make a player
	
	Character = CreateSprite(14)
SetSpriteSize(Character, 100, 100)

SetSpritePosition(Character, 100, 500)
SetSpritePhysicsOn(Character, 2)
SetSpritePhysicsCanRotate(Character, 0)
SetSpriteShape (Character, 3)
  //Load Character Run Animation Frames
    AddSpriteAnimationFrame ( Character, LoadImage ( "skeleton-run1_0.png" ) )
    AddSpriteAnimationFrame ( Character, LoadImage ( "skeleton-run1_1.png" ) )
    AddSpriteAnimationFrame ( Character, LoadImage ( "skeleton-run1_2.png" ) )
    AddSpriteAnimationFrame ( Character, LoadImage ( "skeleton-run1_3.png" ) )
    AddSpriteAnimationFrame ( Character, LoadImage ( "skeleton-run1_4.png" ) )
    AddSpriteAnimationFrame ( Character, LoadImage ( "skeleton-run1_5.png" ) )
    AddSpriteAnimationFrame ( Character, LoadImage ( "skeleton-run1_6.png" ) )
    /////////////////////////////////////////////////////////////////
    
   //////Load Movement buttons////////////
			 
			 If DeviceType$ = "android" 
			 LeftButton = CreateSprite(36)
              SetSpriteSize(LeftButton,125,125)
             SetSpritePosition (LeftButton,100,650)
    
             SetSpriteFlip(LeftButton,1,0)

                  RightButton = CreateSprite(36)
                  SetSpriteSize (RightButton,125,125)
                   SetSPritePosition (RightButton,210,650)
                
                   
           
                   
                     FixSpriteToScreen(LeftButton,2)
			  FixSpriteToScreen(RightButton,1)
		
			   
			   AddVirtualButton(9,900,713,125)
			   SetVirtualButtonImageUp (9,40)
			   SetVirtualButtonImageDown(9,40)
			      SetVirtualButtonAlpha(9,255)
			   endif

//Set Character offset to screen
		SetViewOffset ( GetSpriteX ( Character ) -400, 0)
		
		
		//Check to see if Character can jump
	RCDown = PhysicsRayCastGroup(1, GetSpriteXByOffset(Character), GetSpriteYByOffset(Character), GetSpriteXByOffset(Character), GetSpriteYByOffset(Character) + 60)
	
	///////////////////Move Player Right left and stop/////////////////////////////////////////////////////////////////////////
	if GetRawKeyState(39) = 1 // Right
	
		SetSpritePhysicsVelocity(Character, 400, GetSpritePhysicsVelocityY(Character))
		
	elseif GetRawKeyState(37) = 1 // Left
		SetSpritePhysicsVelocity(Character, -400, GetSpritePhysicsVelocityY(Character))
	else
		SetSpritePhysicsVelocity(Character, 0, GetSpritePhysicsVelocityY(Character))
	endif
	
	if GetRawKeyPressed(32) = 1 AND RCDown = 1
		SetSpritePhysicsVelocity(Character, GetSpritePhysicsVelocityX(Character), -950)
	endif
	//////////////////////////////////////////////////////////////////////////////////////////////////////
	If DeviceType$ = "android"
	PointerX# = GetPointerX()
	PointerY# = GetPointerY()
	
	If PointerX# > 75 and pointerY# >625 and PointerX# <250 and PointerY# < 800 and GetPointerState()=1
			SetSpritePhysicsVelocity(Character, -400, GetSpritePhysicsVelocityY(Character))
					PlayAnimation = 1
					SetSpriteFlip(Character,1,0)
		elseif PointerX# >210 and PointerY# >625 and PointerX# < 360 and PointerY# < 800 and GetPointerState()=1
			SetSpritePhysicsVelocity(Character, 400, GetSpritePhysicsVelocityY(Character))
			        PlayAnimation = 1
			        SetSpriteFlip (Character,0,0)
			     
			        else
						PlayAnimation = 0		  
	                                	 endif
		
			if GetVirtualButtonPressed(9) and RCDown = 1
						SetSpritePhysicsVelocity(Character, GetSpritePhysicsVelocityX(Character), -825)
			
			endif
			endif
	
		///////////Play Sprite Animation and flip sprite depending on direction///////////////
	if getrawkeystate (39) or GetRawKeyState(37)  or PlayAnimation = 1
		If GetRawKeyState (37) = 1 
			SetSpriteFlip(Character,1,0)
			ElseIf GetRawKeyState(39)
				SetSpriteFlip(Character,0,0)
				endif

if GetSpritePlaying(Character) = 0
      playsprite (Character)
   endif

else
   if GetSpritePlaying(Character) = 1
      StopSprite(Character)
      SetSpriteFrame(Character, 1)
   endif
endif
	//////////////////////////////////////////////////////////////////////////////////////////////////////////////

+ Code Snippet

   	//Set Character offset to screen
		SetViewOffset ( GetSpriteX ( Character ) -400, 0)
		
		
		//Check to see if Character can jump
	RCDown = PhysicsRayCastGroup(1, GetSpriteXByOffset(Character), GetSpriteYByOffset(Character), GetSpriteXByOffset(Character), GetSpriteYByOffset(Character) + 60)
	
	///////////////////Move Player Right left and stop/////////////////////////////////////////////////////////////////////////
	if GetRawKeyState(39) = 1 // Right
	
		SetSpritePhysicsVelocity(Character, 400, GetSpritePhysicsVelocityY(Character))
		
	elseif GetRawKeyState(37) = 1 // Left
		SetSpritePhysicsVelocity(Character, -400, GetSpritePhysicsVelocityY(Character))
	else
		SetSpritePhysicsVelocity(Character, 0, GetSpritePhysicsVelocityY(Character))
	endif
	
	if GetRawKeyPressed(32) = 1 AND RCDown = 1
		SetSpritePhysicsVelocity(Character, GetSpritePhysicsVelocityX(Character), -950)
	endif
	//////////////////////////////////////////////////////////////////////////////////////////////////////
	If DeviceType$ = "android"
	PointerX# = GetPointerX()
	PointerY# = GetPointerY()
	
	If PointerX# > 75 and pointerY# >625 and PointerX# <250 and PointerY# < 800 and GetPointerState()=1
			SetSpritePhysicsVelocity(Character, -400, GetSpritePhysicsVelocityY(Character))
					PlayAnimation = 1
					SetSpriteFlip(Character,1,0)
		elseif PointerX# >210 and PointerY# >625 and PointerX# < 360 and PointerY# < 800 and GetPointerState()=1
			SetSpritePhysicsVelocity(Character, 400, GetSpritePhysicsVelocityY(Character))
			        PlayAnimation = 1
			        SetSpriteFlip (Character,0,0)
			     
			        else
						PlayAnimation = 0		  
	                                	 endif
		
			if GetVirtualButtonPressed(9) and RCDown = 1
						SetSpritePhysicsVelocity(Character, GetSpritePhysicsVelocityX(Character), -825)
			
			endif
			endif
	
		///////////Play Sprite Animation and flip sprite depending on direction///////////////
	if getrawkeystate (39) or GetRawKeyState(37)  or PlayAnimation = 1
		If GetRawKeyState (37) = 1 
			SetSpriteFlip(Character,1,0)
			ElseIf GetRawKeyState(39)
				SetSpriteFlip(Character,0,0)
				endif

   if GetSpritePlaying(Character) = 0
      playsprite (Character)
   endif



else
   if GetSpritePlaying(Character) = 1
      StopSprite(Character)
      SetSpriteFrame(Character, 1)
   endif
endif
	//////////////////////////////////////////////////////////////////////////////////////////////////////////////

Beta Test Age of Knights:https://play.google.com/apps/testing/com.CrazyProgrammerProductions.my_AgeOfKnights
Download JellyFish Dive:https://play.google.com/store/apps/details?id=com.CrazyProgrammerProductions.my_JellyFishSwim

Back to top

Profile PM Email Website

Janku Ayanami

8

Years of Service

User Offline

Joined: 31st Aug 2015

Location: Namibia

Posted: 16th Sep 2015 17:05

Link

Your code gave me a bit of a different idea to use a few other work arounds for the project.

I just updated the second function and though a little silly, it's closer to my goal than I started out with.

function CheckSpriteAnimationWindows()
	
	if GetRawKeyPressed(g_ScanCodes.KEY_SPACE) = 1
		g_CanDoAnimation = 0
		if g_ADT.Animated = 1
			g_ADT.Animated = 0
			StopSprite(g_spPlayer)
		endif
	endif
	
	if GetRawKeyReleased(g_ScanCodes.KEY_SPACE) = 1
		g_CanDoAnimation = 1
	endif
	
	if g_intAirborn = 1
		g_CanDoAnimation = 0
		if g_ADT.Animated = 1
			g_ADT.Animated = 0
			StopSprite(g_spPlayer)
		endif
	else
		g_CanDoAnimation = 1
	endif
	
	if g_CanDoAnimation = 0
		if GetRawKeyState(g_Control.Left) = 1
			g_ADT.Direction = g_ADT.DirLeft
		endif
		
		if GetRawKeyState(g_Control.Right) = 1
			g_ADT.Direction = g_ADT.DirRight
		endif
		
		if g_ADT.Direction = g_ADT.DirLeft
			SetSpriteFrame(g_spPlayer,6)
		else
			SetSpriteFrame(g_spPlayer,10)
		endif
	endif
	
	if g_CanDoAnimation = 1
		if GetRawKeyPressed(g_Control.Left) = 1
			if g_ADT.Animated = 1
				if g_ADT.Direction = g_ADT.DirLeft
				else
					StopSprite(g_spPlayer)
					PlaySprite(g_spPlayer,5,1,5,8)
					g_ADT.Animated = 1
					g_ADT.Direction = g_ADT.DirLeft
				endif
			else
				PlaySprite(g_spPlayer,5,1,5,8)
				g_ADT.Animated = 1
				g_ADT.Direction = g_ADT.DirLeft
			endif
		endif
		
		if GetRawKeyPressed(g_Control.Right) = 1
			if g_ADT.Animated = 1
				if g_ADT.Direction = g_ADT.DirRight
				else
					StopSprite(g_spPlayer)
					PlaySprite(g_spPlayer,5,1,5,8)
					g_ADT.Animated = 1
					g_ADT.Direction = g_ADT.DirRight
				endif
			else
				PlaySprite(g_spPlayer,5,1,9,12)
				g_ADT.Animated = 1
				g_ADT.Direction = g_ADT.DirRight
			endif
		endif
		
		if GetRawKeyState(g_Control.Left) = 1
			if g_ADT.Animated = 0
				PlaySprite(g_spPlayer,5,1,5,8)
				g_ADT.Animated = 1
			endif
		endif
		
		if GetRawKeyState(g_Control.Right) = 1
			if g_ADT.Animated = 0
				PlaySprite(g_spPlayer,5,1,9,12)
				g_ADT.Animated = 1
				g_ADT.Direction = g_ADT.DirRight
			endif
		endif
		
		//if GetRawKeyState(g_Control.Left) = 0 and GetRawKeyPressed(g_Control.Right) = 0
		//	StopSprite(g_spPlayer)
		//endif
		
		if GetRawKeyState(g_Control.Left) = 1 and GetRawKeyState(g_Control.Right) = 1
			StopSprite(g_spPlayer)
			SetSpriteFrame(g_spPlayer,2)
			g_ADT.Animated = 0
		endif
		
		if GetRawKeyState(g_Control.Left) = 0 and GetRawKeyState(g_Control.Right) = 0
			StopSprite(g_spPlayer)
			if g_ADT.Direction = g_ADT.DirLeft
				SetSpriteFrame(g_spPlayer,6)
			else
				SetSpriteFrame(g_spPlayer,10)
			endif
			g_ADT.Animated = 0
		endif
	endif
endfunction

+ Code Snippet

function CheckSpriteAnimationWindows()
	
	if GetRawKeyPressed(g_ScanCodes.KEY_SPACE) = 1
		g_CanDoAnimation = 0
		if g_ADT.Animated = 1
			g_ADT.Animated = 0
			StopSprite(g_spPlayer)
		endif
	endif
	
	if GetRawKeyReleased(g_ScanCodes.KEY_SPACE) = 1
		g_CanDoAnimation = 1
	endif
	
	if g_intAirborn = 1
		g_CanDoAnimation = 0
		if g_ADT.Animated = 1
			g_ADT.Animated = 0
			StopSprite(g_spPlayer)
		endif
	else
		g_CanDoAnimation = 1
	endif
	
	if g_CanDoAnimation = 0
		if GetRawKeyState(g_Control.Left) = 1
			g_ADT.Direction = g_ADT.DirLeft
		endif
		
		if GetRawKeyState(g_Control.Right) = 1
			g_ADT.Direction = g_ADT.DirRight
		endif
		
		if g_ADT.Direction = g_ADT.DirLeft
			SetSpriteFrame(g_spPlayer,6)
		else
			SetSpriteFrame(g_spPlayer,10)
		endif
	endif
	
	if g_CanDoAnimation = 1
		if GetRawKeyPressed(g_Control.Left) = 1
			if g_ADT.Animated = 1
				if g_ADT.Direction = g_ADT.DirLeft
				else
					StopSprite(g_spPlayer)
					PlaySprite(g_spPlayer,5,1,5,8)
					g_ADT.Animated = 1
					g_ADT.Direction = g_ADT.DirLeft
				endif
			else
				PlaySprite(g_spPlayer,5,1,5,8)
				g_ADT.Animated = 1
				g_ADT.Direction = g_ADT.DirLeft
			endif
		endif
		
		if GetRawKeyPressed(g_Control.Right) = 1
			if g_ADT.Animated = 1
				if g_ADT.Direction = g_ADT.DirRight
				else
					StopSprite(g_spPlayer)
					PlaySprite(g_spPlayer,5,1,5,8)
					g_ADT.Animated = 1
					g_ADT.Direction = g_ADT.DirRight
				endif
			else
				PlaySprite(g_spPlayer,5,1,9,12)
				g_ADT.Animated = 1
				g_ADT.Direction = g_ADT.DirRight
			endif
		endif
		
		if GetRawKeyState(g_Control.Left) = 1
			if g_ADT.Animated = 0
				PlaySprite(g_spPlayer,5,1,5,8)
				g_ADT.Animated = 1
			endif
		endif
		
		if GetRawKeyState(g_Control.Right) = 1
			if g_ADT.Animated = 0
				PlaySprite(g_spPlayer,5,1,9,12)
				g_ADT.Animated = 1
				g_ADT.Direction = g_ADT.DirRight
			endif
		endif
		
		//if GetRawKeyState(g_Control.Left) = 0 and GetRawKeyPressed(g_Control.Right) = 0
		//	StopSprite(g_spPlayer)
		//endif
		
		if GetRawKeyState(g_Control.Left) = 1 and GetRawKeyState(g_Control.Right) = 1
			StopSprite(g_spPlayer)
			SetSpriteFrame(g_spPlayer,2)
			g_ADT.Animated = 0
		endif
		
		if GetRawKeyState(g_Control.Left) = 0 and GetRawKeyState(g_Control.Right) = 0
			StopSprite(g_spPlayer)
			if g_ADT.Direction = g_ADT.DirLeft
				SetSpriteFrame(g_spPlayer,6)
			else
				SetSpriteFrame(g_spPlayer,10)
			endif
			g_ADT.Animated = 0
		endif
	endif
endfunction

Back to top

Profile PM Email Website

Crazy Programmer

AGK Developer

19

Years of Service

User Offline

Joined: 6th Sep 2004

Location: Lost in AGK

Posted: 16th Sep 2015 18:36

Link

Glad I could help, Although its not neat and the best looking snippet.
It gets the job done for me at the moment and I have not yet gone back to revise it. (If I ever will )

Beta Test Age of Knights:https://play.google.com/apps/testing/com.CrazyProgrammerProductions.my_AgeOfKnights
Download JellyFish Dive:https://play.google.com/store/apps/details?id=com.CrazyProgrammerProductions.my_JellyFishSwim

Back to top

Profile PM Email Website

Janku Ayanami

8

Years of Service

User Offline

Joined: 31st Aug 2015

Location: Namibia

Posted: 17th Sep 2015 07:52

Link

Same here, I guess it can be done better, but for the moment it fufils my needs.

Back to top

Profile PM Email Website

Sorry your browser is not supported!

Newcomers AppGameKit Corner / Sprite glitch while animated