214 Anagrammatic
480 IF K>=1 THEN 440
490 NEXT J
500 PEN 2:PRINT"THAT'S ALL! — PRESS [EN TER] TO RESTART. ":PEN 3:GOTO 120
510 STOP
520 FOR N=1 TO L
530 Rt(N)=MIDS(AS,N,1):NEXT:RETURN
540 PRINT:PRINT CHR$(24)"	ERROR RE—TY
PE.":PRINT CHR$(24):RETURN