/
healer.php
executable file
·126 lines (119 loc) · 6.55 KB
/
healer.php
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
<?php
// addnews ready
// translator ready
// mail ready
require_once("common.php");
require_once("lib/forest.php");
require_once("lib/http.php");
require_once("lib/villagenav.php");
tlschema("healer");
$config = unserialize($session['user']['donationconfig']);
$return = httpget("return");
$returnline = $return>""?"&return=$return":"";
page_header("Hospital Tent");
$cost = log($session['user']['level']) * (($session['user']['maxhitpoints']-$session['user']['hitpoints']) + 10);
$result=modulehook("healmultiply",array("alterpct"=>1.0));
$cost*=$result['alterpct'];
$cost = round($cost,0);
$op = httpget('op');
if ($op==""){
checkday();
output("`3You duck into the pitiful tent. The overpowering odour of blood, disinfectant and crankcase oil makes you cough, attracting the attention of a grizzled old person that does a remarkable job of reminding you of a rock, which probably explains why you didn't notice them until now.`n`n");
if ($session['user']['hitpoints'] < $session['user']['maxhitpoints']){
output("\"`6See you, I do. Before you did see me, I think, hmm?`3\" the old thing remarks.");
output("\"`6Know you, I do; healing you seek. Willing to heal am I, but only if willing to pay are you.`3\"`n`n");
output("\"`5Uh, um. How much?`3\" you ask, ready to be rid of the smelly old thing.`n`n");
output("The old being thumps your ribs with a gnarly staff. \"`6For you... `$`b%s`b`6 gold pieces for a complete heal!!`3\" it says as it bends over and pulls a clay vial from behind a pile of skulls sitting in the corner.", $cost);
output("The view of the thing bending over to remove the vial almost does enough mental damage to require a larger potion.");
output("\"`6O' course, I could jus' hand you over to the work-experience lads,`3\" he continues, gesturing at a table of eager-looking youths. \"`3They'll be cheaper, but I dunno if they'll do as good a job.`6\"");
}elseif($session['user']['hitpoints'] == $session['user']['maxhitpoints']){
output("`3The old creature grunts as it looks your way. \"`6Need a potion, you do not. Wonder why you bother me, I do.`3\" says the hideous thing.");
output("The stench of antiseptic and crankcase oil makes you wish you hadn't come in here in the first place. You think you had best leave.");
}else{
output("`3The old creature glances at you, then in a `^whirlwind of movement`3 that catches you completely off guard, brings its gnarled staff squarely in contact with the back of your head.");
output("You gasp as you collapse to the ground.`n`n");
output("Slowly you open your eyes and realize the beast is emptying the last drops of a clay vial down your throat.`n`n");
output("\"`6No charge for that potion.`3\" is all it has to say.");
output("You feel a strong urge to leave as quickly as you can.");
$session['user']['hitpoints'] = $session['user']['maxhitpoints'];
}
}elseif ($op=="buy"){
$pct = httpget('pct');
$newcost=round($pct*$cost/100,0);
if ($session['user']['gold']>=$newcost){
$session['user']['gold']-=$newcost;
debuglog("spent gold on healing",false,false,"healing",$newcost);
$diff = round(($session['user']['maxhitpoints']-$session['user']['hitpoints'])*$pct/100,0);
$session['user']['hitpoints'] += $diff;
output("`3With a grimace, you up-end the potion the creature hands you, and despite the foul flavor, you feel a warmth spreading through your veins as your muscles knit back together.");
if($newcost){
output("`3With a grimace, you up-end the potion the creature hands you, and despite the foul flavor, you feel a warmth spreading through your veins as your muscles knit back together.");
output("Staggering some, you hand it your gold and are ready to be out of here.");
}else{
output("`3With a grimace, you up-end the potion the creature hands you, and despite the foul flavor, you feel a warmth spreading through your veins.");
output("Staggering some you are ready to be out of here.");
}
output("`n`n`3You have been healed for %s points!", $diff);
}else{
output("`3The old creature pierces you with a gaze hard and cruel.");
output("Your lightning quick reflexes enable you to dodge the blow from its gnarled staff.");
output("Perhaps you should get some more money before you attempt to engage in local commerce.`n`n");
output("You recall that the creature had asked for `b`\$%s`3`b gold.", $newcost);
}
}elseif ($op=="companion"){
$compcost = httpget('compcost');
if($session['user']['gold'] < $compcost){
output("`3The old creature pierces you with a gaze hard and cruel.`n");
output("Your lightning quick reflexes enable you to dodge the blow from its gnarled staff.`n");
output("Perhaps you should get some more money before you attempt to engage in local commerce.`n`n");
output("You recall that the creature had asked for `b`\$%s`3`b gold.", $compcost);
}else{
$name = stripslashes(rawurldecode(httpget('name')));
$session['user']['gold'] -= $compcost;
$companions[$name]['hitpoints'] = $companions[$name]['maxhitpoints'];
output("`3With a grimace, %s`3 up-ends the potion from the creature.`n", $companions[$name]['name']);
output("Muscles knit back together, cuts close and bruises fade. %s`3 is ready to battle once again!`n", $companions[$name]['name']);
output("You hand the creature your gold and are ready to be out of here.");
}
}
$playerheal = false;
if($session['user']['hitpoints'] < $session['user']['maxhitpoints']){
$playerheal = true;
addnav("Potions");
addnav("`^Complete Healing`0","healer.php?op=buy&pct=100$returnline");
for ($i=90;$i>0;$i-=10){
addnav(array("%s%% - %s gold", $i, round($cost*$i/100,0)),"healer.php?op=buy&pct=$i$returnline");
}
modulehook('potion');
}
addnav("`bHeal Companions`b");
$compheal = false;
foreach($companions as $name => $companion){
if(isset($companion['cannotbehealed']) && $companion['cannotbehealed'] == true){
}else{
$points = $companion['maxhitpoints'] - $companion['hitpoints'];
if($points > 0){
$compcost = round(log($session['user']['level']+1) * ($points + 10)*1.33);
addnav(array("%s`0 (`^%s Gold`0)", $companion['name'], $compcost), "healer.php?op=companion&name=".rawurlencode($name)."&compcost=$compcost$returnline");
$compheal = true;
}
}
}
tlschema("nav");
addnav("`bReturn`b");
if ($return==""){
if($playerheal || $compheal){
addnav("F?Back to the Forest", "forest.php");
villagenav();
}else{
forest(true);
}
}elseif ($return=="village.php"){
villagenav();
}else{
addnav("R?Return whence you came",$return);
}
tlschema();
output_notl("`0");
page_footer();
?>