あ〜、なんか変な指定してた。1853って、グレゴリオ暦は1582年10月15日金曜日から
始まり、現代に至るが、日本はそれまでの暦を1872年12月3日まで使用し、
その年月日を1873年1月1日として使い始めた歴史があるんだが・・・
その辺を考慮するなら、

if(y<1853)

の部分を適当に変えておいて。すまそ。