Probleme de programmation
tibasics
Messages postés
1
Statut
Membre
-
tibasics -
tibasics -
Bonjour,
cet apres midi j'ai recopié un jeu sur internet , mais ma calculatrice me dit qu'il y a une erreur et me mène a la ligne 33 , en effet , ne trouvant pas dans le catalogue de ma ti 83 premium la commande "randint" j'ai mis la commande "rendint" , je me suis rendu compte que les commandes n'étaient pas les meme car toutes les commandes en anglais comme "and" ou "or" ou "clrHome" sont traduite par ma calculatrice en francais , je voudrais donc connaitre la signification de "randint" en francais,
merci de me répondre
cordialement un homme fatigué
:ClrHome
:Output(1,2,"JEU : REFLEXE")
:Output(3,7,"V1.0")
:Output(5,5,"PAR SHAAC")
:Output(8,2,"SITEDUZERO.COM")
:Pause
:Lbl 5
:Menu("QUEL NIVEAU ?","FACILE",1,"MOYEN",2,"DIFFICILE",3)
:Lbl 1
:1->N
:Goto 4
:Lbl 2
:2->N
:Goto 4
:Lbl 3
:3->N
:Lbl 4
:ClrHome
:For(F,2,15)
:Output(3,F,"-")
:Output(6,F,"-")
:End
:For(F,1,8)
:Output(F,6,"I")
:Output(F,11,"I")
:End
:Output(3,6,"+")
:Output(3,11,"+")
:Output(6,6,"+")
:Output(6,11,"+")
:0->P
:While 1
:randInt(1,9)->A
:If A<=3
:1->Y
:If A>3 and A<=6
:4->Y
:If A>6
:7->Y
:If A=1 or A=4 or A=7
:2->X
:If A=2 or A=5 or A=8
:7->X
:If A=3 or A=6 or A=9
:12->X
:For(F,0,1)
:For(G,0,3)
:Output(Y+F,X+G,"X")
:End:End
:For(F,1,100/N)
:getKey->G
:If G!=0
:G->K
:End
:If K=72
:1->B
:If K=73
:2->B
:If K=74
:3->B
:If K=82
:4->B
:If K=83
:5->B
:If K=84
:6->B
:If K=92
:7->B
:If K=93
:8->B
:If K=94
:9->B
:If A!=B
:Goto 0
:P+1->P
:For(F,0,1)
:For(G,0,3)
:Output(Y+F,X+G," ")
:End:End
:End
:Lbl 0
:ClrHome
:Disp "NOMBRE DE PTS :",P
:Pause
:Menu("CONTINUER ?","OUI",5,"NON",6)
:Lbl 6
cet apres midi j'ai recopié un jeu sur internet , mais ma calculatrice me dit qu'il y a une erreur et me mène a la ligne 33 , en effet , ne trouvant pas dans le catalogue de ma ti 83 premium la commande "randint" j'ai mis la commande "rendint" , je me suis rendu compte que les commandes n'étaient pas les meme car toutes les commandes en anglais comme "and" ou "or" ou "clrHome" sont traduite par ma calculatrice en francais , je voudrais donc connaitre la signification de "randint" en francais,
merci de me répondre
cordialement un homme fatigué
:ClrHome
:Output(1,2,"JEU : REFLEXE")
:Output(3,7,"V1.0")
:Output(5,5,"PAR SHAAC")
:Output(8,2,"SITEDUZERO.COM")
:Pause
:Lbl 5
:Menu("QUEL NIVEAU ?","FACILE",1,"MOYEN",2,"DIFFICILE",3)
:Lbl 1
:1->N
:Goto 4
:Lbl 2
:2->N
:Goto 4
:Lbl 3
:3->N
:Lbl 4
:ClrHome
:For(F,2,15)
:Output(3,F,"-")
:Output(6,F,"-")
:End
:For(F,1,8)
:Output(F,6,"I")
:Output(F,11,"I")
:End
:Output(3,6,"+")
:Output(3,11,"+")
:Output(6,6,"+")
:Output(6,11,"+")
:0->P
:While 1
:randInt(1,9)->A
:If A<=3
:1->Y
:If A>3 and A<=6
:4->Y
:If A>6
:7->Y
:If A=1 or A=4 or A=7
:2->X
:If A=2 or A=5 or A=8
:7->X
:If A=3 or A=6 or A=9
:12->X
:For(F,0,1)
:For(G,0,3)
:Output(Y+F,X+G,"X")
:End:End
:For(F,1,100/N)
:getKey->G
:If G!=0
:G->K
:End
:If K=72
:1->B
:If K=73
:2->B
:If K=74
:3->B
:If K=82
:4->B
:If K=83
:5->B
:If K=84
:6->B
:If K=92
:7->B
:If K=93
:8->B
:If K=94
:9->B
:If A!=B
:Goto 0
:P+1->P
:For(F,0,1)
:For(G,0,3)
:Output(Y+F,X+G," ")
:End:End
:End
:Lbl 0
:ClrHome
:Disp "NOMBRE DE PTS :",P
:Pause
:Menu("CONTINUER ?","OUI",5,"NON",6)
:Lbl 6
A voir également:
- Probleme de programmation
- Application de programmation - Guide
- Fermer un programme de force - Guide
- Télécharger le programme de pmu - Télécharger - Médias et Actualité
- Ce programme est bloqué par une stratégie de groupe - Forum Windows
- Comment lancer un programme automatiquement au démarrage de windows - Guide
Tu as bien utilisé la touche "STO ->" ?