| jeu des petits carrés |
| Auteur |
Message |
FATAL ERROR
Invité
|
Posté le : Mer 14 Avr 2010, 12:36
|
|
 |
salut tout le monde!
je poste pour la première fois un programme sur ce site, il s'agit du jeu les petits carrés.
Je ne vous cache pas que certains codes sont un peu confus, car j'ai arrangé le programme au fur et à mesure.En tout cas il n'y a pas de bugs, c'est juste la vérification des scores qui est un peu lente...
Si vous avez des idées pour accélerer le programme, n'hésitez pas à poster!
code :
| Code |
:EffEcr
:AxesNAff
:PleinEcr
:FonctOff
:EffDessin
:0->Xmin
:94->Xmax
:0->Ymin
:62->Ymax
:Output(1,2,"PETITS CARRES
:Output(4'2,"BY FATAL ERROR
:Output(7,5,"(C) 2010
:Effliste L6
:27->dim(L6
:Pause
:For(A,2,52'10
:For(B,42,92,10
:Texte(A,B,".
:End
:End
:Verticale 38
:Ligne(0,55,37,55
:Texte(0,2,"= SCORES =
:42->A
:55->B
:7->N
:0->W
:Texte(57,0,"Q: QUIT
:Lbl M
:1->J
:Lbl S
:0->T
:0->C
:0->D
:0->E
:Texte(8,8,"J1:",L6(1)
:Texte(18,8,"J2:",L6(2)
:If J=2:Goto J2
:Texte(18,0," "
:Texte(8,0,"=>
:Goto G
:Lbl J2
:Texte(8,0," "
:Texte(18,0,"=>
:Lbl G
:If W=1:Goto W
:Pt-On(A,B,3
:0->O
:0->Q
:0->K
:Repeat K>0
:codetouche->K
:End
:If K=74:Goto Q
:If K=45 et E=1:Goto V
:If A=C et B=D:Goto P1
:Pt-Off(A,B,2
:Lbl P1
:If K=24 et A>42:-10->O
:If K=25 et B<55:10->Q
:If K=26 et A<92:10->O
:If K=34 et B>5:-10->Q
:A+O->A
:B+Q->B
:N-Q->N
:If K=105:Goto P
:Goto G
:Lbl P
:If E=0:Goto NP
:A-C->F
:B-D->G
:If G>10 ou G<-10 ouF>10 ou F<-10 ou A‡C et B‡D ou A=C et B=D:Goto G
:(B-D)/2->F
:(A-C)/2->G
:pxl-test(N+F,A-G)->S
:If S=1:Goto G
:Ligne(C,D,A,B
:Pt-Off(C,D,2
:Pt-Off(A,B,2
:Goto V
:Lbl NP
:Pt-On(A,B,2
:1->E
:A->C
:B->D
:Goto G
:Lbl V
:3->V
:For(L,7,47,10
:For(I,42,82,10
:pxl-Test(L,I+5)+pxl-Test(L+5,I)+pxl-Test(L+10,I+5)+pxl-Test(L+5,I+10)->U
:If U>3 et L6(V)‡1:Then
:1->T
:L6(J)+1->L6(J)
:Texte(L+2,I+4,J
:End
:V+1->V
:End
:End
:If L6(1)+L6(2)=25:Then
:If L6(1)>L6(2):1->J
:If L6(2)>L6(1):2->J
:1->W
:Goto S
:End
:If T=1:Goto S
:If J=2:Goto M
:2->J
:Goto S
:Lbl W
:Texte(30,0,"JOUEUR ",J
:Texte(37,0,"A GAGNE!"
:Pause
:Lbl Q
:EffListe L6
:Zstandard
:AxesAff
:Disp "
:FonctOn
:Stop
|
Voilà j'espère que ça buggera pas chez vous!
Bonne journée!
|
| |
  |
| |
FATAL ERROR
Invité
|
Posté le : Mer 14 Avr 2010, 12:38
|
|
|
désolé, mais à ce que je vois, le signe "différent de" n'est pas lu, ce sont les petites barres noires
|
| |
|
| |
FATAL ERROR
Invité
|
Posté le : Mer 14 Avr 2010, 16:02
|
|
|
arf dsl il y a une erreur provoqué par
| Code | | :If K=45 et E=1:Goto V |
j'avais mis un système que dont j'ai pensé qu'il était inutile lors du recopiage.
remplacez par:
| Code | :If K=45 et E=1:Then
:Pt-Off(C,D,2
:0->E:0->C:0->D
:End |
|
| |
|
| |
Rézus
Autorisation : Membre
Nb de messages : 853
Inscrit le : Sam 20 Jui 2009, 20:35
|
Posté le : Mer 14 Avr 2010, 16:26
|
|
|
Et en quoi consiste ce jeu ?
|
 |
|
| |
fatal error
Autorisation : Membre
Nb de messages : 33
Inscrit le : Sam 10 Avr 2010, 17:36
|
Posté le : Mer 14 Avr 2010, 17:56
|
|
|
Le but est de tracer des traits de façon à obtenir des carrés.
Si vous en faites un (ou plusieurs), vous gagnez un point et vous rejouez
----------------------
Bill Gates voulait créer un logiciel pour l'agriculture. C'est fait! Windows Plante! |
| |
|
| |
linkakro
Autorisation : Membre
Nb de messages : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
|
Posté le : Mer 14 Avr 2010, 23:12
|
|
|
Ca me dit quelque chose... en fouillant dans mon (très) vieil ordinateur je devrait le retrouver parmi tous les bons vieux jeux.
Sauf que l'ordinateur m'a toujours vaincu à ce jeu ^^
Je suppose que celui-ci est 2 joueurs ?
Chapeau bas pour ton algorythme.
----------------------
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 tout le monde et surtout les débutants, quelques-uns des articles courants :
*Traductions Algorithmie/Ti-Basic.
*Caractères spéciaux sur Tout82
Les défauts du TI-Basic : Goto_versus_algo et DelVar/End/Lbl/guillemet/store |
| |
|
| |
fatal error
Autorisation : Membre
Nb de messages : 33
Inscrit le : Sam 10 Avr 2010, 17:36
|
Posté le : Jeu 15 Avr 2010, 10:44
|
|
|
Merci!
Oui effectivement c'est pour deux joueurs.
Quand à ce qui concerne une potentielle IA je préfère m'abstenir, elle risque d'être trop lente 
Sinon quelqu'un a testé le jeu?
Désolé pour ceux qui voudraient un 83p. mais je n'ai pas le cable...
----------------------
Bill Gates voulait créer un logiciel pour l'agriculture. C'est fait! Windows Plante! |
| |
|
| |
darkfighter22
Autorisation : Membre
Nb de messages : 10
Inscrit le : Jeu 15 Nov 2012, 19:50
|
Posté le : Jeu 15 Nov 2012, 19:54
|
|
|
Le début marche bien mais je ne peut pas déplacer le point pour faire la ligne mais est ce que ce sont les touches directionelles qui faut utiliser?
|
| |
|
| |
mingerton402
Invité
|
Posté le : Dim 18 Nov 2012, 12:06
|
|
|
J'ai recopié le programme, mais il y a un problème : impossible de diriger une ligne vers l'horizontale,donc impossible de faire des carrés ! J'ai du faire une erreur de recopie, qqn peut il m'indiquer laquelle ?
|
| |
|
| |
Cytropus
Autorisation : Membre
Nb de messages : 409
Inscrit le : Lun 07 Nov 2011, 12:09
|
Posté le : Dim 18 Nov 2012, 19:13
|
|
|
vérifie en priorité ces lignes,
| Code | :If K=24 et A>42:-10->O
:If K=25 et B<55:10->Q
:If K=26 et A<92:10->O
:If K=34 et B>5:-10->Q
:A+O->A
:B+Q->B |
surtout entre O et Q
----------------------
Le nouveau site de tout82 |
| |
|
| |
darkfighter22
Autorisation : Membre
Nb de messages : 10
Inscrit le : Jeu 15 Nov 2012, 19:50
|
Posté le : Lun 19 Nov 2012, 12:05
|
|
|
J'ai bien regarder mais ça ne change rien, on ne peut toujours pas se déplacer horizontalement
|
| |
|
| |
Cytropus
Autorisation : Membre
Nb de messages : 409
Inscrit le : Lun 07 Nov 2011, 12:09
|
Posté le : Lun 19 Nov 2012, 17:03
|
|
|
Et le passage juste en dessous ?
| Code | :A-C->F
:B-D->G
:If G>10 ou G<-10 ouF>10 ou F<-10 ou A‡C et B‡D ou A=C et B=D:Goto G
:(B-D)/2->F
:(A-C)/2->G
|
----------------------
Le nouveau site de tout82 |
| |
|
| |
darkfighter22
Autorisation : Membre
Nb de messages : 10
Inscrit le : Jeu 15 Nov 2012, 19:50
|
Posté le : Lun 19 Nov 2012, 18:16
|
|
|
Oui j'ai vérifier aussi mais ça ne marche toujours pas
|
| |
|
| |
darkfighter22
Autorisation : Membre
Nb de messages : 10
Inscrit le : Jeu 15 Nov 2012, 19:50
|
Posté le : Mer 28 Nov 2012, 7:02
|
|
|
Je reup le sujet parce que je voudrait vraiment savoir ce qu'il bloc (car je suis pas super fort en programmation)
Merci
|
| |
|
| |
Cytropus
Autorisation : Membre
Nb de messages : 409
Inscrit le : Lun 07 Nov 2011, 12:09
|
Posté le : Mer 28 Nov 2012, 23:15
|
|
|
bizarre, normalement, tout le déplacement est là.... 
au fait, bien que ça n'est aucun rapport apparent, tu as tenu compte des modification dans le 3ème post ?
----------------------
Le nouveau site de tout82 |
| |
|
| |
darkfighter22
Autorisation : Membre
Nb de messages : 10
Inscrit le : Jeu 15 Nov 2012, 19:50
|
Posté le : Jeu 29 Nov 2012, 17:22
|
|
|
Oui exacte j'ai changer mon post parce que je m'était mal exprimer 
Mais toi tu l'as passer sur ta calculatrice par le câble ?
|
| |
|
| |
Cytropus
Autorisation : Membre
Nb de messages : 409
Inscrit le : Lun 07 Nov 2011, 12:09
|
Posté le : Jeu 29 Nov 2012, 18:06
|
|
|
moi  ,je l'ai pas 
je me contente de lire le prog sur mon ordi 
au début, c'est pas évident mais on finit par voir le prog sans trop de difficulté à la fin 
au fait, regarde le pixeltest juste en dessous de ce que je t'ai indiqué
----------------------
Le nouveau site de tout82 |
| |
|
| |
darkfighter22
Autorisation : Membre
Nb de messages : 10
Inscrit le : Jeu 15 Nov 2012, 19:50
|
Posté le : Ven 30 Nov 2012, 7:06
|
|
|
Il y a deux jours, j'ai vérifier le programme entièrement mais j'ai tout mis (enfin à ce que j'ai vu) 
|
| |
|
| |
Cytropus
Autorisation : Membre
Nb de messages : 409
Inscrit le : Lun 07 Nov 2011, 12:09
|
Posté le : Ven 30 Nov 2012, 17:32
|
|
|
Et tu peut te déplacer verticalement ?
----------------------
Le nouveau site de tout82 |
| |
|
| |
darkfighter22
Autorisation : Membre
Nb de messages : 10
Inscrit le : Jeu 15 Nov 2012, 19:50
|
Posté le : Sam 01 Déc 2012, 8:49
|
|
|
Oui mais juste sur une ligne de points (la plus a gauche)
|
| |
|
| |
