Gestion demouvement et collision. - Page 1

Salut tout le monde,

Possesseur d'une TI 84+, je souhaite créer des programmes simples histoire de passer le temps.

Voila ma question:

Comment coder pour que ma calculette reconnaisse un modele et le déplace (grâce au pad) sur un environnement défini?

Merci d'avance.

Arf, ca demande quand meme quelques connaissances en programmation basique z80.
Pour te donner une idée il faut afficher ton modele (output ou text), puis recalculer sa position en fonction des touches pressées par l'utilisateur (getkey), l'effacer, et enfin le reafficher aux nouvelles coordonnées, et ainsi de suite.

Oui j'ai déjà commencé à "programmer", mais rien de bien sérieux...

Par contre je n'arrive pas a dire a ma calculette de reconnaitre une touche:

Par exemple j'affiche un B et si j'appuie sur GAUCHE, je déplace mon B de 1 vers la gauche:

Je met quoi?

If getkey=24?? ou alors autre chose?

Oui c'est ca, avec X (ligne),Y (colonne) comme coordonées du B : If getkey=24 and Y>1 : Y-1->Y (il faut aussi que Y soit suppérieur a 1 pour ne pas qu'il sorte de l'ecran a gauche).
Il faut aussi avoir stocké X et Y avant dans deux autres variables (ex : V et W), ainsi ensuite tu effaces aux coordonées V et W (ancienne position de B), puis tu le reaffiches aux nouvelles coordonées X,Y.
Voila

Je te montre...

Pour la routine du programme

47->A
32-> B
AxeNaff

While 1
0->G
Getkey->G
Text B,A,"*"
End

Pour deplacer a gauche en appuyant sur gauche ^^lol^^

47->A
32-> B
AxeNaff
While 1
0->G
Getkey->G
Text B,A,"*"

If G = 24
Then
Text B,A," "
A-1->A
end

End

Pour deplacer vers la droite ^^lol^^

47->A
32-> B
AxeNaff
While 1
0->G
Getkey->G
Text B,A,"*"

If G = 24
Then
Text B,A," "
A-1->A
end


If G = 26
Then
Text B,A," "
A+1->A
end


End

Bien sur ce programme peut etre améliorer... ^^lol^^

Si ya quelque chose que tu comprend pas vas y... demande nous...

T'a besoin d'aide pour la colision de ton "B" avec un mur, ou peut etre une autre lettre, ou le bord de l'écran ???

Merci pour toutes ces infos j'essaierai demain il est tard.

Oui c'est ca je voudrais savoir comment dire a ma calculette Que par exemple mon B ne peut pas se superposer a mon O qui sert de mur.

@++

Bon j'ai pu appliquer la marche à suivre. Ca marche évidement!! ^^

J'ai essayé de l'appliquer pour la touche haut mais il me reste une trainée noire apres le passage de mon B

Faut il rajouter une commande Text( en plus?

If G=25
Then
Text(B,A," ")
B-1->B
End

Peut être faut-il afficher le texte en dessous pour enlever mes pixels en trop...

Peut être faut-il afficher le texte en dessous pour enlever mes pixels en trop...

Oui c'est ca, il faut aussi effacer 1 pixel plus bas.

Alors... je continue... pour la colision...

Si tu veux pas que ta lettre puisse s'afficher si ya déja quelque chose... il suffit de rajouter cette petite chose...

If G = 26 and Pxl-test(B,A+1) = 0
Then
Text B,A," "
A+1->A
end

Normallement sa marche... (c'est tout con...)

Oui c'est peut etre tout con mais au début il faut en fait voir par ou passer.

ok donc en fait si le pixel identifié a droite est affiché (PxlTest=1) alors le If n'entre pas en jeu car les deux conditions ne sont pas remplies...

Merci a vous pour ces infos ca va me permettre de faire quelques ptits trucs avant de s'attaquer a plus sérieux

@++

Sinon pour les flémards y'a soit l'astuce d'afficher genre " B " (avec le nb d'espace nécéssaire selon le mode/décalage), soit d'affacer à chaque foi et de réafficher à chaque foi, enfin, si ça ne clignote pas. Vaut mieux bricoler au cas par cas bien souvent . ( ie tester différents trucs pour voir influence sur vitesse etc...)