ヴァレフォール歴の計算式その２

$vc = ($hako->islandTurn) - 30;
$vc1 = ceil($vc / 180) + 4025;
$vc2 = ($vc % 180) ;
$vc3 = ceil($vc2 / 15) ;
  print "ヴァレフォール歴". $vc1 ."年". $vc3. "月";

なんて頭の悪い計算式なんだorz