恋雾迷尘论坛's Archiver

爱雨冷雪 发表于 2006-1-17 05:21

随机奖励 FOR Discuz4

Designed by skytower
那个随机奖励积分不太善,因此我随便弄,很简单的hack,呵呵..
(有後台設定,如字數,積分項)

說明:發貼時會有随机奖励或懲罰

1.
在include/newthread.inc.php 加以下code则发新主題会有随机奖励积分
在include/newreply.inc.php 加以下code则回覆贴会有随机奖励积分

简体
找

[code]$bbcodeoff = checkbbcodes($message, !empty($bbcodeoff));[/code]

上加

[code]//creditsrandom hack
require './forumdata/cache/plugin_creditsrandom.php';
require './forumdata/cache/cache_settings.php';
$setting = $_DPLUGIN['creditsrandom']['vars'];
$youset = extcredits.$setting['money'];
$openrandom = $setting['openrandom'];
$addper = $setting['addper'];  
$addword = $setting['addword'];
$addfirstnumber = $setting['addfirstnumber'];
$addlastnumber = $setting['addlastnumber'];
$cutper = $setting['cutper'];  
$cutword = $setting['cutword'];
$cutfirstnumber = $setting['cutfirstnumber'];
$cutlastnumber = $setting['cutlastnumber'];
$openmessage = $setting['openmessage'];
$csetting = $_DCACHE['settings']['extcredits'][$setting['money']];
$creditstitle = $csetting['title'];
$creditsunit = $csetting['unit'];

if($openrandom == 1){
if(rand(1,100) <= $addper && strlen($message) > $addword){
    $prize=rand($addfirstnumber,$addlastnumber);
if($openmessage == 1) {
switch ($numbers=rand(1,5)){
                               case 1:
                                               $asd="财神爷爷";
                                               break;
                               case 2:
                                               $asd="富神爷爷";
                                               break;
                               case 3:
                                               $asd="玉皇大帝";
                                               break;
                               case 4:
                                               $asd="观音娘娘";
                                               break;
                               case 5:
                                               $asd="土地公公";
                                               break;
                                                              
               }   
$message ="随着一声『".$asd."到』，天上掉下个馅饼砸到你头上，\n你获得了『".$asd."』赠送".$creditstitle.$prize."个".$creditsunit."。\n\n".$message;
}
    $db->query("update $tablepre"."members set $youset=$youset+$prize where uid=$discuz_uid");
}
elseif(rand(1,100) <= $cutper && strlen($message) < $cutword){
               $prize=rand($cutfirstnumber,$cutlastnumber);
               if($openmessage == 1) {
switch ($numbers=rand(1,5)){         
                               case 1:
                                               $message="近日强盗横行，你被强盗抢去".$creditstitle.$prize."个".$creditsunit."。\n\n".$message;
                                               break;
                               case 2:                                    
                                               $message="江南灾情严重，你慷慨捐赠了".$creditstitle.$prize."个".$creditsunit."。\n\n".$message;
                                               break;
                               case 3:
                                               $message="你看见青年乞丐，就随手丢给了他".$creditstitle.$prize."个".$creditsunit."。\n\n".$message;
                                               break;
                               case 4:
                                               $message="突然刮起大风，你身上的".$creditstitle.$prize."个".$creditsunit."被吹走了。\n\n".$message;
                                               break;
                               case 5:
                                               $message="你和赌圣赌钱，结果输了".$creditstitle.$prize."个".$creditsunit."。\n\n".$message;
                                               break;

               }
}
$db->query("update $tablepre"."members set $youset=$youset-$prize where uid=$discuz_uid");
       }
}
//creditsrandom hack
[/code]

繁体

[code]//creditsrandom hack
require './forumdata/cache/plugin_creditsrandom.php';
require './forumdata/cache/cache_settings.php';
$setting = $_DPLUGIN['creditsrandom']['vars'];
$youset = extcredits.$setting['money'];
$openrandom = $setting['openrandom'];
$addper = $setting['addper'];  
$addword = $setting['addword'];
$addfirstnumber = $setting['addfirstnumber'];
$addlastnumber = $setting['addlastnumber'];
$cutper = $setting['cutper'];  
$cutword = $setting['cutword'];
$cutfirstnumber = $setting['cutfirstnumber'];
$cutlastnumber = $setting['cutlastnumber'];
$openmessage = $setting['openmessage'];
$csetting = $_DCACHE['settings']['extcredits'][$setting['money']];
$creditstitle = $csetting['title'];
$creditsunit = $csetting['unit'];

if($openrandom == 1){
if(rand(1,100) <= $addper && strlen($message) > $addword){
    $prize=rand($addfirstnumber,$addlastnumber);
if($openmessage == 1) {
switch ($numbers=rand(1,5)){
                               case 1:
                                               $asd="財神爺爺";
                                               break;
                               case 2:
                                               $asd="富神爺爺";
                                               break;
                               case 3:
                                               $asd="玉皇大帝";
                                               break;
                               case 4:
                                               $asd="觀音娘娘";
                                               break;
                               case 5:
                                               $asd="土地公公";
                                               break;
                                                              
               }   
$message ="隨著一聲『".$asd."到』，天上掉下個餡餅砸到你頭上，\n你獲得了『".$asd."』贈送".$creditstitle.$prize."個".$creditsunit."。\n\n".$message;
}
    $db->query("update $tablepre"."members set $youset=$youset+$prize where uid=$discuz_uid");
}
elseif(rand(1,100) <= $cutper && strlen($message) < $cutword){
               $prize=rand($cutfirstnumber,$cutlastnumber);
               if($openmessage == 1) {
switch ($numbers=rand(1,5)){         
                               case 1:
                                               $message="近日強盜橫行，你被強盜搶去".$creditstitle.$prize."個".$creditsunit."。\n\n".$message;
                                               break;
                               case 2:                                    
                                               $message="江南災情嚴重，你慷慨捐贈了".$creditstitle.$prize."個".$creditsunit."。\n\n".$message;
                                               break;
                               case 3:
                                               $message="你看見青年乞丐，就隨手丟給了他".$creditstitle.$prize."個".$creditsunit."。\n\n".$message;
                                               break;
                               case 4:
                                               $message="突然刮起大風，你身上的".$creditstitle.$prize."個".$creditsunit."被吹走了。\n\n".$message;
                                               break;
                               case 5:
                                               $message="你和賭聖賭錢，結果輸了".$creditstitle.$prize."個".$creditsunit."。\n\n".$message;
                                               break;

               }
}
$db->query("update $tablepre"."members set $youset=$youset-$prize where uid=$discuz_uid");
       }
}
//creditsrandom hack
[/code]

2.把附件下載,把discuz_plugin_stock.txt導入後台

3.成功,自行設定.

爱雨冷雪 发表于 2006-1-17 06:09

个人修改:
把你改成".$discuz_userss."

bluesky 发表于 2006-1-17 19:29

[color=Red]随着一声『观音娘娘到』，天上掉下个馅饼砸到bluesky头上，
bluesky获得了『观音娘娘』赠送幸运7颗。。[/color]

哈哈哈。这个太好了。我到处在找这些插件哦。谢谢楼主提供

bluesky 发表于 2006-1-17 23:32

有一个问题。怎么给他加上字体颜色啊。比如说你里的红色:$:$

爱雨冷雪 发表于 2006-1-18 04:35

[code]//creditsrandom hack
require './forumdata/cache/plugin_creditsrandom.php';
require './forumdata/cache/cache_settings.php';
$setting = $_DPLUGIN['creditsrandom']['vars'];
$youset = extcredits.$setting['money'];
$openrandom = $setting['openrandom'];
$addper = $setting['addper'];  
$addword = $setting['addword'];
$addfirstnumber = $setting['addfirstnumber'];
$addlastnumber = $setting['addlastnumber'];
$cutper = $setting['cutper'];  
$cutword = $setting['cutword'];
$cutfirstnumber = $setting['cutfirstnumber'];
$cutlastnumber = $setting['cutlastnumber'];
$openmessage = $setting['openmessage'];
$csetting = $_DCACHE['settings']['extcredits'][$setting['money']];
$creditstitle = $csetting['title'];
$creditsunit = $csetting['unit'];

if($openrandom == 1){
if(rand(1,100) <= $addper && strlen($message) > $addword){
    $prize=rand($addfirstnumber,$addlastnumber);
if($openmessage == 1) {
switch ($numbers=rand(1,5)){
                               case 1:
                                               $asd="财神爷爷";
                                               break;
                               case 2:
                                               $asd="富神爷爷";
                                               break;
                               case 3:
                                               $asd="玉皇大帝";
                                               break;
                               case 4:
                                               $asd="观音娘娘";
                                               break;
                               case 5:
                                               $asd="土地公公";
                                               break;
                                                              
               }   
$message ="[color=Red]随着一声『".$asd."到』，天上掉下个馅饼砸到你头上，\n你获得了『".$asd."』赠送".$creditstitle.$prize."个".$creditsunit."。。[/color]\n\n".$message;
}
    $db->query("update $tablepre"."members set $youset=$youset+$prize where uid=$discuz_uid");
}
elseif(rand(1,100) <= $cutper && strlen($message) < $cutword){
               $prize=rand($cutfirstnumber,$cutlastnumber);
               if($openmessage == 1) {
switch ($numbers=rand(1,5)){         
                               case 1:
                                               $message="[color=Red]近日强盗横行，你被强盗抢去".$creditstitle.$prize."个".$creditsunit."。。[/color]\n\n".$message;
                                               break;
                               case 2:                                    
                                               $message="[color=Red]江南灾情严重，你慷慨捐赠了".$creditstitle.$prize."个".$creditsunit."。。[/color]\n\n".$message;
                                               break;
                               case 3:
                                               $message="[color=Red]你看见青年乞丐，就随手丢给了他".$creditstitle.$prize."个".$creditsunit."。。[/color]\n\n".$message;
                                               break;
                               case 4:
                                               $message="[color=Red]突然刮起大风，你身上的".$creditstitle.$prize."个".$creditsunit."被吹走了。。[/color]\n\n".$message;
                                               break;
                               case 5:
                                               $message="[color=Red]你和赌圣赌钱，结果输了".$creditstitle.$prize."个".$creditsunit."。。[/color]\n\n".$message;
                                               break;

               }
}
$db->query("update $tablepre"."members set $youset=$youset-$prize where uid=$discuz_uid");
       }
}
//creditsrandom hack[/code]

bluesky 发表于 2006-1-18 16:19

[quote]原帖由 [i]爱雨冷雪[/i] 于 2006-1-17 06:09 发表
个人修改:
把你改成".$discuz_userss." [/quote]


请问这是什么意思啊。谢谢

爱雨冷雪 发表于 2006-1-18 16:32

随着一声『观音娘娘到』，天上掉下个馅饼砸到你头上，
你获得了『观音娘娘』赠送幸运7颗。。

改成了就变成用户名

随着一声『观音娘娘到』，天上掉下个馅饼砸到[color=#FF0000]bluesky[/color]头上，
[color=#FF0000]bluesky[/color]获得了『观音娘娘』赠送幸运7颗。。

妹妹甜心 发表于 2006-2-13 23:25

喜欢这个插件~~~~

缘份天空CLUB 发表于 2006-4-12 20:01

谢谢已经搞定

再次感谢

[[i] 本帖最后由 缘份天空CLUB 于 2006-4-14 14:05 编辑 [/i]]

YLPC 发表于 2006-9-20 13:20

很喜欢这个插件,谢谢管理员提供
顺便问下,应该怎么样实现不按字数多少区分事件
就是随机触发事件(可以是奖励或者惩罚).类似惩罚中的事件(但有奖励事件)
谢谢了

super33521 发表于 2007-7-22 07:40

写的不错，

写的不错，路过支持！！！！！！！！

奈何飘摇 发表于 2007-8-8 02:33

好帖子，支持

真不错，赞一个，继续努力啊

奈何飘摇 发表于 2007-8-8 03:08

路过留名

路过留名

￡天使之心￡ 发表于 2007-8-9 01:10

找到好贴不

*** 作者被禁止或删除 内容自动屏蔽 ***

越前花夏 发表于 2007-8-13 07:23

不错！值得

*** 作者被禁止或删除 内容自动屏蔽 ***

杀生丸最爱 发表于 2007-8-13 13:43

收下了

*** 作者被禁止或删除 内容自动屏蔽 ***

页: [1]

Powered by Discuz! Archiver 6.1.0  © 2001-2007 Comsenz Inc.