Please help with collision detection

Author

Message

DMJ

13

Years of Service

User Offline

Joined: 6th Sep 2011

Location: Australia

Posted: 11th Jul 2016 05:52 Edited at: 11th Jul 2016 06:02

Link

I'm having such a hard time trying to get this collision to work. Would be nice if it was physics based.

// Project: TopSecret 
// Created: 2016-07-08
global virtualWidth
global virtualHeight
 
global playerID = 2
global netid
global joined = 0

global upbutton = 10
global rightbutton = 20
global leftbutton = 30
global downbutton = 40
global direction = 0
global dleft = 1
global dright = 2
global dup = 3
global ddown = 4

// show all errors
SetErrorMode(2)

// set window properties
SetWindowTitle( "TopSecret" )
SetWindowSize( 1024, 768, 0 )

// set display properties
SetVirtualResolution( 1024, 768 )
SetOrientationAllowed( 1, 1, 1, 1 )

LoadTheSprites()
SetSpritePhysicsOn( 1, 2 )
SetSpritePhysicsOn( 4, 1 )
global oldplayerx = 0
global oldplayery = 0
//player placement varibles
playerx = 280
playery = 300

do

oldplayerx = playerx
oldplayery = playery

//Player
	setspriteposition (1,playerx,playery)

If button(leftbutton) = 1 
	
	playerx = playerx - 11 
	
if GetSpriteCollision (1, 4) = 1
	playerx = oldplayerx + 11
	playery = oldplayery
endif

endif

If button(rightbutton) = 1 
	
	 playerx = playerx + 10 
	 
if GetSpriteCollision (1, 4) = 1
	playerx = oldplayerx - 11
	playery = oldplayery

endif

If button(upbutton) = 1 
	
	 playery = playery - 10	
	 
if GetSpriteCollision (1, 4) = 1
	playerx = oldplayerx 
	playery = oldplayery + 1
endif

endif

If button(downbutton) = 1 
	
	 playery = playery + 10

if GetSpriteCollision (1, 4) = 1
	playerx = oldplayerx
	playery = oldplayery -1
endif

endif
    
    Sync()
    
loop

function LoadTheSprites ()
	
LoadImage ( 8, "level.png" )
CreateSprite ( 8, 8)

loadimage (1,"bluebean.png")
createsprite (1,1)

LoadImage (10,"butt.png" )
CreateSprite ( upbutton, 10 )
setspriteposition (upbutton,100,280)

LoadImage (20,"butt.png" )
CreateSprite ( leftbutton, 20 )
setspriteposition (leftbutton,20,360)

LoadImage (30,"butt.png" )
CreateSprite ( rightbutton, 30 )
setspriteposition (rightbutton,180,360)

LoadImage (40,"butt.png" )
CreateSprite ( downbutton, 40 )
setspriteposition (downbutton,100,440)

loadimage (4, "easy.jpg")
createsprite (4,4)
setSpritePhysicsOn(4,1)
  
SetSpritePosition ( 4, 650, 300 )

endfunction

Function button(sprite) 
returnValue = 0 `reset value for check
If GetPointerX() > GetSpriteXByOffset( sprite ) - ( GetSpriteWidth( sprite ) / 2 )
 If GetPointerX() < GetSpriteXByOffset( sprite ) + ( GetSpriteWidth( sprite ) / 2 )
   If GetPointerY() > GetSpriteYByOffset( sprite ) - ( GetSpriteHeight( sprite ) / 2 )
    If GetPointerY() < GetSpriteYByOffset( sprite ) + ( GetSpriteHeight( sprite ) / 2 )
      If GetPointerState() = 1
        returnValue = 1
      Endif
     Endif
   Endif
  Endif
Endif
EndFunction returnValue

+ Code Snippet


// Project: TopSecret 
// Created: 2016-07-08
global virtualWidth
global virtualHeight
 
global playerID = 2
global netid
global joined = 0

global upbutton = 10
global rightbutton = 20
global leftbutton = 30
global downbutton = 40
global direction = 0
global dleft = 1
global dright = 2
global dup = 3
global ddown = 4

// show all errors
SetErrorMode(2)

// set window properties
SetWindowTitle( "TopSecret" )
SetWindowSize( 1024, 768, 0 )

// set display properties
SetVirtualResolution( 1024, 768 )
SetOrientationAllowed( 1, 1, 1, 1 )

LoadTheSprites()
SetSpritePhysicsOn( 1, 2 )
SetSpritePhysicsOn( 4, 1 )
global oldplayerx = 0
global oldplayery = 0
//player placement varibles
playerx = 280
playery = 300


do

oldplayerx = playerx
oldplayery = playery

	//Player
	setspriteposition (1,playerx,playery)
	

If button(leftbutton) = 1 
	
	playerx = playerx - 11 
	
if GetSpriteCollision (1, 4) = 1
	playerx = oldplayerx + 11
	playery = oldplayery
endif

endif

If button(rightbutton) = 1 
	
	 playerx = playerx + 10 
	 
if GetSpriteCollision (1, 4) = 1
	playerx = oldplayerx - 11
	playery = oldplayery

endif

endif

If button(upbutton) = 1 
	
	 playery = playery - 10	
	 
if GetSpriteCollision (1, 4) = 1
	playerx = oldplayerx 
	playery = oldplayery + 1
endif

endif

If button(downbutton) = 1 
	
	 playery = playery + 10 

if GetSpriteCollision (1, 4) = 1
	playerx = oldplayerx
	playery = oldplayery -1
endif

endif
    
    Sync()
    
loop

 


function LoadTheSprites ()
	
LoadImage ( 8, "level.png" )
CreateSprite ( 8, 8)

loadimage (1,"bluebean.png")
createsprite (1,1)


LoadImage (10,"butt.png" )
CreateSprite ( upbutton, 10 )
setspriteposition (upbutton,100,280)

LoadImage (20,"butt.png" )
CreateSprite ( leftbutton, 20 )
setspriteposition (leftbutton,20,360)

LoadImage (30,"butt.png" )
CreateSprite ( rightbutton, 30 )
setspriteposition (rightbutton,180,360)

LoadImage (40,"butt.png" )
CreateSprite ( downbutton, 40 )
setspriteposition (downbutton,100,440)


loadimage (4, "easy.jpg")
createsprite (4,4)
setSpritePhysicsOn(4,1)
  
SetSpritePosition ( 4, 650, 300 )

 


endfunction

Function button(sprite) 
returnValue = 0 `reset value for check
If GetPointerX() > GetSpriteXByOffset( sprite ) - ( GetSpriteWidth( sprite ) / 2 )
 If GetPointerX() < GetSpriteXByOffset( sprite ) + ( GetSpriteWidth( sprite ) / 2 )
   If GetPointerY() > GetSpriteYByOffset( sprite ) - ( GetSpriteHeight( sprite ) / 2 )
    If GetPointerY() < GetSpriteYByOffset( sprite ) + ( GetSpriteHeight( sprite ) / 2 )
      If GetPointerState() = 1
        returnValue = 1
      Endif
     Endif
   Endif
  Endif
Endif
EndFunction returnValue

Back to top

Profile PM Email

DMJ

13

Years of Service

User Offline

Joined: 6th Sep 2011

Location: Australia

Posted: 11th Jul 2016 05:53

Link

This is one sprite

Attachments

Login to view attachments

Back to top

Profile PM Email

DMJ

13

Years of Service

User Offline

Joined: 6th Sep 2011

Location: Australia

Posted: 11th Jul 2016 05:54

Link

Here is the button

Attachments

Login to view attachments

Back to top

Profile PM Email

DMJ

13

Years of Service

User Offline

Joined: 6th Sep 2011

Location: Australia

Posted: 11th Jul 2016 05:54

Link

Here is the level

Attachments

Login to view attachments

Back to top

Profile PM Email

easter bunny

12

Years of Service

User Offline

Joined: 20th Nov 2012

Playing: Dota 2

Posted: 11th Jul 2016 13:23

Link

Alright let's see if i can help...
So first I'd recommend you try and use physics commands if you can, I know there are a few good reasons not to though.
If you're determined too use a custom physics system then you might want to look into raycasting commands. I've never used them myself but I'm sure you can get plenty of help on the forum if you want to try them

Now if you want to keep away from all of that, then I have a couple of ideas that you should try.
So the basic idea of doing a physics system is to do this:
1. Move the player (dynamic) sprite
2. Check for collision with any other sprites
3. Find out where the player sprite should have been when it collided
4. Set the new player position and calculate the new speed/direction of the sprite.

The hardest part is of course step three. Physics systems use lots of complicated maths, I assume you'd prefer a simpler system so I have one here for you.
Basically just this:
Store the current players motion vector (ie X speed + Y speed).
Add that to the current player position.
Check for collision.
If collision
For k = 1 to 10
|Player position=player position - player vector/10
|Check for collision again, if no collision then exit loop
Next K
Endif

Does that make sense? Basically you need a loop inside your main loop that will iterate backwards through every position the player sprite should have been between this frame and the previous frame, and finds exactly where it was when it collided.

Audacia Games - Latest WIP - AUTOMAYTE 2.1, AppGameKit one click deploy to Android
130,000 installs with AppGameKit and counting

Back to top

Profile PM Email

DMJ

13

Years of Service

User Offline

Joined: 6th Sep 2011

Location: Australia

Posted: 11th Jul 2016 18:09

Link

Thank you for the advice, how would I do it with my current system though?

Back to top

Profile PM Email

Markus

Valued Member

20

Years of Service

User Offline

Joined: 10th Apr 2004

Location: Germany

Posted: 11th Jul 2016 19:17 Edited at: 11th Jul 2016 19:22

Link

i made a physic example with your code.
if you will have a bounce at the window borders you need also physic sprites.
you can disable the rotate by SetSpritePhysicsCanRotate ( iSpriteIndex, rotate )
see also GetSpriteHitTest ( iSpriteIndex, x, y ) for your input screen buttons.

//AGK 2.0.20
//MR

global upbutton = 10
global rightbutton = 20
global leftbutton = 30
global downbutton = 40
  
// set window properties
SetWindowTitle( "TopSecret" )
SetWindowSize( 1024, 768, 0 )
 
// set display properties
SetVirtualResolution( 1024, 768 )
SetOrientationAllowed( 1, 1, 1, 1 )
 
SetPhysicsDebugOn()
SetPhysicsScale(1.0 / 1024.0)
SetPhysicsGravity(0,0)
 
LoadTheSprites()
  
#constant f= 1000
 
do
 
	forcex=0
	forcey=0
	
	
	If button(leftbutton) = 1 
		 
		forcex = forcex -f
	 
	endif
	 
	If button(rightbutton) = 1 
		 
		forcex = forcex +f
	 
	endif
	 
	If button(upbutton) = 1 
		 
		forcey = forcey -f
	 
	endif
	 
	If button(downbutton) = 1 
		 
		forcey = forcey +f 
	 
	endif
    
    print("force x = "+str(forcex)+" y = "+str(forcey))
    SetSpritePhysicsForce(1,GetSpriteXByOffset(1),GetSpriteyByOffset(1),forcex,forcey)
     
    Sync()
     
loop
 
  
 
 
function LoadTheSprites ()
     
	LoadImage ( 8, "level.png" )
	CreateSprite ( 8, 8)
	
	//Player 
	loadimage (1,"bluebean.png")
	createsprite (1,1)
	SetSpritePhysicsOn( 1, 2 ) //2=dynamic
	 
	//input pad 
	LoadImage (10,"butt.png" )
	CreateSprite ( upbutton, 10 )
	setspriteposition (upbutton,100,280)
	 
	LoadImage (20,"butt.png" )
	CreateSprite ( leftbutton, 20 )
	setspriteposition (leftbutton,20,360)
	 
	LoadImage (30,"butt.png" )
	CreateSprite ( rightbutton, 30 )
	setspriteposition (rightbutton,180,360)
	 
	LoadImage (40,"butt.png" )
	CreateSprite ( downbutton, 40 )
	setspriteposition (downbutton,100,440)
	 
	//obstacle 
	loadimage (4, "easy.jpg")
	createsprite (4,4)
	SetSpritePhysicsOn( 4, 1 ) //1=static
	   
	SetSpritePosition ( 4, 650, 300 )
  
endfunction
 
Function button(sprite) 
returnValue = 0 `reset value for check
If GetPointerX() > GetSpriteXByOffset( sprite ) - ( GetSpriteWidth( sprite ) / 2 )
 If GetPointerX() < GetSpriteXByOffset( sprite ) + ( GetSpriteWidth( sprite ) / 2 )
   If GetPointerY() > GetSpriteYByOffset( sprite ) - ( GetSpriteHeight( sprite ) / 2 )
    If GetPointerY() < GetSpriteYByOffset( sprite ) + ( GetSpriteHeight( sprite ) / 2 )
      If GetPointerState() = 1
        returnValue = 1
      Endif
     Endif
   Endif
  Endif
Endif
EndFunction returnValue

+ Code Snippet

//AGK 2.0.20
//MR

 
global upbutton = 10
global rightbutton = 20
global leftbutton = 30
global downbutton = 40
  
// set window properties
SetWindowTitle( "TopSecret" )
SetWindowSize( 1024, 768, 0 )
 
// set display properties
SetVirtualResolution( 1024, 768 )
SetOrientationAllowed( 1, 1, 1, 1 )
 
SetPhysicsDebugOn()
SetPhysicsScale(1.0 / 1024.0)
SetPhysicsGravity(0,0)
 
LoadTheSprites()
  
#constant f= 1000
 
do
 
	forcex=0
	forcey=0
	
	
	If button(leftbutton) = 1 
		 
		forcex = forcex -f
	 
	endif
	 
	If button(rightbutton) = 1 
		 
		forcex = forcex +f
	 
	endif
	 
	If button(upbutton) = 1 
		 
		forcey = forcey -f
	 
	endif
	 
	If button(downbutton) = 1 
		 
		forcey = forcey +f 
	 
	endif
    
    print("force x = "+str(forcex)+" y = "+str(forcey))
    SetSpritePhysicsForce(1,GetSpriteXByOffset(1),GetSpriteyByOffset(1),forcex,forcey)
     
    Sync()
     
loop
 
  
 
 
function LoadTheSprites ()
     
	LoadImage ( 8, "level.png" )
	CreateSprite ( 8, 8)
	
	//Player 
	loadimage (1,"bluebean.png")
	createsprite (1,1)
	SetSpritePhysicsOn( 1, 2 ) //2=dynamic
	 
	//input pad 
	LoadImage (10,"butt.png" )
	CreateSprite ( upbutton, 10 )
	setspriteposition (upbutton,100,280)
	 
	LoadImage (20,"butt.png" )
	CreateSprite ( leftbutton, 20 )
	setspriteposition (leftbutton,20,360)
	 
	LoadImage (30,"butt.png" )
	CreateSprite ( rightbutton, 30 )
	setspriteposition (rightbutton,180,360)
	 
	LoadImage (40,"butt.png" )
	CreateSprite ( downbutton, 40 )
	setspriteposition (downbutton,100,440)
	 
	//obstacle 
	loadimage (4, "easy.jpg")
	createsprite (4,4)
	SetSpritePhysicsOn( 4, 1 ) //1=static
	   
	SetSpritePosition ( 4, 650, 300 )
  
endfunction
 
Function button(sprite) 
returnValue = 0 `reset value for check
If GetPointerX() > GetSpriteXByOffset( sprite ) - ( GetSpriteWidth( sprite ) / 2 )
 If GetPointerX() < GetSpriteXByOffset( sprite ) + ( GetSpriteWidth( sprite ) / 2 )
   If GetPointerY() > GetSpriteYByOffset( sprite ) - ( GetSpriteHeight( sprite ) / 2 )
    If GetPointerY() < GetSpriteYByOffset( sprite ) + ( GetSpriteHeight( sprite ) / 2 )
      If GetPointerState() = 1
        returnValue = 1
      Endif
     Endif
   Endif
  Endif
Endif
EndFunction returnValue

AGK (Steam) V2.0.19 : Windows 10 Pro 64 Bit : AMD (16.3.2) Radeon R7 265 : Mac mini OS X 10.10 (Yosemite)

Back to top

Profile PM Email

DMJ

13

Years of Service

User Offline

Joined: 6th Sep 2011

Location: Australia

Posted: 11th Jul 2016 19:35

Link

Thank you!

Back to top

Profile PM Email

Sorry your browser is not supported!

AppGameKit Classic Chat / Please help with collision detection

Attachments

Attachments

Attachments