REPERT T$="" L%=0 REPERT INC T$,CHR$(RND(65536)) L%=L%+1 UNTIL L%==5 COLOR 2+RND(14) ?T$ UNTIL 0