c=getc/2 12.times{|m|puts"%02d:#{(' 01'.." #{31-m%7%2-2[m]*2}").select{(c-=3)%7>5}}"%-~m}
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page