logMonFly($id, $name, $landName, $point);
	    } else {
		# 目的の場所を記念碑に
		$land->[$x][$y] = $HlandMonument;

		my($mday,$mon) = (localtime(time()))[3..4]; # 日と月を取得
		$mon++; # 月は0から始まるのでプラス１する

		if(($arg == 73) && ($mon > 2) && ($mon < 6)) { # ３〜５月
		    $arg = 73; # ツクシ
		} elsif(($arg == 88) && ($mon > 2) && ($mon < 6)) {
		    $arg = 88; # 桜
		} elsif(($arg == 89) && ($mon > 5) && ($mon < 9)) { # ６〜８月
		    $arg = 89; # 向日葵
		} elsif(($arg == 94) && ($mon > 5) && ($mon < 9)) {
		    $arg = 94; # 豚の香取くん
		} elsif(($arg == 90) && ($mon > 8) && ($mon < 12)) { # ９〜１１月
		    $arg = 90; # 銀杏
		} elsif(($arg == 92) && ($mon > 11) && ($mon < 3)) { # １２〜２月
		    $arg = 92; # 雪うさ
		} elsif(($arg == 85) && ($mon == 12) && ($mday == 24)) { # １２/２４はクリスマスツリー
		    $arg = 85; # クリスマスツリー
		} elsif(($arg == 91) && ($mon == 12) && ($mday == 25)) { # １２/２５はクリスマスツリー 2002
		    $arg = 91; # クリスマスツリー2002
 		} elsif(($arg == 95) && ($mon == 12)) { # １２月
		    $arg = 95; # サンタクロース
		} elsif($arg >= $HmonumentNumber) {
		    $arg = 0;
		}
		$landValue->[$x][$y] = $arg;
		logLandSuc($id, $name, $comName, $point);
	    }