Les membres ayant 30 points peuvent parler sur les canaux annonces, projets et hs du chat.
La shoutbox n'est pas chargée par défaut pour des raisons de performances. Cliquez pour charger.

Forum Casio - Autres questions


Index du Forum » Autres questions » probleme programe (sur casio 35+)


nico55 Invité

probleme programe (sur casio 35+)

Posté le 30/09/2012 19:00

bonjours,
j'ai crée un programme mais je ne comprend pas quand je fait p=1 et p=2(voir code) il ne va pas a la fin du programme comme si le if de p=3 allais jusqu’à la fin alors que ce n'est pas le cas.
voici le code:
les ã sont des flèche et les ù sont des saut de ligne.
Filename:TEST
0ãXÙ
0ãYÙ
0ãZÙ
100ãMÙ
Locate 1,1,"PERS.1"Ù
Locate 1,2,"ATTAQUE:10"Ù
Locate 1,3,"DEFENCE:5"Ù
Locate 6,4,"ENDURENCE:1"Ù
Locate 12,1,"PERS.2"Ù
Locate 12,2,"ATTAQUE:5"Ù
Locate 12,3,"DEFENCE:10"Ù
Locate 1,5,"PERSSONNAGE 3"Ù
Locate 1,6,"ATTAQUE:5"Ù
Locate 1,7,"DEFENCE:5 ENDURENCE:2"Ù
Do:LpWhile GetkeyÈ31Ù
ClrTextÙ
?ãVÙ
If V=1Ù
Then Ù
10ãAÙ
5ãDÙ
1ãEÙ
IfEndÙ
If V=2Ù
Then Ù
5ãAÙ
10ãDÙ
1ãEÙ
IfEndÙ
If V=3Ù
Then Ù
5ãAÙ
5ãDÙ
2ãEÙ
IfEndÙ
Locate 1,1,"ACHETER EQUIPEMENT"Ù
Locate 1,2,"1:ARME"Ù
Locate 1,3,"2:ARMURE"Ù
Locate 1,4,"3:ENDURENCE"Ù
Do:LpWhile GetkeyÈ31Ù
ClrTextÙ
?ãPÙ
Locate 1,6,"VOUS AVEZ"Ù
Locate 11,6,MÙ
Locate 16,6,"COIN"Ù
If P=1Ù
Then Ù
Locate 1,1,"OBJET      PRIX"Ù
Locate 1,2,"1:EPEE     100"Ù
Locate 1,3,"2:HACHE    500"Ù
Locate 1,4,"3:ARC      1000"Ù
Do:LpWhile GetkeyÈ31Ù
ClrTextÙ
?ãCÙ
If C=1Ù
Then Ù
M-100ãMÙ
1ãZÙ
IfEndÙ
If C=2Ù
Then M-500ãMÙ
2ãZÙ
IfEndÙ
If C=3Ù
Then M-1000ãMÙ
3ãZÙ
IfEndÙ
IfEndÙ
Ù
If P=2Ù
Then Ù
Locate 1,1,"OBJET     PRIX"Ù
Locate 1,2,"BRONZE    100"Ù
Locate 1,3,"ARGENT    500"Ù
Locate 1,4,"OR        1000"Ù
Do:LpWhile GetkeyÈ31Ù
ClrTextÙ
?ãCÙ
If C=1Ù
Then M-100ãMÙ
1ãYÙ
IfEndÙ
If C=2Ù
Then M-500ãMÙ
2ãYÙ
IfEndÙ
If C=3Ù
Then M-1000ãMÙ
3ãYÙ
IfEndÙ
IfEndÙ
Ù
If P=3Ù
Then Ù
Locate 1,1,"OBJET        PRIX"Ù
Locate 1,2,"BAIE ROUGE   100"Ù
Locate 1,3,"BAIE VERTE   500Ù
Locate 1,4,"BAIE NOIR    1000"Ù
Do:LpWhile GetkeyÈ31Ù
ClrTextÙ
?ãCÙ
If C=1Ù
Then M-100ãMÙ
1ãXÙ
IfEndÙ
If C=2Ù
Then M-500ãMÙ
2ãXÙ
IfEndÙ
If C=3Ù
Then M-1000ãMÙ
3ãXÙ
IfEndÙ
IfEndÙ
Ù
If Z=1Ù
Then A+2ãAÙ
IfEndÙ
If Z=2Ù
Then A+5ãAÙ
IfEndÙ
If Z=3Ù
Then A+10ãAÙ
IfEndÙ
If Y=1Ù
Then D+2ãDÙ
IfEndÙ
If Y=2Ù
Then D+5ãDÙ
IfEndÙ
If Y=3Ù
Then D+10ãDÙ
IfEndÙ
If X=1Ù
Then E+1ãEÙ
IfEndÙ
If X=2Ù
Then E+2ãEÙ
IfEndÙ
If X=3Ù
Then E+3ãEÙ
IfEndÙ
ClrTextÙ
Locate 1,1,"VOUS AVEZ:"Ù
Locate 1,2,AÙ
Locate 5,2,"ATTAQUE"Ù
Locate 1,3,DÙ
Locate 5,3,"DEFENCE"Ù
Locate 1,4,EÙ
Locate 5,4,"ENDURENCE"Ù
Locate 1,5,MÙ
Locate 5,5,"COIN"Ù


merci d'avance.



Totoyo Hors ligne Membre d'honneur Points: 16091 Défis: 102 Message

Citer : Posté le 30/09/2012 21:59 | #


Mets ton code entre les balises [ code ]

Je viens de mettre à jour cette balise afin qu'elle remplace certains caractères, comme les retours à la ligne et la ->
Juste avant le If P=2, ajoute ce code et dis-nous si la calculatrice affiche la valeur de P. Si ce n'est pas le cas, il doit manquer un IfEnd quelque part.
P[DISP]

Ne0tux Hors ligne Membre d'honneur Points: 3520 Défis: 265 Message

Citer : Posté le 30/09/2012 22:05 | #



C'est effectivement plus lisible dans la balise !

Merci pour cette modification.

Pour le soucis, je n'ai rien vu d'anormal non plus...

Peut-être que ceci t'aidera !


Mes principaux jeux : Ice Slider - CloneLab - Arkenstone

La Planète Casio est accueillante : n'hésite pas à t'inscrire pour laisser un message ou partager tes créations !

LienAjouter une imageAjouter une vidéoAjouter un lien vers un profilAjouter du codeCiterAjouter un spoiler(texte affichable/masquable par un clic)Ajouter une barre de progressionItaliqueGrasSoulignéAfficher du texte barréCentréJustifiéPlus petitPlus grandPlus de smileys !
Cliquez pour épingler Cliquez pour détacher Cliquez pour fermer
Alignement de l'image: Redimensionnement de l'image (en pixel):
Afficher la liste des membres
:bow: :cool: :good: :love: ^^
:omg: :fusil: :aie: :argh: :mdr:
:boulet2: :thx: :champ: :whistle: :bounce:
valider
 :)  ;)  :D  :p
 :lol:  8)  :(  :@
 0_0  :oops:  :grr:  :E
 :O  :sry:  :mmm:  :waza:
 :'(  :here:  ^^  >:)

Σ π θ ± α β γ δ Δ σ λ
Veuillez donner la réponse en chiffre
Vous devez activer le Javascript dans votre navigateur pour pouvoir valider ce formulaire.

Si vous n'avez pas volontairement désactivé cette fonctionnalité de votre navigateur, il s'agit probablement d'un bug : contactez l'équipe de Planète Casio.

Planète Casio v4.3 © créé par Neuronix et Muelsaco 2004 - 2024 | Il y a 49 connectés | Nous contacter | Qui sommes-nous ? | Licences et remerciements

Planète Casio est un site communautaire non affilié à Casio. Toute reproduction de Planète Casio, même partielle, est interdite.
Les programmes et autres publications présentes sur Planète Casio restent la propriété de leurs auteurs et peuvent être soumis à des licences ou copyrights.
CASIO est une marque déposée par CASIO Computer Co., Ltd