home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
3D Game Programming for Teens (2nd Edition)
/
3DGPFT2E.iso
/
Source
/
Chapter07
/
demo07-08.bb
< prev
next >
Wrap
Text File
|
2009-01-20
|
514b
|
28 lines
;demo07-08.bb - Lights and Cameras
; ------------------
Graphics3D 640,480
SetBuffer BackBuffer()
Const ESC_KEY = 1
; Create camera
camera=CreateCamera()
; Create a light
light=CreateLight(3)
LightRange light, 50
; This is the code for creating the sphere
sphere=CreateSphere()
PositionEntity sphere,0,0,9
ScaleEntity sphere, .5, .5, .5
EntityColor sphere, 0, 26, 125
; This following code deals with cameras and cylinders
While Not KeyDown(ESC_KEY)
RenderWorld
Flip
Wend
End