This code does not work:
CreateBrush 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("anytexture.jpg")
; Create brush
;brush=CreateBrush()
brush = LoadBrush("tex1.jpg")
; Apply texture to brush
;BrushTexture brush,tex
; And some shininess
BrushShininess brush,1
BrushColor brush, 255,0,0
; Paint mesh with brush
PaintMesh cube,brush
While Not KeyDown( 1 )
pitch#=0
yaw#=0
roll#=0
If KeyDown( 208 )=True Then pitch#=-1
If KeyDown( 200 )=True Then pitch#=1
If KeyDown( 203 )=True Then yaw#=-1
If KeyDown( 205 )=True Then yaw#=1
If KeyDown( 45 )=True Then roll#=-1
If KeyDown( 44 )=True Then roll#=1
If KeyHit( 57 )=True Then newbrush=CreateBrush() : FreeBrush brush : PaintEntity cube, newbrush : FreeBrush newbrush
TurnEntity cube,pitch#,yaw#,roll#
RenderWorld
Flip
Wend
End
|