Forum

Catégorie : Programmes
Forum : Les programmes des internautes
Vues : 5198
Réponses : 39
Type : discussion
Etat : réponses autorisées
Avertissement :
Il s'agit d'une page optimisée pour la navigation mobile. Voir la page originale.

Master Mind - Page 2 / 2

Sangohan38 le 24/05/2008 à 13:44
Lorsque l'erreur survient, quitte le prog et ensuite regarde les valeurs de K et F.
Si K est supérieur à 94 ou inférieur à 0, c'est de ce terme que viens le problème.
Si F est inférieur à -32 ou supérieur à 32, c'est de sa faute.

Sangohan38
killerseven le 24/05/2008 à 19:50
J'ai fait se que tu a dit, mais je ne sais pas comment faire pour voir la valeur de K et F.
Sangohan38 le 24/05/2008 à 20:31
Lorsque ça met l'erreur, tu quitte le programme.
Ensuite, tu tape ALPHA+F et ALPHA+K.
Cela affichera leurs valeurs et ensuite, tu nous les communique comme ça on verra de quel variable viens le problème.

Sangohan38
killerseven le 26/05/2008 à 23:24
F est égal a 0 et K à 100
Sangohan38 le 27/05/2008 à 10:48
Le problème viens de K.

Sangohan38
killerseven le 27/05/2008 à 16:16
Je dois faire quoi pour le résoudre ???
Sangohan38 le 29/05/2008 à 12:53
Essaye K-9->K avant la première instruction Text(K,F... .

Sangohan38
killerseven le 29/05/2008 à 17:52
non, sa ne marche toujours pas. F= 2 ou parfois a 1 ou a 0 et K= -17
Sangohan38 le 30/05/2008 à 19:17
Supprime la ligne et revérifie tout: je ne vois que ça comme solution en attendant.

Sangohan38
killerseven le 31/05/2008 à 22:03
G tout vérifier, tout est correct.
sol78 le 22/12/2008 à 09:28
Que veut dire le signe "E=/=4" svp?
mad67 le 22/12/2008 à 09:50
E n'est pas égal a 4
sol78 le 22/12/2008 à 10:11
Merci, mais une fois que j'ai mis mes 4 chiffres, il quitte le jeu, pourtant j'ai recopié le programme sans faire de fautes!! crazy.gif
mad67 le 22/12/2008 à 11:01
regarde ces lignes

Code
If E=/=4 and L=12
Then
Disp "PERDU",A,B,C,D
Stop
End
If E=4
Then
Disp "GAGNE",L
Stop
End
K+9->K
Text (12,K,G
Text (23,K,H
Text (34,K,I
Text (43,K,J
Text (0,K,E
Text (57,K,F
Pause
vibra le 08/04/2009 à 12:25
Voila j'ai corrigé les erreurs de copie. J'ai mis "<- //" sur les lignes où il y en avait.
Bonne continuation.
anonyme le 05/11/2015 à 19:49
ou peut-on trouver "axesoff" il n'est pas dans le catalogue! loupe.gif
Ps:je suis en 82stats
Mingerton le 05/11/2015 à 20:04
Si tu es en français cette commande s'appelle AxesNAff. Tu peux la trouver dans 2nd-Zoom.
ZeDJi le 06/02/2016 à 17:43
Que veux dire
Citation
rand*M+N->A

Ou peut-on le trouver ( j'ai chercher une peu partout et rien)
ZeDJi le 06/02/2016 à 17:57
C'est pas cool d'avoir pris la lettre O ça donne plein de confusion avec le 0 ( notemment dans les Lbl 0 je sais pas trop si c'est 0/O)
Mingerton le 07/02/2016 à 11:40
C'est à toi de faire la part des choses, je trouve justement que avec cette police on distingue bien les deux. Si ca te perturbe vraiment, on peut choisir une autre lettre. Par exemple :
Code
AxesOff
0->Xmin
94->Xmax
-32->Ymin
32->Ymax
PlotsOff
FnOff
ClrHome
ClrDraw
Menu("NIVEAUX","NORMAL",A,"EXPERT",B,"COMMANDO",C
Lbl A
Menu("MODE","6 COULEURS",D,"8 COULEURS",E
Lbl D
0->Z
1->N
5,99->M
Goto K
Lbl E
0->Z
1->N
7,99->M
Goto K
Lbl B
Menu("MODE","6 COULEURS",F,"8 COULEURS",G
Lbl F
1->Z
1->N
5,99->M
Goto K                                            <- //
Lbl G
1->Z
1->N
7,99->M
Goto K
Lbl C
Menu("MODE","6 COULEURS",H,"8 COULEURS",I
Lbl H
1->Z                                             <- //
0->N                                             <- //
6,99->M
Goto K
Lbl I
1->Z
0->N
8,99->M
Lbl K
Horizontal 24
Horizontal -25
For (K,7,88,9
Vertical K
End
-8->K
0->L
Lbl J
rand*M+N->A
iPart A->A
rand*M+N->B
iPart B->B
rand*M+N->C
iPart C->C
rand*M+N->D
iPart D->D
If Z=0
Then
If A=B or A=C or A=D or B=C or B=D or C=D
Goto J
Else
If A=B and A=C
Goto J
If A=B and A=D
Goto J
If A=C and A=D
Goto J
If B=C and B=D
Goto J
End
Lbl 0
0->E
0->F
L+1->L
ClrHome
Lbl 6
Input "A:",G
Input "B:",H
Input "C:",I
Input "D:",J
If G>=10 or H>=10 or I>=10 or J>=10
Then
Disp "ERREUR
Goto 6
End
If G=A
Then
G+20->G
E+1->E
A+20->A
End
If H=B
Then
H+20->H
E+1->E
B+20->B
End
If I=C
Then
I+20->I
E+1->E
C+20->C
End
If J=D
Then
J+20->J
E+1->E
D+20->D
End
If G>=20
Then
G-20->G
Else
If G=B
Then
F+1->F
B+20->B
Goto 2
End
If G=C
Then
F+1->F
C+20->C
Goto 2
End
If G=D
Then
F+1->F
D+20->D
End
End
Lbl 2
If H>=20
Then
H-20->H
Else
If H=A
Then
F+1->F
A+20->A
Goto 3
End
If H=C
Then
F+1->F
C+20->C
Goto 3
End
If H=D
Then
F+1->F
D+20->D
End
End
Lbl 3
If I>=20
Then
I-20->I
Else
If I=A
Then
F+1->F
A+20->A
Goto 4
End
If I=B
Then
F+1->F
B+20->B
Goto 4
End
If I=D
Then
F+1->F
D+20->D
End
End
Lbl 4
If J>=20
Then
J-20->J
Else
If J=A
Then
F+1->F
A+20->A
Goto 5
End
If J=B
Then
F+1->F
B+20->B
Goto 5
End
If J=C
Then
F+1->F
C+20->C
End
End
Lbl 5
If A>=20
A-20->A                                  <- //
If B>=20
B-20->B
If C>=20
C-20->C
If D>=20
D-20->D
If E=/=4 and L=12
Then
Disp "PERDU",A,B,C,D
Stop
End
If E=4
Then
Disp "GAGNE",L
Stop
End
K+9->K
Text (12,K,G
Text (23,K,H
Text (34,K,I
Text (45,K,J                                <- //
Text (0,K,E
Text (57,K,F
Pause
Goto 0
Avertissement :
Il s'agit d'une page optimisée pour la navigation mobile. Voir la page originale.