1

voila mon prog :
[nosmile]
:essai()
:Prgm
grinisp "Que voulez vous effectuez : "
grinisp "1.Un produit"
grinisp "2.Une Division"
grinisp "3.Une Soustraction"
grinisp "4.Une Addition"
:Input "Indiquez le n° de votre choix :",c
:If c>4 or c<1 Then
grinialog
:Title "RAPPEL"
:Text "....un des 4 n°......IDIOT"
grinropDown "Recommencer ?",{"Oui","Non"},v
:EndDlog
:If v=2 Then
:AffEcran
:EndIf
:Else
:Input "Indiquez la valeur du terme A :",a
:Input "Indiquez la valeur du terme B :",b
:If c=1 Then
:a*b->p
grinisp p
:Elself c=2 Then
:a/b->q
grinisp q
:Elself c=3 Then
:a-b->r
grinisp r
:Elself c=4 Then
:a+b->s
:EndIf
:EndIf
:EndPrgm

j'aimerai savoir comment faire pour que le programme redemarre quand l'utilisateur repond qu'il veut recommencer...........

c mon premier prog....y'a t-il des améliorations a apporter (sans doute)

Ximoon edit: les smileys, encore

2

Mais tu as déjà un topic pour ça... roll
Et puis on t'a déjà conseillé d'utiliser un goto. Sinon, tu peux faire une boucle, tant que le choix n'est pas bon.
avatar
« Quand le dernier arbre sera abattu, la dernière rivière empoisonnée, le dernier poisson capturé, alors vous découvrirez que l'argent ne se mange pas. »

3

m je ne sais pas utiliser un goto : ou faut il que mette lbl et goto

4

Lbl définit une étiquette.
Goto te permet de sauter vers cette étiquette. Le programme continuera à l'endroit où l'étiquette est déclarée (là où il y a écrit Lbl etiquette).

Par exemple :
:Lbl boucle
:Goto boucle

te permettra de faire un programme qui boucle à l'infini.
avatar
« Quand le dernier arbre sera abattu, la dernière rivière empoisonnée, le dernier poisson capturé, alors vous découvrirez que l'argent ne se mange pas. »

5

j'ai reussi : je vous remercie

6

[nosmile]
ben si tu veux que ce soit moins lourd au lieu de

grinisp "Que voulez vous effectuez : "
grinisp "1.Un produit"
grinisp "2.Une Division"
grinisp "3.Une Soustraction"
grinisp "4.Une Addition"
:Input "Indiquez le n° de votre choix :",c
:If c>4 or c<1 Then
grinialog
:Title "RAPPEL"
:Text "....un des 4 n°......IDIOT"

tu utilise un popup ou un dropdown
<^><^>
Si les combats un jour t'épuisent, j'appaiserais tes blessures...

7

(je n'ai que 15 ans et ma ti92+ que depuis deus semaines)


c'est si exceptionnel ? C'est vrai que je n'ai pas éprouvé personnellement le besoin d'avoir une TI 92+ (TI89 dans mon cas) avant la première S, mais bon...
.

8

ben moi j'ai 15 ans aussi...
ma 89 je l'ai depuis 3 semaines...
(newbie powa!)
<^><^>
Si les combats un jour t'épuisent, j'appaiserais tes blessures...

9

Ya plus de jeunesse...!
et t'es pas encore couché ??

ah oui fabisa08, ça ne sert à rien de poster la même chose à plusieurs endroits. Là où t'as eu ta réponse, tu serais peut-être prié de clore le topic...

!close
--- Close : vous n'etes pas l'auteur du sujet ni modérateur !
merci
.

10

"je n'ai que 15 ans et ma ti92+ que depuis deus semaines"

et alors? neutral
pourquoi ce "que" ?

"....un des 4 n°......IDIOT"

hahaha! quel humouuurrr tripaf

au fait, ton "programme" il sert a quoi au juste? trifus
le premier truc a apprendre ca serait peut etre faire des programmes utiles, pas refaire des trucs que fait deja ta calc bcp plus simplement...
In many respects the Yoshi is like a beautiful woman. A man can come so enamoured that he bestows on her all his time, his energy and his fortune.
- Fred whipple, 1960

*** Ne sous-estimez pas la puissance de la Marmotte ***
© Marmotte Team : LaMarmotte, sBibi, Vark & Sabrina

11

à une heure??
c'est les vacances quand même ;-)
<^><^>
Si les combats un jour t'épuisent, j'appaiserais tes blessures...

12

1- et alors? trifus
2- c'est peut etre les vacances pour toi, pas necessairement pour tout le monde roll
In many respects the Yoshi is like a beautiful woman. A man can come so enamoured that he bestows on her all his time, his energy and his fortune.
- Fred whipple, 1960

*** Ne sous-estimez pas la puissance de la Marmotte ***
© Marmotte Team : LaMarmotte, sBibi, Vark & Sabrina

13

a ben ui c vrai
j'avais pa pensé a ça :-)
<^><^>
Si les combats un jour t'épuisent, j'appaiserais tes blessures...

14

corrige l'orthographe de ton programme neutral

15

sBibi> Ben il apprend la syntaxe du BASIC et ses instructions avec un programme parfaitement inutile, mais ça 'a pas d'importance que le programme soit inutile pour apprendre.
avatar
« Quand le dernier arbre sera abattu, la dernière rivière empoisonnée, le dernier poisson capturé, alors vous découvrirez que l'argent ne se mange pas. »

16

pencil
Ceci dit le fait d'avoir 15 ou 12 ou 25 ans ne change rien smile
avatar
Que cache le pays des Dieux ? - Forum Ghibli - Forum Littéraire

La fin d'un monde souillé est venue. L'oiseau blanc plane dans le ciel annonçant le début d'une longue ère de purification. Détachons-nous à jamais de notre vie dans ce monde de souffrance. Ô toi l'oiseau blanc, l'être vêtu de bleu, guide nous vers ce monde de pureté. - Sutra originel dork.

17

Oui, surtout que 15 ans n'est pas particulièrement jeune pour commencer, je trouve.
Je pense qu'à peu près tout le monde avait cet âge en commençant.
avatar
« Quand le dernier arbre sera abattu, la dernière rivière empoisonnée, le dernier poisson capturé, alors vous découvrirez que l'argent ne se mange pas. »

18

19

"pianoter" ?? Moi aussi, une un clavier d'ordi grin

J'ai aussi commencé la programmation à 15 ans...
.

20

J'ai commencé à m'interresser à la programmation en basic sur ti il y a environ 1 an et demi(sur la 89). Mais à l'époque, je savais juste afficher du texte smile

21

15 ans ?
moué, rien de particulier, ma foi...
sur 83, j'ai commencé à moins que ça, il me semble... moins de 14, je crois...
et puis, aux âmes bien nées, .... (je la refait pas une fois de plus grin )
avatar
Tutorial C (TI-89/92+/v200) - Articles Développement Web (PHP, Javascript, ...)
« What is the sound of Perl? Is it not the sound of a wall that people have stopped banging their heads against? » - Larry Wall

22

je ne sais pas à quel age j'ai commencé, mais c'était sur un Amstrad CPC, alors ça date...
avatar
Maintenant j'ai la flemme de garder une signature à jour sur ce site. Je n'ai même plus ma chaîne Exec sous la main.

23

toi aussi ? love

24

et naPO aussi je pense...
En tout cas j'ai déja écrit des monstres, mais jamais de bons programmes de jeu en basic... Par contre des progs de jeu en basic j'en avais commencé pas mal...
avatar
Maintenant j'ai la flemme de garder une signature à jour sur ce site. Je n'ai même plus ma chaîne Exec sous la main.

25

Link>pencil

Allez, un jeu idiot pour CPC :

10 defint t
20 for t=1 to 15000
30 if inkey(47)<>-1 then sc=sc+1
40 next
50 cls: print "Ton score est de ";sc

26

c'est stupide, il suffit de rester appuyé, pas la peine de mittrailler la touche...
47, c'est copy, non?
avatar
Maintenant j'ai la flemme de garder une signature à jour sur ce site. Je n'ai même plus ma chaîne Exec sous la main.

27

napo>ti-basicnon
avatar
Membre fondateur de la Ligue Anti-MacIntoc
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

Un expert est quelqu'un qui en sait de plus en plus sur de moins en moins
de choses, jusqu'à ce qu'il connaisse absolument tout à propos de rien.

28

Link>Non c'est la touche Espace hehe

29

Ah oui copy c'est 9
avatar
Maintenant j'ai la flemme de garder une signature à jour sur ce site. Je n'ai même plus ma chaîne Exec sous la main.

30

Ou alors pour résoudre le problème il suffit d'ajouter :
5 speed key 250,250 'trivil