function timeandweather_dohook($hookname, $args)
{
global $session, $outdoors, $shady, $rainy, $brightness;
switch ($hookname) {
case "prerender":
//debug($outdoors);
// $brightness = "darker";
// $brightness = "darkest";
// $brightness = "lighter";
// $rainy = 2;
// $outdoors = true;
// $shady = true;
if (!$session['noweathergraphics'] && (strpos($session['templatename'], "Default") === 0 || strpos($session['templatename'], "DragonLeather") === 0)) {
global $output;
timeandweather_calculate_graphics();
if ($outdoors) {
$weatherstart = "";
$weatherend = "";
for ($i = 0; $i < $rainy; $i++) {
$weatherstart .= "<div style='background:url(images/weather/rain1.png); background-position:" . e_rand(0, 100) . "% " . e_rand(0, 100) . "%; background-repeat:no-repeat;'>";
$weatherend .= "</div>";
$weatherstart .= "<div style='background:url(images/weather/rain2.png); background-position:" . e_rand(0, 100) . "% " . e_rand(0, 100) . "%; background-repeat:no-repeat;'>";
$weatherend .= "</div>";
$weatherstart .= "<div style='background:url(images/weather/rain3.png); background-position:" . e_rand(0, 100) . "% " . e_rand(0, 100) . "%; background-repeat:no-repeat;'>";
$weatherend .= "</div>";
//debug("rain");
}
if ($shady && $brightness != "darker" && $brightness != "darkest" && !$rainy) {
$weatherstart .= "<div style='background:url(images/weather/tree-1.gif); background-repeat:no-repeat;'>";
$weatherend .= "</div>";
$weatherstart .= "<div style='background:url(images/weather/tree-2.gif); background-position:top right; background-repeat:no-repeat;'>";
$weatherend .= "</div>";
}
$output = str_replace("<!--weatherstart-->", $weatherstart, $output);
$output = str_replace("<!--weatherend-->", $weatherend, $output);
if ($brightness) {
$output = str_replace("sitecenter", "sitecenter-" . $brightness, $output);
}
}
}
break;
case "charstats":
//debug($session);
$info = timeandweather_getcurrent();
$definitiontext = array(1 => array(1 => "Cold and Frosty", 2 => "Cold and Misty", 3 => "Cool and Dewy", 4 => "Warm and Clear", 5 => "Cool and Drizzly", 6 => "Dark and Rainy", 7 => "Dark and Stormy"), 2 => array(1 => "Cool and Misty", 2 => "Mild and Dewy", 3 => "Mild and Clear", 4 => "Warm and Clear", 5 => "Cool and Drizzly", 6 => "Dark and Rainy", 7 => "Dark and Stormy"), 3 => array(1 => "Hot and Humid", 2 => "Hot and Sunny", 3 => "Warm and Sunny", 4 => "Clear and Sunny", 5 => "Light Showers", 6 => "Heavy Rain", 7 => "Thunderstorms"), 4 => array(1 => "Hot and Humid", 2 => "Hot and Sunny", 3 => "Warm and Sunny", 4 => "Clear and Sunny", 5 => "Light Showers", 6 => "Heavy Rain", 7 => "Thunderstorms"), 5 => array(1 => "Hot and Humid", 2 => "Warm and Bright", 3 => "Clear and Bright", 4 => "Cool and Bright", 5 => "Cloudy Skies", 6 => "Darkening Rain", 7 => "Dark and Stormy"), 6 => array(1 => "Warm and Damp", 2 => "Mild and Damp", 3 => "Mild and Clear", 4 => "Cool and Clear", 5 => "Dark and Humid", 6 => "Dark and Rainy", 7 => "Dark and Stormy"), 7 => array(1 => "Cold and Bright", 2 => "Chilly and Light", 3 => "Clear and Still", 4 => "Warm and Humid", 5 => "Dark and Humid", 6 => "Pitch Black Rain", 7 => "Black Storm"));
addcharstat("Game State");
$stat = $definitiontext[$info['timezone']][$info['weather']];
addcharstat("Current Weather:", $stat);
break;
}
return $args;
}
function timeandweather_dohook($hookname, $args)
{
global $session;
switch ($hookname) {
case "charstats":
$info = timeandweather_getcurrent();
$definitiontext = array(1 => array(1 => "Cold and Frosty", 2 => "Cold and Misty", 3 => "Cool and Dewy", 4 => "Warm and Clear", 5 => "Cool and Drizzly", 6 => "Dark and Rainy", 7 => "Dark and Stormy"), 2 => array(1 => "Cool and Misty", 2 => "Mild and Dewy", 3 => "Mild and Clear", 4 => "Warm and Clear", 5 => "Cool and Drizzly", 6 => "Dark and Rainy", 7 => "Dark and Stormy"), 3 => array(1 => "Hot and Humid", 2 => "Hot and Sunny", 3 => "Warm and Sunny", 4 => "Clear and Sunny", 5 => "Light Showers", 6 => "Heavy Rain", 7 => "Thunderstorms"), 4 => array(1 => "Hot and Humid", 2 => "Hot and Sunny", 3 => "Warm and Sunny", 4 => "Clear and Sunny", 5 => "Light Showers", 6 => "Heavy Rain", 7 => "Thunderstorms"), 5 => array(1 => "Hot and Humid", 2 => "Warm and Bright", 3 => "Clear and Bright", 4 => "Cool and Bright", 5 => "Cloudy Skies", 6 => "Darkening Rain", 7 => "Dark and Stormy"), 6 => array(1 => "Warm and Damp", 2 => "Mild and Damp", 3 => "Mild and Clear", 4 => "Cool and Clear", 5 => "Dark and Humid", 6 => "Dark and Rainy", 7 => "Dark and Stormy"), 7 => array(1 => "Cold and Bright", 2 => "Chilly and Light", 3 => "Clear and Still", 4 => "Warm and Humid", 5 => "Dark and Humid", 6 => "Pitch Black Rain", 7 => "Black Storm"));
addcharstat("Game State");
$stat = $definitiontext[$info['timezone']][$info['weather']];
addcharstat("Current Weather:", $stat);
break;
}
return $args;
}
function switch_dohook($hook, $args)
{
switch ($hook) {
case 'charstats':
global $SCRIPT_NAME, $session;
if ($SCRIPT_NAME == 'village.php' && $session['user']['specialinc'] == '') {
addcharstat("Vital Info");
addcharstat(sprintf_translate("<a href='login.php?op=logout'>%s</a>", "`%Log Out"), sprintf_translate("<a href='runmodule.php?module=switch' style='font-weight: bold;'>%s</a>", appoencode('`%Switch')));
addnav('', 'login.php?op=logout');
addnav('', 'runmodule.php?module=switch');
}
break;
}
return $args;
}
function quester_dohook($hookname, $args)
{
global $session;
$op = httpget('op');
switch ($hookname) {
//potion book in bio
case "ale":
addnav("Cedrik");
addnav("Rumors", "runmodule.php?module=quester&op=enter");
break;
case "footer-hof":
addnav("Warrior Rankings");
addnav("Quester", "runmodule.php?module=quester&op=hof");
break;
case "charstats":
if (get_module_pref("questpoints") > 0) {
addcharstat("Extra Info");
addcharstat("Quester Points", get_module_pref("questpoints"));
}
break;
}
return $args;
}
/**
* Returns the current character stats or (if the character isn't logged in) the currently online players
* Hooks provided:
* charstats
*
* @return array The current stats for this character or the list of online players
*/
function charstats()
{
global $session, $playermount, $companions;
wipe_charstats();
$u =& $session['user'];
if ($session['loggedin']) {
$u['hitpoints'] = round($u['hitpoints'], 0);
$u['experience'] = round($u['experience'], 0);
$u['maxhitpoints'] = round($u['maxhitpoints'], 0);
// $spirits=array(-6=>"Resurrected",-2=>"Very Low",-1=>"Low","0"=>"Normal",1=>"High",2=>"Very High");
// if ($u['alive']){ }else{ $spirits[(int)$u['spirits']] = "DEAD"; }
//calculate_buff_fields();
reset($session['bufflist']);
$atk = $u['attack'];
$def = $u['defense'];
$buffcount = 0;
$buffs = "";
while (list($key, $val) = each($session['bufflist'])) {
if (isset($val['suspended']) && $val['suspended']) {
continue;
}
if (isset($val['atkmod'])) {
$atk *= $val['atkmod'];
}
if (isset($val['defmod'])) {
$def *= $val['defmod'];
}
// Short circuit if the name is blank
if ($val['name'] > "" || $session['user']['superuser'] & SU_DEBUG_OUTPUT) {
tlschema($val['schema']);
if ($val['name'] == "") {
$val['name'] = "DEBUG: {$key}";
}
if (is_array($val['name'])) {
$val['name'][0] = str_replace("`%", "`%%", $val['name'][0]);
$val['name'] = call_user_func_array("sprintf_translate", $val['name']);
} else {
//in case it's a string
$val['name'] = translate_inline($val['name']);
}
if ($val['rounds'] >= 0) {
// We're about to sprintf, so, let's makes sure that
// `% is handled.
//$n = translate_inline(str_replace("`%","`%%",$val['name']));
$b = translate_inline("`#%s `7(%s rounds left)`n", "buffs");
$b = sprintf($b, $val['name'], $val['rounds']);
$buffs .= appoencode($b, true);
} else {
$buffs .= appoencode("`#{$val['name']}`n", true);
}
tlschema();
$buffcount++;
}
}
if ($buffcount == 0) {
$buffs .= appoencode(translate_inline("`^None`0"), true);
}
$atk = round($atk, 2);
$def = round($def, 2);
if ($atk < $u['attack']) {
$atk = round($u['attack'], 1) . "`\$" . round($atk - $u['attack'], 1);
} else {
if ($atk > $u['attack']) {
$atk = round($u['attack'], 1) . "`@+" . round($atk - $u['attack'], 1);
} else {
// They are equal, display in the 1 signifigant digit format.
$atk = round($atk, 1);
}
}
if ($def < $u['defense']) {
$def = round($u['defense'], 1) . "`\$" . round($def - $u['defense'], 1);
} else {
if ($def > $u['defense']) {
$def = round($u['defense'], 1) . "`@+" . round($def - $u['defense'], 1);
} else {
// They are equal, display in the 1 signifigant digit format.
$def = round($def, 1);
}
}
addcharstat("Vital Info");
//health bar
if ($u['alive']) {
$cur = $u['hitpoints'];
$realmax = $u['maxhitpoints'];
$cur_adjustment = check_temp_stat("hitpoints", 1);
$max_adjustment = check_temp_stat("maxhitpoints", 1);
} else {
$cur = $u['soulpoints'];
$realmax = $u['level'] * 5 + 50;
$cur_adjustment = check_temp_stat("soulpoints", 1);
$max_adjustment = "";
}
if ($pct > 60) {
$ccode = "`@";
} elseif ($pct > 25) {
$ccode = "`^";
} else {
$ccode = "`\$";
}
$hicode = "`&";
if (!$u['alive']) {
$ccode = "`7";
}
require_once "lib/bars.php";
$hpbar = fadebar($cur, $realmax);
$stat = "{$ccode} {$cur} {$cur_adjustment} `0/ {$realmax} {$max_adjustment}<br />" . $hpbar;
if ($u['alive']) {
addcharstat("Hitpoints", $stat);
addcharstat("Attack", $atk . check_temp_stat("attack", 1));
addcharstat("Defence", $def . check_temp_stat("defense", 1));
} else {
addcharstat("Adrenaline", $stat);
addcharstat("Attack", 10 + round(($u['level'] - 1) * 1.5));
addcharstat("Defence", 10 + round(($u['level'] - 1) * 1.5));
}
// addcharstat("Turns", $u['turns'].check_temp_stat("turns",1));
// addcharstat("Attack", $atk.check_temp_stat("attack",1));
// addcharstat("Defence", $def.check_temp_stat("defense",1));
if (count($companions) > 0) {
addcharstat("Companions");
foreach ($companions as $name => $companion) {
if ($companion['hitpoints'] > 0 || isset($companion['cannotdie']) && $companion['cannotdie'] == true) {
if ($companion['hitpoints'] < 0) {
$companion['hitpoints'] = 0;
}
if ($companion['hitpoints'] < $companion['maxhitpoints']) {
$color = "`\$";
} else {
$color = "`@";
}
if (isset($companion['suspended']) && $companion['suspended'] == true) {
$suspcode = "`7 *";
} else {
$suspcode = "";
}
addcharstat($companion['name'], $color . $companion['hitpoints'] . "`7/`&" . $companion['maxhitpoints'] . "{$suspcode}`0");
}
}
}
addcharstat("Personal Info");
if ($u['alive']) {
addcharstat("Requisition", number_format($u['gold'] . check_temp_stat("gold", 1)));
addcharstat("Cigarettes", number_format($u['gems'] . check_temp_stat("gems", 1)));
} else {
addcharstat("Cage Fights", $u['gravefights'] . check_temp_stat("gravefights", 1));
addcharstat("Favour", number_format($u['deathpower'] . check_temp_stat("deathpower", 1)));
}
if ($u['alive']) {
addcharstat("Level", "`b" . $u['level'] . check_temp_stat("level", 1) . "`b");
//exp bar
require_once "lib/experience.php";
$min = exp_for_next_level($u['level'] - 1, $u['dragonkills']);
$req = exp_for_next_level($u['level'], $u['dragonkills']);
$exp = round($session['user']['experience'], 0) . check_temp_stat("experience", 1);
if ($exp < $min) {
$min = $exp;
}
if ($req - $min > 0) {
$nonpct = floor(($req - $exp) / ($req - $min) * 100);
} else {
$nonpct = 0;
}
$pct = 100 - $nonpct;
if ($pct > 100) {
$pct = 100;
$nonpct = 0;
}
if ($pct < 0) {
$pct = 0;
$nonpct = 100;
}
if ($exp >= $req) {
$color = "blue";
if ($session['user']['level'] == 1 && $session['user']['dragonkills'] == 0) {
$expmsg = "<br />You have enough experience to level up! Challenge your master in the Dojo!";
}
} else {
$color = "white";
}
addcharstat("Experience", number_format($u['experience'] . check_temp_stat("experience", 1)) . "/{$req}<br /><table style='border: solid 1px #000000;' bgcolor='red' cellpadding='0' cellspacing='0' width='70' height='5'><tr><td width='{$pct}%' bgcolor='{$color}'></td><td width='{$nonpct}%'></td></tr></table>{$expmsg}");
addcharstat("Equipment Info");
addcharstat("Weapon", $u['weapon']);
addcharstat("Armor", $u['armor']);
if ($u['hashorse']) {
addcharstat("Creature", $playermount['mountname'] . "`0");
}
}
require_once "lib/datetime.php";
$gt = gametimedetails();
addcharstat("Game State");
addcharstat("Game Time", gmdate("g:i a", $gt['gametime']));
addcharstat("New day in:", date("H:i:s", secondstonextgameday()));
modulehook("charstats");
$charstat = getcharstats($buffs);
if (!is_array($session['bufflist'])) {
$session['bufflist'] = array();
}
return $charstat;
} else {
$ret = "";
if ($ret = datacache("charlisthomepage")) {
} else {
$onlinecount = 0;
// If a module wants to do it's own display of the online chars,
// let it.
$list = modulehook("onlinecharlist", array());
if (isset($list['handled']) && $list['handled']) {
$onlinecount = $list['count'];
$ret = $list['list'];
} else {
$sql = "SELECT name,alive,location,sex,level,laston,loggedin,lastip,uniqueid FROM " . db_prefix("accounts") . " WHERE locked=0 AND loggedin=1 AND laston>'" . date("Y-m-d H:i:s", strtotime("-" . getsetting("LOGINTIMEOUT", 900) . " seconds")) . "' ORDER BY level DESC";
$result = db_query($sql);
$ret .= appoencode(sprintf(translate_inline("`bOnline Characters (%s players):`b`n"), db_num_rows($result)));
while ($row = db_fetch_assoc($result)) {
$ret .= appoencode("`^{$row['name']}`n");
$onlinecount++;
}
db_free_result($result);
if ($onlinecount == 0) {
$ret .= appoencode(translate_inline("`iNone`i"));
}
}
savesetting("OnlineCount", $onlinecount);
savesetting("OnlineCountLast", strtotime("now"));
updatedatacache("charlisthomepage", $ret);
}
return $ret;
}
}
/**
* Returns the current character stats or (if the character isn't logged in) the currently online players
* Hooks provided:
* charstats
*
* @return array The current stats for this character or the list of online players
*/
function charstats()
{
global $session, $playermount, $companions;
wipe_charstats();
$u =& $session['user'];
if ($session['loggedin']) {
$u['hitpoints'] = round($u['hitpoints'], 0);
$u['experience'] = round($u['experience'], 0);
$u['maxhitpoints'] = round($u['maxhitpoints'], 0);
$spirits = array(-6 => "Resurrected", -2 => "Very Low", -1 => "Low", "0" => "Normal", 1 => "High", 2 => "Very High");
if ($u['alive']) {
} else {
$spirits[(int) $u['spirits']] = "DEAD";
}
//calculate_buff_fields();
reset($session['bufflist']);
$atk = $u['attack'];
$def = $u['defense'];
$buffcount = 0;
$buffs = "";
while (list($key, $val) = each($session['bufflist'])) {
if (isset($val['suspended']) && $val['suspended']) {
continue;
}
if (isset($val['atkmod'])) {
$atk *= $val['atkmod'];
}
if (isset($val['defmod'])) {
$def *= $val['defmod'];
}
// Short circuit if the name is blank
if ($val['name'] > "" || $session['user']['superuser'] & SU_DEBUG_OUTPUT) {
tlschema($val['schema']);
if ($val['name'] == "") {
$val['name'] = "DEBUG: {$key}";
}
if (is_array($val['name'])) {
$val['name'][0] = str_replace("`%", "`%%", $val['name'][0]);
$val['name'] = call_user_func_array("sprintf_translate", $val['name']);
} else {
//in case it's a string
$val['name'] = translate_inline($val['name']);
}
if ($val['rounds'] >= 0) {
// We're about to sprintf, so, let's makes sure that
// `% is handled.
//$n = translate_inline(str_replace("`%","`%%",$val['name']));
$b = translate_inline("`#%s `7(%s rounds left)`n", "buffs");
$b = sprintf($b, $val['name'], $val['rounds']);
$buffs .= appoencode($b, true);
} else {
$buffs .= appoencode("`#{$val['name']}`n", true);
}
tlschema();
$buffcount++;
}
}
if ($buffcount == 0) {
$buffs .= appoencode(translate_inline("`^None`0"), true);
}
$atk = round($atk, 2);
$def = round($def, 2);
if ($atk < $u['attack']) {
$atk = round($u['attack'], 1) . "`\$" . round($atk - $u['attack'], 1);
} else {
if ($atk > $u['attack']) {
$atk = round($u['attack'], 1) . "`@+" . round($atk - $u['attack'], 1);
} else {
// They are equal, display in the 1 signifigant digit format.
$atk = round($atk, 1);
}
}
if ($def < $u['defense']) {
$def = round($u['defense'], 1) . "`\$" . round($def - $u['defense'], 1);
} else {
if ($def > $u['defense']) {
$def = round($u['defense'], 1) . "`@+" . round($def - $u['defense'], 1);
} else {
// They are equal, display in the 1 signifigant digit format.
$def = round($def, 1);
}
}
addcharstat("Vital Info");
addcharstat("Name", $u['name']);
addcharstat("Level", "`b" . $u['level'] . check_temp_stat("level", 1) . "`b");
if ($u['alive']) {
addcharstat("Hitpoints", $u['hitpoints'] . check_temp_stat("hitpoints", 1) . "`0/" . $u['maxhitpoints'] . check_temp_stat("maxhitpoints", 1));
addcharstat("Turns", $u['turns'] . check_temp_stat("turns", 1));
addcharstat("Attack", $atk . check_temp_stat("attack", 1));
addcharstat("Defense", $def . check_temp_stat("defense", 1));
} else {
$maxsoul = $u['level'] * 5 + 50;
addcharstat("Soulpoints", $u['soulpoints'] . check_temp_stat("soulpoints", 1) . "`0/" . $maxsoul);
addcharstat("Torments", $u['gravefights'] . check_temp_stat("gravefights", 1));
addcharstat("Psyche", 10 + round(($u['level'] - 1) * 1.5));
addcharstat("Spirit", 10 + round(($u['level'] - 1) * 1.5));
}
addcharstat("Spirits", translate_inline("`b" . $spirits[(int) $u['spirits']] . "`b"));
if ($u['race'] != RACE_UNKNOWN) {
addcharstat("Race", translate_inline($u['race'], "race"));
} else {
addcharstat("Race", translate_inline(RACE_UNKNOWN, "race"));
}
if (count($companions) > 0) {
addcharstat("Companions");
foreach ($companions as $name => $companion) {
if ($companion['hitpoints'] > 0 || isset($companion['cannotdie']) && $companion['cannotdie'] == true) {
if ($companion['hitpoints'] < 0) {
$companion['hitpoints'] = 0;
}
if ($companion['hitpoints'] < $companion['maxhitpoints']) {
$color = "`\$";
} else {
$color = "`@";
}
if (isset($companion['suspended']) && $companion['suspended'] == true) {
$suspcode = "`7 *";
} else {
$suspcode = "";
}
addcharstat($companion['name'], $color . $companion['hitpoints'] . "`7/`&" . $companion['maxhitpoints'] . "{$suspcode}`0");
}
}
}
addcharstat("Personal Info");
if ($u['alive']) {
addcharstat("Gold", $u['gold'] . check_temp_stat("gold", 1));
} else {
addcharstat("Favor", $u['deathpower'] . check_temp_stat("deathpower", 1));
}
addcharstat("Gems", $u['gems'] . check_temp_stat("gems", 1));
addcharstat("Experience", $u['experience'] . check_temp_stat("experience", 1));
addcharstat("Equipment Info");
addcharstat("Weapon", $u['weapon']);
addcharstat("Armor", $u['armor']);
if ($u['hashorse']) {
addcharstat("Creature", $playermount['mountname'] . "`0");
}
modulehook("charstats");
$charstat = getcharstats($buffs);
if (!is_array($session['bufflist'])) {
$session['bufflist'] = array();
}
return $charstat;
} else {
$ret = "";
if ($ret = datacache("charlisthomepage")) {
} else {
$onlinecount = 0;
// If a module wants to do it's own display of the online chars,
// let it.
$list = modulehook("onlinecharlist", array());
if (isset($list['handled']) && $list['handled']) {
$onlinecount = $list['count'];
$ret = $list['list'];
} else {
$sql = "SELECT name,alive,location,sex,level,laston,loggedin,lastip,uniqueid FROM " . db_prefix("accounts") . " WHERE locked=0 AND loggedin=1 AND laston>'" . date("Y-m-d H:i:s", strtotime("-" . getsetting("LOGINTIMEOUT", 900) . " seconds")) . "' ORDER BY level DESC";
$result = db_query($sql);
$ret .= appoencode(sprintf(translate_inline("`bOnline Characters (%s players):`b`n"), db_num_rows($result)));
while ($row = db_fetch_assoc($result)) {
$ret .= appoencode("`^{$row['name']}`n");
$onlinecount++;
}
db_free_result($result);
if ($onlinecount == 0) {
$ret .= appoencode(translate_inline("`iNone`i"));
}
}
savesetting("OnlineCount", $onlinecount);
savesetting("OnlineCountLast", strtotime("now"));
updatedatacache("charlisthomepage", $ret);
}
return $ret;
}
}
if (get_module_pref("user_display")) {
$amulet = get_module_pref("amuletname");
$ring = get_module_pref("ringname");
$cloak = get_module_pref("cloakname");
$glove = get_module_pref("glovename");
$boot = get_module_pref("bootname");
$helm = get_module_pref("helmname");
$misc = get_module_pref("miscname");
addcharstat("Equipment Info");
if (get_module_pref('helm') && $helm != 'None' && $helm != "") {
addcharstat("Helm", $helm);
}
if (get_module_pref('cloak') && $cloak != 'None' && $cloak != "") {
addcharstat("Cloak", $cloak);
}
if (get_module_pref('amulet') && $amulet != 'None' && $amulet != "") {
addcharstat("Amulet", $amulet);
}
if (get_module_pref('glove') && $glove != 'None' && $glove != "") {
addcharstat("Gloves", $glove);
}
if (get_module_pref('ring') && $ring != 'None' && $ring != "") {
addcharstat("Ring", $ring);
}
if (get_module_pref('boots') && $boot != 'None' && $boot != "") {
addcharstat("Boots", $boot);
}
if (get_module_pref('misc') && $misc != 'None' && $misc != "") {
addcharstat("Extra Item", $misc);
}
}
function donationextend_dohook($hookname, $args)
{
global $session;
switch ($hookname) {
case "donation":
require_once "lib/gamelog.php";
gamelog("Donation registered by donationextend");
$amt = $args['amt'];
$id = $args['id'];
$kitty = get_module_setting("kitty");
$newkitty = $kitty + $amt;
set_module_setting("kitty", $newkitty);
//set last player
if (!get_module_pref("user_shy", "donationextend", $id)) {
$sql = "SELECT name FROM " . db_prefix("accounts") . " WHERE acctid='{$id}'";
$result = db_query_cached($sql, "donationextend_lastdonator", 300);
$row = db_fetch_assoc($result);
$name = $row['name'] . "`0";
set_module_setting("lastdonator", $name);
} else {
set_module_setting("lastdonator", "Anonymous");
}
break;
case "everyfooter":
//debug($args,true);
// Set up and decrement the kitty
require_once "lib/bars.php";
$last = get_module_setting("lasttick");
$ext1 = get_module_setting("extend1cost");
$player = get_module_setting("lastdonator");
$player = appoencode(stripslashes($player));
$elapsed = time() - $last;
$dropped = 0;
$droppertenseconds = get_module_setting("extend1cost") / 8640;
if ($elapsed > 10) {
$dropped = $droppertenseconds;
}
$oldkitty = get_module_setting("kitty");
$newkitty = $oldkitty - $dropped;
if ($newkitty < 0) {
$newkitty = 0;
}
//set up display output
$out = "";
$sql = "SELECT count(acctid) AS c FROM " . db_prefix("accounts") . " WHERE locked=0";
$result = db_query_cached($sql, "donationextend_totalplayers", 1800);
$row = db_fetch_assoc($result);
$totalplayers = $row['c'];
if ($newkitty > $ext1) {
$ext2 = get_module_setting("extend2cost");
if ($newkitty > $ext2) {
$over = $newkitty - $ext2;
$bar = simplebar($over, $ext2, 70, 5, "AA00AA", "FFFFFF");
$overdisp = number_format($over / 100, 2);
//represent as time left to end of Special Extend period
$droppersec = get_module_setting("extend1cost") / 86400;
$secsleft = round($over / $droppersec);
$expirationtime = time() + $secsleft;
require_once "lib/datetime.php";
$expirein = reltime($expirationtime, false);
$out .= "<span style='font-size:smaller'><strong>Special Extend active!</strong><br />" . $bar . "Thank you for your support! Special Extend expires in " . $expirein . "<br /><a href='runmodule.php?module=donationextend' target='_blank' onclick=\"" . popup("runmodule.php?module=donationextend") . ";return false;\">(what's a Special Extend?)</span></a>";
} else {
$moreneeded = $ext2 - $newkitty;
$bar = simplebar($newkitty - $ext1, $ext2 - $ext1, 70, 5, "00FF00", "AA00AA");
$moredisp = number_format($moreneeded / 100, 2);
$out .= "<span style='font-size:smaller'><strong>Extended Play active!</strong><br />" . $bar . "\$" . $moredisp . " more for <a href='runmodule.php?module=donationextend' target='_blank' onclick=\"" . popup("runmodule.php?module=donationextend") . ";return false;\">Special Extend</a>!</span>";
}
} else {
$moreneeded = $ext1 - $newkitty;
$moredisp = number_format($moreneeded / 100, 2);
$bar = fadebar($newkitty, $ext1, 57);
$perplayer = $moreneeded / 100 / $totalplayers;
if ($perplayer > 1) {
$perplayerdisp = "about " . round($moreneeded / $totalplayers, 4) . " cents per player";
} else {
$perplayerdisp = "about \$" . number_format($moreneeded / 100 / $totalplayers, 2) . " per player";
}
$out .= $bar;
if ($newkitty > 0) {
$out .= "<span style='font-size:smaller'>\$" . $moredisp . " more (" . $perplayerdisp . ") for <a href='runmodule.php?module=donationextend' target='_blank' onclick=\"" . popup("runmodule.php?module=donationextend") . ";return false;\">Extended Play</a>!</span>";
} else {
if ($session['user']['loggedin']) {
$out .= "<span class='colDkRed'><strong>The kitty is empty!</strong></span> Improbable Island is entirely dependant on your donations to survive. When the meter is empty, the Island and its creators are in trouble! Someone please chuck a couple of bucks in the hat!";
}
}
}
global $template;
//debug($template);
if (strpos($template['footer'], "{paypal_extras}")) {
//if (isset($template['{paypal_extras}'])){
//debug("Yes!");
$rep = "paypal_extras";
} else {
//debug("No!");
$rep = "paypal";
}
//$rep = "paypal_extras";
//insert display output into page
if (!array_key_exists($rep, $args) || !is_array($args[$rep])) {
$args[$rep] = array();
}
array_push($args[$rep], $out);
//write values back to database
if ($elapsed > 10) {
set_module_setting("lasttick", time());
set_module_setting("kitty", $newkitty);
}
//debug($args,true);
addcharstat("Misc");
addcharstat("Misc", "testing testing woohoo!");
break;
case "stamina-newday":
$kitty = get_module_setting("kitty");
if ($kitty >= get_module_setting("extend1cost")) {
require_once "modules/staminasystem/lib/lib.php";
$bonus = get_module_setting("extend1amt");
if ($kitty > get_module_setting("extend2cost")) {
$bonus += get_module_setting("extend2amt");
output("`0Because Improbable Island's players have been especially generous, today is a `b`5Special Extended Play`0`b day - you `2gain`0 some Stamina!`n`n");
} else {
output("`0Because Improbable Island's server costs and advertising budget have been covered quite nicely by donations, today is an `b`2Extended Play`0`b day - you `2gain`0 some Stamina!`n`n");
}
if ($session['user']['donation'] > 0) {
$bonus = $bonus * 2;
}
addstamina($bonus);
}
break;
}
return $args;
}
