Problème TI-82 Advanced

→ **MyCalcs** profile · by **Dark_Yodada** » 14 Jan 2018, 21:01

Bonjour à tous,

Je suis débutant en programmation TI-Basic et j'essaie de réaliser plusieurs programmes simples (jeux et utilitaires).
Actuellement je tente de réaliser un morpion et j'ai un problème :
J'ai créé une matrice de 3x3 et je voudrais l'afficher tout le temps. Quand je mets [A] seul ça affiche la matrice une fois mais dans un repeat ça n'affiche plus rien.
Quelqu'un pourrait-il m'aider à résoudre ce problème ?

Merci !

→ **MyCalcs** profile · by **critor** » 14 Jan 2018, 21:18

Bonsoir.

Je dirais de préciser l'instruction d'affichage dans le code à répéter :

Code: Select all: Disp [A]

→ **MyCalcs** profile · by **Dark_Yodada** » 14 Jan 2018, 21:47

Ça marche, merci beaucoup !

→ **MyCalcs** profile · by **critor** » 14 Jan 2018, 21:47

De rien, merci pour ton retour.

→ **MyCalcs** profile · by **Dark_Yodada** » 15 Jan 2018, 08:42

Re-bonjour, je rencontre un second problème (et c'est possible qu'il y en ait encore, le morpion est mon premier programme un peu compliqué).

En fait, par exemple lorsqu'on appuie sur la flèche de droite, je veux mettre 1 dans la case suivante. Ça c'est bon. Mais je suis obligé de mettre plein de "and" pour voir s'il le "1" n'est pas déjà dans la 3ème colonne (un "and" par ligne".
Ça marche, mais est ce que quelqu'un aurait une idée pour optimiser ?

→ **MyCalcs** profile · by **Ifndev** » 16 Jan 2018, 10:35

Salut !
Peut-tu donner ton code actuel ?
Ya déja pas mal de programmes de morpion en ti-basic, tu devrait y trouver ton bonheur: Recherche: Morpion

Certains utilisent plein de and, certains non, tout dépends

→ **MyCalcs** profile · by **Dark_Yodada** » 16 Jan 2018, 21:17

Code: Select all: {3,3→dim([A] Remplir(0,[A] 1→T 1→X 1→Y 1→[A](X,Y Repeat A=999 EffÉcran Disp [A] Repeat K getKey→K End If K=24 et Y≠1 Then 0→[A](X,Y Y-1→Y T→[A](X,Y End If K=26 et Y≠3 Then 0→[A](X,Y Y+1→Y T→[A](X,Y End If K=25 et X≠1 Then 0→[A](X,Y X-1→X T→[A](X,Y End If K=34 et X≠3 Then 0→[A](X,Y X+1→X T→[A](X,Y End If K=105 Then If T=1 Then 2→T Else 1→T End 1→X 1→Y T→[A](X,Y End End

Finalement j'ai trouvé une solution plus simple. Voilà le code, ça ne marche pas encore mais maintenant je me demande si il y a une fonction permettant d'additionner les colonnes/lignes pour tester si une colonne/ligne est égale à 3 ou 6...

→ **MyCalcs** profile · by **gam** » 19 Jul 2018, 19:50

Alors je suis pas sûr, je connais pas les matrices, mais j'imagine que tu dois pouvoir faire:

Code: Select all: [A](1,1)+[A](1,2)+[A](1,3)->H If H=3 Then Qqch Else If H=6 Then Autrechose End End

→ **MyCalcs** profile · by **Hamza.S** » 19 Jul 2018, 21:48

Il y a un problème dans ce que tu as écrit. Imagine dans la première condition, H est modifié H=6 ta deuxième condition sera exécutée et c'est pas le but recherché.