PB qui déraille (les exemples du moins)

Vous débutez et vous avez besoin d'aide ? N'hésitez pas à poser vos questions
Avatar de l’utilisateur
SPH
Messages : 5018
Inscription : mer. 09/nov./2005 9:53

Re: PB qui déraille (les exemples du moins)

Message par SPH »

MetalOS a écrit : sam. 29/nov./2025 16:43 Essaie ca SPH sur PB 6.12

Code : Tout sélectionner

If InitSprite() = 0
  MessageRequester("Erreur", "Impossible d'initialiser le système de sprites.", 0)
  End
EndIf

If InitKeyboard() = 0
  MessageRequester("Erreur", "Impossible d'initialiser le clavier.", 0)
  End
EndIf

; --- Ouverture de l'écran---

If OpenScreen(800, 600, 32, "Sprite") = 0
  MessageRequester("Erreur", "Impossible d'ouvrir l'écran 800x600.", 0)
  End
EndIf

FlipBuffers()  


; --- Création et dessin du sprite ---

If CreateSprite(0, 200, 200) = 0
  MessageRequester("Erreur", "Impossible de créer le sprite.", 0)
  End
EndIf

If StartDrawing(SpriteOutput(0))
  
  DrawingMode(#PB_2DDrawing_Gradient)
  BackColor(RGB(255,255,255))   
  FrontColor(RGB(255,255,0))    
  
  CircularGradient(100, 100, 100)
  Circle(100, 100, 100)
  CircularGradient(350, 100, 75)
  Circle(300, 100, 100)
  
  StopDrawing()
Else
  MessageRequester("Erreur", "Impossible de dessiner sur le sprite.", 0)
  End
EndIf


; --- Boucle principale d'affichage ---

StartTime = ElapsedMilliseconds()

Repeat
  ExamineKeyboard()
  
 
  ClearScreen(RGB(0,0,0))
  DisplaySprite(0, 210, 160)

  FlipBuffers()
 
  Delay(10)
  
Until KeyboardPushed(#PB_Key_Escape) Or ElapsedMilliseconds() - StartTime > 3000

End
Ca marche si je précise le sous systeme : directx11
Ca marche chez vous parce que vous l'aviez renseigné, je pense.

Merci

!i!i!i!i!i!i!i!i!i!
!i!i!i!i!i!i!
!i!i!i!
//// Informations ////
Intel Core i7 4770 64 bits - GTX 650 Ti
Version de PB : 6.12LTS- 64 bits
Avatar de l’utilisateur
MetalOS
Messages : 1524
Inscription : mar. 20/juin/2006 22:17
Localisation : Lorraine
Contact :

Re: PB qui déraille (les exemples du moins)

Message par MetalOS »

Oui effectivement.
Répondre