PETROOM大改造
【萌え萌えキャラクターズと遊ぼー。】

スプーキー様専用:いろいろチェキ!(爆)

では行きましょうっ!
そんなに大幅な修正ではありませんですので、ご安心下さい。
まず、ユーザー情報のチェック(sub checkname)の中で、
オレンジ色の所を追加して下さい。

    # 新規ユーザーを登録
    if ($flag == 0) {
        $gdate = time - $dayhour[$playtime + 1];
#         $visitcnt = 訪問;
         $visitcnt = 0;
         $event01 = 0;
         $event02 = 0;
         $dummy04 = 0;
         $dummy05 = 0;
        @new = @lines;
        push(@new,"$FORM{'name'}<>$FORM{'pass'}<>$gdate<>0<>$visitcnt<>$event01<>$event02<>$dummy04<>$dummy05<>\n");
        &openoutuserdata;
		$name = $FORM{'name'};
        $pass = $FORM{'pass'};
    }

ちなみに先頭に#が付いている1行は、邪魔なら消してしまってもOKです。

次に新規ペット登場(sub newpet)の中で、
オレンジ色の所を追加して下さい。

#  $gdate = time - $dayhour[$playtime + 1];
#     $visitcnt = 0;
#     $event01 = 0;
#     $event02 = 0;
#     $dummy04 = 0;
#     $dummy05 = 0;
#  @new = "$FORM{'name'}<>$FORM{'pass'}<>$gdate<>$loved<>$visitcnt<>$event01<>$event02<>$dummy04<>$dummy05<>\n";
#  &openoutuserdata;
    &petform;
}

とりあえず、ウチではコレで動くようになりました(^-^)