a;n;r;f(x,y,i){for(x+=a%n+n,y+=a/n*2;x-i;x>i?x=2*i-x:y<i?i/=2:(y=i-x+!(x=2*i-y)));r=y==i-1%i;}main(q,r){for(n=2<<r%7u;putchar(~a%n?f(1,0,128)?124:a%n*f(0,1)*f(1)*f(2)?95:32:10),++a<n*n/2;);}
Note that non-ascii characters in the above source code will be escaped (such as \x9f).