| 1234567891011121314151617181920212223242526272829303132333435363738394041424344 |
- ; RotateTexture Example
- ; ---------------------
- Graphics3D 640,480
- SetBuffer BackBuffer()
- camera=CreateCamera()
- light=CreateLight()
- RotateEntity light,90,0,0
- cube=CreateCube()
- PositionEntity cube,0,0,5
- ; Load texture
- tex=LoadTexture( "media/b3dlogo.jpg" )
- ; Texture cube
- EntityTexture cube,tex
- ; Set initial texture angle value
- angle#=1
- While Not KeyDown( 1 )
- ; Change texture angle value depending on key pressed
- If KeyDown( 205 )=True Then angle#=angle#-1
- If KeyDown( 203 )=True Then angle#=angle#+1
- ; Rotate texture
- RotateTexture tex,angle#
- TurnEntity cube,0.1,0.1,0.1
- RenderWorld
- Text 0,0,"Use left and right cursor keys to change texture angle value"
- Text 0,20,"angle#="+angle#
- Flip
- Wend
- End
|
