|
|
De premiespaarregeling
Hoe het vrijkomen van geblokkeerde gelden voorkomt dat planten en dieren definitief uitsterven...
Deze week leek het wel of wij iedere dag de loterij wonnen. Telkens als we de brievenbus hoorde klapperen, renden wij naar de gang om te kijken welke kapitalistische instelling nu weer geld voor ons had. Door een combinatie van veel verschillende banen en wetgeving, waardoor de tegoeden van de spaarloonregeling vrijkomen, was het afgelopen week bijna dagelijks feest in huize Makaske-Jansen. Wat een genot om steeds te lezen dat er weer een bankrekening met al lang vergeten Euri om opheffing schreeuwt.
Nou won Corine - doordat zij steeds van baan was gewisseld - meer prijzen dan ik, maar gelukkig kreeg ik ook een envelop. De ASN bank herinnerde mij aan lang vervlogen tijden dat ik geld verdiende in het zweet des aanschijns. Toen had ik geen tijd om al het verdiende geld te laten stromen. Nu heb ik geen geld om de tijd te laten stromen. Maar daar is ineens verandering in gekomen. Ook ik blijk nog over een verborgen pot met geld te beschikken. En dan ga je natuurlijk direct nadenken hoe je met zo'n vermogen moet omgaan. Uiteindelijk kwam ik tot drie potentiële mogelijkheden.
1. Ik laat het bedrag staan op de rekening van de ASN bank. Deze maatschappelijk verantwoorde instelling belooft dat ze er milieu en natuurvriendelijke beleggingen mee gaan plegen en dat ik in ruil daarvoor 2,5% rente ontvang. Op zich niet slecht en ook nog voor een goed doel.
2. Ik haal het bedrag van de rekening bij de ASN, doek die rekening op en stop het geld in een kapitalistische spaarvarken met meer geslachtsdrift waardoor ik nog rijker word.
Maar waarom eigenlijk. Voor wie moet ik rijk worden? Moet ik geld achter de hand houden voor het geval er oorlog komt? In zowel de Eerste als de Tweede Wereldoorlog steeg de verkoop van boeken enorm. De mensen gingen massaal lezen om hun zinnen te verzetten. In oorlogstijd loop je als antiquaar helemaal binnen. Oorlog is dus goed en het heeft helemaal geen zin daarvoor te gaan sparen!
3. Ik zou het geld ook kunnen uitgeven. Deze week las ik in de krant dat over 30 tot 50 jaar 25 tot 30 procent van alle nu nog aanwezige planten en diersoorten is uitgestorven. Dat komt door het broeikaseffect. Het heeft dus geen zin om het geld via de ASN bank te laten beleggen in natuurprojecten want die zijn ten dode opgeschreven. Mogelijkheid 1 valt dus ook af.
Geldt voor de mens: wie schrijft, die blijft. Voor uitstervende planten en dieren geldt in deze bange dagen: wie nu niet wordt gefotografeerd, die verteert!
Dus waarde lezer, de meest nobele oplossing voor mij is het geld te investeren in een super telelens om daarmee de uitstervende natuur voor eeuwig vast te leggen. Dan ben ik pas maatschappelijk verantwoord bezig en bewijs ik de uitstervende planten en dieren een dienst omdat ze dan tot in lengte van jaren bewonderd kunnen worden.
U zult nog even moeten wachten op de resultaten. De levertijd is een week of drie. Dan kan ik aan de gang met de 50 - 500 mm Sigmalens (predikaat: Super getest in Focus "Maandblad voor fotografie en imaging").
Nu maar hopen dat er in die tussentijd geen planten en dieren verdwijnen, maar ja... dat is dan de schuld van de lensverkoopmeneren en/of ditomevrouwen.
© Harold Makaske 18 januari 2004 to allow skipping count when used in template (ie to not count on click in main page)
V1.4
- Fixed ignoe same IP count problem
V1.5
- Added views_log table and changed plugin performance to check for unique visits by IP address. [gRegor]
- Added option to set the length of time before re-counting hits from the same IP address (default: 2 hours) [gRegor]
V1.6
- Added plugin menu to display all view count, w/ counter reset function
- Delete view counter and log for deleted item
V1.7
- use sql_query
V1.8
- Admin page enhancement to preserve order and sort info
v1.9
- Added item title in admin menu
v1.9.1
- ignore draft in admin menu
*/
class NP_Views extends NucleusPlugin {
// Note: I never run this plugin on 2.0 and have no idea whether it
// wil work on <2.5. A user can simply chnage it to return
// '200' and see if it works (likely will). I will gladly
// change the min version to 2.0 and add the sql_table fix
// upon such report. 8)
function getMinNucleusVersion() {
return '250';
}
function getName() {
return 'Views';
}
function getAuthor() {
return 'Rodrigo Moraes | Edmond Hui (admun) | gRegor Morrill';
}
function getURL() {
return 'http://www.tipos.com.br';
}
function getVersion() {
return '1.9.1';
}
function getDescription() {
return 'This plugin counts how many times an entry has been displayed.';
}
function getEventList() {
return array('PostAddItem', 'QuickMenu', 'PostDeleteItem');
}
function supportsFeature($what) {
switch($what) {
case 'SqlTablePrefix':
return 1;
default:
return 0;
}
}
function getTableList() {
return array( sql_table('plugin_views'), sql_table('plugin_views_log') );
}
function install() {
sql_query('CREATE TABLE IF NOT EXISTS ' . sql_table('plugin_views') . ' (id int(11) NOT NULL default "0", views int(15) NOT NULL default "0")');
sql_query('CREATE TABLE IF NOT EXISTS ' . sql_table('plugin_views_log') . ' (id int(11) NOT NULL auto_increment, ip varchar(20) NOT NULL default "", itemid int(11) NOT NULL default "0", viewtime varchar(32) NOT NULL default "", PRIMARY KEY (id)
)');
$this->createOption('silent','Silent mode - No #Display shown in Item (still need to add the skinVar, for use with MostViewed)','yesno','no');
$this->createOption('deletetables','Delete this plugin\'s table and data when uninstalling?','yesno','yes');
$this->createOption('timespan', 'Hours to wait before re-counting visitors', 'text', '2');
}
function unInstall() {
if ($this->getOption('deletetables') == 'yes') {
sql_query('DROP TABLE ' . sql_table('plugin_views') );
sql_query('DROP TABLE ' . sql_table('plugin_views_log') );
}
}
function hasAdminArea() {
return 1;
}
/**
* Adds an entry to the 'Quick Menu' on the Nucleus administration pages.
* The entry will link to the commentcontrol admin page
*/
function event_QuickMenu(&$data) {
global $member;
if (!($member->isLoggedIn() && $member->isAdmin())) return;
array_push(
$data['options'],
array(
'title' => 'View Counts',
'url' => $this->getAdminURL(),
'tooltip' => 'See the view count of all items'
)
);
}
function doTemplateVar(&$item, $input) {
$itemid = $item->itemid;
$remote_ip = ServerVar('REMOTE_ADDR');
$timespan = $this->getOption('timespan') * 3600;
$now = time();
// get the current Views count
$query = "SELECT views FROM " . sql_table('plugin_views') . " WHERE id=" . $itemid;
$result = sql_query($query);
$row = mysql_fetch_object($result);
$views = intval($row->views);
// Only do count updates if "skipcount" is not set
if ($input != 'skipcount')
{
// This takes care of previous items
if (mysql_num_rows($result) == 0)
{
$query = "INSERT INTO " . sql_table('plugin_views') . " (id, views) VALUES('$itemid', '1')";
sql_query($query);
//$views = 0;
} // end if
// Check the views_log table to see if this IP has a viewtime for this item
$query = "SELECT viewtime FROM " . sql_table('plugin_views_log') . " WHERE ip='" . $remote_ip . "' AND itemid=" . $itemid;
$result = sql_query($query);
// No views from this IP in the past X hours, so update the Views count
if (mysql_num_rows($result) == 0)
{
$views++;
$this->_updateViewsCount($itemid, $views);
$this->_addViewsLog($itemid, $remote_ip, $now);
} // end if
else
{
$viewtime = mysql_result($result, 0, 'viewtime');
// It's been longer than X hours, so recount
if (($now - $timespan) > $viewtime)
{
$views++;
$this->_updateViewsCount($itemid, $views);
$this->_updateViewsLog($itemid, $remote_ip, $now);
}
} // end else
} // end if
// Clear logs that are more than X hours old
$time = $now - $timespan;
$query = "DELETE FROM " . sql_table('plugin_views_log') . " WHERE (viewtime < $time)";
sql_query($query);
if ($this->getOption('silent') == 'no') {
echo $views;
} // end if
}
function event_PostAddItem($data) {
$itemid = $data['itemid'];
$query = "INSERT INTO " . sql_table('plugin_views') . " (id, views) VALUES('$itemid', '0')";
sql_query($query);
}
function event_PostDeleteItem($data) {
$itemid = $data['itemid'];
$query = "DELETE FROM " . sql_table('plugin_views') . " WHERE id=". $itemid;
sql_query($query);
$query = "DELETE FROM " . sql_table('plugin_views_log') . " WHERE itemid=". $itemid;
sql_query($query);
}
function _updateViewsCount($itemid, $views) {
// update the Views table with the new count
$query = "UPDATE " . sql_table('plugin_views') . " SET views='$views' WHERE id=$itemid";
sql_query($query);
}
function _addViewsLog($itemid, $ip, $time) {
// add IP and itemid to views_log table so it won't be recounted for X hours
$query = "INSERT INTO " . sql_table('plugin_views_log') . " (ip, itemid, viewtime) VALUES ('$ip', '$itemid', '$time')";
sql_query($query);
}
function _updateViewsLog($itemid, $ip, $time) {
// update the views_log viewtime so it won't be recounted for X hours
$query = "UPDATE " . sql_table('plugin_views_log') . " SET viewtime='$time' WHERE ip='$ip'";
sql_query($query);
}
function doAction($actionType) {
global $CONF, $member;
if (!($member->isLoggedIn() && $member->isAdmin())) return 'Sorry. not allowed';
if ($actionType == 'resetview'){
$id = requestVar('id');
$query = "UPDATE " . sql_table('plugin_views') . " SET views=0 WHERE id=$id";
sql_query($query);
} else if ($actionType == 'resetallview') {
$query = "UPDATE " . sql_table('plugin_views') . " SET views=0";
sql_query($query);
}
$order = requestVar('order');
$sort = requestVar('sort');
header('Location: ' . $CONF['PluginURL'] . 'views/index.php?sort=' . $sort . '&order='.$order);
}
}
?>
-
Hoofdstuk: 1. Belevenissen
|
