Switzerhegg 2012 by clock

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