10 REM "OUTER" --  BY MARK MONATGUE
20 REM [74666,761] 08/20/84
30 REM
40 CLS:PRINT@40,"Select:":PRINT"<1> Graphics":PRINT"<2> Message":PRINT"<3> Exit"
50 ONVAL(INKEY$)GOTO100,200,300
55 GOTO50
60 RUN
100 CLS:FORI=240TO255:FORJ=0TO255:OUTI,J:NEXT:NEXT:RUN
200 CLS:PRINT"HELLO!":PRINT@170,"GOODBYE!"
210 FORI=0TO20:FORJ=0TO255:OUT254,J:NEXT:NEXT:RUN
300 MENU