C'est pas mal du tout !
Par contre tu n'as pas mis le source dans le zip !
Si je peux te conseiller un truc qui serait sympa, c'est de mettre une vrai gravité avec ton hélico. Explication :
Ici ton hélico tombe de la manière suivante : Y++
Une gravité permet de créer une chute réaliste qui suit une vrai hyperbole, donc il te faut une accélération, une vitesse avant de changer la position :
- Code: Select all
:0->V
:32->Y
:.Vitesse nulle, l'hélico au milieu de l'écran
:
:While 1
:
:getKey(2)*2*2*2?->A,-1->A
:.Sois on monte sois on chute
:
:If A>>0 and (V/256=1) or (A<<0 and (V/256=255)
:.Ça évite de déplacer de deux pixels d'un coup
:
:V+A->V
:.On ajoute l'accélération à la vitesse
:
:End
:
:Y+V->Y
:.On ajoute la vitesse au déplacement
:
:Pt-On(8,Y/256)
:.Il est important de diviser Y par 256, ça réduit la vitesse de la chute
:
:EndIf getKey(15)
Bref, à essayer.