10 DEFFNS="Menu" 20 ONERROR VDU3:RUN 30 MODE7 40 *FX21 50 VDU23;8202;0;0;0; 60 PRINT'TAB(5)"MANDELBROT AND JULIA " 70 PRINTTAB(5)"MANDELBROT AND JULIA "' 80 PRINTTAB(10)"Supplied by: " 90 PRINT'TAB(10)"8-Bit Software" 100 PRINTTAB(10)"8-Bit Software" 110 PRINT'"" 120 PRINTTAB(5)""' 130 PRINT''TAB(11)"1.The Program" 140 PRINTTAB(11)"2.Read Info" 150 PRINTTAB(11)"3.Print Info" 160 PRINTTAB(11)"4.Read Quick Info" 170 PRINTTAB(11)"5.Print Quick Info" 180 PRINT''TAB(10)"Choose 1 to 5 "; 190 REPEAT 200 A$=GET$ 210 UNTILINSTR("12345",A$) 220 IF A$="1":OSCLI"*/mbb" 230 MODE3 240 IF INSTR("24",A$):PRINT''"Press SHIFT to scroll text" 250 IF INSTR("35",A$):VDU2 ELSE VDU14 260 IF INSTR("23",A$):*TYPE help 270 IF INSTR("45",A$):*TYPE Qinf 280 VDU3 290 PRINT'"Press a key" 300 REPEATUNTILGET 310 RUN