do i=-256 to 256;n=i;a=;do 64;k=n*n//2;a=a||d2c(32+k*3);n=n*k+n/2-k/2;end;say a"|";end