  1 CLS
  5  PRINT "etoiles.bas par BiblioKliK TeAm"
 10 PRINT " "
 15 INPUT "Quel est votre nom "; NOM$ 
 20 PRINT "Bonjour "; NOM$
 30 INPUT "Combien d'etoiles voulez-vous "; NOMBRE
 40 FOR I = 1 TO NOMBRE
 50 ETOILE$ = ETOILE$ + "*"
 55 NEXT I
 60 PRINT ETOILE$
 70 INPUT "Voulez-vous plus d'etoiles (o/n) "; ETOILE$
 80 IF LEN(ETOILE$) = 0 GOTO 70
 90 ETOILE$ = LEFT$(ETOILE$, 1)
100 IF (ETOILE$ = "O") OR (ETOILE$ = "o") THEN GOTO 30
110 PRINT "A bientot ";
120 FOR I = 1 TO 1 
130 PRINT NOM$; " ";
140 NEXT I
150 PRINT