[RegIon]

Graphics3D 1024,768,0,2
SetBuffer BackBuffer()

Local Timer=CreateTimer(58)
Local Camera=CreateCamera()
Li=CreateLight():TurnEntity li,90,0,0 
;CameraClsColor Camera,64,64,64

;Mit folgender Befehlszeile wird
;die Funktionalitдt der Draw3D2
;im eigenem Projekt eingebunden
Include "..\Includes\Draw3D2.bb"

;Damit die Draw3D2 arbeiten kann,
;wird eine einmalige Initialisierung
;benцtigt. Dazu das Handle der zuvor
;erstellten Kamera eingeben


DrawInit3D(Camera)


Cb=CreateCube()
PositionEntity cb,0,0,6


Local Font=FontRange3D(LoadImage3D("..\Fonts\KarmaticArcade · (33).png",2,2,0,-100)):SetFont3D(Font,1,1,-4,0)

Local LoadedImage=LoadImage3D("..\Data\Draw3D2.png",2,2,0,0)
Local GrabedImage=GrabImage3D(LoadedImage,40,192,432,128)
Local Angle

;Cb=CreateCube();хоть в начале,хоть в конце
;PositionEntity cb,0,0,6
TurnEntity cb,34,0,0
While Not KeyHit(1)
    
    Angle=Angle+1
    
    
    
    WaitTimer Timer
    
    DrawImage3D(GrabedImage,0,+240,0,-Angle,1,0)
    DrawImage3D(LoadedImage,MouseX3D,MouseY3D,0,Angle,1,0)
    DrawImage3D(GrabedImage,0,-240,0,-Angle,1,0)
    
    Text3D(Font,-460,+340,"Draw3D2 V.1.0",0)
    Text3D(Font,+460,+340,"Time: "+CurrentTime(),2)
    Text3D(Font,0,-340,"SIMPLE · <#c44>IMAGE-DRAWING</#> · SIMPLE",1,0,Sin(MilliSecs()))
    RenderWorld
    
    
    Clear3D()
    Flip
    
Wend
End


;~IDEal Editor Parameters:
;~C#Blitz3D

скрин
а мне в игру(сокобан) надо меню замутить.....а то с квадрами застрелится...(и фонт ещё мутить туда)