10 A=PEEK(65034)+SWAP%(PEEK(65035)) : POKE 65052,0,PEEK(65035) : POKE 65034,PEEK(A),PEEK(A+1) : CHAIN ''