Can use this to base others on.
<?
if (!isset($session)) exit();
if ($HTTP_GET_VARS[op]==""){
output("`@You encounter a strange old man! His eyes are sunken in, and he has what looks like a permanent scowl fixed on his face. You feel an evil radiating off of him.`n`n");
output("He see's you and says, \"`#Ahh... Come here me little ".($session[user][sex]?"lassy":"laddy").". 'Tis fearfull dangerous out in these woods, don't y' know?`@\"`n`n");
output("Will you do as he says and go to him? You know that if you do you'll lose a forest fight.");
output("`n`n<a href='forest.php?op=necromancer'>Walk to
him</a>`n<a href='forest.php?op=leave'>Leave him here</a>",true);
addnav("Walk to him","forest.php?op=necromancer");
addnav("Leave him here","forest.php?op=leave");
addnav("","forest.php?op=necromancer");
addnav("","forest.php?op=leave");
$session[user][specialinc] = "necromancer.php";
}else if ($HTTP_GET_VARS[op]=="necromancer"){
$session[user][turns]--;
output("`@Regardless of his obviously evil nature, you walk up to the old man. As you approach him, his face twists ");
output("into an evil grin. ");
switch(e_rand(1,15)){
case 1:
output("When you reach him he mutters, \"`#Didn't y' own mother teach you never t' talk t' strangers?`@\" The old necromancer cackles an evil laugh and pulls out a ");
output("black wand and waves it over your head. You feel a searing pain as your spirit is ripped from your ");
output("body.");
output("`n`n`^Your spirit has been ripped from you body!`n");
output("That treacherous old man searches your body and takes all your gold!`n");
output("You loose 15% of experience.`n");
output("You may continue playing again tomorrow.");
$session[user][alive]=false;
$session[user][hitpoints]=0;
$session[user][experience]*=0.85;
$session[user][gold] = 0;
addnav("Daily News","news.php");
addnews($session[user][name]."'s body was found in the woods, completely stripped of all gold.");
break;
case 2:
case 3:
output("When you reach him he mutters, \"`#Aye, me ".($session[user][sex]?lass:lad).", come a wee bit closer. That's it just a bit CLOSER!`@\" ");
output("As old necromancer screams that last word, he pulls out a black wand, and racks your body with pain. ");
output("It's like molten fire running through your bones, blood and skin. Just as death seems to grip you, ");
output("the pain stops. You get up, shakking from the pain. The old necromancer is no where in sight. You feel ");
output("like you'll never be what you used to be before you met that old man...");
if ($session[user][maxhitpoints]>1){
$session[user][maxhitpoints]-=1;
output("`n`n`^You `bpermenantly`b loose one hitpoint!`n");
}
output("Your hitpoints are reduced to one!`n");
$session[user][hitpoints]=1;
addnews($session[user][name]." came home from the forest, a bit less than what ".($session[user][sex]?she:he)." used to be.");
break;
case 4:
case 5:
case 6:
case 7:
output(" When you reach him he mutters, \"`#A gem for me own self, yes?`@\"`n`n");
output("Do you give him a gem?");
output("`n`n<a href='forest.php?op=GiveGem'>Give him a Gem</a>`n<a href='forest.php?op=KeepGem'>Keep your Gems</a>",true);
addnav("Give him a Gem","forest.php?op=GiveGem");
addnav("Keep your Gems","forest.php?op=KeepGem");
addnav("","forest.php?op=GiveGem");
addnav("","forest.php?op=KeepGem");
$session[user][specialinc] = "necromancer.php";
break;
case 8:
case 9:
case 10:
case 11:
case 12:
case 13:
case 14:
case 15:
output("You are almost in front of him, when you here a crashing sound come from your right. You turn to look ");
output("see one of the village gaurds walking through the woods, heading back to the village. You turn back to ");
output("the old man, but it seems that the noise had scared him off. Oh well, you'll never know what he wanted ");
output("now.");
break;
}
//addnav("Return to the forest","forest.php");
}else if ($HTTP_GET_VARS[op]=="leave"){
output("`@Fearing the evil power radiating from the man, you turn around and run as fast as you can! ");
//addnav("Return to the forest","forest.php");
$session[user][specialinc]="";
}else if($HTTP_GET_VARS[op]=="GiveGem"){
if ($session[user][gems]>0){
output("`@Fealing sorry for the old man, you give him one of your hard earned gems. He snatches it away from you and ");
switch (e_rand(0,5)){
case 1:
case 2:
case 3:
case 4:
output("cackles with glee. He turns to you and says, \"`#Since y' made such a fine bargin me ");
output(($session[user][sex]?"deary":"lad").", I'll be putting in a good word for y' with me ol' friend");
output("`$ Ramius`#.`@\"`n The necromancer pulls out a black wand from behind his back, raps you on the head, ");
output("and runs off into the forest.`n`n");
$favor = e_rand(5, 35);
output("`^You gain `&$favor`^ favor with`$ Ramius`^, Overlord of Death.");
$session[user][deathpower] += $favor;
$session[user][gems]--;
debuglog("gained $favor favor from a necromancer");
break;
case 5:
output("runs off into the forest. That greedy lttle thief stole your gem!");
$session[user][gems]--;
debuglog("lost one gem to an old man");
}
}else{
output("`@You reach into your pack to find that you have no gems. The old man looks at you expectantly. When he sees ");
output("that you have no gems, he starts to frown. Sensing trouble, you turn tail and flee the scene.");
}
}else if ($HTTP_GET_VARS[op]=="KeepGem"){
output("`@Not wanting to part with one of your precious gems, you turn around and march back into the forest.");
//addnav("Return to the forest","forest.php");
$session[user][specialinc]="";
}
?>
