LoGD Standardrelease steht hier zum Download zur Verfügung!

Zeige Source: /setnewday.php

Hier klicken für den Source, ODER
Weitere Dateien, von denen du den Quelltext sehen kannst:
(Das Lesen des Source, um sich spielerische Vorteile zu verschaffen, ist nicht erlaubt. Solltest du Schwachstellen oder Fehler entdecken, bist du als Spieler verpflichtet, diese zu melden.)

Source von: /setnewday.php

<?php

// 11092004

/*setweather.php
An element of the global weather mod Version 0.5
Written by Talisman
Latest version available at http://dragonprime.cawsquad.net

translation: anpera
*/
header('Content-Type: text/html; charset=utf-8');
if ((int)
getsetting("expirecontent",180)>0){
    
$sql "DELETE FROM commentary WHERE postdate<'".date("Y-m-d H:i:s",strtotime(date("r")."-".getsetting("expirecontent",180)." days"))."'";
    
db_query($sql);
    
$sql "DELETE FROM news WHERE newsdate<'".date("Y-m-d H:i:s",strtotime(date("r")."-".getsetting("expirecontent",180)." days"))."'";
    
db_query($sql);
}
$sql "DELETE FROM mail WHERE sent<'".date("Y-m-d H:i:s",strtotime(date("r")."-".getsetting("oldmail",14)."days"))."'";
db_query($sql);

switch(
e_rand(1,9)){
    case 
1:
    
$clouds="Wechselhaft und kühl, mit sonnigen Abschnitten";
                break;
                case 
2:
      
$clouds="Warm und sonnig";
                break;
                case 
3:
      
$clouds="Regnerisch";
                break;
                case 
4:
      
$clouds="Neblig";
                break;
                case 
5:
     
$clouds="Kalt bei klarem Himmel";
                break;
                case 
6:
      
$clouds="Heiß und sonnig";
                break;
                case 
7:
      
$clouds="Starker Wind mit vereinzelten Regenschauern";
                break;
                case 
8:
      
$clouds="Gewittersturm";
                break;
                case 
9:
      
$clouds="Schneeregen";
                break;        
}
savesetting("weather",$clouds);

// Vendor in town?
if (e_rand(1,3)==1){
    
savesetting("vendor","1");
    
$sql "INSERT INTO news(newstext,newsdate,accountid) VALUES ('`qDer Wanderhändler ist heute im Dorf!`0',NOW(),0)";
    
db_query($sql) or die(db_error($link));
}else{
    
savesetting("vendor","0");
}

// Other hidden paths
$spec="Keines";
$what=e_rand(1,3);
if (
$what==1$spec="Waldsee";
if (
$what==3$spec="Orkburg";
savesetting("dailyspecial","$spec");

// Gamedate-Mod by Chaosmaker
if (getsetting('activategamedate',0)==1) {
    
$date getsetting('gamedate','0000-01-01');
    
$date explode('-',$date);
    
$date[2]++;
    switch (
$date[2]) {
        case 
32:
            
$date[2] = 1;
            
$date[1]++;
            break;
        case 
31:
            if (
in_array($date[1], array(4,6,9,11))) {
                
$date[2] = 1;
                
$date[1]++;
            }
            break;
        case 
30:
            if (
$date[1]==2) {
                
$date[2] = 1;
                
$date[1]++;
            }
            break;
        case 
29:
            if (
$date[1]==&& ($date[0]%4!=|| ($date[0]%100==&& $date[0]%400!=0))) {
                
$date[2] = 1;
                
$date[1]++;
            }
    }
    if (
$date[1]==13) {
        
$date[1] = 1;
        
$date[0]++;
    }
    
$date sprintf('%04d-%02d-%02d',$date[0],$date[1],$date[2]);
    
savesetting('gamedate',$date);
}


// this now includes the database cleanup from index.php
$old getsetting("expireoldacct",45)-5;
$new getsetting("expirenewacct",10);
$trash getsetting("expiretrashacct",1);

$sql "SELECT acctid,emailaddress FROM accounts WHERE 1=0 "
.($old>0?"OR (laston < \"".date("Y-m-d H:i:s",strtotime(date("r")."-$old days"))."\")\n":"")
.
" AND emailaddress!='' AND sentnotice=0";
$result db_query($sql);
for (
$i=0;$i<db_num_rows($result);$i++){
    
$row db_fetch_assoc($result);

// can't send mail on anpera.net

    
mail($row[emailaddress],"LoGD Charakter verfällt",
    
"
    Einer oder mehrere deiner Charaktere von Legend of the Green Dragon auf 
    "
.$_SERVER['SERVER_NAME'].$_SERVER['SCRIPT_NAME']."
    verfällt demnächst und wird gelöscht. Wenn du den Charakter retten willst, solltest
     du dich bald möglichst mal damit einloggen!
     Falls der Charakter ein Haus hatte, ist dieses bereits enteignet."
,
    
"From: ".getsetting("gameadminemail","postmaster@localhost.com")
    );
    
$sql "UPDATE accounts SET sentnotice=1,house=0,housekey=0,marriedto=0 WHERE acctid='$row[acctid]'";
    if ((int)
$row[acctid]==(int)getsetting("hasegg",0)) savesetting("hasegg",stripslashes(0));
    
db_query($sql);
    
$sql "UPDATE houses SET owner=0,status=3 WHERE owner=$row[acctid] AND status=1";
    
db_query($sql);
    
$sql "UPDATE houses SET owner=0,status=4 WHERE owner=$row[acctid] AND status=0";
    
db_query($sql);
    
$sql "UPDATE items SET owner=0 WHERE owner=$row[acctid]";
    
db_query($sql);
    
$sql "DELETE FROM pvp WHERE acctid2=$row[acctid] OR acctid1=$row[acctid]";
    
db_query($sql) or die(db_error(LINK));
    
$sql "UPDATE accounts SET charisma=0,marriedto=0 WHERE marriedto=$row[acctid]";
    
db_query($sql);
}

$old+=5;
    
//Friedhof Skript by Samsa (Idee: Fenja)
        
$delaccts '0';
        
$sql "SELECT * FROM accounts WHERE superuser<=1 AND (1=0\n"
        
.($old>0?"OR (laston < \"".date("Y-m-d H:i:s",time()-3600*24*$old)."\")\n":"")
        .(
$new>0?"OR (laston < \"".date("Y-m-d H:i:s",time()-3600*24*$new)."\" AND level=1 AND dragonkills=0)\n":"")
        .(
$trash>0?"OR (laston < \"".date("Y-m-d H:i:s",time()-3600*24*($trash+1))."\" AND level=1 AND experience < 10 AND dragonkills=0)\n":"")
        .
")";
        
$result db_query($sql);
        while (
$row db_fetch_assoc($result)) {
                
$delaccts .= ','.$row['acctid'];
                if (
$row['acctid']==getsetting("hasegg",0)) savesetting("hasegg","0");
        
//Friedhof Skript by Samsa (Idee: Fenja)
        
$sql="INSERT INTO graeber (name,spruch,status,level,age,titel,dk,sex) VALUES ('".$row[login]."','".$spruch."','2','".$row[level]."','".$row[age]."','".$row[title]."','".$row[dk]."','".$row[sex]."')";
        
db_query($sql) or die(db_error(LINK));

                }
db_free_result($result);
         
$sql "DELETE FROM accounts WHERE acctid IN ($delaccts)";
        
db_query($sql) or die(db_error(LINK));
        
$sql 'DELETE FROM `rporte` WHERE acctid IN ('.$delaccts.')';
db_query($sql) or die (db_error(LINK));

   
$sql "UPDATE kinder SET mama=0 WHERE mama IN ($delaccts)";
   
db_query($sql);
   
$sql "UPDATE kinder SET papa=0 WHERE papa IN ($delaccts)";
   
db_query($sql);
        
$sql "UPDATE houses SET owner=0 WHERE owner IN ($delaccts)";
        
db_query($sql);
        
$sql "UPDATE items SET owner=0 WHERE owner IN ($delaccts) AND class='Schlüssel'";
        
db_query($sql);
        
$sql "DELETE FROM items WHERE owner IN ($delaccts) AND owner!=0";
        
db_query($sql);
        
$sql "DELETE FROM pvp WHERE acctid2 IN ($delaccts) OR acctid1 IN ($delaccts)";
        
db_query($sql) or die(db_error(LINK));
        
$sql "DELETE FROM mail WHERE msgto IN ($delaccts)";
        
db_query($sql) or die(db_error(LINK));
        
$sql "UPDATE accounts SET charisma=0,marriedto=0 WHERE marriedto IN ($delaccts)";
        
db_query($sql);
        
// end cleanup
        //Ende Friedhof Skript
    

savesetting("lastdboptimize",date("Y-m-d H:i:s"));
$result db_query("SHOW TABLES");
for (
$i=0;$i<db_num_rows($result);$i++){
    list(
$key,$val)=each(db_fetch_assoc($result));
    
db_query("OPTIMIZE TABLE $val");
}
?>