Poster un nouveau sujet Poster une réponse
Aide touche
Auteur Message
Maximinus



Autorisation : Membre
Nb de messages : 23
Inscrit le : Dim 13 Nov 2011, 20:13
Posté le : Dim 13 Nov 2011, 20:18   Citer 

Bonjour je débute dans la programmation. J'ai une calculatrice TI-82 stats.
Jaimerai bien savoir comment on fait pour que le programme fasse une action quand on appuie sur une touche particuliere comme la flèche gauche et droite. merci

 Adresse email Haut de page Bas de page 
 
tilo1996



Autorisation : Membre
Nb de messages : 122
Inscrit le : Sam 23 Avr 2011, 10:47
Posté le : Dim 13 Nov 2011, 20:43   Citer 

Hum. Le mieux que je puisses faire cest t'envoyer A cet endroit, il y a plein d'astuces.

La fonction que tu recherches est GetKey. Elle associe une valeur a une variable selon la touche de la calculette que tu presses.
Voila le tableau des getKey.

En l'occurence, si tu appuie sur la fleche droite, getKey sera egal a 26.

Dans un prog sa ressemblera a sa


Code
If getKey=26
Blablabla


On peut stocker getkey dans une variable
Sa donne alors

Code
getkey->K
If K=26
blablabla



 Adresse email Haut de page Bas de page 
 
Maximinus



Autorisation : Membre
Nb de messages : 23
Inscrit le : Dim 13 Nov 2011, 20:13
Posté le : Dim 13 Nov 2011, 20:48   Citer 

Merci beaucoup je vais essayer

 Adresse email Haut de page Bas de page 
 
Maximinus



Autorisation : Membre
Nb de messages : 23
Inscrit le : Dim 13 Nov 2011, 20:13
Posté le : Mer 16 Nov 2011, 14:01   Citer 

J'ai une autre question. Je poste ici parce que c'est toujours en relation avec un même programm.
Mon jeu consiste en gros à rester dans une "route". La route se forme sur la ligne 8 et mon "bonhomme" sur la ligne 5. J'aimerai que quand mon "bonhomme va au bord de la route, je puisse faire une action. Mon programme est basé sur une boucle lbl.
J'aimerai savoir s'il est possible de stocker une information particulière afin de la réutiliser plus tard car il y a 3 lignes de décalages entre mon "bonhomme" et la "route" sur une meme boucle lbl.

Merci. si je me suis mal exprimé posez moi des questions ^^

 Adresse email Haut de page Bas de page 
 
tilo1996



Autorisation : Membre
Nb de messages : 122
Inscrit le : Sam 23 Avr 2011, 10:47
Posté le : Mer 16 Nov 2011, 14:16   Citer 

Hum. J'avoue ne pas comprendre grand chose. L'idéal serait que tu postes ton programme ici....

 Adresse email Haut de page Bas de page 
 
The K



Autorisation : Membre
Nb de messages : 850
Inscrit le : Sam 15 Oct 2011, 11:07
Posté le : Mer 16 Nov 2011, 14:18   Citer 

Y a t'il moyen que tu recopies ton programme, s'il te plait ?

Afin de mieux comprendre le programme ... en question ? winkle.gif

Mais si tu veux savoir oui c'est possible ... tu peux le faire dans une variable, dans une liste ... éventuellement dans une matrice si c'est particulier. A voir winkle.gif

PS : je n'ai pas vu le programme, mais a la place du lbl, tu peux essayer, "While 1" et End à la fin, si c'est compatible : c'est beaucoup plus rapide. Par contre, pour en sortir, la il faut un label / Stop (/Return).

----------------------
La la la ...

Avez-vous pensé à regarder le manuel avant de demander conseil ? Un manuel est fait avant tout pour être consulté : MANUEL

Vous avez un problème avec l'ordinateur avec votre calculatrice ? SOLUTION EN VIDEO

Mes programmes sur le site : Produit scalaire KMorpion Puissance 4 Mastermind

Mes nouveaux programmes de calcul formel : FCarré FPrime

Projet base de données : ici mais abandonné. Trop de travail ...
 Adresse email Haut de page Bas de page 
 
Maximinus



Autorisation : Membre
Nb de messages : 23
Inscrit le : Dim 13 Nov 2011, 20:13
Posté le : Mer 16 Nov 2011, 14:50   Citer 

C'est peut-être un peu brouillon ^^


Code
effecr
output(5,7,"GAME")
pause : Effecr
-7 -> N
5 -> A
6 ->C
8 ->Z
Disp "", "","","","","",""
lbl 1
If A=2: then
A+1 -> A
End
If B=15: Then
A-1 -> A
End
entAléat (A-1,A+1)->A:A+C ->B
output (8,A,0): output (8,B,0)
Disp " "
N+1->N
If N=50 ou N=100 ou N=150 ou N=200: Then
C-1->C
End
CodeTouche-> K
if K=24: Then
Output(5,Z-1,"1")
Z-1 ->Z
end
If K=26: Then
Output(5,Z+1,"1")
Z+1 ->Z
End
Output (5,Z,"1")
If K=25: Then
Menu("menu",reprendre",3,"bye bye",4)
lbl 3
Goto 1
Lbl 4
Goto 2
End
Goto 1
Lbl 2
End



EDIT de persalteas: salut, pour écrire un code comme il apparait ici, il faut sélectionner ton code une fois que tu l'as tapé, et cliquer sur le bouton [code] au dessus de la boite de message. winkle.gif

 Adresse email Haut de page Bas de page 
 
Maximinus



Autorisation : Membre
Nb de messages : 23
Inscrit le : Dim 13 Nov 2011, 20:13
Posté le : Mer 16 Nov 2011, 15:57   Citer 

ok merci persalteas ^^ je savais pas comment faire

 Adresse email Haut de page Bas de page 
 
The K



Autorisation : Membre
Nb de messages : 850
Inscrit le : Sam 15 Oct 2011, 11:07
Posté le : Mer 16 Nov 2011, 16:09   Citer 

Bon ... j'te simplifie ton code, ça prendra moins de mémoire et ce sera plus fluide winkle.gif
Voila ce que ça peut donner :


Code

EffEcr
Output(5,7,"GAME
Pause
EffEcr
-7 -> N
5 -> A
6 -> C
8 -> Z
50 -> M
Lbl 1
If A=2 : A+1 -> A
If B=15 : A-1 -> A
EntAléat(A-1,A+1 -> A : A+C -> B
Output(8,A,"0       //Ne pas oublier les guillemets sur les outputs comme tu l'as écrit !!!!!
Output(8,B,"0
Output(8,1," "       //Pas sur que ça fasse la même chose ... mais je crois !
N+1 -> N
If N=M ou N=2M ou N=3M ou N=4M : C-1 -> C
Repeat K
If K=24 : Then
Z-1 -> Z
Output(5,Z,"1
End
If K=26 : Then
Z+1 -> Z
Output(5,Z,"1
End
If K=25 : Menu("MENU","REPRENDRE",1,"BYE BYE",2
End
Lbl 2
Output(1,1,"



Bien ... voila ça c'est fait ^^
Mais je n'ai pas très bien compris ce que tu voulais faire. Quant ton bonhomme se balade ligne 7, faire une action spéciale ? (et quelle serait elle ?)

En espérant ne pas avoir fait de faute d'optimisation winkle.gif

PS : oh d'ailleurs ... il ya peut etre moyen d'optimiser encore je pense !

----------------------
La la la ...

Avez-vous pensé à regarder le manuel avant de demander conseil ? Un manuel est fait avant tout pour être consulté : MANUEL

Vous avez un problème avec l'ordinateur avec votre calculatrice ? SOLUTION EN VIDEO

Mes programmes sur le site : Produit scalaire KMorpion Puissance 4 Mastermind

Mes nouveaux programmes de calcul formel : FCarré FPrime

Projet base de données : ici mais abandonné. Trop de travail ...
 Adresse email Haut de page Bas de page 
 
Maximinus



Autorisation : Membre
Nb de messages : 23
Inscrit le : Dim 13 Nov 2011, 20:13
Posté le : Mer 16 Nov 2011, 16:26   Citer 

merci pour l'optimisation =) en faite je voudrais faire une action si un des "0" qui correspond a

Citer
output (8,A,"0
output (8,B,"0


est sur la même case que le "1" qui correspond a

Code
output(5,Z,"1



 Adresse email Haut de page Bas de page 
 
The K



Autorisation : Membre
Nb de messages : 850
Inscrit le : Sam 15 Oct 2011, 11:07
Posté le : Mer 16 Nov 2011, 16:28   Citer 

Ah mais euh ça, vu comme ton code est composé, est impossible : les 1 ne peuvent etre que sur la ligne 5 et les O que sur la ligne 8 !!!
crazy.gif crazy.gif crazy.gif crazy.gif winkle.gif

----------------------
La la la ...

Avez-vous pensé à regarder le manuel avant de demander conseil ? Un manuel est fait avant tout pour être consulté : MANUEL

Vous avez un problème avec l'ordinateur avec votre calculatrice ? SOLUTION EN VIDEO

Mes programmes sur le site : Produit scalaire KMorpion Puissance 4 Mastermind

Mes nouveaux programmes de calcul formel : FCarré FPrime

Projet base de données : ici mais abandonné. Trop de travail ...
 Adresse email Haut de page Bas de page 
 
Maximinus



Autorisation : Membre
Nb de messages : 23
Inscrit le : Dim 13 Nov 2011, 20:13
Posté le : Mer 16 Nov 2011, 16:33   Citer 

arf =/ dommage ^^

 Adresse email Haut de page Bas de page 
 
The K



Autorisation : Membre
Nb de messages : 850
Inscrit le : Sam 15 Oct 2011, 11:07
Posté le : Mer 16 Nov 2011, 16:34   Citer 

Bah si tu veux qu'ils soient égaux, il faut changer la ligne du 1, du 0, ou alors que le 1 puisse se déplacer aussi de haut en bas ... !

----------------------
La la la ...

Avez-vous pensé à regarder le manuel avant de demander conseil ? Un manuel est fait avant tout pour être consulté : MANUEL

Vous avez un problème avec l'ordinateur avec votre calculatrice ? SOLUTION EN VIDEO

Mes programmes sur le site : Produit scalaire KMorpion Puissance 4 Mastermind

Mes nouveaux programmes de calcul formel : FCarré FPrime

Projet base de données : ici mais abandonné. Trop de travail ...
 Adresse email Haut de page Bas de page 
 
Maximinus



Autorisation : Membre
Nb de messages : 23
Inscrit le : Dim 13 Nov 2011, 20:13
Posté le : Mer 16 Nov 2011, 16:39   Citer 

le probleme c'est que s'ils sont sur la meme ligne je pourrais pas voir comment il faut me deplacer ^^ c'est pas grave c'etait mon premier test de jeu ^^

 Adresse email Haut de page Bas de page 
 
ray0u le fou
Invité
Posté le : Mar 29 Nov 2011, 22:23   Citer 

le programme ne marche pas sur ma calculatrice apres GAME . Est ce que je pourrais avoir de l'aide merci.

  Haut de page Bas de page 
 
Polymorph



Autorisation : Membre
Nb de messages : 118
Inscrit le : Dim 13 Nov 2011, 14:26
Posté le : Mar 29 Nov 2011, 22:37   Citer 

Vu qu'il y a une pause, appuie sur enter, ça devrait le faire continuer...

Il me semble que ces ligne

Code

50=>M
If N=M ou N=2M ou N=3M ou N=4M : C-1 -> C


Peuvent être remplacées par

Code
If non(PartDec(N/50:C-1=>C  //(et N=<200 si besoin est)



Correct?

----------------------

Citer
Le temps est une variable dans une boucle infinie, qu'on ne cesse d'incrémenter.


Polymorph, 23/11/2011
 Adresse email Haut de page Bas de page 
 
Persalteas



Autorisation : Membre
Nb de messages : 2086
Inscrit le : Sam 23 Jan 2010, 20:09
Posté le : Mer 30 Nov 2011, 10:23   Citer 

j'aurais mis PartDéc(...



Mais sur le plan exact, oui, il faudrait rajouter and N<=200:


Code
If N<=200 et non(PartDéc(N/50:C-1->C



 Adresse email Haut de page Bas de page 
 
Polymorph



Autorisation : Membre
Nb de messages : 118
Inscrit le : Dim 13 Nov 2011, 14:26
Posté le : Mer 30 Nov 2011, 23:03   Citer 

Ah oui, effectivement, merci de relever, je modifie ça crazy.gif

----------------------

Citer
Le temps est une variable dans une boucle infinie, qu'on ne cesse d'incrémenter.


Polymorph, 23/11/2011
 Adresse email Haut de page Bas de page 
 
Google_AdSense



Publicité    



 
Poster un nouveau sujet Poster une réponse





  Page générée en 6 requêtes