LightConeAngles.bb 365 B

123456789101112131415161718
  1. Graphics3D 640,480
  2. camera = CreateCamera()
  3. MoveEntity camera,0,0,-40
  4. flat = CreatePlane(10)
  5. TurnEntity flat,-90,0,0
  6. lite = CreateLight(3) ; try different lights 1 to 3
  7. MoveEntity lite,0,0,-15
  8. While Not KeyDown(1)
  9. RenderWorld:Flip
  10. If KeyHit(57) Then ; press SPACEBAR to randomly change the 'cone' of light
  11. LightConeAngles lite, Rand(120),Rand(120)
  12. EndIf
  13. Wend
  14. End