A little help with collision?

Blitz3D Forums/Blitz3D Beginners Area/A little help with collision?

Obliteration (Posted 2014) [#1]

Hello, sorry for repeating a same question for three two six four several few times and still can't get the camera (player) collision moving, I've tried but it appear be useless... I am trying make a game that the player walk and run (not important). The code is below; Graphics3D 1600,900 SetBuffer BackBuffer() HidePointer AppTitle "Trail - ___________" camera = CreateCamera() CameraClsColor camera,0,0,55 PositionEntity camera,0,2.0,-7.0 CameraFogRange camera,1,30 EntityType camera,camera_col light = CreateLight() fog_mode=1-fog_mode : CameraFogMode camera,fog_mode scene = LoadMesh("1st.b3d") sound = Load3DSound("random2.ogg") ;A generator in backup power room ------------------------- gen = CreateCube() PositionEntity gen,-13.5,1.0,3.0 EntityColor gen,255,255,255 EntityPickMode gen,1 ;----------------------------------------------------------- While Not KeyDown(1) If MouseHit(1) Then CameraPick(camera,MouseX(),MouseY()) pick = PickedEntity() EndIf If pick = gen Or pick msg = True EndIf If pick = 0 msg = False EndIf ;if [condition] then [do something] If KeyDown(30) Then MoveEntity camera,-0.025,0,0 ;right If KeyDown(32) Then MoveEntity camera,0.025,0,0 ;left If KeyDown(17) Then MoveEntity camera,0,0,0.1 ;forward If KeyDown(31) Then MoveEntity camera,0,0,-0.07 ;backward If KeyDown(57) Then TranslateEntity camera,0,0.1,0 ;up If KeyDown(42) Then TranslateEntity camera,0,-0.1,0 ;down mxs# = mxs# + MouseXSpeed() mys# = mys# + MouseYSpeed() If mxs# > 360 Then mxs# = 0 If mxs# < 0 Then mxs = 360 If mys# > 80 Then mys# = -80 If mys# < -80 Then mys = 80 RotateEntity camera,mys#,-mxs,0 MoveMouse 800,450 If MouseDown(3) Then MoveEntity camera,0,0,0.1 UpdateWorld RenderWorld If msg=True Then Text 800,650,"Look like a backup generator for when there is power failure", 1,1 EndIf If msg=True Then EmitSound(sound,gen) Flip Wend I really appreciate your time explaining to me or even correct it. Also I've tried make sound play when click on box (or called gen). When I've click on box, it went No Listener created. Thank you again for your time reading this.

Rick Nasher (Posted 2014) [#2]

For the basices of collisions/sound I suggest checking these examples/tutorials: http://jnoodle.com/Blitz3D/ and: http://jnoodle.com/Blitz3D_1/ For Picking: http://www.blitzbasic.com/codearcs/codearcs.php?code=3095

RemiD (Posted 2014) [#3]

Some ideas to manage collidables, colliders, collisions : ->for the collidables (the shapes which are static and receive collisions) i use low tris meshes ->for the colliders (the shapes which are turning moving and provoke collisions) i use ellispoids (a pivot + entityradius) entityradius(pivot,radius#) ->then i put each collidable in a collisions group, and each collider in a collision group : (i use constants to make the code more clear) const GroupTerrainsP% = 1 const GroupBuildingsP% = 2 const GroupCharactersP% = 3 const GroupCharactersE% = 4 const GroupBulletsE% = 5 EntityType(TerrainCollidable,GroupTerrainsP) EntityType(BuildingCollidable,GroupBuildingsP) EntityType(CharacterCollidable,GroupCharactersP) EntityType(CharacterCollider,GroupCharactersE) EntityType(BulletCollider,GroupBulletsE) E represents Ellipsoid (=turning moving ellipsoids) P represents Polygon (=static low tris meshes) ->then i define the collisions detection and response between the different groups Collisions(GroupCharactersE,GroupTerrainsP,2,2) ;ellipsoid to polygon, slide Collisions(GroupCharactersE,GroupBuildingsP,2,2) ;ellipsoid to polygon, slide Collisions(GroupCharactersE,GroupCharactersE,1,2) ;ellipsoid to ellipsoid, slide Collisions(GroupBulletsE,GroupCharactersP,2,1) ;ellipsoid to polygon, stop ->then in the mainloop, I turn move the turningmoving entities (in this case the characters and the bullets) then updateworld(), then if needed, i check if some collisions happened, and if yes i update the state and the orientation and the position of the concerned colliders/entities ->to check if a collision happened, for each collider i use countcollisions(collider) and collisionentity(collider,1) see these examples : with dim arrays http://www.blitzbasic.com/codearcs/codearcs.php?code=3094 with types http://www.blitzbasic.com/codearcs/codearcs.php?code=3095 or this one : (simpler) http://www.blitzbasic.com/codearcs/codearcs.php?code=3141

Obliteration (Posted 2014) [#4]

I've had a look at these, thank you.