void main()
{
object oModule = GetModule();
object oLight1 = GetNearestObjectByTag("3Light13");
object oLight2 = GetNearestObjectByTag("3Light23");
object oLight3 = GetNearestObjectByTag("3Light33");
object oLight4 = GetNearestObjectByTag("3Light43");
object oLight5 = GetNearestObjectByTag("3Light53");

DestroyObject(oLight1, 3.0);
DestroyObject(oLight2, 3.0);
DestroyObject(oLight3, 3.0);
DestroyObject(oLight4, 3.0);
DestroyObject(oLight5, 3.0);

SetLocalInt (oModule, "ThentilThree", 50);
CreateObject(OBJECT_TYPE_PLACEABLE, "3Light53",GetLocation(GetNearestObjectByTag("ThentilZoneThree")));
  int nDiceRoll = d100(1);
  if(nDiceRoll <= 25)
    {
    object oTarget;
    oTarget = GetObjectByTag("Thentil3Ring");

    DestroyObject(oTarget, 0.0);
    }
   else if(nDiceRoll <= 30)
    {
       int nSubRoll = d100(1);
       if(nSubRoll <= 14)
        {
        CreateItemOnObject("EXPBOOK001", OBJECT_SELF, 1);
        }
       else if(nSubRoll <= 28)
        {
        CreateItemOnObject("EXPBOOK002", OBJECT_SELF, 1);
        }
        else if(nSubRoll <= 42)
        {
        CreateItemOnObject("EXPBOOK003", OBJECT_SELF, 1);
        }
        else if(nSubRoll <= 56)
        {
        CreateItemOnObject("EXPBOOK004", OBJECT_SELF, 1);
        }
       else if(nSubRoll <= 70)
        {
        CreateItemOnObject("EXPBOOK005", OBJECT_SELF, 1);
        }
       else if(nSubRoll <= 84)
        {
        CreateItemOnObject("EXPBOOK", OBJECT_SELF, 1);
        }
       else if(nSubRoll <= 100)
        {
        CreateItemOnObject("EXPBOOK006", OBJECT_SELF, 1);
        }
    }
            int nMasterRoll = d100(1);
        if(nMasterRoll <= 5)
        {
    int nDiceRoll = d100(1);
    if(nDiceRoll <= 1)
        {
        CreateItemOnObject("morfiantbastard", OBJECT_SELF, 1);
        }
        else if(nDiceRoll <= 3)
        {
        CreateItemOnObject("morphiantdouble", OBJECT_SELF, 1);
        }
        else if(nDiceRoll <= 5)
        {
        CreateItemOnObject("morphiantheavy", OBJECT_SELF, 1);
        }
        else if(nDiceRoll <= 6)
        {
        CreateItemOnObject("morphiantlhammer", OBJECT_SELF, 1);
        }
        else if(nDiceRoll <= 8)
        {
        CreateItemOnObject("morphiantrapier", OBJECT_SELF, 1);
        }
        else if(nDiceRoll <= 9)
        {
        CreateItemOnObject("morphianttwobl", OBJECT_SELF, 1);
        }
        else if(nDiceRoll <= 10)
        {
        CreateItemOnObject("morfiantbattlea", OBJECT_SELF, 1);
        }
        else if(nDiceRoll <= 12)
        {
        CreateItemOnObject("morphiantgreat", OBJECT_SELF, 1);
        }
        else if(nDiceRoll <= 13)
        {
        CreateItemOnObject("morphiantkama", OBJECT_SELF, 1);
        }
        else if(nDiceRoll <= 15)
        {
        CreateItemOnObject("morphiantlongsw", OBJECT_SELF, 1);
        }
        else if(nDiceRoll <= 17)
        {
        CreateItemOnObject("morphiantscimit", OBJECT_SELF, 1);
        }
        else if(nDiceRoll <= 18)
        {
        CreateItemOnObject("morphiantwarham", OBJECT_SELF, 1);
        }
        else if(nDiceRoll <= 20)
        {
        CreateItemOnObject("morfiantclub", OBJECT_SELF, 1);
        }
        else if(nDiceRoll <= 21)
        {
        CreateItemOnObject("morphiantgreats", OBJECT_SELF, 1);
        }
        else if(nDiceRoll <= 22)
        {
       CreateItemOnObject("morphiantkatana", OBJECT_SELF, 1);
        }
        else if(nDiceRoll <= 24)
        {
        CreateItemOnObject("morphiantmace", OBJECT_SELF, 1);
        }
        else if(nDiceRoll <= 25)
        {
        CreateItemOnObject("morphiantshort", OBJECT_SELF, 1);
        }
        else if(nDiceRoll <= 27)
        {
        CreateItemOnObject("morfiantdagger", OBJECT_SELF, 1);
        }
        else if(nDiceRoll <= 29)
        {
        CreateItemOnObject("morphianthalberd", OBJECT_SELF, 1);
        }
        else if(nDiceRoll <= 31)
        {
        CreateItemOnObject("morphiantkukri", OBJECT_SELF, 1);
        }
        else if(nDiceRoll <= 33)
        {
        CreateItemOnObject("morphiantmornin", OBJECT_SELF, 1);
        }
        else if(nDiceRoll <= 35)
        {
        CreateItemOnObject("morphiantsickle", OBJECT_SELF, 1);
        }
        else if(nDiceRoll <= 37)
        {
        CreateItemOnObject("morphiantdirem", OBJECT_SELF, 1);
        }
        else if(nDiceRoll <= 39)
        {
        CreateItemOnObject("morphianthanda", OBJECT_SELF, 1);
        }
        else if(nDiceRoll <= 41)
        {
        CreateItemOnObject("morphiantlight", OBJECT_SELF, 1);
        }
        else if(nDiceRoll <= 43)
        {
        CreateItemOnObject("morphiantquarte", OBJECT_SELF, 1);
        }
        else if(nDiceRoll <= 45)
        {
        CreateItemOnObject("morphiantspear", OBJECT_SELF, 1);
        }
        else if(nDiceRoll = 46)
        {
        CreateItemOnObject("morphiantdwarfax", OBJECT_SELF, 1);
        }
}
}