Contador de Tropas

javascript:

if (!Contar_Tropas) var Contar_Tropas = {};

Contar_Tropas.Nome_Unidades = "Lanceiro,Espadachim,Bárbaro,Arqueiro,Explorador,Cavalaria_Leve,Arqueiro_a_cavalo,Cavalaria_Pesada,Aríete,Catapulta,Paladino,Nobres".split(",");

var tabela;
var TropasTotais = [];
var Linha_Padrao = "0";
Contar_Tropas.link = "/game.php?&village=" + game_data.village.id + "&type=complete&mode=units&group=0&page=-1&screen=overview_villages";
if (game_data.player.sitter != 0)
    Contar_Tropas.link = "/game.php?t=" + game_data.player.id + "&village=" + game_data.village.id + "&type=complete&mode=units&group=0&page=-1&screen=overview_villages";
Contar_Tropas.Grupos_Baixados = false;
Contar_Tropas.Unidade = "spear,sword,axe,archer,spy,light,marcher,heavy,ram,catapult,knight,snob".split(",");

var Janela = "<h2 align='center'>Contador de Tropas</h2><table width='100%'><tr><th>Grupo: <select id='listaGrup' onchange=\"Contar_Tropas.link = this.value; Baixar_Dados();\"><option value='" + Contar_Tropas.link + "'>Todos</select>";
Janela += "<tr><td><table width='100%'><tr><th colspan='4'>Tipo: <select onchange=\"Alterar(this.value);\"><option value='0'>Disponível<option value='0p2p3'>Todas as Suas Próprias<option value='1'>Nas Aldeias<option value='1m0'>Apoios<option value='2'>Fora<option value='3'>Em Trânsito</select><tbody id='Tropas_Disponiveis'></table><tr><th><b id='Numero_Aldeias'></b><a href='#' style='float: right;' onclick=\"Exportacao();\">Exportar</a></table>";
Dialog.show("Caixa de Mensagem", Janela);
Baixar_Dados();
void 0;

function Exportacao() {
    if (!$("#Tropas_Disponiveis").html().match("textarea"))
        $("#Tropas_Disponiveis").html(Contar_Tropas.Exportar);
    else
        Alterar(Linha_Padrao);
}

function Baixar_Dados() {
    $("#Numero_Aldeias").html(" Por Favor, Espere...");
    $(mobile ? "#loading" : "#loading_content").show();
    var r;
    r = new XMLHttpRequest();
    r.open("GET", Contar_Tropas.link, true);

    function processResponse() {
        if (r.readyState == 4 && r.status == 200) {
            requestedBody = document.createElement("body");
            requestedBody.innerHTML = r.responseText;
            tabela = $(requestedBody).find("#units_table").get()[0];
            if (!tabela) {
                $("#Tropas_Disponiveis").html("Não há aldeias no grupo. <br />Escolha outro grupo.");
                $("#Numero_Aldeias").html(" Vazio");
                return false;
            }
            var Grupos = $(requestedBody).find(".vis_item").get()[0].getElementsByTagName(mobile ? "option" : "a");
            if (tabela.rows.length > 4000) alert("Atenção\nSomente as primeiras 1000 aldeias");
            if (!Contar_Tropas.Grupos_Baixados) {
                for (i = 0; i < Grupos.length; i++) {
                    Nome = Grupos[i].textContent;
                    if (mobile && Grupos[i].textContent == "wszystkie") continue;
                    $("#listaGrup").append($("<option>", {
                        value: Grupos[i].getAttribute(mobile ? "value" : "href") + "&page=-1",
                        text: mobile ? Nome : Nome.slice(1, Nome.length - 1)
                    }));
                }
                Contar_Tropas.Grupos_Baixados = true;
                if (!tabela.rows[0].innerHTML.match("archer")) {
                    Contar_Tropas.Unidade.splice(Contar_Tropas.Unidade.indexOf("archer"), 1);
                    Contar_Tropas.Unidade.splice(Contar_Tropas.Unidade.indexOf("marcher"), 1);
                }
                if (!tabela.rows[0].innerHTML.match("knight"))
                    Contar_Tropas.Unidade.splice(Contar_Tropas.Unidade.indexOf("knight"), 1);
            }
            Somar();
            Alterar(Linha_Padrao);
        };
    }
    r.onreadystatechange = processResponse;
    r.send(null);
}

function Alterar(Texto) {
    Linha_Padrao = Texto;
    Qual = String(Texto).match(/\d+/g);
    O_Que_Fazer = String(Texto).match(/[a-z]/g);
    var Nova_Soma = [];
    for (j = 0; j < Contar_Tropas.Unidade.length; j++)
        Nova_Soma[j] = 0;
    for (i = 0; i < Qual.length; i++)
        if (i == 0 || O_Que_Fazer[i - 1] == "p")
            Nova_Soma = Adicionar(Nova_Soma, TropasTotais[Qual[i]]);
        else
            Nova_Soma = Subtrair(Nova_Soma, TropasTotais[Qual[i]]);
    wypisz(Nova_Soma);
}

function Somar() {
    for (i = 0; i < 5; i++) {
        TropasTotais[i] = [];
        for (j = 0; j < Contar_Tropas.Unidade.length; j++)
            TropasTotais[i][j] = 0;
    }
    for (var i = 1; i < tabela.rows.length; i++) {
        m = (tabela.rows[1].cells.length == tabela.rows[i].cells.length) ? 2 : 1;
        for (var j = m; j < Contar_Tropas.Unidade.length + m; j++) {
            TropasTotais[(i - 1) % 5][j - m] += parseInt(tabela.rows[i].cells[j].textContent);
        }
    }
}

function Subtrair(Soma1, Soma2) {
    var Contagem = [];
    for (k = 0; k < Contar_Tropas.Unidade.length; k++)
        Contagem[k] = Soma1[k] - Soma2[k];
    return Contagem;
}

function Adicionar(Soma1, Soma2) {
    var Contagem = [];
    for (k = 0; k < Contar_Tropas.Unidade.length; k++)
        Contagem[k] = Soma1[k] + Soma2[k];
    return Contagem;
}

function Desenhar_Espaços(Quanto) {
    var Texto = String(Quanto);
    var Contagem = "";
    for (j = 0; j < (10 - Texto.length); j++)
        Contagem += "\u2007";
    return Contagem;
}

function wypisz(Soma_Total_de_Tropas) {
    elem = "<tr>";
    Contar_Tropas.Exportar = "<textarea rows='7' cols='25' onclick=\"this.select();\">";
    for (i = 0; i < Contar_Tropas.Unidade.length; i++) {
        Contar_Tropas.Exportar += "[unit]" + Contar_Tropas.Unidade[i] + "[/unit]" + Soma_Total_de_Tropas[i] + (i % 2 == 0 ? Desenhar_Espaços(Soma_Total_de_Tropas[i]) : "\n");
        elem += (i % 2 == 0 ? "<tr>" : "") + "<th width='20'><a href='https://help.tribalwars.com.br/wiki/" + Contar_Tropas.Nome_Unidades[i] + "' target='_blank'><img src='" + image_base + "unit/unit_" + Contar_Tropas.Unidade[i] + ".png'></a><td bgcolor='#fff5da'>" + Soma_Total_de_Tropas[i];
    }
    Contar_Tropas.Exportar += "</textarea>";
    $("#Tropas_Disponiveis").html(elem);
    $(mobile ? "#loading" : "#loading_content").hide();
    $("#Numero_Aldeias").html("Total de " + ((tabela.rows.length - 1) / 5) + " aldeias");
}