10 REM > Shades 20 REM Shows shades of grey in 256 colour mode 30 MODE 28:REM use mode 15 for standard resolution monitor 40 ON ERROR REPORT:PRINT " at line ";ERL:END 50 FOR col%=0 TO 3 60 FOR tint%=0 TO 3 70 COLOUR col%+col%*4+col%*16 TINT tint%*64 80 PRINT "This is colour ";col%" tint ";tint% 90 NEXT 100 NEXT