{ Un jeu assez bete... }

FIN=1 :
WHILE FIN=1 [

  ESSAI=10 :
  X=RAND(100) :
  
  WHILE ESSAI>0 [
    PRINT "Il reste ",ESSAI," essai(s)\n" :
    INPUT "Ou se cache le tresor magique de l'hyper-espace (0-100) ? ",Y :
    DIST=ABS(X-Y) :
    IF DIST>25 [ PRINT "C'est l'antarctique!\n" ] :
    { Ici, je me sers de la multiplication pour faire un "et" logique }
    IF (DIST<=25) * (DIST>20) [ PRINT "C'est glacial\n" ]  :
    IF (DIST<=20) * (DIST>15) [ PRINT "C'est froid\n" ] :
    IF (DIST<=15) * (DIST>10) [ PRINT "C'est tiede\n" ] :
    IF (DIST<=10) * (DIST>5)  [ PRINT "C'est chaud\n" ] :
    IF (DIST<= 5) * (DIST>0)  [ PRINT "C'est brulant!\n" ] :
    ESSAI=ESSAI-1 :
    IF DIST=0 [ ESSAI=0 ]
  ] :

  IF DIST=0 [ PRINT "Gagne !\n" ] :
  IF DIST>0 [ PRINT "Perdu... le tresor magique de l'hyper-espace etait dans le secteur ",X,"\n" ] :

  INPUT "Rejouer (1=oui) ? ",FIN
] :
PRINT "Au revoir...\n"