выдрать в смысле получить соответствующие RGB-цвета? да запросто ведь
10 FOR N=0 TO 7
10 PRINT PAPER N;" ";: PRINT PAPER N;BRIGHT 1;" "
30 NEXT N
потом принтскрин, и в фотожопе уже каждый цвет мерять