10 REM  "VIEW"   DISPLAY 'IMAGES.PIC'
20 REM  GRAPHICS PACKAGE NEED NOT BE
30 REM  INSTALLED FOR THIS PROGRAM.
40 :
50 IF A=1 THEN 200
60 REM SAVE 'VIC' CHIP REGISTERS FOR
70 REM RETURN TO TEXT DISPLAY LATER.
80 :
90 V1=PEEK(53265):V2=PEEK(53272):V3=PEEK(56576)
100 :
110 REM INITIALIZE COLOR MAP BYTES FOR DARK GRAY DOTS (11) ON WHITE (1)
120 CB=16*11+1
130 FOR I=33792 TO 34791:POKE I,CB:NEXT
140 :
150 REM SWITCH TO GRAPHICS DISPLAY AND LOAD 'IMAGES.PIC' FROM DISK
160 POKE 53265,V1 OR 32:POKE 53272,25:POKE 56576,(V3 AND 252)OR 1
170 POKE 53280,1:A=1:LOAD"IMAGES.PIC",8,1
180 :
200 REM WAIT FOR KEY TO BE PRESSED THEN RETURN TO TEXT SCREEN
210 POKE 198,0:WAIT 198,1:POKE 198,0
220 POKE 53265,V1:POKE 53272,V2:POKE 56576,V3:POKE 53280,14