$${

//////////////////////////
// CraftLandia Eclipse  //
//////////////////////////
// Versao deste código: //
// 0.2                  //
//////////////////////////
//      NAO EDITAR      //
//////////////////////////

IFMATCHES("%CHATCLEAN%","^»Bem vindo de volta. Por favor digite /login sua-senha.$");

    //Insira a tecla (letra) onde a macro Sleep_MobKill foi instalada (nao apague os " nem ;):
    &sleep_mobkill_key = "N" ;

    //Insira a tecla (letra) onde a macro Sleep_PescaBlaze foi instalada (nao apague os " nem ;):
    &sleep_pescablaze_key = "LetraAqui" ;

    //Insira a tecla (letra) onde a macro Sleep_Agilidade foi instalada (nao apague os " nem ;):
    &sleep_agilidade_key = "LetraAqui" ;

    SETLABEL("INFO","");
    SETLABEL("G","");
    SETLABEL("G2","");
    SET(info_stop);
    SET(&dmc,"9S89L9E98E9P98");
        IF(%&sleep_password%=NONE);
        ELSE;
            ECHO("/login %&sleep_password%");
        ENDIF;
        FOR(#rpc,8,9);
            REPLACE(&dmc,"%#rpc%","");
        NEXT;
    UNSET(g_chat);
ENDIF;
IFMATCHES("%CHATCLEAN%","Agora você está logado. NUNCA use a mesma senha do CraftLandia em outros servidores. JAMAIS passe sua senha para outras pessoas.");
        IF(%&sleep_password%=NONE);
            LOG("&a&l[&f&oI&fnfo&a&l] &aPara &alogar &aautomaticamente &ainforme &asua &asenha, &adigite &fsleep &fipass &ano &achat &alocal &aou &aaltere &amanualmente &ano &acódigo &ada &amacro &fOnChat&a. &9&o#%&dmc%");
            LOG("");
        ELSE;
            LOG("&a&l[&f&oI&fnfo&a&l] &aLogin &arealizado. &9&o#%&dmc%");
            LOG("");
        ENDIF;
        IF(@sleep_agilidade);
            UNSET(@sleep_agilidade);
                DO;
                    GUI();
                    TYPE(%&sleep_agilidade_key%);
                    WAIT(40T);
                UNTIL(@sleep_agilidade);
        ELSEIF(@sleep_mobkill);
            UNSET(@sleep_mobkill);
                DO;
                    SET(@mobkill_power);
                    GUI();
                    TYPE(%&sleep_mobkill_key%);
                    WAIT(40T);
                UNTIL(@sleep_mobkill);
        ELSEIF(@sleep_pescablaze);
            UNSET(@sleep_pescablaze);
                DO;
                    SET(@pescablaze_power);
                    GUI();
                    TYPE(%&sleep_pescablaze_key%);
                    WAIT(40T);
                UNTIL(@sleep_pescablaze);
        ENDIF;
    UNSET(info_stop);
        DO;
            SET(&label_info,"");
            SET(&label_info,%&label_info% &aFPS: &e%FPS%\n&bX: &f%&label_info%%XPOS% &bY: &f%&label_info%%YPOS% &bZ: &f%&label_info%%ZPOS%\n);
            SETLABEL("INFO","%&label_info%");
        UNTIL(info_stop);
ENDIF;
IFMATCHES("%CHATCLEAN%","^\[(G|L)\] (.*)%PLAYER%(.*)\: (.*)$");
    MATCH("%CHATCLEAN%","^\[(G|L)\] (.*)%PLAYER%(.*)\: (.*)$",{&chat_canal,,,&chat_msg});
        IFMATCHES("%&chat_msg%","sleep ipass");
            LOG("&a&l[&f&oI&fnfo&a&l] &aDigite sua senha (totalmente sigiloso). &9&o#%&dmc%");
            LOG("");
            SET(&sleep_password,"");
            PROMPT(&sleep_password,$$?,"Digite sua senha (totalmente sigiloso).");
                IF(%&sleep_password%=NONE);
                    LOG("&a&l[&f&oI&fnfo&a&l] &cVocê &cnão &cdigitou &csua &csenha. &9&o#%&dmc%");
                ELSE;
                    LOG("&a&l[&f&oI&fnfo&a&l] &aSenha &asalva &acom &asucesso. &9&o#%&dmc%");
                ENDIF;
        ENDIF;
        IF(%&chat_canal%="G");
            SET(#chat_delay,"10");
                IF(!g_chat);
                    SET(g_chat);
                        DO;
                                DO(10);
                                    SETLABEL("G","&7[G] &c%#chat_delay%");
                                    SETLABEL("G2","&7[G] &c%#chat_delay%");
                                    WAIT(15MS);
                                UNTIL(!g_chat);
                                IF(!g_chat);
                                    BREAK;
                                ENDIF;
                            DEC(#chat_delay,1);
                        WHILE(%#chat_delay%>-1);
                    UNSET(g_chat);
                ENDIF;
            SETLABEL("G","");
            SETLABEL("G2","");
        ENDIF;
ENDIF;
IFMATCHES("%CHATCLEAN%","^\(Mensagem de ([\d\w_]+)\): (.*)$");
    MATCH("%CHATCLEAN%","^\(Mensagem de ([\d\w_]+)\): (.*)$",{&nick_tell});
        IF(@afk_onchat);
            IFMATCHES("%@&afk_onchat_bn%","%&nick_tell%");
            ELSE;
                ECHO("/tell %&nick_tell% estou afk no momento, tente novamente mais tarde. #SLEEP");
                SET(@&afk_onchat_bn,"%&nick_tell%");
            ENDIF;
        ENDIF;
ENDIF;
IFMATCHES("%CHATCLEAN%","^\[Server\] (.+) Limpando (.+) do chao em 5s$");
    SET(@sleep5s);
    SET(@break);
    WAIT(110T);
    UNSET(@sleep5s);
ENDIF;
IFMATCHES("%CHATCLEAN%","(Seu inventário foi limpo|Your inventory has been cleared)");
    SET(@sleepclear);
ENDIF;
IFMATCHES("%CHATCLEAN%","Você já tem uma home com esse nome, caso queira substituí-la digite o comando novamente\!");
    SET(@sleepsubshome);
ENDIF;
IFMATCHES("%CHATCLEAN%","^A home \"[\d\w_]+\" foi definida com sucesso\!$");
    SET(@sleepsethome);
ENDIF;
IFMATCHES("%CHATCLEAN%","^Acrobacia: (.+)\% de dano na queda evitado$",@#acro_dano,1,NONE);
    SET(@sleeprolled);
ENDIF;
IFMATCHES("%CHATCLEAN%","^Reparação: Você precisa de (.+) para reparar esse item$");
    SET(@sleeplack);
ENDIF;
IFMATCHES("%CHATCLEAN%","^Você ganhou (.+)c por ter enfrentado e eliminado essa criatura$",@#mob_coins,1,NONE);
    SET(@sleepmobkill);
    INC(#mobs_killed,1);
        IFMATCHES("%#mobs_killed%","^[\d]+(.*)(0)$");
            ACHIEVEMENTGET("[%#mobs_killed%] mobs mortos","skull");
                IFMATCHES("%#mobs_killed%","^[\d]+(.*)(00)$");
                    WAIT(65T);
                    ACHIEVEMENTGET("#%&dmc%","skull");
                ENDIF;
        ENDIF;
ENDIF;
IFMATCHES("%CHATCLEAN%","^\[CraftLandia\] Você matou: (.*)$");
    INC(#onchat_kills,1);
        IF(%#onchat_kills%=1);
            ACHIEVEMENTGET("[%#onchat_kills%] jogador morto","skull:3");
        ELSE;
            ACHIEVEMENTGET("[%#onchat_kills%] jogadores mortos","skull:3");
        ENDIF;
    WAIT(65T);
    ACHIEVEMENTGET("#%&dmc%","skull:3");
ENDIF;
IFMATCHES("%CHATCLEAN%","^Você matou: (.+) Mobs e (.+) jogadores\!$");
    MATCH("%CHATCLEAN%","^Você matou: (.+) Mobs e (.+) jogadores\!$",{#mobs_killed,#onchat_kills});
ENDIF;
IFMATCHES("%CHATCLEAN%","^» ([\d\w_]+) lhe enviou um pedido de call\!$",&nick_call,1,NONE);
    ACHIEVEMENTGET("Press. DEL para aceitar","ender_pearl");
        DO;
            IF((KEY_DELETE)||(KEY_DECIMAL));
                SLOTCLICK(2,L,TRUE);
                ACHIEVEMENTGET("Aceito :) #%&dmc%","ender_pearl");
            ENDIF;
        WHILE(%GUI%="GUICHEST");
ENDIF;

}$$