1FORI=0TO113:POKE902+I,4*PEEK(2125+I)-204+(PEEK(2239+I/3)-35)/4^(I-INT(I/3)*3):NEXT 2&"/@q