n=2^(55-peek(0)):for j=0to 1for i=n to 127step n?chr$(65+mod(or(i,i-1)*j+j+and(i,i-1)*!j,3));next:?next