PureBasic

Bonsoir,

Voilà je cherche quelque chose qui me paraissais simple, mais je n'y arrive pas.

J'explique :

dans ce code ci dessous, j'affiche une box. Je souhaiterais que par exemple toutes les secondes, elle s'affiche en avant de 20 en X

Comment feriez vous pour faire ça ? D'avance merci.

Code : Tout sélectionner

InitSprite()
InitKeyboard()

OpenScreen(800,600,32,"Sprite")

 ;Création du sprite
CreateSprite(0, 800, 600)
StartDrawing(SpriteOutput(0))
Box(0, 0, 20, 20, RGB(255, 125, 0))
StopDrawing()

Repeat
 ExamineKeyboard()
 ClearScreen(RGB(0, 0, 0))
   
 ;Affichage du sprite
DisplaySprite(0, 20, 20)

FlipBuffers()
Until KeyboardPushed(#PB_Key_Escape) ;- appuie sur la touche echap
End

@++

Tiens, cher venom :

Code : Tout sélectionner

InitSprite()
InitKeyboard()

OpenScreen(800,600,32,"Sprite")

;Création du sprite
CreateSprite(0, 800, 600)
StartDrawing(SpriteOutput(0))
Box(0, 0, 20, 20, RGB(255, 125, 0))
StopDrawing()

SPH=20 ; ouai, je suis un mégalo =)
timer=ElapsedMilliseconds()

Repeat
  ExamineKeyboard()
  ClearScreen(RGB(0, 0, 0))
  
  ;Affichage du sprite
  DisplaySprite(0, SPH, 20)
  If ElapsedMilliseconds()-timer>=1000
    SPH+20
    timer=ElapsedMilliseconds()
  EndIf
  
  FlipBuffers()
  
Until KeyboardPushed(#PB_Key_Escape) ;- appuie sur la touche echap
End

Merci SPH,

J'avais pourtant essayé avec ElapsedMilliseconds() mais je n'avais pas réussi

@++

Pas de quoi, ce fût un plaisir.

Mais dis moi, tu veux faire quoi en 800 * 600 ???

Oh rien. C'est juste un code d'exemple pour ne pas posé une question sans donner un minimum de code

Ça donne plus envie d'y répondre. Car devoir répondre en écrivant un code complet n'est pas motivant

@++

PureBasic

[Résolu] Faire sauter/avancer un sprite automatiquement

[Résolu] Faire sauter/avancer un sprite automatiquement

Re: faire sauter/avancer un sprite automatiquement

Re: faire sauter/avancer un sprite automatiquement

Re: faire sauter/avancer un sprite automatiquement

Re: faire sauter/avancer un sprite automatiquement