Informations sur QBizarre

QBizarre s'est inscrit le 09/07/2007, et sa dernière venue sur ProgBoards date du 10/07/2008.

Statistiques

Contacter QBizarre

Signature:

' * * * * * * * * * * * * * * * * * * * * * * * * * *
' * Signature 1.2 *
' * Par QBizarre *
' * * * * * * * * * * * * * * * * * * * * * * * * * *
10 CLS
20 sign1$ = "Vive QBasic !!!"
30 COLOR 2,0
40 PRINT sign1$
50 PRINT
60 INPUT "Êtes-vous d'accord [O\N]"; agree1$
70
80 IF (agree1$ = "O" OR "o") THEN PRINT "Vous
90 êtes une personne bien!"
100 SLEEP 2
110 END
120 ELSEIF (agree1$ = "N" OR "n") THEN
130 PRINT "Vous êtes bizarre"
140 SLEEP 2
150 END
160 ELSE
170 GOTO 10
180 END IF
190 END