MRMCD12 write squared by maufl

e=((s=gets).size/4.0).ceil
s,f=s.ljust(e*4),e+1
puts s[0,f]
(e-1).times{|i|puts s[e*4-i-1,1]+" "*(e-1)+s[f+i,1]}
puts s[2*e,f].reverse

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return top