Script of Saga III b2.1.xで行った改造

戻る



library/bounty.cgi: sub bounty_before
執行猶予解除額の半額までしか懸けられないように変更。
追加
my  $V;

追加
    $V = int($set::sps / 2);

    &get_code;

追加
    <div class=r><tt>限度額:$V $set::mny</tt></div><br>
    <div class=r>$set::but{OK} $set::but{CLOSE}</div>
library/bounty.cgi: sub bounty_after
執行猶予解除額の半額までしか懸けられないように変更。
修正前
    $I = &get_user('I');

    &say('自分には懸けられません','bounty_before') if $F{ud} eq $F{id};
    &say("$set::lab{gl}が足りません",'bounty_before') if $F{gl} > $I->{gl};

    $U = &get_user('U');
    &login_check($U);
修正後
my  $V;

    $I = &get_user('I');
    $U = &get_user('U');
    &login_check($U);

    $V = int($set::sps / 2) - $U->{rw};

    &say('自分には懸けられません','bounty_before') if $F{ud} eq $F{id};
    &say("$set::lab{gl}が足りません",'bounty_before') if $F{gl} > $I->{gl};
    &say("$U->{nm}にはこれ以上$set::lab{rw}を懸ける事ができません",'bounty_before') if $V <= 0;

    $F{gl} = $V if $F{gl} > $V;



Copyright 2000-2007 Missing Link All Rights Reserved.