void main()
{
    object oDoor = GetObjectByTag("BCELL_DR_MAIN");

    object oTele1 = GetObjectByTag("WP_BCELL_1");
    location lTele1 = GetLocation(oTele1);

    ActionCloseDoor(oDoor);
    ActionLockObject(oDoor);

    CreateObject(OBJECT_TYPE_CREATURE,"oliveslime",lTele1,FALSE);
    CreateObject(OBJECT_TYPE_CREATURE,"oliveslime",lTele1,FALSE);
    CreateObject(OBJECT_TYPE_CREATURE,"oliveslime",lTele1,FALSE);
    CreateObject(OBJECT_TYPE_CREATURE,"oliveslime",lTele1,FALSE);

    ActionDoCommand(DestroyObject(OBJECT_SELF));
}
