$this->bbcode_second_pass_code('', '
<?php
//wüstenweg
// 24072004
require_once 'common.php';
$balance = getsetting('creaturebalance', 0.33);
// Handle updating any commentary that might be around.
addcommentary();
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('Die Wüste');
if ($session['user']['superuser']>1 && !empty($_GET['specialinc']))
{
$session['user']['specialinc'] = $_GET['specialinc'];
}
if (!empty($session['user']['specialinc']))
{
//echo "$x including special2".$session['user'][specialinc];
output('`^`c`bEtwas Besonderes!`c`b`0');
$specialinc2 = $session['user']['specialinc'];
$session['user']['specialinc'] = '';
include('special'.$specialinc);
if (!is_array($session['allowednavs']) || count($session['allowednavs'])==0)
{
west(true);
//output(serialize($session['allowednavs']));
}
page_footer();
exit();
}
if ($_GET['op']=='run')
{
if (e_rand()%3 == 0)
{
output ('`c`b`&Du bist erfolgreich vor deinem Gegner geflohen!`0`b`c`n');
$session['user']['reputation']--;
// Hall-of-"Fame"
$sql = "SELECT runaway FROM account_extra_info WHERE acctid=".$session['user']['acctid']."";
$result = db_query($sql) or die(db_error(LINK));
$rowr = db_fetch_assoc($result);
$runaway=$rowr['runaway']+1;
$sql = "UPDATE account_extra_info SET runaway=$runaway WHERE acctid=".$session[user][acctid]."";
db_query($sql);
// Ende
$_GET['op']='';
}
else
{
output('`c`b`&Dir ist es nicht gelungen deinem Gegner zu entkommen!`0`b`c');
}
}
if ($_GET['op']=='dragon')
{
addnav('Betrete die Höhle','dragon.php');
addnav('Renne weg wie ein Baby','inn.php');
output('`&Du betrittst den dunklen Eingang einer Höhle in den Tiefen der Wüste,
im Umkreis von mehreren hundert Metern sind nur kahle Wege zu erkennen.
Rauchschwaden steigen an der Decke des Höhleneinganges empor und werden plötzlich
von einer kalten Windböe verweht. Der Eingang der Höhle liegt an der Seite eines Felsens
ein Dutzent Meter über dem Boden des Waldes, wobei Geröll eine kegelförmige
Rampe zum Eingang bildet. Stalaktiten und Stalagmiten nahe des Einganges
erwecken in dir dein Eindruck, dass der Höhleneingang in Wirklichkeit
das Maul einer riesigen Bestie ist.
`n`nAls du vorsichtig den Eingang der Höhle betrittst, hörst - oder besser fühlst du,
ein lautes Rumpeln, das etwa dreißig Sekunden andauert, bevor es wieder verstummt
Du bemerkst, dass dir ein Schwefelgeruch entgegenkommt. Das Poltern ertönt erneut, und hört wieder auf,
in einem regelmäßigen Rhythmus.
`n`nDu kletterst den Geröllhaufen rauf, der zum Eingang der Höhle führt. Deine Schritte zerbrechen
die scheinbaren Überreste ehemaliger Helden.
`n`nJeder Instinkt in deinem Körper will fliehen und so schnell wie möglich zurück nach Hause...in Sicherheit!');
$session['user']['seendragon']=1;
}
if ($_GET['op']=='search')
{
checkday();
if ($session['user']['turns']<=0)
{
output('`T`bDu bist zu müde um heute die Wüste weiter zu durchsuchen. Vielleicht hast du morgen mehr Energie dazu.`b`0');
$_GET['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');
// Skip the darkhorse if the horse knows the way
if ($session['user']['hashorse'] > 0 && $playermount['tavern'] > 0)
{
$sql_add=' AND filename <> \'darkhorse.php\'';
}
$westspecial = mysql_result(mysql_query('SELECT filename FROM westspecial WHERE prio <= '.e_rand(0,3).' AND dk <='.$session['user']['dragonkills'].' ORDER BY RAND() LIMIT 1'),0,'filename');
if ($westspecial == false)
{
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 Wüstenspecial gibt, das für dich freigeschalten ist... zu dumm...');
}
$y = $HTTP_GET_VARS['op'];
$HTTP_GET_VARS['op']='';
$yy = $_GET['op'];
$_GET['op']='';
include("special2".$westspecial);
//db_query("UPDATE westspecial SET anzahl=anzahl+1 WHERE filename='".$westspecial."';");
$HTTP_GET_VARS['op']=$y;
$_GET['op']=$yy;
if (empty($nav))
{
west(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 ($_GET['type']=='slum')
{
$nlev++;
output('`&Du steuerst den Abschnitt der Wüste an, von dem du weißt, dass sich dort Feinde aufhalten, die dir ein bisschen unangenehmer sind.`0`n');
$session['user']['reputation']--;
}
if ($_GET['type']=='thrill'){
$plev++;
output('`&Du steuerst den Abschnitt der Wüste an, in dem sich Kreaturen deiner schlimmsten Albträume aufhalten, in der Hoffnung dass Du eine findest die verletzt ist.`0`n');
$session['user']['reputation']++;
}
$targetlevel = ($session['user']['level'] + $plev - $nlev );
if ($targetlevel<1) $targetlevel=1;
$sql = 'SELECT * FROM creatures_west 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);
$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 ($_GET['op']=='fight' || $_GET['op']=='run')
{
$battle=true;
}
if ($battle)
{
include('battle.php');
// output(serialize($badguy));
if ($victory)
{
//Knappen laden
$sql = 'SELECT name,state FROM disciples WHERE master='.$session['user']['acctid'];
$result = db_query($sql) or die(db_error(LINK));
$rowk = db_fetch_assoc($result);
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
);
if ($rowk['state']==14) $badguy['creaturegold']*=2;
output('`b`&'.$badguy['creaturelose'].'`0`b`n
`b`$Du hast '.$badguy['creaturename'].' erledigt!`0`b`n
`#Du erbeutest `^'.$badguy['creaturegold'].'`# Goldstücke!`n');
($session['user']['monsterkills']++);
// GILDENMOD
require_once(LIB_PATH.'dg_funcs.lib.php');
if($session['user']['guildid'] && $session['user']['guildfunc'] != DG_FUNC_APPLICANT) {
$tribute = dg_member_tribute($session['user']['guildid'],$badguy['creaturegold'],0);
dg_save_guild();
if($tribute[0] > 0) {
output('Davon zahlst du `^'.$tribute[0].'`# Goldstücke Tribut an deine Gilde.`n');
$badguy['creaturegold'] -= $tribute[0];
}
}
// END GILDENMOD
//find something
$findit=e_rand(1,27);
//Knappen helfen beim durchsuchen der Gegner
if (($rowk['state']==11) || ($rowk['state']==14))
{
output('`#'.$rowk['name'].'`# hilft dir beim Durchsuchen des Gegners`&`n');
}
if (($findit == 2 || $findit == 3) || (($findit >= 10) & ($findit <=12) && ($rowk['state']==11)))
{ //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 == 20 && e_rand(1,4)==3)
{ // item
$sql='SELECT * FROM items WHERE owner=0 AND (class=\'Beute.Prot\' OR 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'])
{
if ($row2['class']=='Beute.Prot')
{
$sql='INSERT INTO items(name,class,owner,gold,gems,description) VALUES (\''.addslashes($row2['name']).'\',\'Beute\','.$session['user']['acctid'].','.$row2['gold'].','.$row2['gems'].',\''.addslashes($row2['description']).'\')';
}
else if ($row2['class']=='Zaub.Prot')
{
$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'])."')";
}
else
{
$sql = 'UPDATE items SET owner='.$session['user']['acctid'].' WHERE id='.$row2['id'];
}
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($findit == 27 && e_rand(1,8) == 1) {
$sql = 'SELECT COUNT(*) AS anzahl FROM items WHERE class="Seltenheit" AND name="Schatzkartenteil"';
$c = db_fetch_assoc(db_query($sql));
if($c['anzahl'] < 7) {
output("`^Du findest einen Teil einer Schatzkarte!`n`n");
$sql = 'INSERT INTO items SET owner='.$session['user']['acctid'].',name="Schatzkartenteil",description="Eindeutig ein Viertelteil einer Schatzkarte! Nur schade, dass du ohne die anderen drei Teile gar nichts erkennen kannst..",class="Seltenheit",gold=4000,gems=3';
db_query($sql);
}
}
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];
$_GET['op']='';
//if ($session['user'][hitpoints] == $session['user'][maxhitpoints]){
if ($badguy['diddamage']!=1){
if ($session['user'][level]>=getsetting("lowslumlevel",4) || $session['user'][level]<=$creaturelevel){
output("`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("`b`c`&~~ Perfekter Kampf! ~~`b`\$`nEin schwierigerer Kampf hätte dir eine extra Runde gebracht.`c`n`0");
}
}
$dontdisplaywestmessage=true;
$badguy=array();
}
else
{
if($defeat)
{
// Schatzkartenteile verlieren
$lost_str = '';
if(e_rand(1,5) == 1) {
$sql = 'SELECT name,id FROM items WHERE name="Schatzkartenteil" AND owner='.$session['user']['acctid'].' ORDER BY RAND() LIMIT 1';
$res = db_query($sql);
if(db_num_rows($res)) {
$item = db_fetch_assoc($res);
$sql = 'DELETE FROM items WHERE id='.$item['id'];
db_query($sql);
$lost_str = '`4Du verlierst `^'.$item['name'].'`4!`n';
}
}
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);
addnews('`%'.$session['user']['name'].'`5 wurde in der Wüste von '.$badguy['creaturename'].' niedergemetztelt .`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']*0.7);
$session['user']['badguy']=null;
output('`b`&Du wurdest von `%'.$badguy['creaturename'].'`& niedergemetzelt!!!`n
`4Dein ganzes Gold wurde dir abgenommen!`n
`430% deiner Erfahrung hast du verloren!`n
'.$lost_str.'
Du kannst morgen weiter kämpfen.');
// Knappe verlieren
$sql = 'SELECT name,state FROM disciples WHERE master='.$session['user']['acctid'];
$result = db_query($sql) or die(db_error(LINK));
$rowk = db_fetch_assoc($result);
$kname=$rowk['name'];
$kstate=$rowk['state'];
if (($kstate>0) && ($kstate<20))
{
output('`n`^'.$kname.' `4wird von `%'.$badguy['creaturename'].'`4 überwältigt und verschleppt!`n`n');
disciple_remove();
debuglog("Verlor einen Knappen bei einer Niederlage in der Wüste.");
}
page_footer();
}
else
{
fightnav();
}
}
}
if (empty($_GET['op']))
{
// Need to pass the variable here so that we show the west message
// sometimes, but not others.
west($dontdisplaywestmessage);
}
page_footer();
?>
ich hab aber den ordner spezial2 genannt und auch in der neuen datei eingebunden..')
|
