C SHOP + COLLISIONS

Blitz3D Forums/Blitz3D Programming/C SHOP + COLLISIONS

Please help No Collisions????



;Collisions With Cartography Shop


; Collision variables...
Const COLLISION_OBSTICLE = 1 ; Walls, etc..
Const COLLISION_PLAYER = 2 ; The player..


If Windowed3D() Graphics3D 800,600,16,1
SetBuffer BackBuffer()


;cam=CreateCamera()
;CameraRange cam,1,100
;MoveEntity cam,0,60,-100
;EntityType cam,1
;CameraZoom cam,1.5


Collisions COLLISION_PLAYER,COLLISION_OBSTICLE,2,2


Global sceneCamPiv = CreatePivot()

; Turn the pivot into the player...
EntityType sceneCamPiv,COLLISION_PLAYER
EntityRadius sceneCamPiv,2

; Attach the camera to the pivot
Global sceneCamera = CreateCamera(sceneCamPiv)

map=LoadMesh("Level1.x")
lightmap=LoadMesh("Level1_lm.x")
EntityFX map,1
EntityFX lightmap,1
EntityBlend lightmap,2
EntityParent lightmap,map

EntityType map,COLLISION_OBSTICLE


While Not KeyHit(1)

If KeyHit(17)
wire=Not wire
WireFrame wire
EndIf



If KeyDown(200) Then
MoveEntity sceneCamPiv,0,0,4
EndIf

If KeyDown(208) Then
MoveEntity sceneCamPiv,0,0,-4
EndIf

If KeyDown(203) Then
TurnEntity sceneCamPiv,0,1,0
EndIf

If KeyDown(205) Then
TurnEntity sceneCamPiv,0,-1,0
EndIf


RenderWorld
Flip
Wend