隨機獎勵金錢繁化

[貝斯特]

安裝條件：必須安裝過老師的完美銀行
作用：在發貼、回貼的時候隨機獎勵會員一定的金錢
繁化:火龍 ( http://fireforumhk.com )
適用版本：Discuz 2.0
（必須安裝過老師的完美銀行
完美銀行 http://www.alan888.com/Discuz/viewthread.php?tid=75
發帖得分，回復得分，刪帖得分可根據不同版塊分別設置
http://www.alan888.com/Discuz/viewthread.php?tid=553

修改include/post.php
找到：

function updatemember($operator, $username, $opercredit, $posts = 1) {
改成：

function updatemember($operator, $username, $opercredit, $posts = 1, $prize1=0) {
在這個下面，找到：

$db->query("UPDATE $table_members SET postnum=postnum$operator$posts, credit=credit$operator($opercredit) WHERE username IN ($username)");
改成：

$db->query("UPDATE $table_members SET postnum=postnum$operator$posts, credit=credit$operator($opercredit), money=money+($prize1) WHERE username IN ($username)");
接下來，修改include/newreply.php

找到：

$aid = 0;
}
在它下面添加：

//隨機獎勵、扣除金錢的hack開始開始
$pk0909_prize=0;
if(rand(1,1000) > 800 && strlen($message) > 100){//大於50個漢字才會中獎
$pk0909_prize=rand(1,30);
switch ($pk0909_num=rand(1,5)){
case 1:
$pk0909_add_str="財神爺爺到";
break;
case 2:
$pk0909_add_str="富神爺爺到";
break;
case 3:
$pk0909_add_str="玉皇大帝到";
break;
case 4:
$pk0909_add_str="觀音娘娘到";
break;
case 5:
$pk0909_add_str="恭喜發財";
break;
}
$message ="隨著一聲『".$pk0909_add_str."』，從天上掉下一滴甘露正好落在你的嘴唇上！\n你在恍惚中看見了".$pk0909_prize."兩黃金。\n".$message;
}
elseif(rand(1,1000) > 900 && strlen($message) < 30){//小於15個漢字捧Q?
$pk0909_prize=rand(-40,-2);
switch ($pk0909_num=rand(1,3)){
case $num=1;
$message="近日強盜橫行，你被強盜搶去".abs($pk0909_prize)."兩黃金\n".$message;
break;
case $num=2;
$message="江南災情嚴重，你慷慨捐贈了".abs($pk0909_prize)."兩黃金\n".$message;
break;
case $num=3;
$message="你看見青年乞丐，就隨手丟給了他".abs($pk0909_prize)."兩黃金\n".$message;
break;
}
}
//隨機獎勵、扣除金錢的hack開始結束
找到：

updatemember('+', $username, $replycredit);
改成：

updatemember('+', $username, $replycredit,1,$pk0909_prize);
接下來，修改include/newthread.php

找到：

$tid = $db->insert_id();
在它下面添加：

//隨機獎勵、扣除金錢的hack開始開始
$pk0909_prize=0;
if(rand(1,1000) > 800 && strlen($message) > 100){//大於50個漢字才會中獎
$pk0909_prize=rand(1,30);
switch ($pk0909_num=rand(1,5)){
case 1:
$pk0909_add_str="財神爺爺到";
break;
case 2:
$pk0909_add_str="富神爺爺到";
break;
case 3:
$pk0909_add_str="玉皇大帝到";
break;
case 4:
$pk0909_add_str="觀音娘娘到";
break;
case 5:
$pk0909_add_str="恭喜發財";
break;
}
$message ="隨著一聲『".$pk0909_add_str."』，從天上掉下一滴甘露正好落在你的嘴唇上！\n你在恍惚中看見了".$pk0909_prize."兩黃金。\n".$message;
}
elseif(rand(1,1000) > 900 && strlen($message) < 30){//小於15個漢字捧Q?
$pk0909_prize=rand(-40,-2);
switch ($pk0909_num=rand(1,3)){
case $num=1;
$message="近日強盜橫行，你被強盜搶去".abs($pk0909_prize)."兩黃金\n".$message;
break;
case $num=2;
$message="江南災情嚴重，你慷慨捐贈了".abs($pk0909_prize)."兩黃金\n".$message;
break;
case $num=3;
$message="你看見青年乞丐，就隨手丟給了他".abs($pk0909_prize)."兩黃金\n".$message;
break;
}
}
//隨機獎勵、扣除金錢的hack開始結束
找到：

updatemember('+', $username, $newcredit);
改成：

updatemember('+', $username, $newcredit,1,$pk0909_prize);