π
<-
Chat plein-écran
[^]

fx-92(+) jeu tic tac toe

:fxesp32b: :fxesp32n: :fxesp32v:

fx-92(+) jeu tic tac toe

Unread postby ptitjoz » 24 Aug 2019, 18:52

Préalable
en mode algorithmique mettre option fond écran aucun

La Machine joue toujours en premier et signale la case jouée par une croix

Ensuite le processus suivant se répète 4 fois même si la partie est gagnée ou perdue

Une question A? Il faut rentrer la colonne de 1 à 3 en partant de la gauche
Une question B? Il faut rentrer la ligne de 1 à 3 en partant du bas
Une fois validée un carré s’affiche
Ensuite la machine rejoue dans une case inoccupée (c’est le seul truc intelligent qu’elle sait faire !)

Image


Dans cette version la machine ne s’arrête pas s’il y a un gagnant en cours de partie
Il n’y a pas de contrôle qui vérifie que le joueur ne joue pas sur une case déjà occupée.

Quand la partie est terminée une étoile tourne indéfiniment (ou presque…)
c’est pour éviter que la machine ne s’éteigne… au bout de 10 minute ou 1 heure
attention à ne pas user la pile si ça tourne plusieurs jours :(
voir code généré par qrcode

voici le lien du code
Code: Select all
Style Croix
Aller à x=0; y=-21
Répéter4
Stylo écrit
Aller à x=42; y=y
Stylo relevé
Aller à x=0; y=y+14

Aller à x=0; y=-21
Répéter4
Stylo écrit
Aller à x=x; y=21
Stylo relevé
Aller à x=x+14; y=-21

Aller à x=0; y=50
0→C
RanInt#(1;3)→A
RanInt#(1;3)→B
3(A-1)+B→C
10^(C)÷10→M
Stylo relevé
Aller à x=14A-11; y=14B-32
Stylo écrit
Aller à x=x+8; y=y+8
Stylo relevé
Aller à x=x-8; y=y
Stylo écrit
Aller à x=x+8; y=y-8
Stylo relevé
Aller à x=0; y=50
Répéter4
0→F
? →A
? →B
3(A-1)+B→C
10^(C)÷10+M→M
Stylo relevé
Aller à x=14A-11; y=14B-32
Stylo écrit
Répéter4
Avancer de8pixels
Tourner de↺90degrés

Stylo relevé
Aller à x=0; y=50
Répéter jusqu'à F=1
RanInt#(1;3)→A
RanInt#(1;3)→B
3(A-1)+B→C
Ent(M÷10^(C-1))÷10→D
10(D-Ent(D))→D
SiD=0Alors
10^(C)÷10+M→M
1→F
Stylo relevé
Aller à x=14A-11; y=14B-32
Stylo écrit
Aller à x=x+8; y=y+8
Stylo relevé
Aller à x=x-8; y=y
Stylo écrit
Aller à x=x+8; y=y-8
Stylo relevé
Aller à x=0; y=50
Fin


Aller à x=60; y=0
Style Flèche
Répéter10000
Répéter10000
Répéter10000
Tourner de↺45degrés





à vous d'améliorer pour que la machine soit un peu plus intelligente !
User avatar
ptitjozPremium
Niveau 10: GR (Guide de Référence)
Niveau 10: GR (Guide de Référence)
Level up: 67.4%
 
Posts: 215
Images: 0
Joined: 17 Oct 2018, 15:38
Location: France Loir et Cher
Gender: Male
Calculator(s):

Re: fx-92(+) jeu tic tac toe

Unread postby critor » 24 Aug 2019, 20:47

Un tic-tac-toe graphique, tout ça en moins de 100 lignes, bravo ! :bj:
Image
User avatar
critorAdmin
Niveau 19: CU (Créateur Universel)
Niveau 19: CU (Créateur Universel)
Level up: 8.5%
 
Posts: 35931
Images: 9789
Joined: 25 Oct 2008, 00:00
Location: Montpellier
Gender: Male
Calculator(s):
Class: Lycée
YouTube: critor3000
Twitter: critor2000
Facebook: critor.ti
GitHub: critor

Re: fx-92(+) jeu tic tac toe

Unread postby ptitjoz » 24 Aug 2019, 21:04

critor wrote:Un tic-tac-toe graphique, tout ça en moins de 100 lignes, bravo ! :bj:


Merci
si on enlève les 3 dernières boucles qui ne servent qu'à maintenir la machine en vie.. on est à 70 lignes environ
je pense que la limite est de 150 lignes environ mais je ne sais pas comment calculer cela

mais on aurait plus faire mieux sans les limitations des boucles ou des conditions imbriquées et beaucoup mieux si on pourrait faire soit des fonctions ou des sous-programmes.
On est quand même limité et du coup ça complique les affaires et le programme souffre de lacunes... mais en cherchant on peut trouver des astuces.
User avatar
ptitjozPremium
Niveau 10: GR (Guide de Référence)
Niveau 10: GR (Guide de Référence)
Level up: 67.4%
 
Posts: 215
Images: 0
Joined: 17 Oct 2018, 15:38
Location: France Loir et Cher
Gender: Male
Calculator(s):


Return to Casio (fx-82/83/85/92/95/115/300/350/500/570/991, Collège)

Who is online

Users browsing this forum: No registered users and 1 guest

-
Search
-
Featured topics
Comparaisons des meilleurs prix pour acheter sa calculatrice !
Découvre les nouvelles fonctionnalités en Python de l'OS 5.2 pour les Nspire CX II
Découvre les nouvelles fonctionnalités en Python de l'OS 5.5 pour la 83PCE/84+C-T Python Edition
Omega, le fork étendant les capacités de ta NumWorks, même en mode examen !
1234
-
Donations / Premium
For more contests, prizes, reviews, helping us pay the server and domains...

Discover the the advantages of a donor account !
JoinRejoignez the donors and/or premium!les donateurs et/ou premium !


Partner and ad
Notre partenaire Jarrety Calculatrices à acheter chez Calcuso
-
Stats.
663 utilisateurs:
>648 invités
>9 membres
>6 robots
Record simultané (sur 6 mois):
6892 utilisateurs (le 07/06/2017)

-
Other interesting websites
Texas Instruments Education
Global | France
 (English / Français)
Banque de programmes TI
ticalc.org
 (English)
La communauté TI-82
tout82.free.fr
 (Français)