POKE 1912,PEEK(103):POKE 1913,PEEK(104):POKE 1914,PEEK(111):POKE 1915,PEEK(112)
POKE 1916,PEEK(107):POKE 1917,PEEK(108):POKE 1918,PEEK(105):POKE 1919,PEEK(106)
POKE 1146,PEEK(175):POKE 1147,PEEK(176):POKE 1148,PEEK(109):POKE 1149,PEEK(110)
POKE 103,PEEK(175):POKE 104,PEEK(176)+1:POKE (PEEK(103)+PEEK(104)*256-1),0
RUN LFDR