10 DLIST=PEEK(560)+256*PEEK(561):REM Find display list 20 POKE DLIST+15,130:REM Insert interrupt instruction 30 FOR I=0 TO 19:REM Loop for poking DLI service routine 40 READ A:POKE 1536+I,A:NEXT I 50 DATA 72,138,72,169,80,162,88 60 DATA 141,10,212,141,23,208 70 DATA 142,24,208,104,170,104,64 80 POKE 512,0:POKE 513,6:REM Poke in interrupt vector 90 POKE 54286,192:REM Enable DLI
Back to previous page