1
[FR] Programmation Axe Parser / [Axe Parser] Problème dans la programmation d'un morpion
« on: June 01, 2011, 04:05:43 pm »
Bonjour tout le monde,
suite à la lecture du tutoriel du maintenant célèbre kindermoumoute sur la programmation en Axe Parser, j'ai décidé de créer un petit morpion, jeu assez simple pour commencer, pour m'exercer un peu dans ce langage. Mais je rencontre quelques difficultés. Voici l'état du code actuellement :
Je n'obtiens pas ce que j'aurais souhaité. Quand j'appuie sur la touche "0", les ronds et les cercles s'affichent aléatoirement, quand ils le souhaitent .... L'appuie sur cette touche provoque même parfois l'arrêt du programme ! Et je ne vois pas l'erreur commise. Là est le problème.
En espérant que vous ayez la réponse à mon problème,
Au revoir !
suite à la lecture du tutoriel du maintenant célèbre kindermoumoute sur la programmation en Axe Parser, j'ai décidé de créer un petit morpion, jeu assez simple pour commencer, pour m'exercer un peu dans ce langage. Mais je rencontre quelques difficultés. Voici l'état du code actuellement :
Code: [Select]
.A
for(Z,0,713
0=>{l1+Z}
end
clrdraw
1=>Y=>T=>A-1=>P=>Q
31=>X
line(31,20,94,20
line(31,41,94,41
line(51,1,51,60
line(29,0,29,63
line(73,1,73,60
.mise en place de la grille dans le buffer
storepic
lbl 1
recallpic
repeat getkey(15) or getkey(33)
line(X,Y,X+18,Y
line(X,Y,X,Y+17
line(X,Y+17,X+18,Y+17
line(X+18,Y,X+18,Y+17
dispgraph
.Affichage du curseur permettant le choix de la case où l'on souhaite poser son pion
(getkey(3) and (X≠75))-(getkey(2) and (X≠31))=>V
V*22+X=>X
(getkey(1) and (Y≠43))-(getkey(4) and (Y≠1))=>W
W*21+Y=>Y
if V≠0 or W≠0
(X-31)/22=>P
(Y-1)/21=>Q
pause 250
goto 1
end
.déplacement du curseur
end
if getkey(33)
.si l'utilisateur appuie sur "0"
if {l1+(P+3Q}=0
.si la case est vide ...
if T=1
recallpic
circle(X+9,Y+9,8
storepic
end
.si c'est au joueur 1, trace un cercle
if T=0
line(X+1,Y+1,X+17,Y+16)r
line(X+17,Y+1,X+1,Y+16)r
end
.si c'est au joueur 2, trace une croix
T+1=>{l1+(P+3Q)}
1-T=>T
.changement de tour
end
goto 1
end
clrhome
Je n'obtiens pas ce que j'aurais souhaité. Quand j'appuie sur la touche "0", les ronds et les cercles s'affichent aléatoirement, quand ils le souhaitent .... L'appuie sur cette touche provoque même parfois l'arrêt du programme ! Et je ne vois pas l'erreur commise. Là est le problème.
En espérant que vous ayez la réponse à mon problème,
Au revoir !