Sorry your browser is not supported!

rem
rem AGK Application
rem

rem Landscape App
SetDisplayAspect( 4.0/3.0 )

rem create two sprites
s1 = createSprite(0)
setSpriteSize(s1,5,-1)
setSpritePositionByOffset(s1,25,50)
setSpritePhysicsOn(s1,2)
s2 = createSprite(0)
setSpriteSize(s2,5,-1)
setSpritePositionByOffset(s2,75,50)
setSpritePhysicsOn(s2,2)

rem set gravity off
setPhysicsGravity(0,0)

mj = 0

rem A Wizard Did It!
do
    rem print results
    print("Force = "+str(f#))
    
    rem mouse grab
    px# = getPointerX()
    py# = getPointerY()
    if getPointerPressed()>0
        hit =  getSpriteHit(px#,py#)
        if hit>0
            mj = createMouseJoint(hit,px#,py#,1000000)
        endif
    else
        if mj>0
            if getPointerState()>0
                setJointMouseTarget(mj,px#,py#)
            else
                deleteJoint(mj)
                mj = 0
            endif
        endif
    endif
    
    rem detect collision
    if getPhysicsCollision(s1,s2)>0
        f# = getCollisionStrength(s1,s2)
    endif
    
    Sync()
loop

function getCollisionStrength(iSpriteIndex1,iSpriteIndex2)
    rem get all forces
    forceX1# = GetSpritePhysicsVelocityX( iSpriteIndex1 )
    forceY1# = GetSpritePhysicsVelocityY( iSpriteIndex1 )
    forceX2# = GetSpritePhysicsVelocityX( iSpriteIndex2 )
    forceY2# = GetSpritePhysicsVelocityY( iSpriteIndex2 )

    rem get total force left after collision
    forceX# = forceX1# + forceX2#
    forceY# = forceY1# + forceY2#
    force# = sqrt(forceX#*forceX# + forceY#*forceY#)
endfunction force#

// Include Box2d header
#include "Box2D/Box2D.h"

static b2ContactListener *gOrigContactListener = NULL;

class MyContactListener : public b2ContactListener 
{
	virtual void BeginContact(b2Contact* contact) { 
		if (gOrigContactListener) gOrigContactListener->BeginContact(contact);
	}

	virtual void EndContact(b2Contact* contact) { 
		if (gOrigContactListener) gOrigContactListener->EndContact(contact);
	}

	virtual void PreSolve(b2Contact* contact, const b2Manifold* oldManifold)
	{
		b2WorldManifold worldManifold;
		b2PointState state1[2], state2[2];

		contact->GetWorldManifold(&worldManifold);
		b2GetPointStates(state1, state2, oldManifold, contact->GetManifold());

		if (state2[0] == b2_addState)
		{
			b2Body* bodyA = contact->GetFixtureA()->GetBody();
			b2Body* bodyB = contact->GetFixtureB()->GetBody();

			if (bodyA->GetUserData() && bodyB->GetUserData())
			{
				int agkSpriteID1 = *(int*)bodyA->GetUserData();
				int agkSpriteID2 = *(int*)bodyB->GetUserData();
				// Do something with sprites and contact data (your code here)
			}
		}
		if (gOrigContactListener) gOrigContactListener->PreSolve(contact, oldManifold);
	}

	virtual void PostSolve(b2Contact* contact, const b2ContactImpulse* impulse)
	{
		b2Body *bodyA = contact->GetFixtureA()->GetBody();
		b2Body *bodyB = contact->GetFixtureB()->GetBody();

		if (bodyA->GetUserData() && bodyB->GetUserData())
		{
			int agkSpriteID1 = *(int*)bodyA->GetUserData();
			int agkSpriteID2 = *(int*)bodyB->GetUserData();
			// Do something with sprites and impulse data (your code here)
		}

		if (gOrigContactListener) gOrigContactListener->PostSolve(contact, impulse);
	}
};

static MyContactListener gContactListener;

void AttachB2ContactListener(b2World *w)
{
	// Store pointer to current contact listener (maybe set by AGK)
	gOrigContactListener = w->GetContactManager().m_contactListener;

	// Set own listener
	w->SetContactListener(&gContactListener);
}

AttachB2ContactListener(agk::GetPhysicsWorld());