Alle Dateien, die hier eingesehen werden können, sind unter der GNU GPL lizenziert. Wenn du etwas darin findest, das du gerne hättest, so schreibe mir doch bitte eine Anfrage damit ich, wenn ich es rausgeben will, alle Änderungen raussuchen könnte. Denn ich übernehme keine Verantwortung, solltest du was rausnehmen und es geht nicht. Und Support deswegen geb ich schon gar nicht.
Solltest du eine Schwachstelle im Code finden, sei es eine kritische Lücke oder eine Möglichkeit zu cheaten, dann bitte ich dich, mir das mitzuteilen. Solltest du beim cheaten erwischt werden, werde ich deinen Account eigenhändig löschen & bannen; Solltest du meinen Server angreifen, so werde ich meine Rechtsschutzversicherung kontaktieren.
Verzeichnisse:
<?php
// 24072004
require_once "common.php";
$balance = getsetting("creaturebalance", 0.33);
// Handle updating any commentary that might be around.
addcommentary();
//savesetting("creaturebalance","0.33");
if ($_GET[op]=="darkhorse"){
$_GET[op]="";
$session[user][specialinc]="darkhorse.php";
}
if ($_GET[op]=="castle"){
$_GET[op]="";
$session[user][specialinc]="castle.php";
}
$fight = false;
page_header("Der Wald");
$session[user][ort]='Wald';
if ($session[user][superuser]>1 && $HTTP_GET_VARS[specialinc]!=""){
$session[user][specialinc] = $HTTP_GET_VARS[specialinc];
}
if ($session[user][specialinc]!=""){
//echo "$x including special/".$session[user][specialinc];
output("`^`c`bEtwas Besonderes!`c`b`0");
output("<font size='-3'>`c(Bei Fehlern bitte: ".$session['user']['specialinc']." angeben!)`c`n`n</font>",true);
$specialinc = $session[user][specialinc];
$session[user][specialinc] = "";
include("special/".$specialinc);
if (!is_array($session['allowednavs']) || count($session['allowednavs'])==0) {
forest(true);
//output(serialize($session['allowednavs']));
}
page_footer();
exit();
}
if ($HTTP_GET_VARS[op]=="run"){
if (e_rand()%3 == 0){
output ("`c`b`&Du bist erfolgreich vor deinem Gegner geflohen!`0`b`c`n");
$session[user][reputation]--;
$HTTP_GET_VARS[op]="";
}else{
output("`c`b`\$Dir ist es nicht gelungen deinem Gegner zu entkommen!`0`b`c");
}
}
if ($HTTP_GET_VARS[op]=="dragon"){
addnav("Betrete die Höhle","dragon.php");
addnav("Renne weg wie ein Baby","inn.php");
if ($session['user']['dragonkills']>=0 == $session['user']['dragonkills']<20){
output("`c<h1>`QDer Babydrachen`0</h1>`c",true);}
// Jungdrache
if ($session['user']['dragonkills']>=20 == $session['user']['dragonkills']<40) {
output("`c<h1>`^Der Jungdrachen`0</h1>`c",true);}
// weißer Drache
if ($session['user']['dragonkills']>=40 == $session['user']['dragonkills']<60) {
output("`c<h1>`&Der weiße Drache`0</h1>`c",true);}
// blauer Drache
if ($session['user']['dragonkills']>=60 == $session['user']['dragonkills']<80) {
output("`c<h1>`9Der blaue Drache`0</h1>`c",true);}
// rote Drache
if ($session['user']['dragonkills']>=80 == $session['user']['dragonkills']<100) {
output("`c<h1>`4Der rote Drache`0</h1>`c",true);}
// rosa drache
if ($session['user']['dragonkills']>=100 == $session['user']['dragonkills']<120) {
output("`c<h1>`5Der rosa Drache`0</h1>`c",true);}
// brauner Drache
if ($session['user']['dragonkills']>=120 == $session['user']['dragonkills']<140) {
output("`c<h1>`TDer braune Drache`0</h1>`c",true);}
// grauer Drache
if ($session['user']['dragonkills']>=140 == $session['user']['dragonkills']<160) {
output("`c<h1>`7Der graue Drache`0</h1>`c",true);}
// schwarzer Drache
if ($session['user']['dragonkills']>=160 == $session['user']['dragonkills']<180) {
output("`c<h1>`lDer schwarze Drache`0</h1>`c",true);}
// lila Drache
if ($session['user']['dragonkills']>=180 == $session['user']['dragonkills']<200) {
output("`c<h1>`=Der lila Drache`0</h1>`c",true);}
// grüßen Drache
if ($session['user']['dragonkills']>=200) {
output("`c<h1>`@Der Grüne Drache`0</h1>`c",true);}
output("`\$Du betrittst den dunklen Eingang einer Höhle in den Tiefen des Waldes, ");
output(" im Umkreis von mehreren hundert Metern sind die Bäume bis zu den Stümpfen niedergebrannt. ");
output("Rauchschwaden steigen an der Decke des Höhleneinganges empor und werden plötzlich ");
output("von einer kalten Windböe verweht. Der Eingang der Höhle liegt an der Seite eines Felsens ");
output("ein Dutzent Meter über dem Boden des Waldes, wobei Geröll eine kegelförmige ");
output("Rampe zum Eingang bildet. Stalaktiten und Stalagmiten nahe des Einganges ");
output("erwecken in dir dein Eindruck, dass der Höhleneingang in Wirklichkeit ");
output("das Maul einer riesigen Bestie ist. ");
output("`n`nAls du vorsichtig den Eingang der Höhle betrittst, hörst - oder besser fühlst du, ");
output("ein lautes Rumpeln, das etwa dreißig Sekunden andauert, bevor es wieder verstummt ");
output("Du bemerkst, dass dir ein Schwefelgeruch entgegenkommt. Das Poltern ertönt erneut, und hört wieder auf, ");
output("in einem regelmäßigen Rhythmus. ");
output("`n`nDu kletterst den Geröllhaufen rauf, der zum Eingang der Höhle führt. Deine Schritte zerbrechen ");
output("die scheinbaren Überreste ehemaliger Helden.");
output("`n`nJeder Instinkt in deinem Körper will fliehen und so schnell wie möglich zurück ins warme Wirtshaus und ");
output(" ".($session[user][sex]?"zum noch wärmeren Seth":"zur noch wärmeren Violet").". Was tust du?");
$session[user][seendragon]=1;
}
if ($HTTP_GET_VARS[op]=="search"){
checkday();
if ($session[user][turns]<=0){
output("`\$`bDu bist zu müde um heute den Wald weiter zu durchsuchen. Vielleicht hast du morgen mehr Energie dazu.`b`0");
$HTTP_GET_VARS[op]="";
}else{
$session[user][drunkenness]=round($session[user][drunkenness]*.9,0);
$specialtychance = e_rand()%7;
if ($specialtychance==0){
output("`^`c`bEtwas Besonderes!`c`b`0");
if ($handle = opendir("special")){
// Skip the darkhorse if the horse knows the way
if ($playermount!=0 && $playermount['tavern'] > 0) {$sql_add=" AND filename <> 'darkhorse.php'";}
$waldspecial = @mysql_result(mysql_query("SELECT filename FROM waldspecial WHERE prio <= ".e_rand(0,3)." AND dk <=".$session[user][dragonkills]." ORDER BY RAND() LIMIT 1"),0,"filename");
if ($waldspecial=='') {output("`b`@Arrr, dein Administrator hat entschieden, dass es dir nicht erlaubt ist, besondere Ereignisse zu haben. Beschwer dich bei ihm, nicht beim Programmierer. Es könnte natürlich auch sein, dass es kein Waldspecial gibt, das für dich freigeschalten ist... zu dumm..");}
output("<font size='-3'>`c(Bei Fehlern bitte: ".$waldspecial." angeben!)`c`n`n</font>",true);
$y = $HTTP_GET_VARS[op];
$HTTP_GET_VARS[op]="";
include("special/".$waldspecial);
$HTTP_GET_VARS[op]=$y;
}
if ($nav=="") forest(true);
}else{
$session[user][turns]--;
$battle=true;
if (e_rand(0,2)==1){
$plev = (e_rand(1,5)==1?1:0);
$nlev = (e_rand(1,3)==1?1:0);
}else{
$plev=0;
$nlev=0;
}
if ($HTTP_GET_VARS['type']=="slum"){
$nlev++;
output("`\$Du steuerst den Abschnitt des Waldes an, von dem du weißt, dass sich dort Feinde aufhalten, die dir ein bisschen angenehmer sind.`0`n`n");
$session[user][reputation]--;
}
if ($HTTP_GET_VARS['type']=="thrill"){
$plev++;
output("`\$Du steuerst den Abschnitt des Waldes an, in dem sich Kreaturen deiner schlimmsten Albträume aufhalten, in der Hoffnung dass Du eine findest die verletzt ist.`0`n`n");
$session[user][reputation]++;
}
$targetlevel = ($session['user']['level'] + $plev - $nlev );
if ($targetlevel<1) $targetlevel=1;
$sql = "SELECT * FROM creatures WHERE creaturelevel = $targetlevel ORDER BY rand(".e_rand().") LIMIT 1";
$result = db_query($sql) or die(db_error(LINK));
$badguy = db_fetch_assoc($result);
$expflux = round($badguy['creatureexp']/10,0);
// more XP per DK
// $badguy['creatureexp']+=round($session['user']['dragonkills']/300 * $badguy['creatureexp']);
$expflux = e_rand(-$expflux,$expflux);
$badguy['creatureexp']+=$expflux;
//make badguys get harder as you advance in dragon kills.
//output("`#Debug: badguy gets `%$dk`# dk points, `%+$atkflux`# attack, `%+$defflux`# defense, +`%$hpflux`# hitpoints.`n");
$badguy['playerstarthp']=$session['user']['hitpoints'];
$dk = 0;
while(list($key, $val)=each($session[user][dragonpoints])) {
if ($val=="at" || $val=="de") $dk++;
}
$dk += (int)(($session['user']['maxhitpoints']-
($session['user']['level']*10))/5);
if (!$beta) $dk = round($dk * 0.25, 0);
else $dk = round($dk,0);
$atkflux = e_rand(0, $dk);
if ($beta) $atkflux = min($atkflux, round($dk/4));
$defflux = e_rand(0, ($dk-$atkflux));
if ($beta) $defflux = min($defflux, round($dk/4));
$hpflux = ($dk - ($atkflux+$defflux)) * 5;
$badguy['creatureattack']+=$atkflux;
$badguy['creaturedefense']+=$defflux;
$badguy['creaturehealth']+=$hpflux;
if ($beta) {
$badguy['creaturedefense']*=0.66;
$badguy['creaturegold']*=(1+(.05*$dk));
if ($session['user']['race']==4) $badguy['creaturegold']*=1.1;
} else {
if ($session['user']['race']==4) $badguy['creaturegold']*=1.2;
}
$badguy['diddamage']=0;
$session['user']['badguy']=createstring($badguy);
if ($beta) {
if ($session['user']['superuser']>=3){
output("Debug: $dk dragon points.`n");
output("Debug: +$atkflux attack.`n");
output("Debug: +$defflux defense.`n");
output("Debug: +$hpflux health.`n");
}
}
}
}
}
if ($HTTP_GET_VARS[op]=="fight" || $HTTP_GET_VARS[op]=="run"){
$battle=true;
}
if ($battle){
include("battle.php");
// output(serialize($badguy));
if ($victory){
if (getsetting("dropmingold",0)){
$badguy[creaturegold]=e_rand($badguy[creaturegold]/4,3*$badguy[creaturegold]/4);
}else{
$badguy[creaturegold]=e_rand(0,$badguy[creaturegold]);
}
$expbonus = round(
($badguy[creatureexp] *
(1 + .25 *
($badguy[creaturelevel]-$session[user][level])
)
) - $badguy[creatureexp],0
);
output("`b`&$badguy[creaturelose]`0`b`n");
output("`b`\$Du erledigst $badguy[creaturename]!`0`b`n");
output("`n`#Du bekommst `^$badguy[creaturegold]`# Gold!`n");
if ($badguy['creaturegold']) {
//debuglog("received {$badguy['creaturegold']} gold for slaying a monster.");
// Guilds/Clans Code
if ($session['user']['guildID']!=0) {
$MyGuild=&$session['guilds'][$session['user']['guildID']];
if (isset($MyGuild)) {
$GuildFee = round((($MyGuild['PercentOfFightsEarned']['FF']/100) * $badguy['creaturegold']),0);
if ($GuildFee<=0) $GuildFee=(($session['user']['level']*10) * ($MyGuild['PercentOfFightsEarned']['FF']/100)+1);
output("`3Deine Gilde fordert ihren Anteil. Du zahlst `^".$GuildFee." Gold `3Tribut.`n`#");
if ($session['user']['gold']<$GuildFee) {
$session['user']['goldinbank']+=($session['user']['gold']-$GuildFee);
$session['user']['gold']=0;
output("Du zahlst einen Teil des Tributs direkt von der Bank!`n");
} else {
$session['user']['gold']-=$GuildFee;
}
$MyGuild['gold']+=$GuildFee;
update_guild_info($MyGuild);
} else {
// Error
// Their guildID is set but the information cannot be retrieved
$debug=print_r($session['user']['guildID'],true);
debuglog("MyGuild isn't set: ".$debug);
}
} else if ($session['user']['clanID']!=0) {
$MyClan=&$session['guilds'][$session['user']['clanID']];
if (isset($MyClan)) {
$ClanFee = round((($MyClan['PercentOfFightsEarned']['FF']/100) * $badguy['creaturegold']),0);
if ($ClanFee<=0) $ClanFee=(($session['user']['level']*10) * ($MyClan['PercentOfFightsEarned']['FF']/100)+1);
output("`3Deine Clan fordert ihren Anteil. Du zahlst `^".$ClanFee." Gold `3Tribut.`n`#");
if ($session['user']['gold']<$ClanFee) {
$session['user']['goldinbank']+=($session['user']['gold']-$ClanFee);
$session['user']['gold']=0;
output("Du zahlst einen Teil des Tributs direkt von der Bank!`n");
} else {
$session['user']['gold']-=$ClanFee;
}
$MyClan['gold']+=$ClanFee;
update_guild_info($MyClan);
} else {
// Error
// Their guildID is set but the information cannot be retrieved
$debug=print_r($session['user']['clanID'],true);
debuglog("MyClan isn't set: ".$debug);
}
}else{
// They don't belong to a guild oder Clan
}
//
}
//find something
$findit=e_rand(1,27);
if ($findit == 2) { //rohdiamanten(ehemalig gem)
output("`&Du findest EINEN ROHDIAMANT!`n`#");
$session['user']['rohdiamant']++;
//debuglog("found a gem when slaying a monster.");
}
if ($findit == 5) $session['user']['donation']+=1;
if (($findit == 10 || $findit == 20 || $findit == 15 || $findit == 30) && e_rand(1,3)==1){
$sql="SELECT * FROM items WHERE owner=0 AND class='Beute.Prot' AND value1 <= ".e_rand(0,3)." ORDER BY rand(".e_rand().") LIMIT 1";
$result = db_query($sql) or die(db_error(LINK));
$row2 = db_fetch_assoc($result);
if ($row2[name]){
$sql="INSERT INTO items(name,class,owner,gold,gems,value2,hvalue,description) VALUES ('".$row2['name']."','Beute','".$session['user']['acctid']."','".$row2['gold']."','".$row2['gems']."','".$row2['value2']."','".$row2['hvalue']."','".$row2['description']."')";
db_query($sql) or die(sql_error($sql));
output("`n`qBeim Durchsuchen von $badguy[creaturename] `qfindest du `&$row2[name]`q! ($row2[description])`n`n`#");
}
}
if ($findit == 17 && e_rand(1,4) == 3) {
$sql="SELECT * FROM items WHERE owner=0 AND class='Zaub.Prot' ORDER BY rand(".e_rand().") LIMIT 1";
$result = db_query($sql) or die(db_error(LINK));
$row2 = db_fetch_assoc($result);
if ($row2[name]){
$row2[description].=" (gebraucht)";
$row2[value1]=e_rand(1,$row2[value2]);
$row2[gold]=$row2[gold]*(($row2[value1]+1)/($row2[value2]+1));
$sql="INSERT INTO items(name,class,owner,gold,gems,value1,value2,hvalue,description,buff) VALUES ('".addslashes($row2[name])."','Zauber',".$session[user][acctid].",$row2[gold],0,$row2[value1],$row2[value2],$row2[hvalue],'".addslashes($row2[description])."','".addslashes($row2[buff])."')";
db_query($sql) or die(sql_error($sql));
output("`n`qBeim Durchsuchen von $badguy[creaturename] `qfindest du `&$row2[name]`q! ($row2[description])`n`n`#");
}
}
if ($findit == 25 && e_rand(1,6)==2){ // armor
$sql = "SELECT * FROM armor WHERE defense<=".$session[user][level]." ORDER BY rand(".e_rand().") LIMIT 1";
$result2 = db_query($sql) or die(db_error(LINK));
if (db_num_rows($result2)>0){
$row2 = db_fetch_assoc($result2);
$row2['value']=round($row2['value']/10);
$sql="INSERT INTO items(name,class,owner,gold,value1,description) VALUES ('".addslashes($row2[armorname])."','Rüstung',".$session[user][acctid].",$row2[value],$row2[defense],'Gebrauchte Level $row2[level] Rüstung mit $row2[defense] Verteidigung.')";
db_query($sql) or die(sql_error($sql));
output("`n`QBeim Durchsuchen von $badguy[creaturename] `Qfindest du die Rüstung `%$row2[armorname]`Q!`n`n`#");
}
}
if ($findit == 26 && e_rand(1,6)==2){ // weapon
$sql = "SELECT * FROM weapons WHERE damage<=".$session[user][level]." ORDER BY rand(".e_rand().") LIMIT 1";
$result2 = db_query($sql) or die(db_error(LINK));
if (db_num_rows($result2)>0){
$row2 = db_fetch_assoc($result2);
$row2['value']=round($row2['value']/10);
$sql="INSERT INTO items(name,class,owner,gold,value1,description) VALUES ('".addslashes($row2[weaponname])."','Waffe',".$session[user][acctid].",$row2[value],$row2[damage],'Gebrauchte Level $row2[level] Waffe mit $row2[damage] Angriffswert.')";
db_query($sql) or die(sql_error($sql));
output("`n`QBeim Durchsuchen von $badguy[creaturename] `Qfindest du die Waffe `%$row2[weaponname]`Q!`n`n`#");
}
}
if ($expbonus>0){
output("`#*** Durch die hohe Schwierigkeit des Kampfes erhältst du zusätzlich `^$expbonus`# Erfahrungspunkte! `n($badguy[creatureexp] + ".abs($expbonus)." = ".($badguy[creatureexp]+$expbonus).") ");
}else if ($expbonus<0){
output("`#*** Weil dieser Kampf so leicht war, verlierst du `^".abs($expbonus)."`# Erfahrungspunkte! `n($badguy[creatureexp] - ".abs($expbonus)." = ".($badguy[creatureexp]+$expbonus).") ");
}
output("Du bekommst insgesamt `^".($badguy[creatureexp]+$expbonus)."`# Erfahrungspunkte!`n`0");
$session[user][gold]+=$badguy[creaturegold];
$session[user][experience]+=($badguy[creatureexp]+$expbonus);
$creaturelevel = $badguy[creaturelevel];
$HTTP_GET_VARS[op]="";
//if ($session[user][hitpoints] == $session[user][maxhitpoints]){
if ($badguy['diddamage']!=1){
if ($session[user][level]>=getsetting("lowslumlevel",4) || $session[user][level]<=$creaturelevel){
output("`n`n`b`c`&~~ Perfekter Kampf! ~~`\$`n`bDu erhältst eine Extrarunde!`c`0`n");
$session[user][turns]++;
if ($expbonus>0){
$session['user']['donation']+=1;
}
}else{
output("`n`n`b`c`&~~ Perfekter Kampf! ~~`b`\$`nEin schwierigerer Kampf hätte dir eine extra Runde gebracht.`c`n`0");
}
}
$dontdisplayforestmessage=true;
addhistory(($badguy['playerstarthp']-$session['user']['hitpoints'])/max($session['user']['maxhitpoints'],$badguy['playerstarthp']));
$badguy=array();
}else{
if($defeat){
addnav("Tägliche News","news.php");
$sql = "SELECT taunt FROM taunts ORDER BY rand(".e_rand().") LIMIT 1";
$result = db_query($sql) or die(db_error(LINK));
$taunt = db_fetch_assoc($result);
$taunt = str_replace("%s",($session[user][sex]?"sie":"ihn"),$taunt[taunt]);
$taunt = str_replace("%o",($session[user][sex]?"sie":"er"),$taunt);
$taunt = str_replace("%p",($session[user][sex]?"ihr":"sein"),$taunt);
$taunt = str_replace("%x",($session[user][weapon]),$taunt);
$taunt = str_replace("%X",$badguy[creatureweapon],$taunt);
$taunt = str_replace("%W",$badguy[creaturename],$taunt);
$taunt = str_replace("%w",$session[user][name],$taunt);
addhistory(1);
addnews("`%".$session[user][name]."`5 wurde im Wald von $badguy[creaturename] niedergemetzelt.`n$taunt");
$session[user][alive]=false;
debuglog("lost {$session['user']['gold']} gold when they were slain in the forest");
$session[user][gold]=0;
$session[user][hitpoints]=0;
$session[user][experience]=round($session[user][experience]*.9,0);
$session[user][badguy]="";
output("`n`b`&Du wurdest von `%$badguy[creaturename]`& niedergemetzelt!!!`n");
output("`4Dein ganzes Gold wurde dir abgenommen!`n");
output("`410% deiner Erfahrung hast du verloren!`n");
output("Du kannst morgen weiter kämpfen.");
page_footer();
}else{
fightnav();
}
}
}
if ($HTTP_GET_VARS[op]==""){
// Need to pass the variable here so that we show the forest message
// sometimes, but not others.
forest($dontdisplayforestmessage);
}
page_footer();
function addhistory($value){
/*
global $session,$balance;
$history = unserialize($session['user']['history']);
$historycount=50;
for ($x=0;$x<$historycount;$x++){
if (!isset($history[$x])) $history[$x]=$balance;
}
array_shift($history);
array_push($history,$value);
$history = array_values($history);
for ($x=0;$x<$historycount;$x++){
$history[$x] = round($history[$x],4);
if ($session['user']['superuser']>=3) output("History: {$history[$x]}`n");
}
$session['user']['history']=serialize($history);
*/
}
?>