81 lines
1.5 KiB
Plaintext
81 lines
1.5 KiB
Plaintext
|
void main()
|
||
|
{
|
||
|
|
||
|
|
||
|
|
||
|
{
|
||
|
object oObject = GetFirstObjectInArea();
|
||
|
int nPCinArea=FALSE;
|
||
|
location lLoc;
|
||
|
object oItem;
|
||
|
|
||
|
|
||
|
// first of all, check every object in the area and see if it is a PC.
|
||
|
|
||
|
while (GetIsObjectValid(oObject))
|
||
|
{
|
||
|
if (GetIsPC(oObject))
|
||
|
{
|
||
|
nPCinArea = TRUE;
|
||
|
}
|
||
|
oObject=GetNextObjectInArea();
|
||
|
}
|
||
|
|
||
|
|
||
|
// if not, then run the next bit of the script
|
||
|
|
||
|
if (nPCinArea != TRUE)
|
||
|
{
|
||
|
// create the statues if they aren't there
|
||
|
if (!GetIsObjectValid(GetObjectByTag("jok_statue1")))
|
||
|
|
||
|
{
|
||
|
lLoc=GetLocation(GetObjectByTag("WP_tri_jokstatue1"));
|
||
|
CreateObject(OBJECT_TYPE_PLACEABLE,"jok_statue1",lLoc);
|
||
|
}
|
||
|
|
||
|
if (!GetIsObjectValid(GetObjectByTag("jok_statue2")))
|
||
|
|
||
|
{
|
||
|
lLoc=GetLocation(GetObjectByTag("WP_tri_jokstatue2"));
|
||
|
CreateObject(OBJECT_TYPE_PLACEABLE,"jok_statue2",lLoc);
|
||
|
}
|
||
|
|
||
|
if (!GetIsObjectValid(GetObjectByTag("jok_statue3")))
|
||
|
|
||
|
{
|
||
|
lLoc=GetLocation(GetObjectByTag("WP_tri_jokstatue3"));
|
||
|
CreateObject(OBJECT_TYPE_PLACEABLE,"jok_statue3",lLoc);
|
||
|
}
|
||
|
if (!GetIsObjectValid(GetObjectByTag("jok_statue4")))
|
||
|
|
||
|
{
|
||
|
lLoc=GetLocation(GetObjectByTag("WP_tri_jokstatue4"));
|
||
|
CreateObject(OBJECT_TYPE_PLACEABLE,"jok_statue4",lLoc);
|
||
|
}
|
||
|
|
||
|
//clean bodybags
|
||
|
|
||
|
if (GetTag(oObject) == "BodyBag")
|
||
|
{
|
||
|
|
||
|
oItem = GetFirstItemInInventory(oObject);
|
||
|
while (GetIsObjectValid(oItem) == TRUE)
|
||
|
{
|
||
|
|
||
|
|
||
|
DestroyObject(oItem);
|
||
|
|
||
|
oItem=GetNextItemInInventory(oObject);
|
||
|
}
|
||
|
|
||
|
SetPlotFlag(oObject,FALSE);
|
||
|
|
||
|
DestroyObject(oObject);
|
||
|
}
|
||
|
}
|
||
|
|
||
|
}
|
||
|
}
|
||
|
|