860 CALL 64477: CALL -3288: IF V = 5 THEN GOSUB 900
870 GOTO 310
880 :
890 REM PRINT TITLE
900 TEXT : HOME : PRINT CHR$(17); CHR$(21); CHR$(24): VTAB 1: FOR L = 0 TO 39: PRINT CHR$(95);: NEXT : VTAB 3: HTAB 10: PRINT "NIBBLE "O$" CLIP ART": VTAB 5: HTAB 12: PRINT "BY ROBERT C. MOORE"
910 VTAB 6: FOR L = 0 TO 39: PRINT CHR$(95);: NEXT : VTAB 9: HTAB 12: PRINT "COPYRIGHT (C) 1987": HTAB 12: PRINT "BY MICROSPARC, INC": HTAB 12: PRINT "52 DOMINO DRIVE": HTAB 12: PRINT "CONCORD, MA 01742"
920 VTAB 14: PRINT : RETURN
930 :
940 REM PRINT MENU
950 VTAB 22: INVERSE : PRINT "N";: NORMAL : PRINT "EGATIVE ";: INVERSE : PRINT "L";: NORMAL : PRINT "OAD PIC ";: INVERSE : PRINT "?";: NORMAL : PRINT "-CATALOG ";: INVERSE : PRINT "D";: NORMAL : PRINT "RAW PIC"
960 HTAB 2: INVERSE : PRINT "M";: NORMAL : PRINT "IRROR ";: INVERSE : PRINT "H";: NORMAL : PRINT "I-RES PIC ";: INVERSE : PRINT "C";: NORMAL : PRINT "APTURE ";: INVERSE : PRINT "X";: NORMAL : PRINT "-FACTOR="