Sur ma carte ATI, c'est un beau bordel.
voici mon code de test
Code : Tout sélectionner
ExamineDesktops()
Ecran_Largeur = DesktopWidth(0)
Ecran_Hauteur = DesktopHeight(0)
; On ouvre l'openscreen
If InitSprite() = 0 Or InitKeyboard() = 0 Or InitMouse() = 0 Or InitSprite3D() = 0
MessageRequester("Erreur", "Impossible d'initialiser la souris ,le clavier ou l'écran. Vérifiez la présence de DirectX 7 ou supérieur.", 0)
End
EndIf
SetRefreshRate(DesktopFrequency(0))
If OpenScreen(Ecran_Largeur, Ecran_Hauteur, 32, "Ecran") = 0
MessageRequester("Erreur", "Impossible d'ouvrir l'écran.", 0)
End
EndIf
Sprite = CreateSprite(#PB_Any, Ecran_Largeur, Ecran_Hauteur, #PB_Sprite_Texture)
StartDrawing(SpriteOutput(Sprite))
Box(0, 0, Ecran_Largeur, Ecran_Hauteur, $FF00FF)
Circle(200, 200, 100, $FFFFFF)
StopDrawing()
Sprite3D = CreateSprite3D(#PB_Any, Sprite)
Repeat
ClearScreen($000000)
; On lit les évènements clavier et souris
ExamineMouse()
ExamineKeyboard()
; Position de la souris
x = MouseX()
y = MouseY()
If Start3D()
DisplaySprite3D(Sprite3D, 0, 0)
Stop3D()
EndIf
FlipBuffers()
Until KeyboardPushed(#PB_Key_Escape)
il y a des trous noir partout
