63-APPLE#2:(Gérard SEBBAH)[WinAPPLE shift+ins]
0 IN$="":CALL2067:REM SPEED=J COLOR= HGR | + SPEED=HGR | ' o h PR£ COLOR= HGR | ' ****** NE PAS MODIFIER CETTE LIGNE ****
1 PRINT"TAPEZ QUELQUE CHOSE."
2 CALL 2080:A$=MID$(IN$,1)
3 PRINT"VOUS AVEZ TAPE: ";A$
0 IN$="": CALL 2067:REM **************************** NE PAS MODIFIER CETTE LIGNE ****
1 FORI=2067TO2088:READC:POKEI,C:NEXT:DATA 169,1,74,160,3,145,105,200,169,2,145,105,96,32,111,253,138,160,2,145,105,96