/* /lib/std/limb.c
* From the Dead Souls Object Library
* Standard limb object for severed limbs
* Created by Descartes of Borg 950329
* Version: @(#) limb.c 1.5@(#)
* Last Modified: 96/12/31
*/
#include <lib.h>
inherit LIB_SURFACE;
int Count = 0;
int DecayLife = 500;
string Limb = 0;
string Owner = 0;
string Race = 0;
int CallOut = -1;
int eventDecay();
int GetDecayLife() {
return DecayLife;
}
int SetDecayLife(int x) {
return (DecayLife = x);
}
string GetLimb() {
return Limb;
}
string GetItemCondition(){
return "";
}
void create(){
surface::create();
}
void init(){
surface::init();
}
void SetLimb(string limb, string owner, string race) {
SetKeyName(limb);
SetId( ({ "flesh","pile", "limb", Limb = limb }) );
Owner = owner;
Race = race;
Count = 1;
SetShort("a rotting " + possessive_noun(Race) + " " + Limb);
SetLong("This limb has a horrible stench as it rots to nothing.");
//CallOut = call_out((: eventDecay :), DecayLife/3);
}
string GetOwner() {
return Owner;
}
string GetRace() {
return Race;
}
int GetSaveString() {
return 0;
}
string GetShort() {
string str = surface::GetShort();
if( !str ) {
str = "a limb";
}
return str;
}
int CanReceive(object ob) {
return 1;
}
int Destruct() {
//if( CallOut > -1 ) {
//remove_call_out(CallOut);
//}
return surface::Destruct();
}
int eventDecay() {
if( !environment() ) {
//CallOut = -1;
Destruct();
return 0;
}
switch(Count) {
case 10:
message("smell", "The "+Limb+" really stinks.", environment());
SetShort("the stinky remains of a rotting " + Limb);
break;
case 20:
message("smell", "A rotting stench fills the entire area.",
environment());
SetShort("a pile of rotting flesh");
break;
case 30:
//CallOut = -1;
Destruct();
return 0;
}
Count++;
//CallOut = call_out((: eventDecay :), DecayLife/3);
return Count;
}
