1 REM *** Written by Mark Ray, please read welcome.msg first *** 2 ON ERROR IF ERR=17 THEN CH."AUTO" ELSE REPORT:PRINT " at ";ERL:END 5 CLS 10 REPEAT:INPUT LINE "Message";M$:CLS:PRINTTAB(65,7);LEFT$(M$,13); 20 VDU 30:FOR Y=0TO7:FOR X=0TO79 30 Z=-POINT(390+X,7-Y):VDU219AND Z,32AND NOT Z 40 NEXT:NEXT:A=GET:VDU 13:UNTIL 0