Autorisation : Membre
Nb de messages : 364
Inscrit le : Dim 13 Fév 2011, 14:17
Posté le : Mer 08 Fév 2012, 18:51
SAlut! Voici mon problème : n'ayant pas deux ti 82 stats, je ne peut pas essayer mon jeu pour y voir les erreurs. Je fait donc appelle a votre gentillesse pour l'essayer et me dire quelles problèmes vous rencontrer. Merci d'avance pour vos réponses.
Autorisation : Membre
Nb de messages : 364
Inscrit le : Dim 13 Fév 2011, 14:17
Posté le : Lun 13 Fév 2012, 14:43
Me revoici pour vous dire que, comme tous mes programmes (nan, quand même pas^^), il ne marche pas!! I'm a boss :p
J'ai entendu dire (Je ne citerais pas de nom) que pour utiliser capt( il fallait que la ti voisine soit en pause. J'ai donc fait ceci :
L : L1
L, : L2
Code
0üXmin:94üXmax
0üYmin:62üYmax
AxesOff
FnOff
ClrDraw
For(A,59,3,7
Line(0,A,56,A
End
For(A,0,56,7
Line(A,3,A,59
End
Pt-On(56,59
For(A,4,53,7
Text(A,58,(A+3)/7
End
{8,8üdim([A]
[[2,3,4,5,6,4,3,2][1,1,1,1,1,1,1,1][0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0][1,1,1,1,1,1,1,1][2,3,4,5,6,4,3,2ü[A]
RecallPic 8
DelVar DVertical 64
2üdim(L
LüL‚
0
Menu("MENU","JOUEUR 1",1,"JOUEUR 2",2
Lbl 1:Ans+1
Lbl 2:Ans+1üD
While 1
D+1üD
If fPart(D/2:Then
[A]ü[B]
Pause
Get([A]
For(A,1,8
For(B,1,8
If not([A](A,B)) and [A](A,B)ø[B](9-A,B:Then
AüG
BüH
7(9-A)-7üQ
7B-7üR
End
End
End
Text(Q+4,R+2,"
For(A,1,8
For(B,1,8
If [A](A,B) and [A](A,B)ø[B](9-A,B
Then
7(9-A)-7üQ
7B-7üR
[A](A,BüE
Eü[B](9-A,B
End
End
End
0ü[B](9-G,H
Text(Q+4,R+2,sub("PTCFRK",E,1
[B]ü[A]
Else
For(Y,70,81
Text(1,Y,"
Text(14,Y,"
Text(8,Y,"
End
Repeat max(K={92,93,94,82,83,84,72,73
getKeyüK
End
10fPart(K/10)-1+3(9-int(K/10üL(1
Text(1,70,L(1
Text(1,75,",
Repeat max(K={82,83,84,92,93,94,72,73
getKeyüK
End
10fPart(K/10)-1+3(9-int(K/10üL(2
Text(1,78,L(2
Text(8,70,"OU?
Repeat max(K={92,93,94,82,83,84,72,73
getKeyüK
End
10fPart(K/10)-1+3(9-int(K/10üL‚(1
Text(14,70,L‚(1
Text(14,75,",
Repeat max(K={92,93,94,82,83,84,72,73
getKeyüK
End
10fPart(K/10)-1+3(9-int(K/10üL‚(2
Text(14,78,L‚(2
[A](L(1),L(2üB
0ü[A](L(1),L(2
Bü[A](L‚(1),L‚(2
For(A,1,5
Text(7L(1)-3,7L(2)-7+A,"
End
7L‚(1)-7üQ
7L‚(2)-7üR
If B=1:Then
Line(R+2,57-Q,R+5,54-Q
Line(R+2,54-Q,R+5,57-Q
End
If B=2:Then
Line(R+2,54-Q,R+4,54-Q
Line(R+3,55-Q,R+3,58-Q
End
If B=3:Then
Line(R+3,57-Q,R+4,57-Q
Line(R+5,56-Q,R+5,54-Q
Line(R+4,53-Q,R+3,53-Q
End
If B=4:Then
Line(R+3,57-Q,R+5,57-Q
Line(R+5,56-Q,R+5,53-Q
Pt-On(R+4,55-Q
End
If B=5:Then
Line(R+2,53-Q,R+2,54-Q
Line(R+4,53-Q,R+4,57-Q
Line(R+3,57-Q,R+2,56-Q
Pt-On(R+3,55-Q
End
If B=6:Then
For(Y,2,4,2
Line(R+Y,57-Q,R+Y,53-Q
End
Pt-Off(R+2,55-Q
Pt-On(R+3,55-Q
End
End
End
Mon problème est que je commence le programme. Tout va bien jusqu'au premier tour du deuxieme joueur. La pause disparait et le jeu continue sur les deux calculettes en même temps donc problème :p
Sachant que les If B=1 If B=2 c'est juste quelles pièce dessiner (roi, fous, dames...) Si vous trouvé le problème merci à vous sinon ben pas grave
D est censé indiquer à la calculatrice quel joueur elle représente alors que tu t'amuses à modifier D.
Il faudrait avoir une variable qui identifie la calculatrice et une autre pour indiquer quel joueur est actif. (c'est en tout cas plus facile)
Ainsi une calculatrice peut rester en Pause pendant que l'autre joue, puis mettre à jour ses variables et son écran, puis inversement.
D'autre part le début peut se simplifier et il y a une ambiguité qui me semble une erreur.
Dans ton code, sélectionner Joueur1 stocke 2 dans D et Joueur2 stocke 1 dans D.
Je présume qu'il te faut associer D=1 à Joueur1 etc.
Si tu voulais vraiment croiser les valeur de D, il te suffit de croiser les Lbl ou les chiffres.
==========
Ceci me paraît ridicule :
Code
Pause
Get([A]
Il faudrait qu'une condition fasse executer soit l'un soit l'autre.
==========
Pour tester un programme en connexion de calculatrices virtuelles, il faut sélectionner l'option adéquate de l'émulateur.
Dans VTI il faut cocher Enable_cable_link>Virtual_link. (sur les deux calculatrices)
Dans wabbitemu il faut cocher Calculator>Connect_virtual_link_cable
---------------------- ti82statfr: 2008, inscrit: 2009, ti84pocketfr: noël2011, ti30xbmultiview: iut 2012-2014
Perfectionniste, manque tact. Pas le temps de tout publier depuis 2011. Répond toujours aux questions. (rédigé juin 2014)
Autorisation : Membre
Nb de messages : 364
Inscrit le : Dim 13 Fév 2011, 14:17
Posté le : Mer 15 Fév 2012, 17:04
Je pense que j'ai trouvé un moyen plus simple. Mais je n'ai pas ma calculette je n'ai pas pu le tester... Le joueur qui joue place les coordonnées des pièces à bouger dans les listes L1 et L2, alors je me disait que si au lieu de capt([A] se ne serai pas plus simple de capter les listes L1 et L2... Je poste sa dès que je peux ( et dès que je l'aurais fait ) Surement demain. La j'ai pas beaucoup de temps...
Pour D, je sais plus pourquoi j'ai mis sa mais je pense que je m'y retrouvais^^ Je vais enlevé le D+1 -> D car tout compte fait, il ne sert à rien. Le joueur qui est en pause attend que l'autre joue et dès que l'autre et, lui, en pause il appuit sur entrer donc la variable ne sert a rien.
Autorisation : Membre
Nb de messages : 3738
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Mer 15 Fév 2012, 18:11
Echanger des listes est un excellent moyen d'échanger plusieurs données en même temps.
On peut aussi échanger des Pics pour mettre à jour l'affichage.
En y repensant, je crois bien qu'il y avait une logique à ton usage de D.
Le truc devait être de tester si D est Pair ou impair. L'incrément de D rendait la caltoche paire en impaire et réciproquement.
Seulement la suite du code m'est encore obscure.
Je suis d'avis d'utiliser une méthode plus simple puis de revenir à la tordue quand tout marchera. (pas forcément la meilleure idée)
Toujours est-il que le plus gros problème est mon avant dernière remarque du message précédent.
---------------------- ti82statfr: 2008, inscrit: 2009, ti84pocketfr: noël2011, ti30xbmultiview: iut 2012-2014
Perfectionniste, manque tact. Pas le temps de tout publier depuis 2011. Répond toujours aux questions. (rédigé juin 2014)
Autorisation : Membre
Nb de messages : 3738
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Sam 18 Fév 2012, 19:09
Il y a mieux :
Code
3-D->D
---------------------- ti82statfr: 2008, inscrit: 2009, ti84pocketfr: noël2011, ti30xbmultiview: iut 2012-2014
Perfectionniste, manque tact. Pas le temps de tout publier depuis 2011. Répond toujours aux questions. (rédigé juin 2014)
pour l'essayer et me dire quelles problèmes vous rencontrer. Merci d'avance pour vos réponses.
) Surement demain. La j'ai pas beaucoup de temps...