Code: Select all
InitEngine3D()
InitSprite()
InitKeyboard()
InitMouse()
OpenWindow(0, 0, 0, 512, 400, "[Escape] to quit", #PB_Window_SystemMenu | #PB_Window_ScreenCentered):OpenWindowedScreen(WindowID(0), 0, 0, 512, 400, 0, 0, 0)
;OpenScreen(800,600,32,"")
CreateCamera(0, 0, 0, 100, 100):MoveCamera(0,0,0,-2):CameraLookAt(0,0,0,0)
CreateLight(0,$ffffff, 10000, 10000, 0000)
CreateCube(0,1)
CreateEntity(0,MeshID(0),#PB_Material_None)
CreateSprite(0,256,256,#PB_Sprite_AlphaBlending )
StartDrawing(SpriteOutput(0))
DrawingMode(#PB_2DDrawing_AllChannels )
Box(0,0,256,256,$ffaaffaa)
DrawText(10,10,"AZERTY",$ffffffff,$00ff0000)
StopDrawing()
Repeat
If IsWindow(0):While WindowEvent():Wend:EndIf
ExamineKeyboard()
RotateEntity(0,0.1,0.2,0.3,#PB_Relative)
RenderWorld()
DisplayTransparentSprite(0,100,100,16,$ffff)
FlipBuffers()
Until KeyboardReleased(#PB_Key_Escape)