Les codes ?

→ **MyCalcs** profile · by **Ti-82|Nico** » 18 Sep 2010, 11:39

EDIt : Désolé je me suis trompé de parti, un modo pourrais bouger mon message ?

Salut,

Voilà mon soucis, c'est que je suis en train de programmer un tetris sur ma TI-82 stats.fr mais il y certain symbole que je ne vois pas ou les trouver :
:ú.5üXmin:4ñü¾X
:5/4üYmin:4ñü¾Y
:0üS:5üT:ú1üÁ:AnsüZ
:[[1ü[E]:{16,11üdim [E]
:{0üL‚:AnsüLƒ
:For(I,2,11:1ü[E](1,I:End

lot3(Scatter,L‚,Lƒ,Ð:PlotsOn 3
:Line(4ñ,5/4,43/4,5/4:Vertical 4ñ:Vertical 43/4
:13.5üA:3.25üB:71/4üC:5.75
:Line(A,B,A,Ans:Line(A,Ans,C,Ans:Line(C,Ans,C,B:Line(C,B,A,B

Merci de m'éclairer...

→ **MyCalcs** profile · by **critor** » 18 Sep 2010, 12:25

Ti-82|Nico wrote:EDIt : Désolé je me suis trompé de parti, un modo pourrais bouger mon message ?

Te voici exaucé!

Ti-82|Nico wrote:Voilà mon soucis, c'est que je suis en train de programmer un tetris sur ma TI-82 stats.fr mais il y certain symbole que je ne vois pas ou les trouver :
:ú.5üXmin:4ñü¾X
:5/4üYmin:4ñü¾Y
:0üS:5üT:ú1üÁ:AnsüZ
:[[1ü[E]:{16,11üdim [E]
:{0üL‚:AnsüLƒ
:For(I,2,11:1ü[E](1,I:End
lot3(Scatter,L‚,Lƒ,Ð:PlotsOn 3
:Line(4ñ,5/4,43/4,5/4:Vertical 4ñ:Vertical 43/4
:13.5üA:3.25üB:71/4üC:5.75
:Line(A,B,A,Ans:Line(A,Ans,C,Ans:Line(C,Ans,C,B:Line(C,B,A,B

Il y a déjà un problème de lisibilité pour la plupart d'entre nous, car tu as copié/collé du texte utilisant une police de la famillle ti83pc, alors que nos navigateurs n'utilisent pas cette police par défaut, et que de plus elle n'est pas installée sur tout les ordinateurs.

Traduisons, sinon on ne s'en sortira pas:
:-.5-Xmin:4^-1-ΔX
:5/4-Ymin:4^-1-ΔY
:0-S:5-T:-1-θ:Ans-Z
:[[1-[E]:{16,11-dim [E]
:{0-L₂:Ans-L₃
:For(I,2,11:1-[E](1,I:End

lot3(Scatter,L₂,L₃,▫:PlotsOn 3
:Line(4^-1,5/4,43/4,5/4:Vertical 4^-1:Vertical 43/4
:13.5-A:3.25-B:71/4-C:5.75
:Line(A,B,A,Ans:Line(A,Ans,C,Ans:Line(C,Ans,C,B:Line(C,B,A,B

Qu'est-ce que tu n'arrives pas à taper, maintenant ?

→ **MyCalcs** profile · by **critor** » 18 Sep 2010, 13:45

Voici les séquences de touches si je n'ai pas fait d'erreur.

Essaye d'en extraire les sous-séquences qui t'intéressent, et donc d'apprendre à naviguer à travers les menus de ta TI-82Stats.fr.

:-.5-Xmin:4^-1-ΔX

:5/4-Ymin:4^-1-ΔY

:0-S:5-T:-1-θ:Ans-Z

:[[1-[E]:{16,11-dim [E]

:{0-L₂:Ans-L₃

:For(I,2,11:1-[E](1,I:End

lot3(Scatter,L₂,L₃,▫:PlotsOn 3

:Line(4^-1,5/4,43/4,5/4:Vertical 4^-1:Vertical 43/4

:13.5-A:3.25-B:71/4-C:5.75

:Line(A,B,A,Ans:Line(A,Ans,C,Ans:Line(C,Ans,C,B:Line(C,B,A,B

→ **MyCalcs** profile · by **Ti-82|Nico** » 18 Sep 2010, 21:40

Merci de m'aider, je vais essayer et je te tient au courant !

→ **MyCalcs** profile · by **Ti-82|Nico** » 18 Sep 2010, 21:49

Es-tu sûr de celle-ci :
:[[1-[E]:{16,11-dim [E]
Moi au lieu de :
dim [E]
j'ai :
dim(5

→ **MyCalcs** profile · by **critor** » 18 Sep 2010, 21:55

Ti-82|Nico wrote:Es-tu sûr de celle-ci :
:[[1-[E]:{16,11-dim [E]
Moi au lieu de :
dim [E]
j'ai :
dim(5

Je suis sûr.

Tu as du rater l'appui sur l'avant-dernière touche:

-dim [E]

→ **MyCalcs** profile · by **critor** » 20 Sep 2010, 00:32

Nous sommes heureux d'aider tout le monde, aussi bien utilisateurs débutants que confirmés, dans l'espoir de vous amener vers le progrès et l'autonomie.

Notre meilleure récompense est que vous n'ayez plus besoin de nous. (contrairement à certaines sociétés de soutien scolaire et pas forcément celles auxquelles on pense, qui font bachoter du savoir-faire au lieu d'ouvrir les élèves au savoir et à la culture, et sont bien heureuses de les voir donc revenir encore et toujours...)

Le problème ici est que j'ai passé 30 minutes à faire une réponse détaillée-illustrée de qualité ci-dessus avec toutes les touches à presser en image, dans l'espoir que la personne apprenne et retienne les différents menus et séquences de touches pour obtenir les symboles/caractères spéciaux sur sa calculatrice.

Résultat: je reçois non pas des remerciements, mais un MP m'invitant à faire de même pour 150 lignes de code supplémentaire! (véridique: cliquer sur le spoiler ci-desous)

Bref, mon aide ci-dessus a été totalement stérile.

De plus, si j'ai mis 30 minutes ci-dessus pour 10 lignes, là je mets combien?...
Un bon 7 heures... toute une après-midi, ou toute une nuit blanche.

Il est très rare que je refuse d'aider, mais quand même il ne faut pas exagérer, pour rester poli.

Show/Hide spoilerAfficher/Masquer le spoiler

Ti-82|Nico wrote:pourrais tu si ca ne te dérange pas me dire ça :

:Text(8,50,"SCORE:
:Text(32,64,"SUIVANT:
:Repeat 0
:If T4:Then
:Lbl A
:If Á:If Z:ZüÁ
:int 7randüZ
:For(I,0,1
:If not Ans:Then
:{1,1,0,ú1üL„
:{1,0,0,0üL†
:End
:If Z=1:Then
:{ú1,ú1,0,1üL„
:{1,0,0,0üL†
:End
:If Z=2:Then
:{0,0,ú1,1üL„
:{0,1,0,0üL†
:End
:If Z=3:Then
:{ú1,0,0,1üL„
:{0,0,1,1üL†
:End
:If Z=4:Then
:{ú1,0,0,1üL„
:{1,1,0,0üL†
:End
:If Z=5:Then
:{ú1,0,1,2üL„
:{0,0,0,0üL†
:End
:If Z=6:Then
:{0,1,0,1üL„
:{0,0,1,1üL†
:End
:If I:Then
:5üU:16üV
:L„+5üL‚:L†+VüLƒ
:Á-ZüZ:Á-AnsüÁ
:RecallPic Pic6
:Else
:For(J,3.75,5.25,4ñ
:Line(13.75,J,17.25,J,0
:End
:Text(8,72,S
:StorePic Pic6
:Ans+4üLƒ:L„+15üL‚
:RecallPic Pic6
:StorePic Pic6
:Á+ZüÁ:Ans-ZüZ
:End
:End
:End
:Lƒ-1üL†
:If sum seq([E](Ans(I),L‚(I)),I,1,4,1:Then
:0üL
:SortD(Lƒ,L‚
:RecallPic Pic6
:If 15:For(I,1,4
:1ü[E](Lƒ(I),L‚(I
:1+[E](Lƒ(I),11ü[E](Lƒ(I),11
:If 9:L+1üL
:Lƒ(IüJ
:While [E](Ans,11
:For(K,1,10
:[E](J+1,K
:If not Ans and [E](J,K:Text(64-4J,1+4K,"
:If Ans and not [E](J,K:Then:Text(63-4J,1+4K,"Ð
:K-.25
t-On(Ans,J+1:Pt-On(Ans+.5,J+1:Line(Ans,J+.75,Ans+.5,J+.75
:End
:End
:J+1üJ
:End
:[E]
:For(J,Lƒ(I),J
:rowSwap(Ans,J,J+1
:End
:*row(0,Ans,Jü[E]
:End
:S+10LòüS
:End
:ú1üÁ
:Else
:AnsüLƒ:V-1üV:RecallPic Pic6
:End
:If Á:T-5üT
:End
:getKeyüI
:If Ans:Then
:If Ans=105:Pause
:getKey
:If I=24 or I=26:Then
:T-1üT
:L‚+I-25
:If not min(Ans) or 10:If not [E](min(Lƒ),11:Goto B
:If sum seq([E](Lƒ(J),Ans(J)),J,1,4,1:Goto S
:Lbl B
:AnsüL‚:U+I-25üU:RecallPic Pic6
:End
:If I=34:2+TüT
:If I=25:Then
:Lƒ
:While not [E](min(Ans)-1,11:Ans-1:End
:While not sum seq([E](Ans(J)-1,L‚(J)),J,1,4,1
:Ans-1
:End
:AnsüLƒ
:S+3üS
:End
:If I=21 or I=22:Then
:L‚-UüL†:Lƒ-VüL„
:If I=21:úAnsüL„
:If I=22:úL†üL†
:L†+VüL†:L„+U
:If sum seq([E](L†(J),Ans(J)),J,1,4,1:Goto S
:AnsüL‚:L†üLƒ:RecallPic Pic6
:End
:If 1:Then
:Lbl S
:End
:T+3üT
:End
:T+1üT
:End
:Lbl F
:Text(28,15,"PERDU!
ause
lotsOff :ZStandard:[[0ü[E]:ClrList L‚,Lƒ,L„,L†

Y'en a beaucoup mais tu m'aiderais beaucoup !!

My calculator programs · by **Adriweb** » 20 Sep 2010, 06:42

C'est sur, que la... >
Mais d'ailleurs, pourquoi il lui faudrait converti ?

Il y a juste a savoir quelle touche correspond à quel fonction etc. On lit le manuel et c'est bon .... Et avec le post précédent de critor, expliquant en détail les touches sur le programme d'avant.... ya plus aucun soucis !