object a,k a={0}k=0for i=1to 256do k=128-k?a[i]a&=a[i/2+1]/2+k end for