void main()
{
object oObject = GetObjectByTag("IncubatingClone");

location lLocation = GetLocation(oObject);
DestroyObject(oObject);
if ((GetIsObjectValid(oObject) == TRUE) && (GetLocalInt(OBJECT_SELF, "Pause") == 0) && (GetLocalInt(GetModule(), "Incubator") >= 1))
{
SetLocalInt(OBJECT_SELF, "Pause", 1);
effect eShk1 = EffectVisualEffect(VFX_DUR_ANTI_LIGHT_10);
effect eShk2 = EffectVisualEffect(VFX_COM_BLOOD_CRT_GREEN);
effect eShk3 = EffectVisualEffect(VFX_COM_BLOOD_CRT_YELLOW);
effect eShk4 = EffectVisualEffect(VFX_COM_BLOOD_LRG_GREEN);
effect eShk5 = EffectVisualEffect(VFX_COM_BLOOD_LRG_WIMP);
effect eShk6 = EffectVisualEffect(VFX_BEAM_SILENT_ODD);
effect eShk7 = EffectVisualEffect(VFX_IMP_DUST_EXPLOSION);
effect eShk8 = EffectVisualEffect(VFX_IMP_DIVINE_STRIKE_HOLY);
ApplyEffectAtLocation(DURATION_TYPE_INSTANT, eShk1, lLocation);
ApplyEffectAtLocation(DURATION_TYPE_INSTANT, eShk2, lLocation);
ApplyEffectAtLocation(DURATION_TYPE_INSTANT, eShk3, lLocation);
ApplyEffectAtLocation(DURATION_TYPE_INSTANT, eShk4, lLocation);
ApplyEffectAtLocation(DURATION_TYPE_INSTANT, eShk5, lLocation);
ApplyEffectAtLocation(DURATION_TYPE_INSTANT, eShk6, lLocation);
ApplyEffectAtLocation(DURATION_TYPE_INSTANT, eShk7, lLocation);
ApplyEffectAtLocation(DURATION_TYPE_INSTANT, eShk8, lLocation);
CreateObject(OBJECT_TYPE_CREATURE, "lemuriclonewarri", lLocation, FALSE);
DelayCommand(3.0, SetLocalInt(OBJECT_SELF, "Pause", 0));
}
}