#include "x0_i0_secret"
#include "nw_i0_tool"
#include "prc_class_const"

void main()
{
	ExecuteScript("uberloot", OBJECT_SELF);
	ExecuteScript("xp_system", OBJECT_SELF);
 
    object oPC	= GetLastKiller();

	int iMonk	= GetLevelByClass(CLASS_TYPE_MONK, oPC)
				+ GetLevelByClass(CLASS_TYPE_SOHEI, oPC)
				+ GetLevelByClass(CLASS_TYPE_SWORDSAGE, oPC)
				+ GetLevelByClass(CLASS_TYPE_PSION, oPC);

  int nDiceRoll = d100(1);
  if(nDiceRoll <= 50)
    {
    ExecuteScript ("wizlevel1", OBJECT_SELF);
    }


    if (HasItem(oPC, "ML1"))
        {}
    else if (HasItem(oPC, "ML2"))
        {}
    else if (HasItem(oPC, "ML3"))
        {}
    else if (HasItem(oPC, "ML4"))
        {}
    else if (HasItem(oPC, "ML5"))
        {}
    else if (HasItem(oPC, "ML6"))
        {}
    else if (HasItem(oPC, "ML7"))
        {}
    else if (HasItem(oPC, "ML8"))
        {}
    else if (HasItem(oPC, "ML9"))
        {}
    else if (HasItem(oPC, "MLavenger"))
        {}
    else if (iMonk >= 1)
        {
        CreateItemOnObject("ML1", OBJECT_SELF, 1);
        }
}