*a=0 $<.bytes{|b|*a=b<11?(p a;0):[eval([b%2,*a]*'+*'[b%2]),a[60/b..-b/60],a.flat_map{|i|[i-1,i+1]}][b%47/12]} p a

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

download

return to the top page