Link Le 23/11/2002 à 16:22Edité par Link le 23/11/2002 à 16:34 Patience ça va être un peu long...
Edit: Un prog pour déplacer un pic de 4 en 4 en horizontale par ex, c'est pas trop dur:
Prenoms une image 16*16 qui s'appelle pic1 par exemple:
(Tape ce programme quand la calc est en anglais)
Local x,k //Variables locales
ClrDraw
0->x
0->k
While k=/=264 //264: la touche ESC
0->k
RplcPic pic1,0,y //Affiche l'image tout en haut de l'écran
While k=0
getKey()->k //Regarde si une touche a été tapée
EndWhile
ClrDraw
If k=337 and x>=4 Then //337: la touche Gauche
x-4->x
ElseIf k=340 and x<=158-16 Then //340: la touche Droite
x+4->x
EndIf
EndWhile
ClrDraw
DispHome //Revient à l'écran de calcul
Maintenant j'ai la flemme de garder une signature à jour sur ce site. Je n'ai même plus ma chaîne Exec sous la main.
