img
@_ö
(05:36)  Bienvenue ! - Inscrivez vous pour poster ! -
@Boo + 30 inconnu(s)

Login :  Mot de passe :      Se souvenir de moi.  Mot de passe perdu ?
/!\:: Cliquez ici pour vous inscrire et poster, créer des sujets ou des forums ! ::/!\
 « - 1/1 - » :: Pages
 Index » Forum Ti 89, Titanium / 92+ / Voyage 200 et TI-Nspire » Basic TI (1r) » comment deplacer un...
./Post de départ - comment deplacer un...
23.11.2002 - 1
15:07  kikou - Posté : 23-11-2002  M

Bonjour a tous #cool# #cool#

Voila je voulait savoir comment on fait pour deplacer un PIC ke g sauver en fasait storepic pic1

avec la fonnction get key

merci d avance


./Publicité AdSense
./1
24.04.2002 - 5498
16:22  Link - Posté : 23-11-2002  M

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

Edité par Link le 23-11-2002 à 16:34:47.

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.
./Publicité AdSense
 « - 1/1 - » :: Pages
 Index » Forum Ti 89, Titanium / 92+ / Voyage 200 et TI-Nspire » Basic TI (1r) » comment deplacer un...

» yN ©1624 - Aide / Charte / Crédits
12ms | Statistiques