| Tetris |
| Auteur |
Message |
sypotu
Autorisation : Membre
Nb de messages : 655
Inscrit le : Dim 13 Sep 2009, 8:27
|
Posté le : Lun 16 Nov 2009, 19:09
|
|
 |
Courage !
----------------------
Ti-83+.fr
Passe en 1ère S
Foire Aux Questions__________Traduction des fonctions Anglais/Français
Emplacement des fonctions____Lexique
Liste des jeux
Ouvrir, éditer et créer des .82p ou .83p sans télécharger de logiciel
Logiciel pour prendre des screenshot animés
Hebergeur pour vos .83p |
 |
  |
| |
Google_AdSense
|
Publicité
|
|
|
|
| |
Rézus
Autorisation : Membre
Nb de messages : 853
Inscrit le : Sam 20 Jui 2009, 20:35
|
Posté le : Lun 16 Nov 2009, 19:12
|
|
|
Merci,Y va m'en falloir ^^
|
| |
|
| |
dysto
Autorisation : Membre
Nb de messages : 200
Inscrit le : Mar 20 Oct 2009, 18:58
|
Posté le : Lun 16 Nov 2009, 19:26
|
|
|
Allez les gars, le monde a les yeux rivés sur vous (enfin presque  ) !
|
| |
|
| |
Rézus
Autorisation : Membre
Nb de messages : 853
Inscrit le : Sam 20 Jui 2009, 20:35
|
Posté le : Lun 16 Nov 2009, 19:30
|
|
|
Bah,on va y arriver faut pas en faire trop non plus lol,mais là,ça devient chiant.
|
| |
|
| |
sypotu
Autorisation : Membre
Nb de messages : 655
Inscrit le : Dim 13 Sep 2009, 8:27
|
Posté le : Lun 16 Nov 2009, 20:12
|
|
|
Moi je fais formes par formes:
j'en ai fais 3 (y compris le carré^^) sur 7 !
----------------------
Ti-83+.fr
Passe en 1ère S
Foire Aux Questions__________Traduction des fonctions Anglais/Français
Emplacement des fonctions____Lexique
Liste des jeux
Ouvrir, éditer et créer des .82p ou .83p sans télécharger de logiciel
Logiciel pour prendre des screenshot animés
Hebergeur pour vos .83p |
| |
|
| |
Rézus
Autorisation : Membre
Nb de messages : 853
Inscrit le : Sam 20 Jui 2009, 20:35
|
Posté le : Jeu 19 Nov 2009, 19:10
|
|
|
Ben je fais ça aussi mais il me reste encore deux formes à faire,le problème c'est que je dois déjà corriger des trucs pour les autres alors j'avance pas,par exemple,il faut que je mette une "marge de sécurité" pour la rotation,parce que comme les objets changent de longueur horizontale en tournant des fois ya des parties qui sortent du cadre ,mais j'aurais pas le temps de programmer avant le week-end,en ce moment chuis blindé de contrôles.
|
| |
|
| |
Monstercrunch
Autorisation : Membre
Nb de messages : 253
Inscrit le : Sam 10 Oct 2009, 16:33
|
Posté le : Jeu 19 Nov 2009, 22:25
|
|
|
dur... dur...
----------------------
/!\ Tchat non officiel du site : http://tchat-tout82.webuda.com Venez y faire un tour ! /!\ |
| |
|
| |
Rézus
Autorisation : Membre
Nb de messages : 853
Inscrit le : Sam 20 Jui 2009, 20:35
|
Posté le : Mer 25 Nov 2009, 15:54
|
|
|
HOURRA !! voilà ma version,sans bug apparent,que j'ai terminée hier a 22h45  avec rotation complète sur un seul bouton ! la classe.
| Code | EffDessin
CoordRect:QuadOff:AxesOff
0->Xmin:0->Ymax:94->Xmax:-62->Ymin
Texte(3,58,"TETRIS!
Texte(30,58,"POINTS:
For(Z,0,1
Ligne(Z,0,Z,-62
Ligne(47+Z,0,47+Z,-62
End
Ligne(0,-62,46,-62
-1->P
Lbl A
0->D:3->E:3->F:3->G:3->I:0->J:3->H:-1->K:-1->L:0->M:1->R:P+1->P:3->B
Texte(30,84,P
entAléat(1,7->C
If C=2
Goto 2
If C=3
Goto 3
If C=4
Goto 4
If C=5
Goto 5
If C=6
Goto 6
If C=7
Goto 7
Lbl B
21->X:-3->Y
For(Z,0,9E99
If R=5
1->R
X->N:Y->O
Y-3->Y
codeTouch(->T
X-3(T=24)+3(T=26)ü X
If T=24 et X[< ou =]X+I et pxl-Test(-Y+2,X)=1
N->X
If T=24 et X>X+I et pxl-Test(-Y+2-J,X+I)=1
N->X
If T=26 et X[< ou =]X+I et pxl-Test(-Y+2-J,X+I)=1
N->X
If T=26 et X>X+I et pxl-Test(-Y+2-J,X)=1
N->X
Pt-Off(N,O,2
Pt-Off(N+I,O+J,2
Pt-Off(N+D,O+E,2
Pt-Off(N+F,O+G,2
If Tø25 ou C=1 ou Y[>ou=]-12
Goto B4
I->Z:J->I:-Z->J
D->Z:E->D:-Z->E
F->Z:G->F:-Z->G
If pxl-Test(-Y,X)=0 et pxl-Test(-Y-J,X+I)=0 et pxl-Test(-Y-E,X+D)=0 et pxl-Test(-Y-G,X+F)=0
Goto V
J->Z:I->J:-Z->I
E->Z:D->E:-Z->D
G->Z:F->G:-Z->F
R-1->R
Lbl V
R+1->R
If C=6 et partDéc(R/2)=0
I-6->I
If Cø7 ou partDéc(R/2)ø0
Goto V1
-3->D:0->F:3->I
Lbl V1
If Cø7 ou partDéc(R/2)=0
Goto V2
3->D:3->F:-6->I
Lbl V2
If X[< ou =]X+I et Y[< ou =]Y+J
Goto B3
X-I->X
D+I->D
F+I->F
Y-J->Y
-J->J
E+J->E
G+J->G
Lbl B3
If C=2
Goto E2
If C=3
Goto E3
If C=4
Goto E4
If C=5
Goto E5
If C=6
Goto E6
If C=7
Goto E7
Lbl B4
Pt-On(X,Y,2
Pt-On(X+I,Y+J,2
Pt-On(X+D,Y+E,2
Pt-On(X+F,Y+G,2
For(¤,0,H,B
If ¤[> ou =]K et ¤[< ou =]L et pxl-Test(-Y+2-M,X+¤)=1
Goto C
If ¤[> ou =]K et ¤[< ou =]L
End
If B>0 et ¤[< ou =]H et pxl-Test(-Y+2,X+¤)=1
Goto C
If B<0 et ¤[> ou =]H et pxl-Test(-Y+2,X+¤)=1
Goto C
End
End
Lbl C
If Y[> ou =]-6
Stop
0->A
For(Z,2,44,3
A+pxl-Test(-Y+1,Z->A
End
If A<15
Goto A
-Y->A
Repeat A[< ou =]6
For(Z,0,45,3
If pxl-Test(A-2,Z)=1
Pt-On(Z,-A,2
If pxl-Test(A-2,Z)=0
Pt-Off(Z,-A,2
End
A-3->A
End
Goto A
Lbl 2
6->I:3->D:0->E:6->H
Goto B
Lbl 3
0->F:6->G:3->H
Goto B
Lbl 4
9->I:6->D:0->E:0->G:9->H
Goto B
Lbl 5
3->D:6->G
Goto B
Lbl 6
6->I:3->J:3->D:0->E:6->H:6->K:8->L:3->M
Goto B
Lbl 7
6->I:-3->J:3->D:0->E:-3->G:6->H:3->K:8->L:-3->M
Goto B
Lbl E2
If R=5 ou R=1
Goto F2
If R=2
Goto G2
If R=3
Goto H2
If R=4
Goto I2
Lbl E3
If R=5 ou R=1
Goto F3
If R=2
Goto G3
If R=3
Goto H3
If R=4
Goto I3
Lbl E4
If R=2 ou R=4
0->H
If R=3 ou R=5
9üH
Y-3->Y
Goto B4
Lbl E5
If R=5 ou R=1
Goto F5
If R=2
Goto G5
If R=3
Goto H5
If R=4
Goto I5
Lbl E6
If R=5 ou R=3 ou R=1
Goto F6
If R=2 ou R=4
Goto G6
Lbl E7
If partDéc(R/2)ø0
1->R
If R=1
Goto F7
If R=2 ou R=4
Goto G7
Lbl F2
6->H:-1->K:-1->L:0->M:3->B
Goto B4
Lbl F3
3->H:-1->K:-1->L:3->B
Goto B4
Lbl F5
3->H:-1->K:-1->L:3->B
Goto B4
Lbl F6
6->H:3->M:5->K:8->L:3->B
Goto B4
Lbl F7
6->H:3->M:5->K:8->L:3->B
Goto B4
Lbl G2
3->H:3->K:5->L:3->M:3->B
Goto B4
Lbl G3
6->H:3->K:8->L:3->M:3->B
Goto B4
Lbl G5
6->H:-1->K:-1->L:3->B
Goto B4
Lbl G6
-3->H:-4->K:-1->L:3->M:-3-B
Goto B4
Lbl G7
3->H:2->K:5->L:3->M:3->B
Goto B4
Lbl H2
6->H:3->K:5->L:-3->M:3->B
Goto B4
Lbl H3
3->H:3->K:5->L:-6->M:3->B
Goto B4
Lbl H5
3->H:0->K:2->L:-6->M:3->B
Goto B4
Lbl I2
-3->H:-3->K:-1->L:3->M:-3->B
Goto B4
Lbl I3
-6->H:1->K:1->L:-3->B:0->M
Goto B4
Lbl I5
-6->H:-8->K:-2->L:3->M:-3->B
Goto B4 |
|
| |
|
| |
dysto
Autorisation : Membre
Nb de messages : 200
Inscrit le : Mar 20 Oct 2009, 18:58
|
Posté le : Mer 25 Nov 2009, 16:37
|
|
|
C'est parti, je recopie !
|
| |
|
| |
sypotu
Autorisation : Membre
Nb de messages : 655
Inscrit le : Dim 13 Sep 2009, 8:27
|
Posté le : Mer 25 Nov 2009, 17:44
|
|
|
Bravo !!!!
Je te felicite sincèrement car je suis tout à fait conscient de la dificulté de la tâche !!!
Je le recopie dans l'émulateur ...
edit: un pb dès le démarage, la piece s'arrete ...
----------------------
Ti-83+.fr
Passe en 1ère S
Foire Aux Questions__________Traduction des fonctions Anglais/Français
Emplacement des fonctions____Lexique
Liste des jeux
Ouvrir, éditer et créer des .82p ou .83p sans télécharger de logiciel
Logiciel pour prendre des screenshot animés
Hebergeur pour vos .83p |
| |
|
| |
Rézus
Autorisation : Membre
Nb de messages : 853
Inscrit le : Sam 20 Jui 2009, 20:35
|
Posté le : Mer 25 Nov 2009, 21:39
|
|
|
C'est bizard,sur ma calto ca marche,je vais voir ca.L pièce c'est bien un carré décalé vers la gauche non ?
PS:j'ai fais une erreur de copie,au début,la ligne entaléat(7,7->C a été corrigée,mainteant c'est entaléat(1,7->C
PS2:Après relecture attentive,le code est eactement le même que sur ma calculette,et le programme marche sur d'autres calculatrices que la mienne,l'erreure doit venir de toi.
|
| |
|
| |
Google_AdSense
|
Publicité
|
|
|
|
| |
dysto
Autorisation : Membre
Nb de messages : 200
Inscrit le : Mar 20 Oct 2009, 18:58
|
Posté le : Mer 25 Nov 2009, 21:45
|
|
|
J'ai une Erreur Etiquette dès le début moi :/ !
|
| |
|
| |
Rézus
Autorisation : Membre
Nb de messages : 853
Inscrit le : Sam 20 Jui 2009, 20:35
|
Posté le : Jeu 26 Nov 2009, 17:43
|
|
|
RAAAH VOUS LE FAITES EXPRES MDR !!!!
Vérifie ton code,c'est pas possible que l'erreur vienne de moi,pour le bug que sypotu a eu là je veux bien,parceque j'ai eu du mal a le régler,et même si le programme marche sur ma calculette,il se peut que je l'ai pas vu mais l'erreur étiquette vient pas de moi. J'ai pas précisé mais ¤=[theta].
Et pour sypotu,si je sait pas au moins quelle pièce c'est je peux pas régler le problème.
|
| |
|
| |
Rézus
Autorisation : Membre
Nb de messages : 853
Inscrit le : Sam 20 Jui 2009, 20:35
|
Posté le : Jeu 26 Nov 2009, 21:17
|
|
|
Pour échapper a toute erreur de copie de ma part ou de la votre voilà un chti lien en 8xp,j'ai plus d'excuse mais vous non plus 
http://www.mediafire.com/?xwygqmmzgdy
|
| |
|
| |
sypotu
Autorisation : Membre
Nb de messages : 655
Inscrit le : Dim 13 Sep 2009, 8:27
|
Posté le : Sam 28 Nov 2009, 17:36
|
|
|
Avec ta version j'ai un pb à la 4eme etape de la rotation du carré décalé vers la gauche... 
----------------------
Ti-83+.fr
Passe en 1ère S
Foire Aux Questions__________Traduction des fonctions Anglais/Français
Emplacement des fonctions____Lexique
Liste des jeux
Ouvrir, éditer et créer des .82p ou .83p sans télécharger de logiciel
Logiciel pour prendre des screenshot animés
Hebergeur pour vos .83p |
| |
|
| |
Rézus
Autorisation : Membre
Nb de messages : 853
Inscrit le : Sam 20 Jui 2009, 20:35
|
Posté le : Sam 28 Nov 2009, 19:21
|
|
|
Ah effectivement,j'y travail mais je n'arrive pas à le corriger.
Après en faisant attention c'est pas gênant,puisque cette pièce n'a que deux positions de rotation différentes.Bon,j'essaye.
PS:dans cette version,j'ai oublié de corriger la ligne avec entaléat en remplaçant le premier 7 par un 1,donc si tu le fais pas il ne te tombera que des carrés décalés vers la gauche ^^
|
| |
|
| |
dysto
Autorisation : Membre
Nb de messages : 200
Inscrit le : Mar 20 Oct 2009, 18:58
|
Posté le : Dim 29 Nov 2009, 12:57
|
|
|
Même problème que sypotu mais j'ai aussi le problème de la superposition des carrès décalés, le carré décalé que je fait "tomber" sur l'autre carré décalé se "bloque" et laisse un petit espace. Un petit dessin pour illustrer tout ça :
Aussi, en améliorations, ce qui serait bien c'est une touche pour faire pause et des que l'on perd, que ça fasse pas le ":End" mais un Menu ou je ne sais quoi.
|
| |
|
| |
sypotu
Autorisation : Membre
Nb de messages : 655
Inscrit le : Dim 13 Sep 2009, 8:27
|
Posté le : Dim 29 Nov 2009, 13:02
|
|
|
dès que je trouve quelqun qui peut me preter un cable je poste ma version
je pense qu'en combinant les 2 on pourra faire un truc bien
----------------------
Ti-83+.fr
Passe en 1ère S
Foire Aux Questions__________Traduction des fonctions Anglais/Français
Emplacement des fonctions____Lexique
Liste des jeux
Ouvrir, éditer et créer des .82p ou .83p sans télécharger de logiciel
Logiciel pour prendre des screenshot animés
Hebergeur pour vos .83p |
| |
|
| |
Rézus
Autorisation : Membre
Nb de messages : 853
Inscrit le : Sam 20 Jui 2009, 20:35
|
Posté le : Mar 01 Déc 2009, 19:38
|
|
|
Ah,tout des bugs que je pensais avoir résolu.
Euh Dysto,tu es sur pour le bug de la superposition ? parce que moi sur ma calculette il le fait pas.Essaye de voir avec le lien parceque tu l'as recoppié à la main non ? finalement j'ai peut-être fais une erreur en le postant...
Sypotu,tu as ce bug ?
|
| |
|
| |
dysto
Autorisation : Membre
Nb de messages : 200
Inscrit le : Mar 20 Oct 2009, 18:58
|
Posté le : Mer 02 Déc 2009, 16:12
|
|
|
Je n'ai pas "re-eu" ce bug en re-testant mais il semble que ce ne soit pas à tout les coups que ça bug.
Autre gros problème :
A l'instant j'ai joué pour tester l'histoire du carré décalé mais Ô surprise ! J'ai un L(rotation inverse de 90°) qui m'a tout traversé et qui est aller sur la ligne la plus basse !!!
A l'évidence il reste des bugs qui seront difficiles et longs à corriger mais courage !!!
|
| |
|
| |
