10 COLOR 1,15,7:SCREEN 1
20 GOSUB 30:COLOR=(7,7,2,7):GOSUB 30:COLOR=(7,7,7,4):GOSUB 30:END
30  FOR N=0 TO 15
40     AD=&H2020+2*N
50     RB=VPEEK(AD):G=VPEEK(AD+1)
60     PRINT N;TAB(4);HEX$(RB);HEX$(G)
70  NEXT
80 A$=INPUT$(1):CLS:RETURN