Discuz!官方免费开源建站系统

 找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索

【開發】社區銀行2.1增强修改版(繁/簡+for2.5)(key:银行plus)

[复制链接]
rubbishman 发表于 2005-5-29 19:02:19 | 显示全部楼层 |阅读模式
Bug改正附件沒改bug...上傳之前記得改~~
bank.php
  1. $query = $db->query("UPDATE $table_members SET money=money WHERE username='$discuz_user'");
复制代码

改為
  1. $query = $db->query("UPDATE $table_members SET money=money+$mydqhave WHERE username='$discuz_user'");
复制代码


  1. global $banksettings,$timestamp
复制代码

改為

  1. global $banksettings,$timestamp,$accrnum
复制代码

  1. case 0: $userbanklixi=floor($ckmoneynum*$presenttime*$banksettings['accrual']); break;
复制代码

改為
  1. case 0: $userbanklixi=floor($ckmoneynum*$presenttime*$accrnum/100); break;
复制代码




DISCUZ! v2.5 社區銀行2.1增强修改版插件
程序開發: LFLY1573<修改:Winter0706(rubbishman)>
鳴謝: ten789
聯系電郵: winter0706@gmail.com
技朮支持: http://www.freediscuz.net
              https://discuz.dismall.com
使用聲明: 此乃為 DISCUZ! v2.x 系統所開發的社區銀行功能開源插件,歡迎使用。



增加
~定時派息
~按資產總和評定銀行活期儲蓄利息
~批量獎勵(全會員/按用戶組)
~使定期存款可在沒到期前取出(沒利息)
~設定新用戶起始金額
~批量清零
~更正說明(部分會令人有誤解)
~其他小項



安裝方法
注意:如果不安裝查看資料顯示金錢的修改插件,那麼可以不用上傳./images/common/的圖片。
=======================================
全新安裝
說明:適用於沒有安裝任何銀行的用戶。
前提:所有用戶請用附件中的plugins.php替換掉原來的plugins.php。
1升級數據庫

  1. ALTER TABLE `cdb_members` ADD `money` INT(10) DEFAULT '100' NOT NULL, ADD `bank` INT(10) DEFAULT '0' NOT NULL, ADD `savemt` INT(10) DEFAULT '0' NOT NULL, ADD `bankstatus` tinyint(1) DEFAULT '0' NOT NULL, ADD `bankmimi` INT(10) DEFAULT '0' NOT NULL, ADD `bankpass` int(5) DEFAULT '8888' NOT NULL, ADD `savemimi` INT(10) DEFAULT '0' NOT NULL;
复制代码

  1. DROP TABLE IF EXISTS cdb_banklog;
  2. CREATE TABLE cdb_banklog (
  3.   id int(10) unsigned NOT NULL auto_increment,
  4.   uid mediumint(8) unsigned NOT NULL default '0',
  5.   username varchar(15) NOT NULL default '',
  6.   czid tinyint(2) NOT NULL default '0',
  7.   moneynum int(10) NOT NULL default '0',
  8.   begintime int(10) unsigned NOT NULL default '0',
  9.   endtime int(10) unsigned NOT NULL default '0',
  10.   islog tinyint(1) NOT NULL default '0',
  11.   remark text,
  12.   czip varchar(15) NOT NULL default '0',
  13.   PRIMARY KEY  (id)
  14. );
复制代码

2。把附件文件傳到相應目錄,跟壓縮包文件目錄對應(plugins.php也需要替換);
3。打開後台,插件設置--添加插件,導入plug_bank.txt。
4。修改參數設定即可使用。(沒有安裝帖子買賣的不要啟用帖子買賣顯示,否則要出錯)


升級安裝I
說明:適用於安裝過完美銀行v1.03版本或者升級前安裝過銀行的用戶
1。升級數據庫

  1. ALTER TABLE `cdb_members` ADD `bankstatus` tinyint(1) DEFAULT '0' NOT NULL, ADD `bankmimi` INT(10) DEFAULT '0' NOT NULL, ADD `bankpass` int(5) DEFAULT '8888' NOT NULL, ADD `savemimi` INT(10) DEFAULT '0' NOT NULL;
复制代码

  1. DROP TABLE IF EXISTS cdb_banklog;
  2. CREATE TABLE cdb_banklog (
  3.   id int(10) unsigned NOT NULL auto_increment,
  4.   uid mediumint(8) unsigned NOT NULL default '0',
  5.   username varchar(15) NOT NULL default '',
  6.   czid tinyint(2) NOT NULL default '0',
  7.   moneynum int(10) NOT NULL default '0',
  8.   begintime int(10) unsigned NOT NULL default '0',
  9.   endtime int(10) unsigned NOT NULL default '0',
  10.   islog tinyint(1) NOT NULL default '0',
  11.   remark text,
  12.   czip varchar(15) NOT NULL default '0',
  13.   PRIMARY KEY  (id)
  14. );
复制代码

2。把附件文件傳到相應目錄,跟壓縮包文件目錄對應;
3。打開後台,插件設置--添加插件,導入plug_bank.txt。
4。修改參數設定即可使用。(沒有安裝帖子買賣的不要啟用帖子買賣顯示,否則要出錯)


升級安裝II
說明:適用於安裝過完美銀行v2.1版本或者升級前安裝過銀行的用戶
1。把附件文件傳到相應目錄,跟壓縮包文件目錄對應;
2。打開後台,插件設置--添加插件,導入plug_bank.txt。
3。修改參數設定即可使用。(沒有安裝帖子買賣的不要啟用帖子買賣顯示,否則要出錯)

[ 本帖最后由 rubbishman 于 2005-11-30 17:36 编辑 ]

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?立即注册

x
 楼主| rubbishman 发表于 2005-5-29 19:03:15 | 显示全部楼层

部分新功能簡介

1.什麼是定時派息??
定時派息就是每天早上8時定時派息。
因為平日用銀行一看到"記息時間還有 2 時 xx 分 xx 秒"都不知拿不拿錢好 ,所以新增1種計息方法方便會員~~
如果不想用定時派息,可到後台改為計時派息(舊的那種)

1.方便會員

2.按資產總和評定銀行活期儲蓄利息
按資產總和來評定銀行活期儲蓄利息,分大於500/100/50/10萬4種,可到後台修改。
"銀行存款利率"就是銀行存款利率(小於10萬)

1.可以防止富者愈富的出現,有助平衡論壇之金錢分配。
2.可以使用戶靈活運用瑞士銀行以獲得最大利息收入(因為瑞士銀行不計算為資產總和),激活瑞士銀行。

3.什麼是批量清零
批量清零就是可批量把用戶組的現金歸零。只有管理員可用
1.可以方便管理員處理bug。


4.什麼是使定期存款可在沒到期前取出(沒利息)
就是使定期存款可在沒到期前取出,但沒利息
1.可以使用戶更靈活管理金錢。


5.什麼是設定新用戶起始金額
就是新用戶剛註冊時所有的金額數目
1.可以方便管理員。
2.如果想歸0,要打00而不是0~(ahigg小提示)


其他十分容易明白,那就不介紹啦。

[ Last edited by rubbishman on 2005-5-30 at 17:51 ]

[ 本帖最后由 rubbishman 于 2005-6-13 18:33 编辑 ]
回复

使用道具 举报

 楼主| rubbishman 发表于 2005-5-29 19:04:39 | 显示全部楼层

修正等级不会自动提升的问题(for2.0/2.1/2.1plus)

bank.php
  1.                         $query = $db->query("INSERT INTO $table_banklog (uid,username,czid,moneynum,begintime,islog,czip) VALUES('$discuz_uid','$discuz_user','9','$banknum','$timestamp','0','$onlineip')");
  2.                         $query = $db->query("UPDATE $table_members SET credit=credit+$banknum,money=$usermoneynow WHERE username='$discuz_user'");
  3.                    showmessage("購買成功,你的積分增加了 $banknum",'plugins.php?p=bank&code=5');
复制代码

上面加
  1. if($adminid == 0){
  2. $newcredit=$userbank[credit]+$banknum;
  3.                 $query = $db->query("SELECT groupid FROM $table_usergroups WHERE type='member' AND '$newcredit'>=creditshigher AND '$newcredit'<creditslower");
  4.                         $groupidadd = "groupid='".$db->result($query, 0)."'";
  5.                 $db->query("UPDATE $table_members SET $groupidadd WHERE uid='$discuz_uid'");}
复制代码


  1.                         $query = $db->query("INSERT INTO $table_banklog (uid,username,czid,moneynum,begintime,islog,czip) VALUES('$discuz_uid','$discuz_user','10','$banknum','$timestamp','0','$onlineip')");
  2.                         $query = $db->query("UPDATE $table_members SET credit=$usercreditnow,money=$usermoneynow WHERE username='$discuz_user'");
  3.                    showmessage("賣出成功,你的現金增加了 $yourcash ,總共花費積分 $banknum 。",'plugins.php?p=bank&code=5');
复制代码

上面加
  1. if($adminid == 0){
  2. $newcredit=$userbank[credit]-$banknum;
  3.                 $query = $db->query("SELECT groupid FROM $table_usergroups WHERE type='member' AND '$newcredit'>=creditshigher AND '$newcredit'<creditslower");
  4.                         $groupidadd = "groupid='".$db->result($query, 0)."'";
  5.                 $db->query("UPDATE $table_members SET $groupidadd WHERE uid='$discuz_uid'");}
复制代码

[ 本帖最后由 rubbishman 于 2005-10-4 22:48 编辑 ]
回复

使用道具 举报

 楼主| rubbishman 发表于 2005-5-29 19:07:36 | 显示全部楼层

增加一些HACK

发贴加钱
打开./include/post.php

  1. function updateforumcount($fid) {
复制代码


上加
  1. function updatemoney($operator, $uid, $usermoneys) {
  2.         global $db, $table_members, $discuz_uid;
  3.         
  4.         $newmoney =0;

  5.         $newmoney = intval("$usermoneys");
  6.         
  7.         if(!$uid ) return;

  8.         if($uid == $discuz_uid) {
  9.                 $db->query("UPDATE $table_members SET money=money$operator$newmoney WHERE uid='$uid'");
  10.         } else {
  11.                 $member = explode(',', $uid);
  12.                 foreach($member as $uid) {
  13.                         $db->query("UPDATE $table_members SET money=money$operator$newmoney WHERE uid='$uid'");
  14.                 }
  15.         }
  16. }
复制代码


./include/common.php

  1. m.regdate
复制代码


加(如果已有这样的修改就不用再加)

  1. , m.money AS usermoney, m.bank AS userbank, m.bankstatus AS bankstatus
复制代码


打开./include/newthread.php

  1. $bbcodeoff = checkbbcodes($message, $bbcodeoff);
复制代码


在其上面加入
  1. //发贴加钱开始
  2.         if($bankstatus>=0) {
  3.                 $postmoney = 2;  //发表主题奖励的钱数,可自己修改
  4.                 updatemoney('+', $discuz_uid, $postmoney);
  5.         }
  6. //发贴加钱结束
复制代码


注意:我这里是银行被冻结了不能获得金钱
打开./include/newreply.php

  1. $bbcodeoff = checkbbcodes($message, $bbcodeoff);
复制代码


上加
  1. //发贴加钱开始
  2.         if($bankstatus>=0) {
  3.                 $postmoney = 1;  //发表回复奖励的钱数,可自己修改
  4.                 updatemoney('+', $discuz_uid, $postmoney);
  5.         }
  6. //发贴加钱结束
复制代码


OK。完工。如果想实现删贴扣钱可以打开./topicadmin.php
查找(共3处都要修改)

  1. updatemember('-', $uids, $deletedcredits);
复制代码


上加
  1. //删贴扣钱开始
  2.                         $postmoney = 5;  //删除一贴所扣钱数,可自行修改
  3.                         updatemoney('-', $uids, $postmoney);
  4. //删贴扣钱结束
复制代码


在贴子里面显示作者金钱状况

viewthread.php

  1. m.showemail
复制代码



  1. , m.bank, m.money, m.bankmimi, m.bankstatus
复制代码


viewthread.htm

  1. <span class="bold">$post[author]</span>
复制代码



  1. <img src="./images/common/money$post[bankstatus].gif" border="0" align=absmiddle>
复制代码



  1. {lang postnum} $post[postnum]<br>
复制代码



  1. 现金 $post[money]<br>
  2. 存款 $post[bank]<!--{if $isadmin}-->+$post[bankmimi]<!--{/if}--><br>
复制代码



后台修改用户资料可以修改金钱

./templates/default/admincp.lang.php

  1. 'members_edit_credit' => '积分:',
复制代码



  1.         'members_edit_money' => '现金:',
  2.         'members_edit_bank' => '存款:',
  3.         'members_edit_bankmimi' => '瑞士银行:',
  4.         'members_edit_bankpass' => '银行密码:',
  5.         'members_edit_bankstatus' => '银行状态:',
复制代码


./admin/members.php

  1. $styleselect .= '</select>';
复制代码



  1.                 $bankstatusselect = "<select name="bankstatusnew">";
  2.                 $bankstatusselect .= "<option value="-1" ".($member['bankstatus'] == -1 ? 'selected="selected"' : NULL).">冻结中</option>\n";
  3.                 $bankstatusselect .= "<option value="0" ".($member['bankstatus'] == 0 ? 'selected="selected"' : NULL).">正常使用</option>\n";
  4.                 $bankstatusselect .= "<option value="1" ".($member['bankstatus'] == 1 ? 'selected="selected"' : NULL).">开通瑞士银行</option>\n";
  5.                 $bankstatusselect .= '</select>';
复制代码



  1. showsetting('members_edit_credit', 'creditnew', $member['credit'], 'text');
复制代码



  1.                 showsetting('members_edit_money', 'moneynew', $member['money'], 'text');
  2.                 showsetting('members_edit_bank', 'banknew', $member['bank'], 'text');
  3.                 showsetting('members_edit_bankmimi', 'bankmiminew', $member['bankmimi'], 'text');
  4.                 showsetting('members_edit_bankpass', 'bankpassnew', $member['bankpass'], 'text');
  5.                 showsetting('members_edit_bankstatus', '', '', $bankstatusselect);
复制代码



  1. credit='$creditnew',
复制代码



  1. money='$moneynew', bank='$banknew', bankmimi='$bankmiminew', bankpass='$bankpassnew', bankstatus='$bankstatusnew',
复制代码


更新缓存就OK了。

[ 本帖最后由 rubbishman 于 2005-9-4 12:06 编辑 ]
回复

使用道具 举报

whopawho1985 发表于 2005-5-29 19:10:02 | 显示全部楼层
不錯哦~~~呵呵~~
回复

使用道具 举报

xjbl 发表于 2005-5-29 19:10:41 | 显示全部楼层
支持,偶这就去安装哈...
回复

使用道具 举报

xjbl 发表于 2005-5-29 19:11:44 | 显示全部楼层
晕死了,没简体的啊???
回复

使用道具 举报

winter0706 发表于 2005-5-29 19:21:15 | 显示全部楼层
Originally posted by xjbl at 2005-5-29 19:11
晕死了,没简体的啊???

簡體在圖片下面.........
繁體在圖片上面.........
回复

使用道具 举报

whopawho1985 发表于 2005-5-29 19:24:06 | 显示全部楼层
好啊~~~馬上安裝
回复

使用道具 举报

whopawho1985 发表于 2005-5-29 19:26:52 | 显示全部楼层
Discuz! info: MySQL Query Error

User: 达人秀
Time: 2005-5-29 7:25pm
Script: /admincp.php

SQL: ALTER TABLE `cdb_members` ADD `money` INT(10) DEFAULT '100' NOT NULL, ADD `bank` INT(10) DEFAULT '0' NOT NULL, ADD `savemt` INT(10) DEFAULT '0' NOT NULL, ADD `bankstatus` tinyint(1) DEFAULT '0' NOT NULL, ADD `bankmimi` INT(10) DEFAULT '0' NOT NULL, ADD `bankpass` int(5) DEFAULT '8888' NOT NULL, ADD `savemimi` INT(10) DEFAULT '0' NOT NULL;
Error: Duplicate column name 'money'
Errno.: 1060

Similar error report has beed dispatched to administrator before.
--------------------------------------------------------------------------------------------------------------------------------------------------
每次裝銀行昇級數據庫老是這樣- -!
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|Discuz! 官方站 ( 皖ICP备16010102号 )star

GMT+8, 2024-3-29 22:31 , Processed in 0.115694 second(s), 17 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2023, Tencent Cloud.

快速回复 返回顶部 返回列表