| Pacman ... enfin presque ^^ |
| Auteur |
Message |
nujik
Autorisation : Membre
Nb de messages : 32
Inscrit le : Dim 22 Oct 2006, 16:17
|
Posté le : Dim 22 Oct 2006, 18:08
|
|
 |
Bon vous me dirai se que vous en penser, je vous post une sorte de pacman fait maison ...
| Code | ClrHome
0->T
-1->S
4->A
6->B
12->D
12->I
12->N
12->X
2->O
2->J
2->E
2->Y
Lbl 3
T+1->T
ClrHome
Output(3,6,"LEVEL
Output(5,8,T
Pause
Lbl 0
S+1->S
int(8rand+1)->V
int(8rand+1)->U
Lbl 1
ClrHome
If A=D and B=E or A=I and B=J or A=N and B=O and A=X or B=Y
Then
Output(3,6,"PERDU
Output(5,3,"SRORE : "
Output(5,11,S
Pause
Stop
End
Output(V,U,"e ***e=[2nd],[diviser]=21,65(en getKey)***
getKey->W
If W=24
A-1->A
If W=26
A+1->A
If W=25
B-1->B
If W=34
B+1->B
If A=0
16->A
If A=17
1->A
If B=0
8->B
If B=9
1->B
Output(B,A,"O
Output(Y,X,"H
If T>1
Output(E,D,"H
If T>2
Output(J,I,"H
If T>3
Output(O,N,"H
int(rand3)-1->Z
int(rand3)-1->@ ***@=[Teta], mais j'ai pas trouver le [Teta]***
If T>1
Then
int(rand3)-1->F
int(rand3)-1->G
end
If T>2
Then
int(rand3)-1->K
int(rand3)-1->L
end
If T>3
Then
int(rand3)-1->P
int(rand3)-1->Q
end
rand->H
rand->M
rand->R
rand->C
If H>0.5
Then
E+G->E
D+F->D
end
If M>0.5
Then
I+K->I
J+L->J
end
If R>0.5
Then
N+P->N
O+Q->O
end
If C>0.5
Then
Y+@->Y
X+Z->X
end
If X=0
16->X
If Y=0
8->Y
If X=17
1->X
If Y=9
1->Y
If D=0
16->D
If E=0
8->E
If D=17
1->D
If E=9
1->E
If I=0
16->I
If J=0
8->J
If I=17
1->I
If J=9
1->J
If N=0
16->N
If O=0
8->O
If N=17
1->N
If O=9
1->O
If A=U and B=V
Goto 0
If S=10T and S<35
Goto 3
Goto 1 |
Bon, voila, moi j'ai fait l'effort de post, alors maintenant il vous reste plus qu'a le programmer sur votre calculatrice  , et me dire ce que vous en penser ... presque 140 ligne, rien que ca !!!
|
 |
  |
| |
ratuss
Autorisation : Membre
Nb de messages : 1522
Inscrit le : Mer 01 Mar 2006, 20:41
|
Posté le : Dim 22 Oct 2006, 20:40
|
|
|
Salut, tu veux pas envoyer un lien vers un .82p SVP ?? 
----------------------
--- LISTE DES JEUX POUR TI --- |
| |
|
| |
morstelder
Autorisation : Membre
Nb de messages : 3
Inscrit le : Mer 25 Oct 2006, 13:05
|
Posté le : Jeu 02 Nov 2006, 17:35
|
|
|
Il marchait quant tu l'a essayé parceque tes if comme ils sont mis ca risque pas de macher 
|
| |
|
| |
ratuss
Autorisation : Membre
Nb de messages : 1522
Inscrit le : Mer 01 Mar 2006, 20:41
|
Posté le : Ven 03 Nov 2006, 11:25
|
|
|
Ah ?
Un petit tour ici ca te fera du bien ^^: https://tout82.pages-perso.free.fr/forum/sujet.php?sujet=619
tcho @+
----------------------
--- LISTE DES JEUX POUR TI --- |
| |
|
| |
Wolves
Autorisation : Membre
Nb de messages : 33
Inscrit le : Dim 29 Oct 2006, 16:17
|
Posté le : Ven 03 Nov 2006, 16:31
|
|
|
rien a voir ds se post
----------------------
---}http://goldorama.ifrance.com{--- |
| |
|
| |
Sangohan38
Autorisation : Membre
Nb de messages : 3293
Inscrit le : Sam 31 Déc 2005, 19:48
|
Posté le : Ven 03 Nov 2006, 16:34
|
|
|
Si ca a quelque chose a voir puisque ce prog peut être modifié en l'allégant.
Sangohan38
|
| |
|
| |
ratuss
Autorisation : Membre
Nb de messages : 1522
Inscrit le : Mer 01 Mar 2006, 20:41
|
Posté le : Dim 05 Nov 2006, 9:00
|
|
|
Non c'étais surtout pour celui (ou celle) qui prentendait que les if ne fonctionnerais pas... 
@+
----------------------
--- LISTE DES JEUX POUR TI --- |
| |
|
| |
FulliZing
Autorisation : Membre
Nb de messages : 65
Inscrit le : Dim 05 Nov 2006, 13:01
|
Posté le : Sam 11 Nov 2006, 19:11
|
|
|
pouvez me dire si le prog fonctione
merci
----------------------
Quand on cherche on trouve... |
| |
|
| |
ratuss
Autorisation : Membre
Nb de messages : 1522
Inscrit le : Mer 01 Mar 2006, 20:41
|
Posté le : Dim 12 Nov 2006, 8:29
|
|
|
Le meilleur moyen de savoir s'il fonctionne c'est de le tester   
----------------------
--- LISTE DES JEUX POUR TI --- |
| |
|
| |
Jcotnys
Autorisation : Membre
Nb de messages : 178
Inscrit le : Lun 20 Mar 2006, 13:28
|
Posté le : Mer 15 Nov 2006, 17:26
|
|
|
| Citer : Ratuss |
Le meilleur moyen de savoir s'il fonctionne c'est de le tester |
fo savoir ki va le tester oci!
----------------------
le travail c la santé  |
| |
|
| |
unknow
Autorisation : Membre
Nb de messages : 221
Inscrit le : Jeu 12 Oct 2006, 19:30
|
Posté le : Mer 15 Nov 2006, 17:31
|
|
|
c'est claire qui? parce que 140 lignes pour quelqu'unj qui n'a pas le cable ba c'est ch***. Je vais l'acheter bientot, n'empeche tout les possibilités qu'ouvre ces calto c'est stylé.
----------------------
Ta le look coco |
| |
|
| |
Stupid
Autorisation : Membre
Nb de messages : 765
Inscrit le : Jeu 28 Sep 2006, 18:42
|
Posté le : Mer 15 Nov 2006, 18:36
|
|
|
il est pas si long,car beaucoup de lignes auraient pu etre reduite,doit y'en avoir pour 60 lignes...
|
| |
|
| |
Sangohan38
Autorisation : Membre
Nb de messages : 3293
Inscrit le : Sam 31 Déc 2005, 19:48
|
Posté le : Ven 17 Nov 2006, 20:47
|
|
|
Tu copie sur ti-graph link, tu remplace les signes, tu sauvegarde tu trouve un VTI correct et tu jou.
Sangohan38
PS: 140 lignes c'est simple a taper.
|
| |
|
| |
Ishito
Autorisation : Membre
Nb de messages : 10
Inscrit le : Mar 12 Déc 2006, 12:30
|
Posté le : Mar 12 Déc 2006, 12:50
|
|
|
J'ai un problème dessus. Quand je lance une partie il se met a buger dès que je veut bouger et me dit err:domain pour la ligne Output(B,A"O
|
| |
|
| |
Google_AdSense
|
Publicité
|
|
|
|
| |
Sangohan38
Autorisation : Membre
Nb de messages : 3293
Inscrit le : Sam 31 Déc 2005, 19:48
|
Posté le : Mar 12 Déc 2006, 13:13
|
|
|
Cela doit provenbir du fait que A ou B à une valeur qui se trouve en dehor de l'écran.
Verifie ces valeures quand le prog bug et tu verra comlbien elle valent et après tu n'as plus qu'as cherhcer d'où vien le problème.
Sangohan38
|
| |
|
| |
craminou
Autorisation : Membre
Nb de messages : 132
Inscrit le : Sam 15 Avr 2006, 11:31
|
Posté le : Mer 13 Déc 2006, 14:33
|
|
|
non , je pense plutot que c'est que c'est Ouput(A,B,"O"
prend garde au virgule , sans elles , le programme ne veut plus dire la meme chose !
|
| |
|
| |
Ishito
Autorisation : Membre
Nb de messages : 10
Inscrit le : Mar 12 Déc 2006, 12:30
|
Posté le : Jeu 14 Déc 2006, 12:55
|
|
|
En fait la virgule je l'ai déjà mise (j'ai mal recopié ici) donc c'est pas la virgule.
|
| |
|
| |
shika33
Autorisation : Membre
Nb de messages : 4
Inscrit le : Lun 11 Déc 2006, 12:00
|
Posté le : Jeu 14 Déc 2006, 13:05
|
|
|
| Citer : Sangohan38 | Cela doit provenbir du fait que A ou B à une valeur qui se trouve en dehor de l'écran.
Verifie ces valeures quand le prog bug et tu verra comlbien elle valent et après tu n'as plus qu'as cherhcer d'où vien le problème.
Sangohan38 |
Euh tu peux expliquer car j'ai le même probleme et je suis pas sur d'avoir compris.
|
| |
|
| |
Sangohan38
Autorisation : Membre
Nb de messages : 3293
Inscrit le : Sam 31 Déc 2005, 19:48
|
Posté le : Jeu 14 Déc 2006, 13:15
|
|
|
Une variable d'affichage doit contenir un nombre inférieur à 1 où supérieur ayu maximum.
Autrement dit, cela y afficherait en dehors de l'écran d'où l'erreur.
Sangohan38
|
| |
|
| |
haseo
Autorisation : Membre
Nb de messages : 24
Inscrit le : Dim 03 Déc 2006, 20:37
|
Posté le : Jeu 14 Déc 2006, 21:36
|
|
|
j ai un prob a la ligne ou il y a int(8rand+1)-}V je ne la trouve pas
j ai une ti 82 stat j ai bien trouver randint(mais je sais pas c est quelle valuer qui faut metre
|
| |
|
| |
shika33
Invité
|
Posté le : Ven 15 Déc 2006, 14:00
|
|
|
| Citer : Sangohan38 | Une variable d'affichage doit contenir un nombre inférieur à 1 où supérieur ayu maximum.
Autrement dit, cela y afficherait en dehors de l'écran d'où l'erreur.
Sangohan38 |
Oui mais ça m'avance pas, comment on peut régler ça (j'y connait rien en programmation par rapport à vous)?
|
| |
|
| |
Jcotnys
Autorisation : Membre
Nb de messages : 178
Inscrit le : Lun 20 Mar 2006, 13:28
|
Posté le : Ven 15 Déc 2006, 16:46
|
|
|
bon moi je reposte le prog modifié:
| Code |
ClrHome
0->T
-1->S
4->A
6->B
12->D
12->I
12->N
12->X
2->O
2->J
2->E
2->Y
Lbl 3
T+1->T
ClrHome
Output(3,6,"LEVEL
Output(5,8,T
Pause
Lbl 0
S+1->S
int(8rand+1)->V
int(8rand+1)->U
Lbl 1
ClrHome
If A=D and B=E or A=I and B=J or A=N and B=O and A=X or B=Y
Then
Output(3,6,"PERDU
Output(5,3,"SRORE : "
Output(5,11,S
Pause
Stop
End
Output(V,U,"e ***e=[2nd],[diviser]=21,65(en getKey)***
getKey->W
If W=24:A-1->A
If W=26:A+1->A
If W=25:B-1->B
If W=34:B+1->B
If A=0:16->A
If A=17:1->A
If B=0:8->B
If B=9:1->B
Output(B,A,"O
Output(Y,X,"H
If T>1:Output(E,D,"H
If T>2:Output(J,I,"H
If T>3:Output(O,N,"H
int(rand3)-1->Z
int(rand3)-1->@ ***@=[Teta], mais j'ai pas trouver le [Teta]***
If T>1
Then
int(rand3)-1->F
int(rand3)-1->G
end
If T>2
Then
int(rand3)-1->K
int(rand3)-1->L
end
If T>3
Then
int(rand3)-1->P
int(rand3)-1->Q
end
rand->H
rand->M
rand->R
rand->C
If H>0.5
Then
E+G->E
D+F->D
end
If M>0.5
Then
I+K->I
J+L->J
end
If R>0.5
Then
N+P->N
O+Q->O
end
If C>0.5
Then
Y+@->Y
X+Z->X
end
If X=0:16->X
If Y=0:8->Y
If X=17:1->X
If Y=9:1->Y
If D=0:16->D
If E=0:8->E
If D=17:1->D
If E=9:1->E
If I=0:16->I
If J=0:8->J
If I=17:1->I
If J=9:1->J
If N=0:16->N
If O=0:8->O
If N=17:1->N
If O=9:1->O
If A=U and B=V:Goto 0
If S=10T and S<35:Goto 3
Goto 1
|
et il faut rajouter :
| Code |
:If A<1:1->A
:If A>16:16->A
:If B<0:1->B
:If B>8:8->B
|
ce ke j' appelle "les conditions de définitions"
voila bon fo l'essayé maintenant
----------------------
le travail c la santé |
| |
|
| |
Google_AdSense
|
Publicité
|
|
|
|
| |
el spectro
Autorisation : Membre
Nb de messages : 123
Inscrit le : Ven 15 Déc 2006, 16:07
|
Posté le : Ven 15 Déc 2006, 16:51
|
|
|
désolé je ne peu pas (je suis au CDI)
----------------------
désolé pour mon absence mais mon temps sur le net était occupé par un exposé... |
| |
|
| |
Sangohan38
Autorisation : Membre
Nb de messages : 3293
Inscrit le : Sam 31 Déc 2005, 19:48
|
Posté le : Ven 15 Déc 2006, 20:19
|
|
|
Et bien tu rajoute avant l'affichage:
| Code | If "Variable De X"[INFERIEUR OU EGAL A]0:1->"Variable de X"
If "Variable de X"[SUPERIEUR OU EGAL A]17:16->"Variable de X"
If "Variable de Y"[INFERIEUR OU EGAL A]0:1->"Variable de Y"
If "Variable de Y"[SUPERIEUR OU EGAL A]9:8->"Variable de Y" |
Sangohan38
|
| |
|
| |
Ishito
Autorisation : Membre
Nb de messages : 10
Inscrit le : Mar 12 Déc 2006, 12:30
|
Posté le : Ven 22 Déc 2006, 12:42
|
|
|
Ta modif faut la mettrer a la fin ou à un endroit précis??
|
| |
|
| |
Sangohan38
Autorisation : Membre
Nb de messages : 3293
Inscrit le : Sam 31 Déc 2005, 19:48
|
Posté le : Ven 22 Déc 2006, 13:01
|
|
|
Avant l'affichage, je l'ai marqué.
Sangohan38
|
| |
|
| |
Hakoronaï
Autorisation : Membre
Nb de messages : 1
Inscrit le : Jeu 16 Oct 2008, 20:31
|
Posté le : Jeu 16 Oct 2008, 22:22
|
|
|
je l'ai rentrer mais ya un problème avec -> comment je fait pour représenter la plèche sur une TI 82 stats fr ? et le e ? je fait e=21.65 ? et quand ya exemple (rand3)-1->Z
le premier tirait c'est le petit ( du signe négatif) ou les deux sont le signe de soustraction ?
PS: je sais pas faire de programme c'est pour sa que j'en sais rien ^^
|
| |
|
| |
Sangohan38
Autorisation : Membre
Nb de messages : 3293
Inscrit le : Sam 31 Déc 2005, 19:48
|
Posté le : Sam 18 Oct 2008, 16:19
|
|
|
La flèche -> est la touche sto située au dessus de ON.
Pour le e, tu parle d'un E majuscule ou du e de l'exponentielle?
Le petit moins est le signe de la négativité.
Sangohan38
|
| |
|
| |
Antoine
Invité
|
Posté le : Mar 28 Oct 2008, 11:59
|
|
|
Je ne trouve pas int(8rand+1)
Sur la ti82
J'ai essayer de faire Ent(8NbreAleat1)
Mais aucun resultat !
|
| |
|
| |
Sangohan38
Autorisation : Membre
Nb de messages : 3293
Inscrit le : Sam 31 Déc 2005, 19:48
|
Posté le : Mar 28 Oct 2008, 17:42
|
|
|
Il faut que tu tape ent(nbralét(8+1) .
Sangohan38
|
| |
|
| |
antoine
Invité
|
Posté le : Mar 28 Oct 2008, 18:04
|
|
|
Merci !
|
| |
|
| |
Antoine
Invité
|
Posté le : Mar 28 Oct 2008, 18:25
|
|
|
J'ai un erreur domaine a la ligne
Output(Y,X,"H
Pourtant tout en haut de mon script j'ai mis:
:If A<1:1->A
:If A>16:16->A
:If B<0:1->B
:If B>8:8->B
Et
If "Variable De X"[INFERIEUR OU EGAL A]0:1->"Variable de X"
If "Variable de X"[SUPERIEUR OU EGAL A]17:16->"Variable de X"
If "Variable de Y"[INFERIEUR OU EGAL A]0:1->"Variable de Y"
If "Variable de Y"[SUPERIEUR OU EGAL A]9:8->"Variable de Y"
|
| |
|
| |
Sangohan38
Autorisation : Membre
Nb de messages : 3293
Inscrit le : Sam 31 Déc 2005, 19:48
|
Posté le : Mar 28 Oct 2008, 18:57
|
|
|
Normal, il faut mettre:
| Code | If X<1:1->X
If Y<1:1->Y
If X>16:16->X
If Y>8:8->Y |
Sangohan38
PS: pense à utiliser les balises code.
|
| |
|
| |
Antoine
Invité
|
Posté le : Mar 28 Oct 2008, 20:12
|
|
|
Merci de votre réponse mais
J'ai toujours erreur domaine !
Il se situe après le h
|
| |
|
| |
Google_AdSense
|
Publicité
|
|
|
|
| |
Sangohan38
Autorisation : Membre
Nb de messages : 3293
Inscrit le : Sam 31 Déc 2005, 19:48
|
Posté le : Mar 28 Oct 2008, 21:31
|
|
|
Pourrait tu nous indiquer la valeur de X et Y.
Sangohan38
|
| |
|
| |
Antoine
Invité
|
Posté le : Mer 29 Oct 2008, 2:39
|
|
|
En mettant Disp X
Disp Y
J'ai eu une erreur domaine au niveau du e a l'envers.
Je n'ai pas le cordon et j'ecris tout a la main.
Mais a vrai dire au moins j'analyse les script et j'ai reussi a creer mon propres script de nombre
|
| |
|
| |
Antoine
Invité
|
Posté le : Lun 10 Nov 2008, 19:57
|
|
|
Petit up
|
| |
|
| |
Sangohan38
Autorisation : Membre
Nb de messages : 3293
Inscrit le : Sam 31 Déc 2005, 19:48
|
Posté le : Mar 11 Nov 2008, 9:41
|
|
|
Pour nous donner la valeur de X et Y, il faut que tu exécute le programme et lors de l'erreur, tu fait QUIT et ensuite, tu tape X et Y à l'écran ce qui affichera leurs valeurs.
Sangohan38
|
| |
|
| |
manuel76
Invité
|
Posté le : Sam 18 Sep 2010, 12:56
|
|
|
salut moi je ne comprend pas jai bien tout recopier le programme et ma calculatrice me met qu'il y a une erreur sur la ligne Output(V,U,"e et je ne comprend pas
quelqu'un pourrait m'aider stp
|
| |
|
| |
Sangohan38
Autorisation : Membre
Nb de messages : 3293
Inscrit le : Sam 31 Déc 2005, 19:48
|
Posté le : Dim 19 Sep 2010, 19:32
|
|
|
Si ça te met une erreur c'est que t'as sans doute mal recopié...
Donne nous les valeurs de U et V.
Sangohan38
|
| |
|
| |
Rézus
Autorisation : Membre
Nb de messages : 835
Inscrit le : Sam 20 Jui 2009, 20:35
|
Posté le : Dim 19 Sep 2010, 20:19
|
|
|
Et le type d'erreur qu'il t'affiches.
|
| |
|
| |
Chopinois
Invité
|
Posté le : Ven 24 Sep 2010, 17:12
|
|
|
Salut ! J'ai aussi le même problème que manuel76 à la ligne :
Output(V,U,"e
Ils m'ont marqué erreur domaine.
Pour ce qui est des valeurs, j'ai V=1 et U=5.
|
| |
|
| |
Rézus
Autorisation : Membre
Nb de messages : 835
Inscrit le : Sam 20 Jui 2009, 20:35
|
Posté le : Ven 24 Sep 2010, 17:16
|
|
|
Erreur domaine tu es sur de tout ce que tu viens de dire ?
Parce qu'une erreur domaine avec un Output ne survient que si une des valeurs (ou les deux) est inférieur à 1 ou supérieur à 8 donc c'est très bizard.
|
| |
|
| |
Chopinois
Invité
|
Posté le : Sam 25 Sep 2010, 14:07
|
|
|
Ah non scuse moi, j'ai bien une erreur domaine mais les valeurs de U et V sont :
U = 0.7818 ...
V = 0.7548 ...
|
| |
|
| |
Rézus
Autorisation : Membre
Nb de messages : 835
Inscrit le : Sam 20 Jui 2009, 20:35
|
Posté le : Dim 26 Sep 2010, 11:09
|
|
|
Tu as recopié ces lignes sans erreur ?
| Code | Lbl 0
S+1->S
int(8rand+1)->V
int(8rand+1)->U
Lbl 1 |
|
| |
|
| |
Chopinois
Invité
|
Posté le : Dim 26 Sep 2010, 15:00
|
|
|
Oui j'en suis sur.
|
| |
|
| |
Sangohan38
Autorisation : Membre
Nb de messages : 3293
Inscrit le : Sam 31 Déc 2005, 19:48
|
Posté le : Dim 26 Sep 2010, 15:16
|
|
|
Ta calculatrice est surement en français... tu as bien marquer Ent(8nbraléat+1)?
Sangohan38
|
| |
|
| |
Chopinois
Invité
|
Posté le : Dim 26 Sep 2010, 15:27
|
|
|
Ah oui merci ^^ 
Mais maintenant j'ai une autre erreur domaine  à la ligne :
Output(Y,X,"H
Avec comme valeur :
Y = 1.5690...
X = 11.7880...
H = 0.8844...
|
| |
|
| |
Sangohan38
Autorisation : Membre
Nb de messages : 3293
Inscrit le : Sam 31 Déc 2005, 19:48
|
Posté le : Dim 26 Sep 2010, 15:51
|
|
|
Regarde si tu n'as pas oublier des lignes tout au début du programme avant le lbl 3.
Sangohan38
|
| |
|
| |
Chopinois
Invité
|
Posté le : Dim 26 Sep 2010, 16:10
|
|
|
J'ai tout vérifié, il n'y a rien qui manque.
|
| |
|
| |
