1 HSCROL=54276›2 VSCROL=54277›10 GRAPHICS 0:LIST ›20 DLIST=PEEK(560)+256*PEEK(561)›30 POKE DLIST+10,50:REM Enable both scrolls›40 POKE DLIST+11,50:REM Do it for two mode lines›50 FOR Y=0 TO 7›60 POKE VSCROL,Y:REM Vertical scroll›70 GOSUB 200:REM Delay›80 NEXT Y›90 FOR X=0 TO 3›100 POKE HSCROL,X:REM Horizontal scroll›110 GOSUB 200:REM Delay›120 NEXT X›130 GOTO 40›200 FOR J=1 TO 200›210 NEXT J:RETURN ›