z[3][80],m[3];y,h;char*p,*q,*e,l[80];f(i,c){for(p=l;p<e;*p++=z[i][p-l]>y?q=p,c:32);q[1]=0,puts(l);}main(x){for(;p=gets(l);h++)for(;*p;e=++p)*p>35?y=++z[x=*p&3][x>1?h:p-l],m[x]<y?m[x]=y:0:0;for(y=m[1];y--;f(1,85));for(;++y<h;*p=0,puts(l))for(p=l;p<e+z[2][y];)*p++=p<e?y%~-h&&(p-l)%(e-l-1)?32:35:82;for(y=-1;++y<*m;f(0,68));}
Note that non-ascii characters in the above source code will be escaped (such as \x9f).