Map Collisions - GameCreators Forum

Author

Message

XFS Illusion

20

Years of Service

User Offline

Joined: 20th Apr 2006

Location:

Posted: 8th Jan 2012 17:55

Link

I'm actually coding in .NET but the support base in this forum seems to be more active. I can translate any code if necessary. Here is my question...

Is there a way to use map collisions, such as load a model of a map and keep from passing through the walls, without using Sparky's collision? Reason I ask is because SC isn't available in .NET and i'm not sure how to compile it into a DLL to use in my NET project. All the examples i've found so far use SC.

Back to top

Profile PM

Chris Tate

DBPro Master

17

Years of Service

User Offline

Joined: 29th Aug 2008

Location: London, England

Posted: 8th Jan 2012 18:41

Link

It is possible if you set your map to use polygon collision ( Set Object Collision To Polygons || DGDKPlugins.CDarkGDK.oDB3D.SetObjectCollisionToPolygons() ).

The intersect object function can be used to check if there is a collision between the player and the wall, before moving ahead. There should be a collision snippet in the forum which uses the standard intersection command.

Back to top

Profile PM Email Website

XFS Illusion

20

Years of Service

User Offline

Joined: 20th Apr 2006

Location:

Posted: 8th Jan 2012 19:30 Edited at: 8th Jan 2012 19:31

Link

By the way, what ever happened to the Load Static Objects command, does it still exist? I saw lots of examples which allow the use of FPSC maps, but my editor doesn't seem to recognize it.

I'm thinking about going back to DBP, the .NET version seems to be slow and lack support.

Back to top

Profile PM

chafari

Valued Member

20

Years of Service

User Offline

Joined: 2nd May 2006

Location: Canary Islands

Posted: 8th Jan 2012 19:36 Edited at: 8th Jan 2012 19:40

Link

Hi there. Take a look to this two pieces of code attached. One works with old collision commands , and the second works using intersec object commmand. I hope it can help.

Cheers.

I'm not a grumpy grandpa

Back to top

Profile PM Email

Brendy boy

20

Years of Service

User Offline

Joined: 17th Jul 2005

Location: Croatia

Posted: 8th Jan 2012 20:37

Link

Quote: "Is there a way to use map collisions, such as load a model of a map and keep from passing through the walls, without using Sparky's collision? Reason I ask is because SC isn't available in .NET and i'm not sure how to compile it into a DLL to use in my NET project. All the examples i've found so far use SC. "

You can create a BSP out of your map. Checking for collision against BSP is very fast. The built in collision commands check every poly of an object for collision so if you have a compley map it will be slow.

BBB GUI Plugin
Landscape & Map Creator

Back to top

Profile PM Email

XFS Illusion

20

Years of Service

User Offline

Joined: 20th Apr 2006

Location:

Posted: 8th Jan 2012 21:26

Link

The code was a pain to translate to .net, but it worked well, thank you.

Brendy, BSP's was my first option, but I have no idea how to make one or convert an existing model to BSP. If there was a way to do this i'd seriously consider it.

Back to top

Profile PM

chafari

Valued Member

20

Years of Service

User Offline

Joined: 2nd May 2006

Location: Canary Islands

Posted: 8th Jan 2012 21:39

Link

There was an application included in Dbpro to convert an x to BSP. You can use Quark6 that is free, but you will have to install Quake2 or Quake3 to compile the level and then use it in Dbpro.

Cheers.

I'm not a grumpy grandpa

Back to top

Profile PM Email

XFS Illusion

20

Years of Service

User Offline

Joined: 20th Apr 2006

Location:

Posted: 8th Jan 2012 22:48

Link

Here is the .NET translated code if anybody needs it. It also works with maps created with FPSC.

'   DarkGDK.NET Startup project
'
Imports DarkGDK
Imports DGDKPlugins
Imports DarkGDK.Camera

''' <summary>
''' Our main application class
''' </summary>
''' <remarks></remarks>
Public Class Application
    Shared v As Double
    Shared x As Double = 10
    Shared y As Double = 10
    Shared z As Double = 10
    Shared tmp As Double
    Shared gravedad As Double = 0
    Shared gr As Integer
    Shared gr2 As Integer
    Shared c As Integer = 2

Public Shared Sub GameLoop()
        CDarkGDK.oDBLight.SetAmbientLight(100)
        'CDarkGDK.oDB3D.LoadObject("iglesia.x", 1)
        'CDarkGDK.oDB3D.LoadObject("universe.dbo", 1)
        CDarkGDK.oDB3D.LoadObject("levelbank/testlevel/universe.dbo", 1)
        CDarkGDK.oDB3D.ScaleObject(1, 800, 800, 800)
        CDarkGDK.oDB3D.PositionObject(1, 0, 0, 0)
        CDarkGDK.oDB3D.MakeObjectSphereB(2, 150)
        v = CDarkGDK.oDB3D.ObjectSize(2)
        CDarkGDK.oDB3D.HideObject(2)
        CDarkGDK.oDBCamera.SetCameraRange(0.1, 50000)
        CDarkGDK.oDB3D.PositionObject(2, 10, 10, 10)
        CDarkGDK.oDBCamera.PositionCamera(10, 10, 10)

While DarkGDK.Engine.LoopGDK()
            MapCollision()
            CDarkGDK.oDBCore.Sync()

End While
    End Sub

Public Shared Sub MapCollision()

x = CDarkGDK.oDB3D.ObjectPositionX(2)
        y = CDarkGDK.oDB3D.ObjectPositionY(2)
        z = CDarkGDK.oDB3D.ObjectPositionZ(2)

' collision with X
        tmp = CDarkGDK.oDB3D.IntersectObject(1, x, y, z, x + v, y, z)
        If tmp > 0 Then x = x - (v - tmp)

tmp = CDarkGDK.oDB3D.IntersectObject(1, x, y, z, x - v, y, z)
        If tmp > 0 Then x = x + (v - tmp)

' collision with Z
        tmp = CDarkGDK.oDB3D.IntersectObject(1, x, y, z, x, y, z + v)
        If tmp > 0 Then z = z - (v - tmp)

tmp = CDarkGDK.oDB3D.IntersectObject(1, x, y, z, x, y, z - v)
        If tmp > 0 Then z = z + (v - tmp)

'collision with Y
        tmp = CDarkGDK.oDB3D.IntersectObject(1, x, y, z, x, y - v, z)
        If tmp > 0 Then y = y + (v - tmp) / 3

'Gravity
        tmp = CDarkGDK.oDB3D.IntersectObject(1, x, y, z, x, y - v, z)
        If tmp = 0 Then gravedad = 2 Else gravedad = 1

gr = CDarkGDK.oDBCore.WrapValue(gr + CDarkGDK.oDBInput.MouseMoveX() / 3)
        gr2 = CDarkGDK.oDBCore.WrapValue(gr2 + CDarkGDK.oDBInput.MouseMoveY() / 3)

'camera movements

CDarkGDK.oDBCamera.RotateCamera(gr2, 0, 0)
        CDarkGDK.oDBCamera.YRotateCamera(gr)
        'camera rotation limits
        If gr2 <= 290 And gr2 > 180 Then gr2 = 290
        If gr2 >= 70 And gr2 < 180 Then gr2 = 70

'player movements
        If CDarkGDK.oDBInput.KeyState(17) Then x = CDarkGDK.oDBCore.NewXValue(x, gr, c)
        If CDarkGDK.oDBInput.KeyState(17) Then z = CDarkGDK.oDBCore.NewZValue(z, gr, c)
        If CDarkGDK.oDBInput.KeyState(31) Then x = CDarkGDK.oDBCore.NewXValue(x, gr, -c)
        If CDarkGDK.oDBInput.KeyState(31) Then z = CDarkGDK.oDBCore.NewZValue(z, gr, -c)

'slide
        If CDarkGDK.oDBInput.LeftKey Then x = CDarkGDK.oDBCore.NewXValue(x, gr - 90, c)
        If CDarkGDK.oDBInput.LeftKey Then z = CDarkGDK.oDBCore.NewXValue(z, gr - 90, c)
        If CDarkGDK.oDBInput.RightKey Then x = CDarkGDK.oDBCore.NewXValue(x, gr - 90, -c)
        If CDarkGDK.oDBInput.RightKey Then z = CDarkGDK.oDBCore.NewXValue(z, gr - 90, -c)

'camera and player position
        CDarkGDK.oDB3D.PositionObject(2, x, y - gravedad, z)
        CDarkGDK.oDBCamera.PositionCamera(x, 22 + y - gravedad, z)
    End Sub
End Class

+ Code Snippet


'   DarkGDK.NET Startup project
'
Imports DarkGDK
Imports DGDKPlugins
Imports DarkGDK.Camera

''' <summary>
''' Our main application class
''' </summary>
''' <remarks></remarks>
Public Class Application
    Shared v As Double
    Shared x As Double = 10
    Shared y As Double = 10
    Shared z As Double = 10
    Shared tmp As Double
    Shared gravedad As Double = 0
    Shared gr As Integer
    Shared gr2 As Integer
    Shared c As Integer = 2

    Public Shared Sub GameLoop()
        CDarkGDK.oDBLight.SetAmbientLight(100)
        'CDarkGDK.oDB3D.LoadObject("iglesia.x", 1)
        'CDarkGDK.oDB3D.LoadObject("universe.dbo", 1)
        CDarkGDK.oDB3D.LoadObject("levelbank/testlevel/universe.dbo", 1)
        CDarkGDK.oDB3D.ScaleObject(1, 800, 800, 800)
        CDarkGDK.oDB3D.PositionObject(1, 0, 0, 0)
        CDarkGDK.oDB3D.MakeObjectSphereB(2, 150)
        v = CDarkGDK.oDB3D.ObjectSize(2)
        CDarkGDK.oDB3D.HideObject(2)
        CDarkGDK.oDBCamera.SetCameraRange(0.1, 50000)
        CDarkGDK.oDB3D.PositionObject(2, 10, 10, 10)
        CDarkGDK.oDBCamera.PositionCamera(10, 10, 10)

        While DarkGDK.Engine.LoopGDK()
            MapCollision()
            CDarkGDK.oDBCore.Sync()


        End While
    End Sub

    Public Shared Sub MapCollision()

      

        x = CDarkGDK.oDB3D.ObjectPositionX(2)
        y = CDarkGDK.oDB3D.ObjectPositionY(2)
        z = CDarkGDK.oDB3D.ObjectPositionZ(2)


        ' collision with X
        tmp = CDarkGDK.oDB3D.IntersectObject(1, x, y, z, x + v, y, z)
        If tmp > 0 Then x = x - (v - tmp)

        tmp = CDarkGDK.oDB3D.IntersectObject(1, x, y, z, x - v, y, z)
        If tmp > 0 Then x = x + (v - tmp)


        ' collision with Z
        tmp = CDarkGDK.oDB3D.IntersectObject(1, x, y, z, x, y, z + v)
        If tmp > 0 Then z = z - (v - tmp)

        tmp = CDarkGDK.oDB3D.IntersectObject(1, x, y, z, x, y, z - v)
        If tmp > 0 Then z = z + (v - tmp)

        'collision with Y
        tmp = CDarkGDK.oDB3D.IntersectObject(1, x, y, z, x, y - v, z)
        If tmp > 0 Then y = y + (v - tmp) / 3

        'Gravity
        tmp = CDarkGDK.oDB3D.IntersectObject(1, x, y, z, x, y - v, z)
        If tmp = 0 Then gravedad = 2 Else gravedad = 1

        


        gr = CDarkGDK.oDBCore.WrapValue(gr + CDarkGDK.oDBInput.MouseMoveX() / 3)
        gr2 = CDarkGDK.oDBCore.WrapValue(gr2 + CDarkGDK.oDBInput.MouseMoveY() / 3)

        'camera movements

      
        CDarkGDK.oDBCamera.RotateCamera(gr2, 0, 0)
        CDarkGDK.oDBCamera.YRotateCamera(gr)
        'camera rotation limits
        If gr2 <= 290 And gr2 > 180 Then gr2 = 290
        If gr2 >= 70 And gr2 < 180 Then gr2 = 70




        'player movements
        If CDarkGDK.oDBInput.KeyState(17) Then x = CDarkGDK.oDBCore.NewXValue(x, gr, c)
        If CDarkGDK.oDBInput.KeyState(17) Then z = CDarkGDK.oDBCore.NewZValue(z, gr, c)
        If CDarkGDK.oDBInput.KeyState(31) Then x = CDarkGDK.oDBCore.NewXValue(x, gr, -c)
        If CDarkGDK.oDBInput.KeyState(31) Then z = CDarkGDK.oDBCore.NewZValue(z, gr, -c)


        'slide
        If CDarkGDK.oDBInput.LeftKey Then x = CDarkGDK.oDBCore.NewXValue(x, gr - 90, c)
        If CDarkGDK.oDBInput.LeftKey Then z = CDarkGDK.oDBCore.NewXValue(z, gr - 90, c)
        If CDarkGDK.oDBInput.RightKey Then x = CDarkGDK.oDBCore.NewXValue(x, gr - 90, -c)
        If CDarkGDK.oDBInput.RightKey Then z = CDarkGDK.oDBCore.NewXValue(z, gr - 90, -c)

        'camera and player position
        CDarkGDK.oDB3D.PositionObject(2, x, y - gravedad, z)
        CDarkGDK.oDBCamera.PositionCamera(x, 22 + y - gravedad, z)
    End Sub
End Class

Back to top

Profile PM

chafari

Valued Member

20

Years of Service

User Offline

Joined: 2nd May 2006

Location: Canary Islands

Posted: 9th Jan 2012 00:20

Link

Thanks for the snippet

Cheers.

I'm not a grumpy grandpa

Back to top

Profile PM Email

Brendy boy

20

Years of Service

User Offline

Joined: 17th Jul 2005

Location: Croatia

Posted: 9th Jan 2012 22:01

Link

Quote: "Brendy, BSP's was my first option, but I have no idea how to make one or convert an existing model to BSP. If there was a way to do this i'd seriously consider it. "

There's a lot of code snippet on the internet for this, search. I recomend to take a look at Humus

You don't need the code for bsp rendering (a bit complicated), just for collision (i think that's called leaf based bsp - much simpler)

BBB GUI Plugin
Landscape & Map Creator

Back to top

Profile PM Email

Sorry your browser is not supported!

DarkBASIC Professional Discussion / Map Collisions