Michael Fabain Dirks
40 lines
1.0 KiB
BlitzBasic
40 lines
1.0 KiB
BlitzBasic
; FreeEntity Example
|
|
; This example creates an entity and
|
|
; allows you to move it, but shows
|
|
; that a handle is no longer valid after
|
|
; FreeEntity is used on it.
|
|
; Run in Debug Mode
|
|
|
|
Graphics3D 640,480
|
|
AppTitle "FreeEntity Example"
|
|
|
|
Cam = CreateCamera()
|
|
Lit = CreateLight()
|
|
|
|
PositionEntity Lit,-5,-5,0
|
|
PositionEntity Cam,0,0,-5
|
|
|
|
AnEntity = CreateCube() ; This is our Test Entity
|
|
RotateMesh AnEntity,45,45,45
|
|
|
|
While Not KeyDown(1) ; Until we press ESC
|
|
|
|
; Use the Left or Right Arrows to Move the Entity
|
|
If KeyDown(203) Then MoveEntity AnEntity,-0.1,0,0
|
|
If KeyDown(205) Then MoveEntity AnEntity,0.1,0,0
|
|
|
|
; Use the Space Key to Free the Entity. It will disappear
|
|
; The next time you try to move it, you will get an error
|
|
; Notice that the Handle Variable doesn't change after the
|
|
; Entity is free. It simply becomes invalid.
|
|
|
|
If KeyHit(57) Then FreeEntity AnEntity ; Hit Space to Free!
|
|
|
|
RenderWorld ; Draw the Scene
|
|
|
|
; What is in the AnEntity handle?
|
|
Text 10,10,"Entity Handle: "+AnEntity
|
|
Flip ; Flip it into View
|
|
Wend
|
|
|
|
End |