Battledale_PRC8/_module/nss/jw_caves_enter.nss

32 lines
748 B
Plaintext
Raw Permalink Normal View History

void main()
{
object oPC=GetEnteringObject();
object oObject = GetFirstObjectInArea();
int nPCinArea=FALSE;
location lLoc;
while (GetIsObjectValid(oObject))
{
if (GetIsPC(oObject)&&(oObject!=oPC))
{
nPCinArea = TRUE;
}
oObject=GetNextObjectInArea();
}
// returns true if a PC is in the area which is not a NEW pc
if (nPCinArea != TRUE)
{
if ((!GetIsObjectValid(GetObjectByTag("jw_ore_boulder")))&&GetEncounterActive(GetObjectByTag("jw_easy_bears_master")))
{
object oBoulder = CreateObject(OBJECT_TYPE_PLACEABLE,"jw_ore_boulder",GetLocation(GetObjectByTag("jw_ore_boulder_wp")));
ApplyEffectToObject(DURATION_TYPE_PERMANENT,EffectVisualEffect(VFX_DUR_LIGHT_WHITE_15),oBoulder);
}
}
}