Autorisation : Membre
Nb de messages : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Ven 14 Jan 2011, 20:39
Encore cette question... A quoi servent les articles "avant de poster" ?
Xmin et tous ses affiliés sont dans le menu var>fenêtre.
La flèche est un [sto->].
---------------------- 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 : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Dim 16 Jan 2011, 19:45
Ce qui n'est pas dans le catalogue est dans le menu VAR où dans les touches, à quelques exceptions près.
Ce n'est pas "ligne6" mais "liste6". C'est en fait L6 obtenu avec [2nde]+[6].
---------------------- 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)
bonjour j'ai cherché dans ces pages et je n'est pas trouver un lien qui me permettrais de mettre le programme directement sur ma TI-83
pouvez vous m'aidez
Merci
Autorisation : Membre
Nb de messages : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Mer 19 Jan 2011, 17:25
Si personne ne fournit de 83p, tu peux tout-de-même en créer un avec le site ti-editor ou un logiciel comme tigraphlink.
---------------------- 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 : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Lun 31 Jan 2011, 23:26
Les yeux fermés je dis sto. Sauf s'il y a des guillemets autour.
---------------------- 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)
J'ai créé d'autres niveaux qui sont "boite", "croix" et je m'attaque à 1 très long niveau: "quadrillage". Seulement, pour le niveau quadrillage, je suis obligé de mettre + de 40 fois
Code
ligne(13,-12,83,-55
par exemple. pouvez-vous me proposer des solutions pour minimiser le nombre de lignes, sachant que le programme prend 2 fois + de place q'avant pour seulement 1 menu en + et 3 niveaux ! merci de me répondre
Autorisation : Membre
Nb de messages : 2164
Inscrit le : Sam 23 Jan 2010, 20:09
Posté le : Sam 05 Fév 2011, 18:03
tu peux tracer tes lignes en masse avec la fonction for( et des variables.
ensuite, pour faire l'algoritme, ça dépend exactement du rendu que tu veux. je ne peux pas te le faire si je ne sais pas exactement où tu veux placer chaque ligne.
Gwénaël Invité
Posté le : Sam 05 Fév 2011, 19:12
Tu vois le cadre en jouant au niveau 1 ? repère le départ du snake puis presse ON. je veux tracer le quadrillage par blocs de 16 pixels en partant de la case juste au dessus du snake. le - équivaut à
pour les lignes suivantes, ajoute 5 à l'abscisse de la dernière ligne blanche
Je ne maitrise pas le for(. pourrais -tu m'expliquer en quoi il consite (à part le fait qu'il faut mettre 1 end après)
Gwénaël Invité
Posté le : Sam 05 Fév 2011, 19:13
le - équivaut à
Gwénaël Invité
Posté le : Sam 05 Fév 2011, 19:16
Citer : Gwénaël
le - équivaut à
"-entre parenthèses" (désolé je ne savais pas pour le smiley)
Autorisation : Membre
Nb de messages : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Sam 05 Fév 2011, 19:57
Je crois qu'il me manque des données pour finir. Je ne sais pas combien de gros traîts faire pour chaque, et je n'ai pas bien compris la dernière instruction.
Code
For(V,-10,-50,-10
For(W,-5,-2,-1
Ligne(13,W+V,82,W+V
End
End
For(W,17,22
Ligne(W,-12,W,-55,0
End
Globalement les for c'est
for(variable,début,fin,pas
---------------------- 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)
EffEcr
For(I,1,8
For(J,1,16
Output(I,J,"/
End
EffVar J
End
Output(4,4,"BY HADRIEN
Output(8,13,"2ND7
For(J,1,500
End
PleinEcr:GraphNAff
AxesNAff:FonctNAff
QuadNAff
0üXmin:94üXmax
0üYmin:62üYmax
EffEcr
4üdim(áOP
{20,23,32,38,44,50,56,62,68,71,74,26,32,38,44,50,56,62,68,23,32,38,44,47,50,56,59,68,71,20,32,38,44,50,56,62,68,23,26,32,35,47,56,62,68,71,74üáX
If 50>áOP(3
50üáOP(3
áOP(3üdim(áX
Repüdim(áY
EffEcr
EffDessin:1üB
For(A,21,33,3
For(C,2,98,3
Pt-Aff(C+9,A,2
If C=áX(B):Then:B+1üB:Else
Pt-NAff(C,A,2
End:If codeTouch(=45:Goto 2:End:End:Texte(50,28,"VERSION 1.3
Pause
Lbl 1
EffDessin
Menu("SNAKE","START",2,"LARGEUR SNAKE",3,"OBJETS",4,"QUITTER",5
Lbl 3
Disp "longueur(2-15)
Input L
LüáOP(1
EffEcr
Goto 1
Lbl 4:0
Menu("OBJETS","AUCUN",6,"1 BARRE",7,"2 BARRES",8,"2 BARRES CROISES",9
Lbl 9:Rep+1
Lbl 8:Rep+1
Lbl 7:Rep+1
Lbl 6
RepüáOP(2
Goto 1
Lbl 2
EffDessin
Lbl 0
áOP(1üL
If L<2 ou L>15 ou partD–c(L
Goto 3
Horizontale 61
Horizontale 6
Ligne(0,6,0,62
Ligne(94,6,94,62:Pxl-NAff(0,0
Pxl-NAff(0,94
Texte(57,4,"SCORE:0
Texte(57,50,"HIGH:",áHS(6)/áHS(5
Remplir(0,áX
áXüáY:2
If 0<áOP(2
Then
For(A,31,36
Ligne(4,A,90,A
End:Rep+1:End
If 1<áOP(2
Then
For(A,46,48
Ligne(A,10,A,57
End:Rep+2:End
If 2<áOP(2
Then
For(A,1,2
Pt-Aff(47,8,A
Pt-Aff(47,59,A
End
For(A,31,36
Horizontale A
End:Rep+1:End
RepüO
Pt-Aff(2,59,2
99üG:GüF:2üJ
59üK:1üE:úOüN
KüB:ú1üA:26üD
While 1
While D=24
M+1üM
If M=5:Goto A
DüC:26üH
Repeat Rep
A-3üA
If A<0:92üA
pxl-Test(61-B,AüI
Pt-Aff(A,B,2
AüáY(E
BüáX(E
1+E(EøLüE
If I:Goto B
Pt-NAff(áY(E),áX(E),2
Pt-NAff(áY(E),áX(E
codeTouch(
End
If RepøH
RepüD
End
While D=25
M+1üM
If M=5:Goto A
DüC:34üH
Repeat Rep
B+3üB
If B>61:8üB
pxl-Test(61-B,AüI
Pt-Aff(A,B,2
AüáY(E
BüáX(E
1+E(EøLüE
If I:Goto B
Pt-NAff(áY(E),áX(E),2
Pt-NAff(áY(E),áX(E
codeTouch(
End
If RepøH
RepüD
End
While D=26
M+1üM
If M=5:Goto A
DüC:24üH
Repeat Rep
A+3üA
If A>93:2üA
pxl-Test(61-B,AüI
Pt-Aff(A,B,2
AüáY(E
BüáX(E
1+E(EøLüE
If I:Goto B
Pt-NAff(áY(E),áX(E),2
Pt-NAff(áY(E),áX(E
codeTouch(
End
If RepøH
RepüD
End
While D=34
M+1üM
If M=5:Goto A
DüC:25üH
Repeat Rep
B-3üB
If B<7:59üB
pxl-Test(61-B,AüI
Pt-Aff(A,B,2
AüáY(E
BüáX(E
1+E(EøLüE
If I:Goto B
Pt-NAff(áY(E),áX(E),2
Pt-NAff(áY(E),áX(E
codeTouch(
End
If RepøH
RepüD
End
If D=102:Goto 5:If D=45:Goto 1
While D et D<24 ou D>26 et Dø34:Repeat codeTouch(:End:CüD:End
End
Lbl B
If non(A=J et B=K ou A=G et B=F:Then
For(A,6,61
Horizontale A
End
Texte(20,30," GAME OVER
Pause
If N>áHS(6)/áHS(5
Then
normAl–at(1,1000000)üáHS(5
N*áHS(5)üáHS(6
Menu("CONTINUER ?","OUI",99,"NON",5)
Lbl 99
Ligne(30,36,63,36,0
Texte(49,13," YOU'VE GOT THE HIGH!
Ligne(13,7,80,7,0
Texte(57,68,N
Pause
End
For(A,7,60
Ligne(1,A,93,A,0:End:codeTouch(
Goto 0
End
If A=J et B=K
Then
L+1üL:N+OüN
If L=áOP(3:Then:5+áOP(3üáOP(3
áOP(3üdim(áX
Repüdim(áY
End:End
If A=G et B=F
Then:N+5OüN
99üF:FüG
Pt-NAff(J,K,3
End
Texte(57,26,N
Pt-NAff(áY(E),áX(E),2
Pt-NAff(áY(E),áX(E
If non(entAl–at(0,4:Then:Pt-NAff(G,F,3:0üM:Repeat non(pxl-Test(61-F,G:2+3entAl–at(3,19üF:2+3entAl–at(1,29üG:End
Pt-Aff(G,F,3
Pt-NAff(G,F:End
Repeat non(pxl-Test(61-K,J
2+3entAl–at(3,19üK
2+3entAl–at(1,29üJ:End
Pt-Aff(J,K,3
codeTouch(
End
If RepøH
RepüD
End:End
Lbl A
Pt-NAff(G,F,3
99üF:FüG
End
Lbl 5
EffDessin
EffVar áX
EffVar áY ú10üXmin:10üXmax ú10üYmin:10üYmax
AxesAff:FonctAff
QuadNAff
EffEcr
Output(1,1,"
zomg2 Invité
Posté le : Dim 13 Fév 2011, 18:43
Bonjour j'ai XSNAKE V4.7 sur ma TI-82 stats.fr et quand je fait bouger le serpent il laisse des obstacles est-ce normal?
Autorisation : Membre
Nb de messages : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Dim 13 Fév 2011, 19:45
J'ignore de quel snake il s'agit. S'il n'est pas dans ce sujet, alors tu devrais le poster dans le forum aide.
---------------------- 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 : 373
Inscrit le : Jeu 23 Sep 2010, 16:05
Posté le : Lun 14 Fév 2011, 10:27
HOUA ! Je suis sous le charme.
Je trouve la V1 et V0.5 versions très sympa ! Et aussi très courte et optimisées, surtout la V0.5.
Moi qui cherchait un snake très très court, me voilà servie !
Je vais m’empresser de la recopier !
Merci encore !
Autorisation : Membre
Nb de messages : 2164
Inscrit le : Sam 23 Jan 2010, 20:09
Posté le : Mar 15 Fév 2011, 20:07
ma préférée c'est la version 1.0.
je l'ai traduite en français, et j'ai rajouté deux trois bricoles comme le choix du mode vitesse, d'autres "croix" à manger...
Xpro (l'auteur) est un dieu! mais je n'aime pas la 4.7. elle ne réagit pas au quart de tour quand on appuie sur les boutons.