PureBasic

Merci beaucoup pour vos messages et conseils.

Je me suis amusé à faire cette petite animation.
Espace pour changer la gravité et Echap pour quitter.
Marche mieux compilé sans debuggeur.

Je suis preneur de toute idée pour continuer ou conseil pour progresser.



If InitSprite() = 0 Or InitKeyboard() = 0 Or InitMouse() = 0 Or OpenWindow(0, 0, 0 ...

Lors de mes tests j'ai remarqué que ma variable Ref_temporelle était tout le temps à 0.

Dans le programme elle est juste écrite par cela.

Ref_temporelle.q=ElapsedMilliseconds() ; prise de référence du temps

J'en déduis qu'ElapsedMilliseconds() ne contient pas le nombre de millisecondes depuis le ...

Après quelques tests rapides, ça a l'air ça en effet, les commandes d'affichage ralentissent tout et font que le ElapsedMilliseconds ne doit pas s'incrémenter de 1 et vu la manière dont c'est écrit, il suffit de louper le premier pour que ce soit fichu. avec >= ça va.
Merci pour vos tuyaux. C'est ...

Voici l'intégralité du code.
J'essaye de faire un jeu de rythme, vous risquez de trouver ça naïf comme façon de faire mais je débute ;-).
Dans le fichier .txt il y a des millisecondes qui correspondent à l'enregistrement de l'apuie/relachage des touches que j'ai fait une fois au préalable avec un ...

Repeat
; Debug Etape_tableau
;ClearScreen(RGB(0,0,0))
; DisplaySprite(0, 100, 100) ; logo pure basic
; DisplaySprite(1,533,500) ;barre verte
; DisplaySprite(2,533,500-score*2) ; barre noire
; DisplayTransparentSprite(3,500,500) ; habillage
; FlipBuffers()

If (ElapsedMilliseconds()-Ref ...

Super ça marche, j'ai juste rajouté le "0," manquant en premier paramètre des WritestringN. Et c'est parfait.
Merci à tous les deux.

Bonjour,
J'utilise le code de l'exemple donné dans l'aide pour faire un fichier texte avec juste 123456789 et ouf ça marche.

If CreateFile(0, "Test.txt") ; Ouvre un fichier existant ou en crée un nouveau s'il n'existait pas
FileSeek(0, Lof(0)) ; Place le pointeur à la fin du fichier en utilisant ...