var KillBaalMsg = false;
var SafeMsg = false;
function NT_Leech()
{
  var leader="CCCP-PoweR";

  addEventListener("chatmsg", BaalMsg);

  me.overhead('ÿc4Now running ÿc2Smart Leech');
  say('pp');
  delay(3000);

  if(!NTTM_CheckAct(5))
  return false;

  me.overhead('ÿc4Calling ÿc2Town Manager');
  NTTMGR_TownManager();

  me.overhead('ÿc4Moving to ÿc3Portal Spot');
  if(!NTTM_TownMove("portalspot"))
  return false;

   NTC_DoCast(40, NTC_HAND_RIGHT); // Frozen Armor

  //delay untill partied with leader
  for(var i = 0; i < 100; i++) {
    if(findLead(leader)) break;
    for( var j = 0; j < NT_Leader.length; j++) {
      if(findLead(NT_Leader[j])) leader = NT_Leader[j];
    }
    delay(100);
  }

  while(me.area==109) {
    if (SafeMsg)
    NTM_UsePortal("BluePortal", 131, leader);
    delay(1000);
    if(!findLead(leader)) return false;
  }
  me.overhead('ÿc4Clearing ÿc3Throne');
  ClearThrone();
  //me.overhead('ÿc4Precasting');
  //NTP_DoPrecast();

  NTA_ClearPosition(20);      //clear all
  NTSI_PickItems();
  NTT_CleanPotions();

  while(findLead(leader))
  {
    NTC_Delay(250);
    if(KillBaalMsg) { KillBaal();
      me.overhead('ÿc4Leaving ÿc2Game');
      sendCopyData(null, "OOG", 0, "Quit:Full Run");
      return true;
    }
    me.overhead('ÿc4Attacking ÿc3Waves');
    NTA_ClearPosition(25);
    NTSI_PickItems();
    NTC_Delay(250);
    NTM_MoveTo(15084, 5039);
  }

  function KillBaal()
  {
NTConfig_CastStatic = 60;
    var _portal;
    me.overhead('ÿc4Going for ÿc1Baal');
    NTP_DoPrecast();
    NTM_MoveTo(15089, 5006);

    while(NTC_FindMonster(getLocaleString(3061)))
    NTC_Delay(400);

    _portal = NTC_GetUnit(NTC_UNIT_OBJECT, 563);

    if (!_portal)
    throw new Error();

    if (!NTM_UsePortal("Portal", 132, null, _portal))
    throw new Error();

    NTM_MoveTo(15138, 5916);
    me.overhead('ÿc4Killing ÿc1Baal');

    var baal = getUnit(1,544);
    while(baal && !(baal.mode == 0 || baal.mode == 12 || baal.hp <= 0))
    NTA_KillBoss(544);
    NTSI_PickItems();
  }
  return false;
}

function findLead(leader) {             // Check if the leader in bot config is present in the game.
  var _lead = getUnit(0, leader);
  if(_lead) return _lead.area;
  // leader not found look in party
  var area =0;
  var a = getParty();
  if(!a) return false;
  do {
    if (a.name==leader){
    return (a.area >0 )? a.area :true;
  }
} while(a.getNext());
if (area==0) {
  //sendCopyData(null, "OOG", 0,"Quit:Quit()" );
  return false;
}
return area;
}

function BaalMsg(who,msg) {
   if (msg == "k")
      SafeMsg = true;
   if (msg == ".@.^")
      KillBaalMsg = true;
}

function ClearThrone()
{
NTM_MoveTo(15094, 5044);
NTA_ClearPosition();
NTSI_PickItems();
NTM_MoveTo(15075, 5040);
NTA_ClearPosition();
NTSI_PickItems();
NTM_MoveTo(15089, 5006);
NTA_ClearPosition();
NTSI_PickItems();
NTM_MoveTo(15114, 5028);
NTA_ClearPosition();
NTSI_PickItems();
}