1 if c=0then screen0:keyoff:width37:c=1:goto1 else vpoke443,45:vpoke444,62:locate35,23:printchr$(int(64+rnd(-time)*27)):vpoke403,32:vpoke404,32:ifstrig(0)thengosub2:goto1else1
2 b=vpeek(477):a$="vous l'avez dans le":a=a+b-64:fors=1to32:locates,11:print"->":next:ifb<>81thenlocate7,11:printa$;:vpoke471,b:returnelse t=t+1:a=a-81:locate7,11:printa$+" "+chr$(67)+chr$(85)+chr$(76):ift<3then1else cls:print"score",a