// Revised chaos leecher

var end = false;

function NTMain() {
    Include("libs/common/NTCommon.ntl");
    NTC_IncludeLibs();
    NTC_IncludeConfig("NTBot/char_configs");
    NT_LoadConfig();
    NTSI_LoadNIPFiles("NTBot/item_configs");
    NTA_Initialize();
    RegisterEvent(EVENT_GAMEMSG, chat);

    if (!NTTM_CheckAct(4)) {
        NTC_SendMsgToScript("NTBotGame.ntj", "NTTM_CheckAct()");
        return;
    }

    NTTMGR_TownManager();

    if (!NTTM_TownMove("portalspot")) {
        NTC_SendMsgToScript("NTBotGame.ntj", "NTTM_TownMove()");
        return;
    }

    while (!end) {
        if (me.mode === 17) {
            me.Cancel(0);
        }

        NTC_Delay(250);
    }

    if (IsLastScript("NTDiabloLeech.ntj")) {
        while (NTC_InMyParty(NTConfig_Leader)) {
            NTC_Delay(500);
        }
    }

    NTC_SendMsgToScript("NTBotGame.ntj", "SCRIPT_END");
}

function IsLastScript(scriptName) {
    return NTConfig_Script[NTConfig_Script.length - 1] === scriptName;
}

function chat(msg, type) {
    if(type === 0) {
        var split = msg.split(":");

        if (split.length >= 1 && split[1] !== undefined) {
            var _sender = split[0].substring(3, split[0].length - 3);
            var msg = split[1].substring(1);

            if (_sender === NTConfig_Leader) {
                switch (msg) {
                case "Leech TP up.":
                    if (me.areaid === 103) {
                        CL_TakePortal();
                    }

                    break;
                case "Vizier dead.":
                case "Infector dead.":
                case "De Seis dead.":
                    if (me.areaid === 108) {
                        if (!CL_TakePortal()) {
                            NTTM_CheckAct();
                        }
                    }

                    break;
                case "Diablo TP up.":
                    if (me.areaid == 103) {
                        CL_TakePortal();
                        Delay(500);
                        NTM_WalkTo(7760, 5267);
                    }

                    var diablo = NTC_FindUnit(1, 243, 200);

                    if (diablo) {
                        while (diablo.mode !== 12) {
                            NTC_Delay(300);
                        }
                    }

                    end = true;

                    break;
                }
            }
        }
    } else if (type === 4 && ((msg.indexOf("weaken") != -1) || msg.indexOf("dropped") != -1) && (msg.indexOf(NTConfig_Leader) != -1)) {
        NTC_Delay(750);
        ExitGame();
    }
}

function CL_TakePortal() {
    var i,
        preArea = me.areaid,
        portal = NTC_FindUnit(NTC_UNIT_OBJECT, GetLocaleString(3226), 10);

    if (!portal) {
        return false;
    }

    do {
        if (GetDistance(me, portal) < 15) {
            for (i = 0; i < 20; i += 1) {
                if (i % 5 === 0) {
                    if (i === 10) {
                        NTM_MoveTo(preArea, me.x + 6, me.y + 6);
                    }

                    NTC_DoClick(NTC_CLICK_LDOWN, NTC_SHIFT_NONE, portal);
                }

                NTC_Delay(200);

                if (me.areaid !== preArea) {
                    break;
                }
            }

            while (me.areaid === 0) {
                NTC_Delay(200);
            }

            if (me.areaid === preArea) {
                return false;
            }

            NTC_PingDelay(NTConfig_AreaDelay);

            return true;
        }
    } while (portal.GetNext());

    return false;
}