CLEAR
L = 256*PEEK(106) + PEEK(105) - 4
IF PEEK(L) <> 0 THEN L = L + 1
IF PEEK(L) = 0 THEN L = L + 1
POKE 104,INT(L/256)
POKE 103,L - 256*INT(L/256)
LOAD XREF
POKE 103,1
POKE 104,8
GOTO 63956