Code: Select all
;InitEngine3D()
InitSprite()
InitKeyboard()
OpenWindow(0, 0, 0, 300, 300, "OpenGL Sprite", #PB_Window_ScreenCentered|#PB_Window_SystemMenu)
OpenWindowedScreen(WindowID(0), 0, 0, 300, 300)
CreateCamera(0, 0, 0, 100, 100) ;<--- Duh!
CreateSprite(0, 50, 50, #PB_Sprite_AlphaBlending)
StartDrawing(SpriteOutput(0))
DrawingMode(#PB_2DDrawing_AlphaBlend)
Circle(25, 25, 20, $FF00FFFF)
StopDrawing()
Quit = #False
Repeat
Repeat
ev = WindowEvent()
If ev = #PB_Event_CloseWindow : quit = #True : EndIf
Until ev = 0
RenderWorld()
DisplaySprite(0, 0, 0)
FlipBuffers()
ExamineKeyboard()
Until KeyboardPushed(#PB_Key_Escape) Or quit = #True