不知道誰有呢?
[討論]好期待股票的MOD
版主: 版主管理群
有任何關於 phpBB 或是架站的問題，請在論壇上公開發表出來，大家一起討論。
請不要丟私人訊息問我，因為私訊是用來聊私事的。
這樣作對於解決您的問題一點幫助也沒有，也很沒有效率，小弟我一概謝絕。
搜尋是一種美德，在發問之前，請多加利用頂端的文章搜尋功能，搜尋可能的關鍵字。
確定您想問的問題找不到答案後，再發問。
請不要丟私人訊息問我，因為私訊是用來聊私事的。
這樣作對於解決您的問題一點幫助也沒有，也很沒有效率，小弟我一概謝絕。
搜尋是一種美德，在發問之前，請多加利用頂端的文章搜尋功能，搜尋可能的關鍵字。
確定您想問的問題找不到答案後，再發問。
看過了但是官方停止支持.
而且我安裝的時候有問題他不能更改acp理的information.
可以說完全部能操作.
必須要有shop mod
把admin_stockmarket.php放進admin 就行了.
admin_stockmarket.php
代碼: 選擇全部
<?php
/***************************************************************************
* admin_stockmarket.php
* -------------------
* Version : 0.1.0
* began : Thursday, May 15th, 2003
* released : Friday, May 16th, 2003
* email : moogie@shiningforcecentral.com
*
***************************************************************************/
/***************************************************************************
*
* copyright (C) 2003 Moogie
*
* This program is free software; you can redistribute it and/or
* modify it under the terms of the GNU General Public License
* as published by the Free Software Foundation; either version 2
* of the License, or (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* http://www.gnu.org/copyleft/gpl.html
*
***************************************************************************/
define('IN_PHPBB', 1);
if( !empty($setmodules) )
{
$file = basename(__FILE__);
$module['General']['Stockmarket Updater'] = $file;
return;
}
//
// Let's set the root dir for phpBB
//
$phpbb_root_path = '../';
require($phpbb_root_path . 'extension.inc');
require('pagestart.' . $phpEx);
//
//check for userlevel
//
if( !$userdata['session_logged_in'] )
{
header('Location: ' . append_sid("login.$phpEx?redirect=tableupdate.$phpEx", true));
}
if( $userdata['user_level'] != ADMIN )
{
message_die(GENERAL_MESSAGE, $lang['Not_Authorised']);
}
//end check
//main page
if (!isset($action))
{
$shopname = stripslashes($shopname);
$template->set_filenames(array(
'body' => 'admin/shop_config_body.tpl')
);
// Name of the shop containing shares
$field_stockmarketname = 'Stockmarket';
//Defaults for caculating share prices
$field_maxcost = '30'; // Maximum cost for shares
$field_maxsold = '250'; // Maximum amount of each share available
$field_maxchange = '30'; // Percentage (of current share cost) by which to increase or decrease share cost
//Defaults for randomising share prices
$field_randommin = '1'; // Minimum cost for shares
$field_randommax = '30'; // Maximum cost for shares
//Default universal cost
$field_universalcost = '15'; // Cost to set all shares to
$shopinfo = '<tr><td colspan="2" align="center" class="row2"><span class="gen"><b>Update Share Prices</b></span></td></tr><tr><td class="row2"><span class="gensmall">Stockmarket Shop Name</span></td><td class="row2"><input name="stockmarketname" type="text" size="20" value="'.$field_stockmarketname.'"></td></tr><tr><td class="row2"><span class="gensmall">Maximum Share Cost</span></td><td class="row2"><input name="maxcost" type="text" size="4" maxlength="3" value="'.$field_maxcost.'"></td></tr><tr><td class="row2"><span class="gensmall">Quantity of Shares</span></td><td class="row2"><input name="maxsold" type="text" size="4" maxlength="3" value="'.$field_maxsold.'"></td></tr><tr><td class="row2"><span class="gensmall">Maximum Random Cost Change</span></td><td class="row2"><input name="maxchange" type="text" size="4" maxlength="3" value="'.$field_maxchange.'"> % of current share cost</td></tr><tr><td class="row2" colspan="2" align="center"><span class="gensmall"><input type="hidden" name="action" value="updateshares"><input type="submit" value="Update Share Prices "></span></d></tr></form>
<tr><td class="row2" colspan="2"><br></td></tr><tr><td colspan="2" align="center" class="row2"><span class="gen"><b>Randomise Share Prices</b></span></td></tr><form method="post" action="'.append_sid("admin_stockmarket.$phpEx").'"><tr><td class="row2"><span class="gensmall">Stockmarket Shop Name</span></td><td class="row2"><input name="stockmarketname" type="text" size="20" value="'.$field_stockmarketname.'"></td></tr><tr><td class="row2"><span class="gensmall">Minimum Cost</span></td><td class="row2"><input name="randommin" type="text" size="4" maxlength="3" value="'.$field_randommin.'"></td></tr><tr><td class="row2"><span class="gensmall">Maximum Cost</span></td><td class="row2"><input name="randommax" type="text" size="4" maxlength="3" value="'.$field_randommax.'"></td></tr><tr><td class="row2" colspan="2" align="center"><span class="gensmall"><input type="hidden" name="action" value="randomiseshares"><input type="submit" value="RaNdOmIsE Share Prices!"></span></d></tr></form>
<tr><td class="row2" colspan="2"><br></td></tr><tr><td colspan="2" align="center" class="row2"><span class="gen"><b>Set Universal Share Price</b></span></td></tr><form method="post" action="'.append_sid("admin_stockmarket.$phpEx").'"><tr><td class="row2"><span class="gensmall">Stockmarket Shop Name</span></td><td class="row2"><input name="stockmarketname" type="text" size="20" value="'.$field_stockmarketname.'"></td></tr><tr><td class="row2"><span class="gensmall">Share Cost</span></td><td class="row2"><input name="universalcost" type="text" size="4" maxlength="3" value="'.$field_universalcost.'"></td></tr><tr><td class="row2" colspan="2" align="center"><span class="gensmall"><input type="hidden" name="action" value="universalshares"><input type="submit" value="Set Universal Share Price"></span></d></tr></form>';
$template->assign_vars(array(
'SHOPCONFIGINFO' => "$shopinfo",
'SHOPTABLETITLE' => "Update Stockmarket",
'S_CONFIG_ACTION' => append_sid('admin_stockmarket.' . $phpEx),
'SHOPTITLE' => "Stockmarket Updater",
'SHOPEXPLAIN' => "This section allows you to update the stock prices based on current sales and prices, or totally randomise the prices.")
);
}
//update stockmarket prices based on amount sold and current cost
if ($action == 'updateshares')
{
if (($maxcost <= 0) || (strlen($maxcost) < 1) || (!is_numeric($maxcost))) { message_die(GENERAL_MESSAGE, '<BR>Maximum Share Cost Not Valid!<P>Please <a href="'.append_sid('admin_stockmarket.'.$phpEx).'">go back</a> and enter a number greater than 0.<P>'); }
if (($maxsold <= 0) || ($maxsold > 255) || (strlen($maxsold) < 1) || (!is_numeric($maxsold))) { message_die(GENERAL_MESSAGE, '<BR>Quantity of Shares Not Valid!<P>Please <a href="'.append_sid('admin_stockmarket.'.$phpEx).'">go back</a> and enter a number greater than 0, but less than 255.<P>'); }
if (($maxchange <= 0) || ($maxchange > 100) || (strlen($maxchange) < 1) || (!is_numeric($maxchange))) { message_die(GENERAL_MESSAGE, '<BR>Maximum Random Cost Change<P>Please <a href="'.append_sid('admin_stockmarket.'.$phpEx).'">go back</a> and enter a number greater than 0, but less than 100.<P>'); }
if (strlen($stockmarketname) < 2) {message_die(GENERAL_MESSAGE, '<BR>Invalid Stockmarket Shop Name!<P>Please <a href="'.append_sid('admin_stockmarket.'.$phpEx).'">go back</a> and enter a valid shop name.<P>');}
$mincost = round($maxcost/3);
$avgcost = $mincost + round($maxcost/3);
$minsold = round($maxsold/3);
$avgsold = $minsold + round($maxsold/3);
//price could go either way if price & sold high OR if price & sold avg OR if price & sold low
$sql = "UPDATE phpbb_shopitems SET cost = IF(((RAND(NOW())*2)+1)>1,cost + (RAND(NOW())*ROUND((cost/100)*$maxchange)),cost - (RAND(NOW())*ROUND((cost/100)*$maxchange))), cost = IF(cost > $maxcost,$maxcost,cost), cost = IF(cost <= 0,1,cost) WHERE (shop='$stockmarketname') && (((cost > $avgcost) && (sold > $avgsold)) || ((cost > $mincost) && (cost <= $avgcost) && (sold > $minsold) && (sold <= $avgsold)) || ((cost <= $mincost) && (sold <= $minsold)))";
if ( !($db->sql_query($sql)) ) { message_die(GENERAL_MESSAGE, 'Fatal Error Updating Stockmarket Costs!'); }
//price more likely to go up if avg price & high sold OR if low price & avg sold
$sql = "UPDATE phpbb_shopitems SET cost = IF(((RAND(NOW())*3)+1)<3,cost + (RAND(NOW())*ROUND((cost/100)*$maxchange)),cost - (RAND(NOW())*ROUND((cost/100)*$maxchange))), cost = IF(cost > $maxcost,$maxcost,cost), cost = IF(cost <= 0,1,cost) WHERE (shop='$stockmarketname') && (((cost > $mincost) && (cost <= $avgcost) && (sold > $avgsold)) || ((cost <= $mincost) && (sold > $minsold) && (sold <= $avgsold)))";
if ( !($db->sql_query($sql)) ) { message_die(GENERAL_MESSAGE, 'Fatal Error Updating Stockmarket Costs!'); }
//price more likely to go down if high price & avg sold OR if avg price & low sold
$sql = "UPDATE phpbb_shopitems SET cost = IF(((RAND(NOW())*3)+1)<3,cost - (RAND(NOW())*ROUND((cost/100)*$maxchange)),cost + (RAND(NOW())*ROUND((cost/100)*$maxchange))), cost = IF(cost > $maxcost,$maxcost,cost), cost = IF(cost <= 0,1,cost) WHERE (shop='$stockmarketname') && (((cost > $avgcost) && (sold > $minsold) && (sold <= $avgsold)) || ((cost > $mincost) && (cost <= $avgcost) && (sold <= $minsold)))";
if ( !($db->sql_query($sql)) ) { message_die(GENERAL_MESSAGE, 'Fatal Error Updating Stockmarket Costs!'); }
//price goes up if low price & high sold
$sql = "UPDATE phpbb_shopitems SET cost = cost + (RAND(NOW())*ROUND((cost/100)*$maxchange)), cost = IF(cost > $maxcost,$maxcost,cost), cost = IF(cost <= 0,1,cost) WHERE (shop='$stockmarketname') && ((cost <= $mincost) && (sold > $avgsold))";
if ( !($db->sql_query($sql)) ) { message_die(GENERAL_MESSAGE, 'Fatal Error Updating Stockmarket Costs!'); }
//price goes down if high price & low sold
$sql = "UPDATE phpbb_shopitems SET cost = cost - (RAND(NOW())*ROUND((cost/100)*$maxchange)), cost = IF(cost > $maxcost,$maxcost,cost), cost = IF(cost <= 0,1,cost) WHERE (shop='$stockmarketname') && ((cost > $avgcost) && (sold <= $minsold))";
if ( !($db->sql_query($sql)) ) { message_die(GENERAL_MESSAGE, 'Fatal Error 2 Updating Stockmarket Costs!'); }
$message = "<BR>Stockmarket Costs Updated!<p>Click <a href="".append_sid("admin_stockmarket.".$phpEx)."">Here</a> to return to the Stockmarket Updater.<p>Click <a href="".append_sid("index.".$phpEx."?pane=right")."">Here</a> to return to Admin Index.<p>";
message_die(GENERAL_MESSAGE, $message);
}
//randomise stockmarket
if ($action == 'randomiseshares')
{
if (($randommin <= 0) || (strlen($randommin) < 1) || (!is_numeric($randommin))) { message_die(GENERAL_MESSAGE, '<BR>Minimum Cost Not Valid!<P>Please <a href="'.append_sid('admin_stockmarket.'.$phpEx).'">go back</a> and enter a number greater than 0.<P>'); }
if (($randommax <= 0) || (strlen($randommax) < 1) || (!is_numeric($randommax))) { message_die(GENERAL_MESSAGE, '<BR>Maximum Cost Not Valid!<P>Please <a href="'.append_sid('admin_stockmarket.'.$phpEx).'">go back</a> and enter a number greater than 0.<P>'); }
if (strlen($stockmarketname) < 2) {message_die(GENERAL_MESSAGE, '<BR>Invalid Stockmarket Shop Name!<P>Please <a href="'.append_sid('admin_stockmarket.'.$phpEx).'">go back</a> and enter a valid shop name.<P>');}
$sql = "UPDATE phpbb_shopitems SET cost = ROUND(RAND(NOW())*($randommax-$randommin))+$randommin WHERE shop='$stockmarketname'";
if ( !($db->sql_query($sql)) ) { message_die(GENERAL_MESSAGE, 'Fatal Error Randomising Stockmarket Costs!'); }
$message = "<BR>Stockmarket Costs Randomised!<p>Click <a href="".append_sid("admin_stockmarket.".$phpEx)."">Here</a> to return to the Stockmarket Updater.<p>Click <a href="".append_sid("index.".$phpEx."?pane=right")."">Here</a> to return to Admin Index.<p>";
message_die(GENERAL_MESSAGE, $message);
}
//set universal share price
if ($action == 'universalshares')
{
if (($universalcost <= 0) || (strlen($universalcost) < 1) || (!is_numeric($universalcost))) { message_die(GENERAL_MESSAGE, '<BR>Universal Share Cost Not Valid!<P>Please <a href="'.append_sid('admin_stockmarket.'.$phpEx).'">go back</a> and enter a number greater than 0.<P>'); }
if (strlen($stockmarketname) < 2) {message_die(GENERAL_MESSAGE, '<BR>Invalid Stockmarket Shop Name!<P>Please <a href="'.append_sid('admin_stockmarket.'.$phpEx).'">go back</a> and enter a valid shop name.<P>');}
$sql = "UPDATE phpbb_shopitems SET cost = $universalcost WHERE shop='$stockmarketname'";
if ( !($db->sql_query($sql)) ) { message_die(GENERAL_MESSAGE, 'Fatal Error Randomising Stockmarket Costs!'); }
$message = "<BR>Universal Share Price Set!<p>Click <a href="".append_sid("admin_stockmarket.".$phpEx)."">Here</a> to return to the Stockmarket Updater.<p>Click <a href="".append_sid("index.".$phpEx."?pane=right")."">Here</a> to return to Admin Index.<p>";
message_die(GENERAL_MESSAGE, $message);
}
//
// Generate the page
//
$template->pparse('body');
include('page_footer_admin.' . $phpEx);
?> 使用版本：phpBB 3.0.2
網站位置：http://www.hkvalue.net/forum
狀況描述：
http://www.hkvalue.net/forum
很想做得更好,可否多多指點 ^^
網站位置：http://www.hkvalue.net/forum
狀況描述：
http://www.hkvalue.net/forum
很想做得更好,可否多多指點 ^^
