修改：
1。setstyles.cgi：
找到

               <tr>
               <td bgcolor=#FFFFFF colspan=2>
               <font color=#333333>默认用户在线时间是多少分钟？<BR>如果用户超过这个时间还没有动作则默认用户已经离开了论坛。</font></td>
               <td bgcolor=#FFFFFF>
               <input type=text name="membergone" value="$membergone" size=3 maxlength=3>　一般为 5 -- 15</td>
               </tr>

在其下面添加：

               <tr>
               <td bgcolor=#FFFFFF colspan=2>
               <font color=#333333>用户在线时间1分钟奖励多少论坛货币？<BR>如果用户在150s内重复登陆不计算在线时间。<br>该数据会在退出登陆界面显示。</font></td>
               <td bgcolor=#FFFFFF>
               <input type=text name="onlineaddmoney" value="$onlineaddmoney" size=3 maxlength=3>　一般为 5 -- 15</td>
               </tr>

保存文件后进后台“默认风格设置”设置一次这个时间，保存。

2。 bbs.lib.pl
找到。

               if ($visit eq "T") { $visitno++ if (($nowtimetemp - $lastgone) > 300); } else { $onlinetime = 0 if ($onlinetime =~ /[^0-9]/); $onlinetime = $onlinetime + $savedtime-$savedcometime if (($nowtimetemp - $lastgone) > 150); unlink ("${lbdir}cache/id/$nametocheck.cgi"); unlink ("${lbdir}cache/myinfo/$nametocheck.pl"); unlink ("${lbdir}cache/online/$nametocheck.cgi"); }

替换成

           if ($visit eq "T")
           {
             $visitno++ if (($nowtimetemp - $lastgone) > 300);
           }
           else
           {
             $onlinetime = 0 if ($onlinetime =~ /[^0-9]/);
             my $time_s = $savedtime-$savedcometime;
             $onlinetime = $onlinetime + $time_s  if (($nowtimetemp - $lastgone) >150);
             if (($nowtimetemp - $lastgone) >150)
             {
               $mymoney = $mymoney + ( int( $time_s /60) ) * $onlineaddmoney;
               if (($thisprog eq "loginout.cgi")&& (lc($membername) eq lc($inmembername)) ) #处理显示
               {
                my $time_m = int( $time_s /60);
                my $added_m = (int( $time_s /60) ) * $onlineaddmoney;
                require "data/cityinfo.cgi" if ($moneyname eq '');
                $showit="<li>您在论坛停留了 ".$time_m." 分钟，得到 ".$added_m." $moneyname的津贴奖励。";
               }
               #end
             }
             else
             {
                 require "data/cityinfo.cgi" if ($moneyname eq '');
                 $showit="<li>您在论坛停留时 ".$time_s." 秒，得到 0 $moneyname的津贴奖励。" if (($thisprog eq "loginout.cgi")&& (lc($membername) eq lc($inmembername)) );
             }
             unlink ("${lbdir}cache/id/$nametocheck.cgi");
             unlink ("${lbdir}cache/myinfo/$nametocheck.pl");
             unlink ("${lbdir}cache/online/$nametocheck.cgi");
           }

3。打开loginout.cgi
找到

elsif ($action eq "logout") {
  &cleanolddata1;
  if ($inmembername ne "" && $inmembername ne "客人") {

替换成

elsif ($action eq "logout") {
  &cleanolddata1;
  undef $showit;
  if ($inmembername ne "" && $inmembername ne "客人") {
  $showit=qq~<li>系统忙，您在论坛上得到的津贴奖励暂时不显示。~;

找到

   $output .= qq~<tr><td bgcolor=$titlecolor $catbackpic valign=middle align=center><font face="$font" color=$fontcolormisc><b>您现在已经退出论坛</b></font></td></tr>
<tr><td bgcolor=$miscbackone valign=middle><font face="$font" color=$fontcolormisc>
具体选项：<ul><li><a href="leobbs.cgi">返回论坛</a><li><a href=javascript:close();>关闭您的浏览器</a></ul></tr></td></table></td></tr></table>
<SCRIPT>valignend()</SCRIPT>
~;

替换成

   $output .= qq~<tr><td bgcolor=$titlecolor $catbackpic valign=middle align=center><font face="$font" color=$fontcolormisc><b>您现在已经退出论坛</b></font></td></tr>
<tr><td bgcolor=$miscbackone valign=middle><font face="$font" color=$fontcolormisc>
具体选项：<ul>$showit<li><a href="leobbs.cgi">返回论坛</a><li><a href=javascript:close();>关闭您的浏览器</a></ul></tr></td></table></td></tr></table>
<SCRIPT>valignend()</SCRIPT>

其他：
本Hack采用了LB本身更新机制。。不管是否正常退出，皆按照时间添加货币的。。：）
其他关于用户自动升级等。。都可以用相似的办法Hack之。