PureBasic

Code : Tout sélectionner

InitEngine3D()
InitSprite()
InitKeyboard()
InitMouse()

UseJPEGImageEncoder()
UseJPEGImageDecoder()

OpenScreen(1024,768,32,"HR - TIPE - Avalanche")

StartDrawing(ScreenOutput())
  DrawText(0, 0, "Un texte à l'écran")
StopDrawing()

Code : Tout sélectionner

InitSprite()
InitKeyboard()
InitMouse()

UseJPEGImageEncoder()
UseJPEGImageDecoder()

If OpenScreen(1680,1050,32,"HR - TIPE - Avalanche")
	
	Repeat
		ExamineKeyboard()
		ExamineMouse()
		
		ClearScreen(0)
		
		StartDrawing(ScreenOutput())
			DrawText(0, 0, "Un texte à l'écran")
		StopDrawing()
		
		FlipBuffers()
		
		
	Until KeyboardPushed(#PB_Key_Escape)
	
	
	
EndIf