texture.bb 420 B

12345678910111213141516171819202122232425262728293031
  1. ; Texturing ***
  2. ; By Paul Gerfen (www.gamecoding.co.uk)
  3. Graphics3D 800,600
  4. SetBuffer BackBuffer()
  5. camera=CreateCamera()
  6. CameraViewport camera,0,0,800,600
  7. light=CreateLight()
  8. cube=CreateCube()
  9. PositionEntity cube,0,0,5
  10. texture=LoadTexture("blitztexture.bmp")
  11. EntityTexture cube,texture
  12. While Not KeyHit(1)
  13. TurnEntity cube,0.1,0.2,0.3
  14. UpdateWorld
  15. RenderWorld
  16. Text 340,500,"Texturing Demo"
  17. Flip
  18. Wend
  19. End