Re: Эм, текстура.
Просто мне + еще без бленда нужно.
вот пример:
Graphics3D 800,600,32,2
SetBuffer BackBuffer()
cam = CreateCamera()
CameraClsColor cam,192,192,192
lig = CreateLight()
tex = CreateTexture(64,64,1+4+256)
spr = CreateSprite()
PositionEntity spr,0,0,4
;EntityBlend spr,3
im = CreateImage(64,64)
;MaskImage im, 255,128,255
SetBuffer ImageBuffer(im)
Color 255,0,0
Rect 0,0,64,64
Color 0,0,0
Rect 16,16,32,32
SetBuffer BackBuffer()
While Not KeyHit(1)
If KeyHit(57)
CopyRect 0,0,64,64,0,0,ImageBuffer(im),TextureBuffer(tex)
EntityTexture spr,tex
EndIf
UpdateWorld()
RenderWorld()
DrawImage im,0,0
Flip(0)
Wend
End
|