17 lines
467 B
Plaintext
17 lines
467 B
Plaintext
// und_preserve - corpses perserved in this area
|
|
void main()
|
|
{
|
|
object oFirst=GetFirstObjectInArea(OBJECT_SELF);
|
|
object oOb;
|
|
int nN;
|
|
if (GetTag(oFirst)=="corpseres") SetLocalInt(oFirst,"bPreserved",TRUE);
|
|
nN=1;
|
|
oOb=GetNearestObjectByTag("corpseres",oFirst,nN);
|
|
while(oOb!=OBJECT_INVALID)
|
|
{ // set to preserved
|
|
SetLocalInt(oOb,"bPreserved",TRUE);
|
|
nN++;
|
|
oOb=GetNearestObjectByTag("corpseres",oFirst,nN);
|
|
} // set to preserved
|
|
}
|