ＰＥＴＲＯＯＭ大改造
【萌え萌えキャラクターズと遊ぼー。】

かわむら様専用：その・・・アクションの所（爆）

そうです、例の所です（笑）
早速いきましょう。

すでに、他の所の改造はお済みのようですので、
アクション（sub action）を下記のように追記して下さい。

    elsif ($rnd <= $rnd_border) {
    
        if ($timeafter ==  0 || $timeafter ==  2 || $timeafter ==  5 ||
            $timeafter ==  8 || $timeafter == 12 || $timeafter == 15 ||
            $timeafter == 17 || $timeafter == 21 || $timeafter == 24 ||
            $timeafter == 26) {

            &petnowwaku($rnd_img2,$rnd_msg2);
        }
        else {
        &petnowwaku($rnd_img,$rnd_msg);
        }
        $love--;
    }
    elsif ($FORM{'good'} =~ /$fa/) {
    
        if ($timeafter ==  0 || $timeafter ==  2 || $timeafter ==  5 ||
            $timeafter ==  8 || $timeafter == 12 || $timeafter == 15 ||
            $timeafter == 17 || $timeafter == 21 || $timeafter == 24 ||
            $timeafter == 26) {

            if ($love >= $loved) {
            &petnowwaku($good_img2{$fa},$good_msg2{$fa});    # かえで好感度大
            }
            elsif ($love >= $loved_k) {
                &petnowwaku($good_imgc{$fa},$good_msgc{$fa});    # かえで好感度中
            }
            else {
                &petnowwaku($good_imgd{$fa},$good_msgd{$fa});    # かえで好感度小
            }
        }
        else {
            if ($love >= $loved) {
        &petnowwaku($good_img{$fa},$good_msg{$fa});    # さくら好感度大
            }
            elsif ($love >= $loved_k) {
                &petnowwaku($good_imga{$fa},$good_msga{$fa});    # さくら好感度中
            }
            else {
                &petnowwaku($good_imgb{$fa},$good_msgb{$fa});    # さくら好感度小
            }
        }
        $love++;$good++;
        if ($fa eq "feed") { $lastfeed = time; $feedname = $name; }						
    }
    elsif ($FORM{'bad'} =~ /$fa/) {
    
        if ($timeafter ==  0 || $timeafter ==  2 || $timeafter ==  5 ||
            $timeafter ==  8 || $timeafter == 12 || $timeafter == 15 ||
            $timeafter == 17 || $timeafter == 21 || $timeafter == 24 ||
            $timeafter == 26) {

            if ($love >= $loved) {
            &petnowwaku($bad_img2{$fa},$bad_msg2{$fa});    # かえで好感度大
            }
            elsif ($love >= $loved_k) {
                &petnowwaku($bad_imgc{$fa},$bad_msgc{$fa});    # かえで好感度中
            }
            else {
                &petnowwaku($bad_imgd{$fa},$bad_msgd{$fa});    # かえで好感度小
            }
        }
        else {
            if ($love >= $loved) {
        &petnowwaku($bad_img{$fa},$bad_msg{$fa});    # さくら好感度大
            }
            elsif ($love >= $loved_k) {
                &petnowwaku($bad_imga{$fa},$bad_msga{$fa});    # さくら好感度中
            }
            else {
                &petnowwaku($bad_imgb{$fa},$bad_msgb{$fa});    # さくら好感度小
            }
        }
        $love--;$bad++;
    }
    else {
    
        if ($timeafter ==  0 || $timeafter ==  2 || $timeafter ==  5 ||
            $timeafter ==  8 || $timeafter == 12 || $timeafter == 15 ||
            $timeafter == 17 || $timeafter == 21 || $timeafter == 24 ||
            $timeafter == 26) {

            if ($love >= $loved) {
            &petnowwaku($else_img2{$fa},$else_msg2{$fa});    # かえで好感度大
            }
            elsif ($love >= $loved_k) {
                &petnowwaku($else_imgc{$fa},$else_msgc{$fa});    # かえで好感度中
            }
            else {
                &petnowwaku($else_imgd{$fa},$else_msgd{$fa});    # かえで好感度小
            }
        }
        else {
            if ($love >= $loved) {
        &petnowwaku($else_img{$fa},$else_msg{$fa});    # さくら好感度大
            }
            elsif ($love >= $loved_k) {
                &petnowwaku($else_imga{$fa},$else_msga{$fa});    # さくら好感度中
            }
            else {
                &petnowwaku($else_imgb{$fa},$else_msgb{$fa});    # さくら好感度小
            }
        }
    }

うわぁ・・・またさらにファイルサイズが大きくなりますね（爆）
上記改造で、動くと思います。
好感度の分岐には、$lovedと$loved_kを流用しましたが、
直接数字でも構いません。
もし、ランキング表示のランク分けに合わせるのでしたら、
もう一組ずつ、画像とメッセージのセットが必要です。


ラブポイントを２キャラに分ける方法ですが、
ようは、$loveに何かをしているところ全てに、分岐を入れる必要が出てきます。
また全てのイベントにおいても、分岐が必要になり、
凝り方次第では・・・２つに分けてしまった方が楽、かもしれません(^^;
おいらが改造しきれるかどうかも、かなり問題です（爆）

多少お時間掛かりそうですが、ぼちぼち改造してみます。

もし、２つに分ける場合でしたら、またご連絡下さい。
こちらも、２つに分ける以外に、多少改造が必要ですので。