10 GRAPHICS 7›20 DLIST=PEEK(560)+256*PEEK(561):REM Find display list›30 FOR J=6 TO 84:REM Give every mode line a DLI›40 POKE DLIST+J,141:REM BASIC mode 7 with DLI bit set›50 NEXT J›60 FOR J=0 TO 30›70 READ A:POKE 1536+J,A:NEXT J:REM Poke in DLI service routine›80 DATA 72,138,72,238,32,6,175,32,6›90 DATA 189,0,240,141,10,212,141,26,208›100 DATA 224,79,208,5,169,0›110 DATA 141,32,6,104,170,104,64›120 POKE 512,0:POKE 513,6:REM Vector to DLI service routine›130 POKE 54286,192:REM Enable DLI›