10 S=54272:POKES+24,15:POKES+5,32:POKES+6,244:POKES+4,0
20 A$=CHR$(RND(1)*26+65):Z=500:PRINTA$;
30 GETB$:IFB$=""THENZ=Z+50:GOTO30
40 PRINTB$;:IFB$<>A$THEN30
50 PRINT:H=INT(Z/256):L=Z-256*H
60 POKES,L:POKES+1,H:POKES+4,33
70 FORI=1TO500:NEXT:POKES+4,32:GOTO20