procedure main() d:=10*(r:=read()) every(n:=0)+:=*writes(|!"Easterhegg",("\n"[(n+:=1)%d+1]|"")\1,repl(" ",5*r-n%d=131[n/d/r]*r|0)\1)\(d*4*r) end
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page