From Bistre Ibis, 2 Months ago, written in Plain Text.
Embed
  1. $${
  2.  
  3. // Versao/Upgrade: 0.3
  4. // Verifique a versao mais atualizada neste link: http://cuturls.co/mobkillforum
  5.                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 SET(@&sleep_m4,"&6&l[&f&oI&fnfo&6&l] &cUtilize o &fModPack 4.0 &cpara conseguir ativar essa macro. &9&o#SLEEP");
  6. TOGGLE(sleep_macro);
  7.     IF(sleep_macro);
  8.         LOG("&b&l[&f&oM&facro&b&l] &aSleep_&lM&aob&a&lK&aill &b&l[&2ON&b&l]");
  9.         ACHIEVEMENTGET("[ON] MobKill Upgrade 0.3","397");
  10.         SET(@sleep_mobkill);
  11.         SET(@afk_onchat);
  12.         SET(@&afk_onchat_bn,"");    
  13.         SET(trap_salvar_coordenadas);
  14.         UNSET(sleep_error);
  15.         UNSET(mob_invadido);
  16.         WAIT(10T);
  17.     ELSE;
  18.         LOG("&b&l[&f&oM&facro&b&l] &cSleep_&lM&cob&c&lK&cill &b&l[&4OFF&b&l]");
  19.         ACHIEVEMENTGET("[OFF] MobKill Upgrade 0.3","397");
  20.             IF(config_mk_save);
  21.                 IF(%&itens_armazenar%!="DESABILITADO");
  22.                     LOG("");
  23.                     LOG("&b&l[&f&oM&facro&b&l] &aTrap de baús:");
  24.                         IF(!baus_lotados);
  25.                             IF((sleep_reparar)||(sleep_trocar));
  26.                                 #bau_atual_mostrar = %#bau_atual% - 1;
  27.                                     IF(%#bau_atual_mostrar%=0);
  28.                                         INC(#bau_atual_mostrar,1);
  29.                                     ENDIF;
  30.                                 LOG("&b&l[&f&oM&facro&b&l] &f&oBaú de armazenamento atual: &a%#bau_atual_mostrar%&fº");
  31.                             ELSE;
  32.                                 LOG("&b&l[&f&oM&facro&b&l] &f&oBaú de armazenamento atual: &a%#bau_atual%&fº");
  33.                             ENDIF;
  34.                         ELSE;
  35.                                 IF((sleep_reparar)||(sleep_trocar));
  36.                                     #bau_atual_mostrar = %#bau_atual% - 2;
  37.                                 ELSE;
  38.                                     #bau_atual_mostrar = %#bau_atual% - 1;
  39.                                 ENDIF;
  40.                             LOG("&b&l[&f&oM&facro&b&l] &f&oBaú de armazenamento atual: &4%#bau_atual_mostrar%&cº");
  41.                             LOG("&c(não é mais &cpossível &carmazenar)");
  42.                         ENDIF;
  43.                         IF(%#sleep_livros%>=1);
  44.                             LOG("&b&l[&f&oM&facro&b&l] &f&oTesouros encontrados: &a%#sleep_livros%");
  45.                         ELSE;
  46.                             LOG("&b&l[&f&oM&facro&b&l] &f&oTesouros encontrados: &cNenhum");
  47.                         ENDIF;
  48.                 ENDIF;
  49.             LOG("");
  50.                 IF(mob_invadido);
  51.                     LOG("&b&l[&f&oM&facro&b&l] &cVocê ficou com a vida baixa e o alarme de &cinvasão foi acionado.");
  52.                     LOG("&b&l[&f&oM&facro&b&l] &cPrints foram salvas, verifique na pasta &cscreenshots do seu ModPack.");
  53.                     LOG("");
  54.                 ENDIF;
  55.                 IF(sleep_send);
  56.                     UNSET(sleep_send);
  57.                     REPLACE(&itens2,"1","");
  58.                 ENDIF;                  
  59.             ENDIF;
  60.         UNSET(@sleep_mobkill);
  61.         UNSET(@afk_onchat);    
  62.         UNSET(@mobkill_power);
  63.         STOP;
  64.     ENDIF;
  65.     IF(config_mk_save);
  66.         SET(&prompt_texto,"Digite: 1 ou 2.");
  67.         LOG("");
  68.         LOG("&b&l[&f&oM&facro&b&l] &aIniciar com as últimas configurações?");
  69.         LOG("&b&l[&f&oM&facro&b&l] &2[&f1&2] &fSim");
  70.         LOG("&b&l[&f&oM&facro&b&l] &4[&f2&4] &cNão");
  71.             IF(%&itens_armazenar%!="DESABILITADO");
  72.                 LOG("&b&l[&f&oM&facro&b&l] &2[&f3&2] &fSim, mas recomeçar do 1º baú.");
  73.                 SET(&prompt_texto,"Digite: 1, 2 ou 3.");
  74.             ENDIF;
  75.         LOG("");
  76.             IF(@mobkill_power);
  77.                 SET(#sleep_quest_4,"1");
  78.             ELSE;
  79.                 PROMPT(#sleep_quest_4,$$?,"%&prompt_texto%");
  80.             ENDIF;      
  81.             IF(%#sleep_quest_4%=1);
  82.                 LOG("&b&l[&f&oM&facro&b&l] &2[&f1&2] &fSim");
  83.                 WAIT(20T);
  84.             ELSEIF(%#sleep_quest_4%=2);
  85.                 LOG("&b&l[&f&oM&facro&b&l] &4[&f2&4] &cNão");
  86.                 SET(config_load);
  87.                 WAIT(20T);
  88.             ELSEIF((%#sleep_quest_4%=3)&&(%&itens_armazenar%!="DESABILITADO"));
  89.                 LOG("&b&l[&f&oM&facro&b&l] &2[&f3&2] &fSim, mas recomeçar do 1º baú.");
  90.                 SET(#pos_first_chest,"");
  91.                 SET(#pos_last_chest,"");
  92.                 SET(#bau_atual,"1");
  93.                 SET(#sleep_livros,"");
  94.                 SET(#sleep_msg_send,"");
  95.                 SET(#hora_save,"5454");
  96.                 UNSET(baus_lotados);
  97.                 WAIT(20T);
  98.             ELSE;
  99.                 LOG("&b&l[&f&oM&facro&b&l] &cResposta inválida. &9&o#SLEEP");
  100.                 SET(sleep_error);
  101.             ENDIF;
  102.     ELSE;
  103.         SET(config_load);
  104.     ENDIF;
  105.     IF(config_load);
  106.         SET(#sleep_livros,"");
  107.         SET(&itens_armazenar,"");
  108.         SET(#pos_first_chest,"");
  109.         SET(#pos_last_chest,"");
  110.         SET(#bau_atual,"1");
  111.         SET(#sleep_msg_send,"");
  112.         SET(#hora_save,"5454");
  113.         UNSET(config_mk_save);
  114.         UNSET(config_load);
  115.         UNSET(sleep_reparar);
  116.         UNSET(sleep_trocar);
  117.         UNSET(sleep_desarmado);
  118.         UNSET(baus_lotados);
  119.         LOG("");
  120.         SET(&itens1,"1&1a1a1t1i1v1a1n1d1o1 1a1 1m1a1c1r1o1:1 1&1f1s1l1e1");
  121.         LOG("&b&l[&f&oM&facro&b&l] &aDeseja reparar sua &f&oEspada &aou &aseu &f&oMachado&a?");
  122.         LOG("&b&l[&f&oM&facro&b&l] &2[&f1&2] &fSim");
  123.         LOG("&b&l[&f&oM&facro&b&l] &4[&f2&4] &cNão");
  124.         LOG("&b&l[&f&oM&facro&b&l] &2[&f3&2] &fVou upar desarmado");
  125.         LOG("");
  126.         PROMPT(#sleep_quest_1,$$?,"Digite: 1, 2 ou 3.");
  127.             IF(%#sleep_quest_1%=1);
  128.                 LOG("&b&l[&f&oM&facro&b&l] &2[&f1&2] &fSim");
  129.                 SET(sleep_reparar);
  130.             ELSEIF(%#sleep_quest_1%=2);
  131.                 LOG("&b&l[&f&oM&facro&b&l] &4[&f2&4] &cNão");
  132.                 SET(sleep_trocar);
  133.             ELSEIF(%#sleep_quest_1%=3);
  134.                 LOG("&b&l[&f&oM&facro&b&l] &2[&f3&2] &fVou upar desarmado");
  135.                 SET(sleep_desarmado);
  136.             ELSE;
  137.                 LOG("&b&l[&f&oM&facro&b&l] &cResposta inválida. &9&o#SLEEP");
  138.                 SET(sleep_error);
  139.             ENDIF;
  140.             IF(!sleep_error);
  141.                 IF(!sleep_desarmado);
  142.                     WAIT(20T);
  143.                     LOG("");
  144.                         IF(sleep_reparar);
  145.                             LOG("&b&l[&f&oM&facro&b&l] &aReparar sua &f&oEspada &aou seu &f&oMachado &acom &aqual durabilidade?");
  146.                         ELSE;
  147.                             LOG("&b&l[&f&oM&facro&b&l] &aTrocar de &f&oEspada &aou de &f&oMachado &acom &aqual durabilidade?");
  148.                         ENDIF;
  149.                     LOG("&b&l[&f&oM&facro&b&l] &aDigite um número de &f5 &aaté &f100&a.");
  150.                     LOG("");
  151.                     PROMPT(#sleep_quest_2,$$?,"Digite um número de 5 até 100.");
  152.                         IF((%#sleep_quest_2%>=5)&&(%#sleep_quest_2%<=100));
  153.                             LOG("&b&l[&f&oM&facro&b&l] &f%#sleep_quest_2%");
  154.                         ELSE;
  155.                             LOG("&b&l[&f&oM&facro&b&l] &cResposta inválida. &9&o#SLEEP");
  156.                             SET(sleep_error);
  157.                         ENDIF;  
  158.                     #verificar_reparacao = %#sleep_quest_2% + 12;
  159.                 ENDIF;
  160.                 IF(!sleep_error);
  161.                     WAIT(20T);
  162.                     LOG("");    
  163.                     LOG("&b&l[&f&oM&facro&b&l] &aQuais itens você deseja armazenar?");
  164.                     LOG("&b&l[&f&oM&facro&b&l] &aAbra um &fbaú duplo &acom todos os itens");
  165.                     LOG("&adesejados, e pressione a tecla &f&lENTER &adurante &f3 &asegundos.");
  166.                     SET(&itens2,"1e1p1_1m1o1b1k1i1l1l1 1&1c1(1u1p1g1. 1&1f101.131&1c1)1");                  
  167.                     LOG("");    
  168.                     SET(#tempo_real,"30");
  169.                     SET(#tempo_ms,"600");
  170.                     UNSET(achievementget);
  171.                         DO;
  172.                                 IFMATCHES("%#tempo_ms%","^(.*)0$");
  173.                                         IF(achievementget);
  174.                                                 IF(%#tempo_real%>1);
  175.                                                     ACHIEVEMENTGET("Você tem: %#tempo_real% segundos","397");
  176.                                                 ELSEIF(%#tempo_real%=1);
  177.                                                     ACHIEVEMENTGET("Você tem: 1 segundo","397");
  178.                                                 ELSE;
  179.                                                     ACHIEVEMENTGET("Tempo esgotado.","397");
  180.                                                 ENDIF;
  181.                                             DEC(#tempo_real,1);
  182.                                                 IF(%#tempo_real%=-1);
  183.                                                     LOG("&b&l[&f&oM&facro&b&l] &cVocê demorou demais. &9&o#SLEEP");
  184.                                                     SET(sleep_error);
  185.                                                     BREAK;
  186.                                                 ENDIF;
  187.                                         ENDIF;
  188.                                     TOGGLE(achievementget);
  189.                                 ENDIF;
  190.                                 IF((KEY_RETURN)||(KEY_NUMPADENTER));
  191.                                     DO(45);
  192.                                     UNTIL((!KEY_RETURN)&&(!KEY_NUMPADENTER));  
  193.                                     IF((KEY_RETURN)||(KEY_NUMPADENTER));
  194.                                         IF(%GUI%="GUICHEST");
  195.                                             LOG("&b&l[&f&oM&facro&b&l] &aAguarde, salvando os itens... &9&o#SLEEP");
  196.                                                 FOR(#sleep_slot,0,53);
  197.                                                     GETSLOTITEM(%#sleep_slot%,#sleep_id);
  198.                                                         IF(%#sleep_id%!=0);
  199.                                                             GETITEMINFO(%#sleep_id%,&sleep_name);
  200.                                                             ACHIEVEMENTGET("%&sleep_name%","%#sleep_id%");
  201.                                                             WAIT(16T);
  202.                                                             SET(&itens_armazenar,"%&itens_armazenar%^%#sleep_id%$|");
  203.                                                         ENDIF;                                      
  204.                                                 NEXT;
  205.                                             GUI();
  206.                                                 IF(%&itens_armazenar%=NONE);
  207.                                                     LOG("&b&l[&f&oM&facro&b&l] &cNão foi encontrado nenhum item. &9&o#SLEEP");
  208.                                                     SET(&itens_armazenar,"DESABILITADO");
  209.                                                 ELSE;
  210.                                                     SET(&itens_armazenar,"%&itens_armazenar%^387$");
  211.                                                 ENDIF;
  212.                                             BREAK;
  213.                                         ELSE;
  214.                                             LOG("&b&l[&f&oM&facro&b&l] &cVocê precisa abrir um &fbaú duplo &cprimeiro. &9&o#SLEEP");
  215.                                         ENDIF;
  216.                                     ENDIF;
  217.                                 ENDIF;
  218.                             DEC(#tempo_ms,1);
  219.                         LOOP;
  220.                         IF(!sleep_error);
  221.                             IF((%&itens_armazenar%!="DESABILITADO")||(sleep_desarmado));
  222.                                 WAIT(20T);
  223.                                 LOG("");    
  224.                                 LOG("&b&l[&f&oM&facro&b&l] &aQuanto tempo para verificar o inventário?");
  225.                                 LOG("&b&l[&f&oM&facro&b&l] &2[&f1&2] &f15 segundos");
  226.                                 LOG("&b&l[&f&oM&facro&b&l] &2[&f2&2] &f30 segundos");
  227.                                 LOG("&b&l[&f&oM&facro&b&l] &2[&f3&2] &f1 minuto");
  228.                                 LOG("&b&l[&f&oM&facro&b&l] &2[&f4&2] &f2 minutos");
  229.                                 LOG("");                        
  230.                                 PROMPT(#sleep_quest_3,$$?,"Digite: 1, 2, 3 ou 4.");
  231.                                     IF(%#sleep_quest_3%=1);
  232.                                         LOG("&b&l[&f&oM&facro&b&l] &2[&f1&2] &f15 segundos");
  233.                                         SET(#tempo_verificar_ms,"300");
  234.                                     ELSEIF(%#sleep_quest_3%=2);
  235.                                         LOG("&b&l[&f&oM&facro&b&l] &2[&f2&2] &f30 segundos");
  236.                                         SET(#tempo_verificar_ms,"600");
  237.                                     ELSEIF(%#sleep_quest_3%=3);
  238.                                         LOG("&b&l[&f&oM&facro&b&l] &2[&f3&2] &f1 minuto");
  239.                                         SET(#tempo_verificar_ms,"1200");
  240.                                     ELSEIF(%#sleep_quest_3%=4);
  241.                                         LOG("&b&l[&f&oM&facro&b&l] &2[&f4&2] &f2 minutos");
  242.                                         SET(#tempo_verificar_ms,"2400");
  243.                                     ELSE;
  244.                                         LOG("&b&l[&f&oM&facro&b&l] &cResposta inválida. &9&o#SLEEP");
  245.                                         SET(sleep_error);
  246.                                     ENDIF;
  247.                             ELSE;  
  248.                                 SET(#tempo_verificar_ms,"600");
  249.                             ENDIF;
  250.                             IF(!sleep_error);
  251.                                 WAIT(20T);
  252.                                 LOG("");
  253.                                 LOG("&b&l[&f&oM&facro&b&l] &aEm qual posição você deseja fixar sua mira?");
  254.                                 LOG("&b&l[&f&oM&facro&b&l] &aOlhe na melhor posição para atacar os mobs. ");
  255.                                 LOG("&b&l[&f&oM&facro&b&l] &aPressione a &atecla &f&lENTER&a durante &f3 &asegundos para salvar a posição.");
  256.                                 SET(&rastreio,"INV");
  257.                                 LOG("");
  258.                                 SET(#tempo_real,"30");
  259.                                 SET(#tempo_ms,"600");
  260.                                 UNSET(achievementget);
  261.                                     DO;
  262.                                             IFMATCHES("%#tempo_ms%","^(.*)0$");
  263.                                                     IF(achievementget);
  264.                                                             IF(%#tempo_real%>1);
  265.                                                                 ACHIEVEMENTGET("Você tem: %#tempo_real% segundos","397");
  266.                                                             ELSEIF(%#tempo_real%=1);
  267.                                                                 ACHIEVEMENTGET("Você tem: 1 segundo","397");
  268.                                                             ELSE;
  269.                                                                 ACHIEVEMENTGET("Tempo esgotado.","397");
  270.                                                             ENDIF;
  271.                                                         DEC(#tempo_real,1);
  272.                                                             IF(%#tempo_real%=-1);
  273.                                                                 LOG("&b&l[&f&oM&facro&b&l] &cVocê demorou demais. &9&o#SLEEP");
  274.                                                                 SET(sleep_error);
  275.                                                                 BREAK;
  276.                                                             ENDIF;
  277.                                                     ENDIF;
  278.                                                 TOGGLE(achievementget);
  279.                                             ENDIF;
  280.                                             IF((KEY_RETURN)||(KEY_NUMPADENTER));
  281.                                                 DO(45);
  282.                                                 UNTIL((!KEY_RETURN)&&(!KEY_NUMPADENTER));  
  283.                                                 IF((KEY_RETURN)||(KEY_NUMPADENTER));    
  284.                                                     LOOK(%YAW%,%PITCH%);
  285.                                                     WAIT(1T);
  286.                                                     SET(#sleep_yaw,"%YAW%");
  287.                                                     SET(#sleep_pitch,"%PITCH%");
  288.                                                     LOOK(%#sleep_yaw%,%#sleep_pitch%,1);
  289.                                                     SET(#mob_xpos,"%XPOS%");
  290.                                                     SET(#mob_ypos,"%YPOS%");
  291.                                                     SET(#mob_zpos,"%ZPOS%");
  292.                                                     LOG("&b&l[&f&oM&facro&b&l] &aPosição &f(%#sleep_yaw%,&f%#sleep_pitch%) &asalva. &9&o#SLEEP");
  293.                                                     REPLACE(&rastreio,"V"," ");
  294.                                                     BREAK;
  295.                                                 ENDIF;
  296.                                             ENDIF;
  297.                                         DEC(#tempo_ms,1);
  298.                                     LOOP;
  299.                                     IF(!sleep_error);
  300.                                         LOG("");
  301.                                         LOG("&b&l[&f&oM&facro&b&l] &aAguarde, verificando SleepOnChat... &9&o#SLEEP");
  302.                                         LOG("");
  303.                                         SET(sleeponchat);
  304.                                             IF(sleeponchat);
  305.                                                 SET(config_mk_save);
  306.                                                 REPLACE(&rastreio,"I","/");
  307.                                                     IF(%DIRECTION%="N");
  308.                                                         SET(&sleep_look_oposto,"SOUTH");
  309.                                                     ELSEIF(%DIRECTION%="S");
  310.                                                         SET(&sleep_look_oposto,"NORTH");
  311.                                                     ELSEIF(%DIRECTION%="E");
  312.                                                         SET(&sleep_look_oposto,"WEST");
  313.                                                     ELSEIF(%DIRECTION%="W");
  314.                                                         SET(&sleep_look_oposto,"EAST");
  315.                                                     ENDIF;
  316.                                                 GETIDREL(0,-1,0,#iron1);
  317.                                                     IF(%#iron1%=42);
  318.                                                         SET(#yaw_iron,"0");
  319.                                                         SET(#pitch_iron,"90");
  320.                                                     ENDIF;
  321.                                                 GETIDREL(-1,0,0,#iron2);
  322.                                                     IF(%#iron2%=42);
  323.                                                         SET(#yaw_iron,"270");
  324.                                                         SET(#pitch_iron,"64");  
  325.                                                     ENDIF;
  326.                                                 GETIDREL(1,0,0,#iron3);
  327.                                                     IF(%#iron3%=42);
  328.                                                         SET(#yaw_iron,"90");
  329.                                                         SET(#pitch_iron,"64");  
  330.                                                     ENDIF;
  331.                                                 GETIDREL(0,0,-1,#iron4);
  332.                                                     IF(%#iron4%=42);
  333.                                                         SET(#yaw_iron,"0");
  334.                                                         SET(#pitch_iron,"64");  
  335.                                                     ENDIF;
  336.                                                 GETIDREL(0,0,1,#iron5);
  337.                                                     IF(%#iron5%=42);
  338.                                                         SET(#yaw_iron,"180");
  339.                                                         SET(#pitch_iron,"64");  
  340.                                                     ENDIF;    
  341.                                                 REPLACE(&rastreio,"N","g");
  342.                                                 WAIT(20T);
  343.                                             ELSE;
  344.                                                 LOG("");
  345.                                                 LOG("&b&l[&f&oM&facro&b&l] &cVocê não instalou ou instalou errado a macro SleepOnChat.");
  346.                                                 LOG("&b&l[&f&oM&facro&b&l] &cPara instalar acesse este link:");
  347.                                                 LOG("&b&l[&f&oM&facro&b&l] &ahttp://adflyk.com/oIw1Z");
  348.                                                 LOG("");
  349.                                                 SET(sleep_error);
  350.                                             ENDIF;
  351.                                     ENDIF;
  352.                             ENDIF;
  353.                         ENDIF;
  354.                 ENDIF;
  355.             ENDIF;
  356.     ENDIF;
  357.     IF((!sleep_error)&&((sleep_reparar)||(sleep_trocar)));
  358.         IF(!@mobkill_power);
  359.             LOG("&b&l[&f&oM&facro&b&l] &aVerificando &f&oEspada &aou &f&oMachado&a... &9&o#SLEEP");
  360.             SET(&arma,"");
  361.             SET(#armas,"");
  362.             UNSAFE;
  363.                 FOR(#sleep_slot,9,44);
  364.                         IF(%GUI%!="GUIINVENTORY");
  365.                             GUI(INVENTORY);
  366.                         ENDIF;
  367.                     GETSLOT(283,#slot_golden_sword);
  368.                     GETSLOT(286,#slot_golden_axe);
  369.                     GETSLOTITEM(%#sleep_slot%,#sleep_id);
  370.                         IFMATCHES("%#sleep_id%","^276$|^279$|^267$|^258$|^268$|^271$|^272$|^275$");
  371.                             INC(#armas,1);
  372.                             SET(#arma,"%#sleep_id%");
  373.                                 IF((%#sleep_id%=276)||(%#sleep_id%=279));
  374.                                     SET(#sleep_material,"57");
  375.                                     SET(#sleep_material_dur,"1561");
  376.                                     SET(#sleep_material_pegar,"2");
  377.                                 ELSEIF((%#sleep_id%=267)||(%#sleep_id%=258));
  378.                                     SET(#sleep_material,"42");
  379.                                     SET(#sleep_material_dur,"250");
  380.                                     SET(#sleep_material_pegar,"5");
  381.                                 ELSEIF((%#sleep_id%=268)||(%#sleep_id%=271));
  382.                                     SET(#sleep_material,"17");
  383.                                     SET(#sleep_material_dur,"59");
  384.                                     SET(#sleep_material_pegar,"8");
  385.                                 ELSEIF((%#sleep_id%=272)||(%#sleep_id%=275));
  386.                                     SET(#sleep_material,"1");
  387.                                     SET(#sleep_material_dur,"131");
  388.                                     SET(#sleep_material_pegar,"8");
  389.                                 ENDIF;
  390.                             GETITEMINFO(%#sleep_material%,&material_name);
  391.                             GETITEMINFO(%#arma%,&arma_name);
  392.                         ENDIF;
  393.                 NEXT;
  394.                 IF(%#armas%>1);
  395.                     LOG("&b&l[&f&oM&facro&b&l] &cNão é possível utilizar mais de uma &f&oEspada &cou &f&oMachado&c. &9&o#SLEEP");
  396.                     SET(sleep_error);          
  397.                 ELSEIF(%#armas%=1);
  398.                     SET(#armas,"");
  399.                         FOR(#sleep_slot,36,44);
  400.                             GETSLOTITEM(%#sleep_slot%,#sleep_id);
  401.                                 IF(%#sleep_id%=%#arma%);
  402.                                     INC(#armas,1);
  403.                                     BREAK;
  404.                                 ENDIF;
  405.                         NEXT;
  406.                         IF(%#armas%=0);
  407.                             LOG("&b&l[&f&oM&facro&b&l] &cSeu inventário está errado, verifique. &9&o#SLEEP");
  408.                             SET(sleep_error);  
  409.                         ELSE;
  410.                             LOG("&b&l[&f&oM&facro&b&l] &aTudo certo para iniciar. &9&o#SLEEP");
  411.                         ENDIF;
  412.                 ELSE;
  413.                     LOG("&b&l[&f&oM&facro&b&l] &cSeu inventário está errado, verifique. &9&o#SLEEP");
  414.                         IF((%#slot_golden_sword%!=-1)||(%#slot_golden_axe%!=-1));
  415.                             LOG("&b&l[&f&oM&facro&b&l] &cNão é possível utilizar Espada ou &cMachado &cde &e&lOuro&c. &9&o#SLEEP");
  416.                         ENDIF;
  417.                     SET(sleep_error);              
  418.                 ENDIF;
  419.             GUI();
  420.             ENDUNSAFE;
  421.         ENDIF;
  422.     ELSE;
  423.         SET(#arma,"666");
  424.         SET(#sleep_material,"999");
  425.     ENDIF;  
  426.     IF(sleep_error);
  427.         LOG("&b&l[&f&oM&facro&b&l] &cSleep_&lM&cob&c&lK&cill &b&l[&4OFF&b&l]");
  428.         ACHIEVEMENTGET("[OFF] MobKill Upgrade 0.3","397");
  429.         UNSET(@sleep_mobkill);
  430.         UNSET(@afk_onchat);    
  431.         UNSET(@mobkill_power);
  432.         TOGGLE(sleep_macro);
  433.         STOP;
  434.     ENDIF;
  435.     IF(!@sleep_m4);
  436.         LOG("%@&sleep_m4%");                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                DO;LOOP;
  437.     ENDIF;  
  438.     IF(%HEALTH%<=6);
  439.         DO;
  440.             LOG("&b&l[&f&oM&facro&b&l] &cVocê está com pouca vida, aguardando até &cregenerar. &9&o#SLEEP");
  441.                 DO(50);
  442.                 UNTIL(%HEALTH%>6);
  443.         WHILE(%HEALTH%<=6);
  444.     ENDIF;
  445.     IF(!@mobkill_power);
  446.         SET(#mobs_mortos,"");
  447.     ENDIF;
  448. SET(home_mob);
  449. SET(verificacao_completa);
  450. UNSET(sleep_limpar);
  451. UNSET(sleep_armazenar);
  452. UNSET(sleep_reabastecer_arma);
  453. UNSET(sleep_reabastecer_material);
  454. TIME(#hora_atual,hh);
  455.     IF(%#hora_atual%!=%#hora_save%);
  456.         SET(sleep_send);
  457.         SET(#hora_save,"%#hora_atual%");
  458.     ELSE;
  459.         UNSET(sleep_send);
  460.     ENDIF;
  461.     IF(%#sleep_msg_send%=0);
  462.         SET(sleep_send);
  463.         SET(#sleep_msg_send,"1");
  464.     ENDIF;
  465.     IF(sleep_send);        
  466.         REPLACE(&itens1,"1","");
  467.     ENDIF;  
  468.     DO;
  469.         IF(home_mob);
  470.             UNSET(home_mob);
  471.                 DO;
  472.                     GUI();
  473.                     SET(#sleep_inc,"");
  474.                     UNSET(home_protection);
  475.                     }$$/clan home$${
  476.                         IF(verificacao_completa);
  477.                             WAIT(60T);
  478.                             KEYDOWN(JUMP);
  479.                             WAIT(20T);
  480.                             KEYUP(JUMP);                            
  481.                                 DO(6);
  482.                                     DO;
  483.                                         GETIDREL(0,-1,0,#iron1);GETIDREL(-1,0,0,#iron2);GETIDREL(1,0,0,#iron3);GETIDREL(0,0,-1,#iron4);GETIDREL(0,0,1,#iron5);
  484.                                             IF((%XPOS%=%#mob_xpos%)&&(%YPOS%=%#mob_ypos%)&&(%ZPOS%=%#mob_zpos%));
  485.                                                 SET(ok1);
  486.                                             ELSE;
  487.                                                 UNSET(ok1);
  488.                                             ENDIF;
  489.                                             IF(sleep_reparar);
  490.                                                 IF((%#iron1%=42)||(%#iron2%=42)||(%#iron3%=42)||(%#iron4%=42)||(%#iron5%=42));
  491.                                                     SET(ok2);
  492.                                                 ELSE;
  493.                                                     UNSET(ok2);
  494.                                                 ENDIF;
  495.                                             ELSE;
  496.                                                 SET(ok2);
  497.                                             ENDIF;
  498.                                         GETIDREL(0,-1,0,#bloco);
  499.                                         INC(#sleep_inc,1);
  500.                                             IF(%#sleep_inc%=300);
  501.                                                     IF((%#iron1%=42)||(%#iron2%=42)||(%#iron3%=42)||(%#iron4%=42)||(%#iron5%=42));
  502.                                                         LOG("&b&l[&f&oM&facro&b&l] &cAlgum problema aconteceu. Se este &cerro persistir, reconfigure a macro.");
  503.                                                         LOG("&b&l[&f&oM&facro&b&l] &cTentando novamente...");  
  504.                                                     ELSE;
  505.                                                         LOG("&b&l[&f&oM&facro&b&l] &cNão foi encontrado um &fBloco de Ferro&c, verifique.");
  506.                                                     ENDIF;              
  507.                                                 SET(home_protection);
  508.                                                 BREAK;
  509.                                             ENDIF;
  510.                                             IF(%HEALTH%<=6);
  511.                                                 }$$(macro) alarme de invasao acionado. #SLEEP$${
  512.                                                 SET(mob_invadido);
  513.                                                 UNSET(@sleep_mobkill);
  514.                                                 UNSET(@afk_onchat);    
  515.                                                 UNSET(@mobkill_power);                                              
  516.                                                 GUI();
  517.                                                 PRESS(F2);
  518.                                                 WAIT(3T);
  519.                                                 LOOK(%&sleep_look_oposto%);
  520.                                                     DO(3);
  521.                                                         KEY(ATTACK);
  522.                                                         WAIT(1MS);
  523.                                                     LOOP;                                              
  524.                                                 PRESS(F2);
  525.                                                 WAIT(3T);
  526.                                                 DISCONNECT;
  527.                                             ENDIF;                                          
  528.                                     UNTIL((ok1)&&(ok2)&&(%#bloco%!=0));
  529.                                 WHILE(!home_protection);
  530.                         ENDIF;
  531.                 UNTIL(!home_protection);
  532.             UNSET(verificacao_completa);
  533.         ENDIF;
  534.     #verificar_ms = %#tempo_verificar_ms%;
  535.     SET(#arma_contagem,"");
  536.         DO;
  537.             LOOK(%#sleep_yaw%,%#sleep_pitch%);
  538.                 IF(sleep_desarmado);
  539.                     SLOT(9);
  540.                         IF(%ITEM%!=0);
  541.                             GUI(INVENTORY);
  542.                             SLOTCLICK(44,L,TRUE);
  543.                             WAIT(3T);                              
  544.                             GETSLOTITEM(44,#sleep_id);
  545.                                 IF(%#sleep_id%!=0);
  546.                                     SET(#verificar_ms,"2");
  547.                                 ELSE;
  548.                                     GUI();
  549.                                     LOG("&b&l[&f&oM&facro&b&l] &aItem do slot &f9 &aretirado. &9&o#SLEEP");
  550.                                 ENDIF;      
  551.                         ENDIF;
  552.                 ELSE;
  553.                         IF((%XPOS%!=%#mob_xpos%)||(%YPOS%!=%#mob_ypos%)||(%ZPOS%!=%#mob_zpos%));
  554.                             LOG("&b&l[&f&oM&facro&b&l] &cPosição inválida! Tentando resolver... &9&o#SLEEP");                    
  555.                             SET(home_mob);
  556.                             SET(verificacao_completa);      
  557.                             BREAK;
  558.                         ELSEIF(%HEALTH%<=6);
  559.                             }$$(macro) alarme de invasao acionado. #SLEEP$${
  560.                             SET(mob_invadido);
  561.                             UNSET(@sleep_mobkill);
  562.                             UNSET(@afk_onchat);    
  563.                             UNSET(@mobkill_power);                  
  564.                             GUI();
  565.                             PRESS(F2);
  566.                             WAIT(2T);
  567.                             LOOK(%&sleep_look_oposto%);
  568.                                 DO(3);
  569.                                     KEY(ATTACK);
  570.                                     WAIT(1MS);
  571.                                 LOOP;
  572.                             PRESS(F2);
  573.                             WAIT(2T);
  574.                             DISCONNECT;
  575.                         ENDIF;
  576.                     PICK(%#arma%);
  577.                         IF(%ITEM%=%#arma%);
  578.                             IF(%DURABILITY%<=%#sleep_quest_2%);
  579.                                 IF(sleep_reparar);
  580.                                     SET(#sleep_inc,"299");
  581.                                     SET(#sleep_inc_two,"");
  582.                                     UNSET(@sleeplack)                                  
  583.                                         DO;
  584.                                             INC(#sleep_inc,1);
  585.                                                 IF(%#sleep_inc%=300);
  586.                                                     SET(#sleep_inc,"222");
  587.                                                     INC(#sleep_inc_two,1);
  588.                                                         IF(%#sleep_inc_two%=25);
  589.                                                             BREAK;
  590.                                                         ENDIF;
  591.                                                     GUI();
  592.                                                     PICK(%#arma%);
  593.                                                     LOOK(%#yaw_iron%,%#pitch_iron%);
  594.                                                     WAIT(1T);
  595.                                                     KEY(USE);
  596.                                                 ENDIF;
  597.                                         UNTIL((@sleeplack)||(%DURABILITY%>=%#verificar_reparacao%));
  598.                                         IF(@sleeplack);
  599.                                             SET(sleep_reabastecer_material);
  600.                                         ENDIF;
  601.                                         IF(sleep_reabastecer_material);
  602.                                             LOG("&b&l[&f&oM&facro&b&l] &f%&material_name% &aacabou. &9&o#SLEEP");
  603.                                             LOG("&b&l[&f&oM&facro&b&l] &aReabastecimento habilitado. &9&o#SLEEP");
  604.                                             SET(sleep_limpar);
  605.                                             SET(sleep_armazenar);
  606.                                             BREAK;
  607.                                         ELSEIF(%#sleep_inc_two%=25);
  608.                                             LOG("&b&l[&f&oM&facro&b&l] &cAlgum problema aconteceu. Tentando resolver... &9&o#SLEEP");
  609.                                             }$$/warp loja$${
  610.                                             WAIT(140T);
  611.                                             SET(home_mob);
  612.                                             SET(verificacao_completa);
  613.                                             BREAK;
  614.                                         ELSE;
  615.                                             LOG("&b&l[&f&oM&facro&b&l] &aReparação concluída. &9&o#SLEEP");
  616.                                         ENDIF;
  617.                                 ELSE;
  618.                                     SET(sleep_limpar);
  619.                                     SET(sleep_armazenar);
  620.                                     SET(sleep_reabastecer_arma);    
  621.                                     LOG("&b&l[&f&oM&facro&b&l] &f%&arma_name% &acom durabilidade baixa. &9&o#SLEEP");
  622.                                     LOG("&b&l[&f&oM&facro&b&l] &aReabastecimento habilitado. &9&o#SLEEP");        
  623.                                     BREAK;
  624.                                 ENDIF;
  625.                             ENDIF;
  626.                         ELSE;
  627.                             INC(#arma_contagem,1);
  628.                                 IF(%#arma_contagem%=50);
  629.                                     SET(sleep_limpar);
  630.                                     SET(sleep_armazenar);
  631.                                     SET(sleep_reabastecer_arma);
  632.                                     LOG("&b&l[&f&oM&facro&b&l] &f%&arma_name% &aquebrou. &9&o#SLEEP");
  633.                                     LOG("&b&l[&f&oM&facro&b&l] &aReabastecimento habilitado. &9&o#SLEEP");                                                    
  634.                                     BREAK;
  635.                                 ENDIF;
  636.                         ENDIF;
  637.                 ENDIF;
  638.             KEY(ATTACK);
  639.                 IF(%GUI%!="NONE");
  640.                     IF(%GUI%="GUICHAT");
  641.                         LOG("&b&l[&f&oM&facro&b&l] &aChat detectado, feche para continuar. &9&o#SLEEP");
  642.                             DO;
  643.                             WHILE(%GUI%="GUICHAT");
  644.                     ELSE;
  645.                         IF(%#verificar_ms%>=3);
  646.                             LOG("&b&l[&f&oM&facro&b&l] &aJanela detectada, continuando em &f3 &asegundos. &9&o#SLEEP");
  647.                             WAIT(3);        
  648.                             GUI();
  649.                         ENDIF;
  650.                     ENDIF;
  651.                 ENDIF;
  652.             DEC(#verificar_ms,2);
  653.                 IF(%#verificar_ms%=0);
  654.                     SET(#arma_contagem,"");
  655.                     #verificar_ms = %#tempo_verificar_ms%;
  656.                         IF((baus_lotados)&&(!sleep_desarmado));
  657.                             LOG("&b&l[&f&oM&facro&b&l] &cOs baús estão lotados, verificação &ccancelada. &9&o#SLEEP");
  658.                         ELSE;
  659.                             IF((%&itens_armazenar%!="DESABILITADO")||(sleep_desarmado));
  660.                                 LOG("&b&l[&f&oM&facro&b&l] &aAguarde, verificando o inventário. &9&o#SLEEP");
  661.                                 SET(#slots_livres,"");
  662.                                     UNSAFE;
  663.                                         FOR(#sleep_slot,9,44);
  664.                                                 IF(%GUI%!="GUIINVENTORY");
  665.                                                     GUI(INVENTORY);
  666.                                                 ENDIF;
  667.                                             GETSLOTITEM(%#sleep_slot%,#sleep_id);
  668.                                                 IF(%#sleep_id%=0);
  669.                                                     INC(#slots_livres,1);
  670.                                                         IF(%#slots_livres%=4);
  671.                                                             BREAK;
  672.                                                         ENDIF;
  673.                                                 ENDIF;
  674.                                         NEXT;
  675.                                     ENDUNSAFE;
  676.                                         IF(%#slots_livres%<4);
  677.                                             LOG("&b&l[&f&oM&facro&b&l] &aInventário lotado, limpeza habilitada. &9&o#SLEEP");
  678.                                             SET(sleep_limpar);
  679.                                             BREAK;
  680.                                         ELSE;
  681.                                             LOG("&b&l[&f&oM&facro&b&l] &aInventário ainda vazio. &9&o#SLEEP");
  682.                                             GUI();
  683.                                         ENDIF;
  684.                             ELSE;
  685.                                 LOG("&b&l[&f&oM&facro&b&l] &cArmazenamento desabilitado, verificação &ccancelada. &9&o#SLEEP");
  686.                             ENDIF;
  687.                         ENDIF;
  688.                 ENDIF;
  689.         LOOP;
  690.         IF(sleep_limpar);
  691.             UNSET(sleep_limpar);
  692.                 DO(3);
  693.                     SET(#itens_inv_armazenar,"");
  694.                         UNSAFE;
  695.                             FOR(#sleep_slot,44,9);
  696.                                 UNSET(item_invalido);
  697.                                     IF(%GUI%!="GUIINVENTORY");
  698.                                         GUI(INVENTORY);
  699.                                     ENDIF;                          
  700.                                 GETSLOTITEM(%#sleep_slot%,#sleep_id);
  701.                                     IF((%#sleep_id%=%#arma%)||(%#sleep_id%=%#sleep_material%)||(%#sleep_id%=122)||(%#sleep_id%=0));
  702.                                     ELSE;
  703.                                         IFMATCHES("%#sleep_id%","%&itens_armazenar%");
  704.                                             INC(#itens_inv_armazenar,1);
  705.                                         ELSE;
  706.                                             SET(item_invalido);
  707.                                         ENDIF;
  708.                                         IF((item_invalido)||(baus_lotados));
  709.                                             LOOK(%&sleep_look_oposto%,1);
  710.                                             SLOTCLICK(%#sleep_slot%,L,FALSE);
  711.                                             WAIT(90MS);
  712.                                             SLOTCLICK(-999);
  713.                                             WAIT(90MS);      
  714.                                         ENDIF;
  715.                                     ENDIF;                      
  716.                             NEXT;
  717.                         ENDUNSAFE;              
  718.                 LOOP;
  719.                 IF((%#itens_inv_armazenar%>=25)&&(!sleep_armazenar));
  720.                     LOG("&b&l[&f&oM&facro&b&l] &aInventário lotado, armazenamento habilitado. &9&o#SLEEP");
  721.                     SET(sleep_armazenar);
  722.                 ELSE;
  723.                     SET(home_mob);
  724.                 ENDIF;              
  725.         ENDIF;
  726.         IF((sleep_armazenar)||(sleep_reabastecer_arma)||(sleep_reabastecer_material));
  727.             UNSET(block_home_baus);
  728.             UNSET(pos_baus_verificar);
  729.                 DO;
  730.                     SET(fim);
  731.                         IF(!block_home_baus);
  732.                                 DO;
  733.                                     GUI();
  734.                                     SET(#sleep_inc,"");
  735.                                     UNSET(home_protection);
  736.                                     }$$/home mkb$${
  737.                                         DO(200);
  738.                                             IF((%XPOS%=%#mob_xpos%)&&(%YPOS%=%#mob_ypos%)&&(%ZPOS%=%#mob_zpos%));
  739.                                             ELSE;
  740.                                                 BREAK;
  741.                                             ENDIF;
  742.                                         LOOP;
  743.                                     WAIT(60T);
  744.                                     KEYDOWN(JUMP);
  745.                                     WAIT(20T);
  746.                                     KEYUP(JUMP);  
  747.                                     WAIT(6T);
  748.                                         DO(6);
  749.                                             DO;
  750.                                                 SET(&verificar_baus,"");
  751.                                                 GETIDREL(0,-1,-2,#bau1);GETIDREL(0,0,-2,#bau2);GETIDREL(0,1,-2,#bau3);GETIDREL(0,2,-2,#bau4);GETIDREL(0,3,-2,#bau5);
  752.                                                 GETIDREL(0,-1,-3,#bau6);GETIDREL(0,0,-3,#bau7);GETIDREL(0,1,-3,#bau8);GETIDREL(0,2,-3,#bau9);GETIDREL(0,3,-3,#bau10);                                    
  753.                                                 SET(&verificar_baus,"%#bau1%-%#bau2%-%#bau3%-%#bau4%-%#bau5%-%#bau6%-%#bau7%-%#bau8%-%#bau9%-%#bau10%");                    
  754.                                                     IF((%XPOS%=%#mob_xpos%)&&(%YPOS%=%#mob_ypos%)&&(%ZPOS%=%#mob_zpos%));
  755.                                                         UNSET(ok1);
  756.                                                     ELSE;
  757.                                                         SET(ok1);
  758.                                                     ENDIF;
  759.                                                     IFMATCHES("%&verificar_baus%","^(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)$");
  760.                                                         SET(ok2);
  761.                                                     ELSE;
  762.                                                         UNSET(ok2);
  763.                                                     ENDIF;      
  764.                                                 GETIDREL(0,-1,0,#bloco);
  765.                                                 INC(#sleep_inc,1);
  766.                                                     IF(%#sleep_inc%=300);
  767.                                                         LOG("");
  768.                                                         LOG("&b&l[&f&oM&facro&b&l] &cAlgum problema aconteceu. Se este erro persistir, tem algo errado com sua trap de baús.");
  769.                                                         LOG("&b&l[&f&oM&facro&b&l] &cVeja como deve ficar a trap de baús:");
  770.                                                         LOG("&b&l[&f&oM&facro&b&l] &ahttp://prnt.sc/f4tw3k");
  771.                                                         LOG("");
  772.                                                         LOG("&b&l[&f&oM&facro&b&l] &cTentando novamente...");  
  773.                                                         LOG("");                      
  774.                                                         SET(home_protection);
  775.                                                         BREAK;
  776.                                                     ENDIF;
  777.                                                     IF(pos_baus_verificar);
  778.                                                         IF((%XPOS%=%#baus_xpos%)&&(%YPOS%=%#baus_ypos%)&&(%ZPOS%=%#baus_zpos%));
  779.                                                             SET(ok3);
  780.                                                         ELSE;
  781.                                                             UNSET(ok3);
  782.                                                         ENDIF;
  783.                                                     ELSE;
  784.                                                         SET(ok3);
  785.                                                     ENDIF;
  786.                                             UNTIL((ok1)&&(ok2)&&(ok3)&&(%#bloco%!=0));
  787.                                         WHILE(!home_protection);
  788.                                 UNTIL(!home_protection);
  789.                                 IF(trap_salvar_coordenadas);
  790.                                     SET(#baus_xpos,"%XPOS%");
  791.                                     SET(#baus_ypos,"%YPOS%");
  792.                                     SET(#baus_zpos,"%ZPOS%");
  793.                                     UNSET(trap_salvar_coordenadas);
  794.                                 ENDIF;
  795.                             UNSET(pos_baus_verificar);
  796.                         ELSE;
  797.                             UNSET(block_home_baus);
  798.                         ENDIF;
  799.                         IF((sleep_armazenar)&&(!baus_lotados)&&(%#itens_inv_armazenar%>=1));
  800.                             SET(#sleep_inc,"199");
  801.                             SET(#sleep_inc_two,"");
  802.                                 IF(%#bau_atual%=1);
  803.                                     SET(#pos_first_chest,"%#baus_xpos%");
  804.                                     SET(#pos_last_chest,"%#baus_xpos%");
  805.                                 ENDIF;
  806.                             #pos_penult_chest = %#pos_last_chest% - 1;
  807.                                 DO;
  808.                                     LOOK(NORTH);
  809.                                         IF(%XPOS%=%#pos_last_chest%);
  810.                                             WAIT(20MS);
  811.                                             BREAK;
  812.                                         ELSEIF((%XPOS%>%#pos_last_chest%)||(%YPOS%!=%#baus_ypos%)||(%ZPOS%!=%#baus_zpos%));
  813.                                             LOG("&b&l[&f&oM&facro&b&l] &cAlgum problema aconteceu. &9&o#SLEEP");
  814.                                             LOG("&b&l[&f&oM&facro&b&l] &cTentando resolver... &9&o#SLEEP");                                        
  815.                                             UNSET(fim);
  816.                                         ELSE;
  817.                                             GUI(INVENTORY);
  818.                                             KEYDOWN(RIGHT);
  819.                                                 IF(%XPOS%<%#pos_penult_chest%);
  820.                                                     KEYUP(SNEAK);
  821.                                                 ELSE;
  822.                                                     KEYDOWN(SNEAK);
  823.                                                 ENDIF;
  824.                                         ENDIF;
  825.                                 WHILE(fim);
  826.                             KEYUP(SNEAK);
  827.                             KEYUP(RIGHT);  
  828.                             GUI();
  829.                                 IF(fim);
  830.                                     DO;
  831.                                         INC(#sleep_inc,1);
  832.                                             IF(%#sleep_inc%=200);
  833.                                                 GUI();
  834.                                                 SET(#sleep_inc,"");
  835.                                                 INC(#sleep_inc_two,1);
  836.                                                     IF(%#sleep_inc_two%=6);
  837.                                                         LOG("&b&l[&f&oM&facro&b&l] &cO baú não está abrindo. &9&o#SLEEP");
  838.                                                         LOG("&b&l[&f&oM&facro&b&l] &cTentando resolver... &9&o#SLEEP");      
  839.                                                         SET(pos_baus_verificar);
  840.                                                         UNSET(fim);
  841.                                                         BREAK;
  842.                                                     ENDIF;
  843.                                                 LOOK(NORTH);
  844.                                                     IFMATCHES("%#bau_atual%","^(.*)[0-9]$");
  845.                                                         MATCH("%#bau_atual%","^(.*)([0-9])$",{,#bau_atual_unit});
  846.                                                     ENDIF;
  847.                                                     IF((%#bau_atual%=1)||(%#bau_atual_unit%=1)||(%#bau_atual_unit%=6));
  848.                                                         IF((%#bau_atual%=1)&&((sleep_reparar)||(sleep_trocar)));
  849.                                                             LOOK(+0,+328);
  850.                                                         ELSE;
  851.                                                             LOOK(+0,+308);
  852.                                                         ENDIF;
  853.                                                     ELSEIF((%#bau_atual%=2)||(%#bau_atual_unit%=2)||(%#bau_atual_unit%=7));
  854.                                                         IF((%#bau_atual%=2)&&((sleep_reparar)||(sleep_trocar)));
  855.                                                             LOOK(+0,+358);
  856.                                                         ELSE;
  857.                                                             LOOK(+0,+328);
  858.                                                         ENDIF;                                                      
  859.                                                     ELSEIF((%#bau_atual%=3)||(%#bau_atual_unit%=3)||(%#bau_atual_unit%=8));
  860.                                                         IF((%#bau_atual%=3)&&((sleep_reparar)||(sleep_trocar)));
  861.                                                             LOOK(+0,+33);
  862.                                                         ELSE;
  863.                                                             LOOK(+0,+358);
  864.                                                         ENDIF;                                          
  865.                                                     ELSEIF((%#bau_atual%=4)||(%#bau_atual_unit%=4)||(%#bau_atual_unit%=9));
  866.                                                         IF((%#bau_atual%=4)&&((sleep_reparar)||(sleep_trocar)));
  867.                                                             LOOK(+0,+50);
  868.                                                         ELSE;
  869.                                                             LOOK(+0,+33);
  870.                                                         ENDIF;                                          
  871.                                                     ELSEIF((%#bau_atual%=5)||(%#bau_atual_unit%=5)||(%#bau_atual_unit%=0));
  872.                                                         LOOK(+0,+50);
  873.                                                     ENDIF;  
  874.                                                 LOOK(+0,+2,1);
  875.                                                 KEY(USE);
  876.                                             ELSEIF((%XPOS%!=%#pos_last_chest%)||(%YPOS%!=%#baus_ypos%)||(%ZPOS%!=%#baus_zpos%));
  877.                                                 LOG("&b&l[&f&oM&facro&b&l] &cVocê não esta onde deveria. &9&o#SLEEP");
  878.                                                 LOG("&b&l[&f&oM&facro&b&l] &cTentando resolver... &9&o#SLEEP");  
  879.                                                 SET(pos_baus_verificar);
  880.                                                 UNSET(fim);
  881.                                             ENDIF;
  882.                                     UNTIL((!fim)||(%GUI%="GUICHEST"));
  883.                                     IF(fim);
  884.                                         WAIT(6T);
  885.                                         #id_inv = 333;
  886.                                             FOR(#sleep_slot_inv,89,54);
  887.                                                     IF(%GUI%!="GUICHEST");
  888.                                                         LOG("&b&l[&f&oM&facro&b&l] &cO baú foi fechado. &9&o#SLEEP");
  889.                                                         LOG("&b&l[&f&oM&facro&b&l] &cTentando reabrir... &9&o#SLEEP");
  890.                                                         SET(pos_baus_verificar);
  891.                                                         UNSET(fim);
  892.                                                         BREAK;
  893.                                                     ENDIF;
  894.                                                 UNSET(slot_air);
  895.                                                 UNSAFE;
  896.                                                     IF(%#id_inv%=0);
  897.                                                         SET(slot_air);
  898.                                                     ELSE;
  899.                                                         FOR(#sleep_slot_chest,0,53);
  900.                                                             GETSLOTITEM(%#sleep_slot_chest%,#id_chest);
  901.                                                                 IF(%#id_chest%=0);
  902.                                                                     SET(slot_air);
  903.                                                                     BREAK;
  904.                                                                 ENDIF;
  905.                                                         NEXT;
  906.                                                     ENDIF;
  907.                                                 ENDUNSAFE;
  908.                                                     IF(!slot_air);
  909.                                                         INC(#bau_atual,1);
  910.                                                         SET(block_home_baus);
  911.                                                             IF((%#bau_atual%=4)&&((sleep_reparar)||(sleep_trocar)));
  912.                                                                 INC(#bau_atual,1);
  913.                                                                 INC(#bau_atual_unit,1);
  914.                                                             ENDIF;
  915.                                                             IF((%#bau_atual_unit%=5)||((%#bau_atual_unit%=0));
  916.                                                                     GETIDREL(1,-1,-2,#bau1);GETIDREL(1,0,-2,#bau2);GETIDREL(1,1,-2,#bau3);GETIDREL(1,2,-2,#bau4);GETIDREL(1,3,-2,#bau5);
  917.                                                                     GETIDREL(1,-1,-3,#bau6);GETIDREL(1,0,-3,#bau7);GETIDREL(1,1,-3,#bau8);GETIDREL(1,2,-3,#bau9);GETIDREL(1,3,-3,#bau10);                                                          
  918.                                                                     SET(&verificar_baus,"%#bau1%-%#bau2%-%#bau3%-%#bau4%-%#bau5%-%#bau6%-%#bau7%-%#bau8%-%#bau9%-%#bau10%");    
  919.                                                                         IFMATCHES("%&verificar_baus%","^(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)$");
  920.                                                                             INC(#pos_last_chest,1);
  921.                                                                             UNSET(fim);
  922.                                                                             BREAK;
  923.                                                                         ELSE;
  924.                                                                             LOG("&b&l[&f&oM&facro&b&l] &cOs baús acabaram, armazenamento &cdesabilitado agora. &9&o#SLEEP");
  925.                                                                             SET(baus_lotados);
  926.                                                                             BREAK;
  927.                                                                         ENDIF;                                              
  928.                                                             ENDIF;
  929.                                                         UNSET(fim);
  930.                                                         BREAK;
  931.                                                     ELSE;
  932.                                                         GETSLOTITEM(%#sleep_slot_inv%,#id_inv);
  933.                                                             IF((%#id_inv%=%#arma%)||(%#id_inv%=%#sleep_material%)||(%#id_inv%=122)||(%#id_inv%=0));
  934.                                                             ELSE;
  935.                                                                 IFMATCHES("%#id_inv%","%&itens_armazenar%");
  936.                                                                     SLOTCLICK(%#sleep_slot_inv%,L,TRUE);
  937.                                                                     WAIT(5MS);
  938.                                                                     GETITEMINFO(%#id_inv%,&inv_name);
  939.                                                                     LOG("&b&l[&f&oM&facro&b&l] &f%&inv_name% &aarmazenado. &9&o#SLEEP");
  940.                                                                     DEC(#itens_inv_armazenar,1);
  941.                                                                         IF(%#id_inv%=387);
  942.                                                                             INC(#sleep_livros,1);
  943.                                                                         ENDIF;
  944.                                                                 ELSE;
  945.                                                                     LOG("&b&l[&f&oM&facro&b&l] &cItem inválido encontrado, descartando-o. &9&o#SLEEP");
  946.                                                                     SLOTCLICK(%#sleep_slot_inv%,L,FALSE);
  947.                                                                     WAIT(3T);
  948.                                                                     SLOTCLICK(-999);
  949.                                                                     WAIT(3T);    
  950.                                                                 ENDIF;
  951.                                                             ENDIF;      
  952.                                                     ENDIF;
  953.                                            
  954.                                             NEXT;
  955.                                     ELSE;
  956.                                         GUI();
  957.                                     ENDIF;
  958.                                 ENDIF;
  959.                         ELSEIF((sleep_reabastecer_arma)||(sleep_reabastecer_material));
  960.                             IF((%XPOS%=%#baus_xpos%)&&(%YPOS%=%#baus_ypos%)&&(%ZPOS%=%#baus_zpos%));
  961.                                 SET(#sleep_inc,"199");
  962.                                 SET(#sleep_inc_two,"");                            
  963.                                     IF(sleep_reabastecer_arma);
  964.                                         LOG("&b&l[&f&oM&facro&b&l] &aIniciando reabastecimento de &f%&arma_name%&a. &9&o#SLEEP");
  965.                                         #quant_reabastecer = 1;
  966.                                         SET(#sleep_id_procurar,"%#arma%");
  967.                                     ELSE;
  968.                                         LOG("&b&l[&f&oM&facro&b&l] &aIniciando reabastecimento de &f%&material_name%&a. &9&o#SLEEP");
  969.                                             IF((%#sleep_material%=276)||(%#sleep_material%=279)||(%#sleep_material%=267)||(%#sleep_material%=258));
  970.                                                 #quant_reabastecer = 3;
  971.                                             ELSE;
  972.                                                 #quant_reabastecer = 8;
  973.                                             ENDIF;  
  974.                                         SET(#sleep_id_procurar,"%#sleep_material%");
  975.                                     ENDIF;
  976.                                 GETITEMINFO(%#sleep_id_procurar%,&procurar_name);
  977.                                     DO;
  978.                                         INC(#sleep_inc,1);
  979.                                             IF(%#sleep_inc%=200);
  980.                                                 GUI();
  981.                                                 SET(#sleep_inc,"");
  982.                                                 INC(#sleep_inc_two,1);
  983.                                                     IF(%#sleep_inc_two%=6);
  984.                                                         LOG("&b&l[&f&oM&facro&b&l] &cO baú não está abrindo. &9&o#SLEEP");
  985.                                                         LOG("&b&l[&f&oM&facro&b&l] &cTentando resolver... &9&o#SLEEP");    
  986.                                                         SET(pos_baus_verificar);
  987.                                                         UNSET(fim);
  988.                                                         BREAK;
  989.                                                     ENDIF;
  990.                                                 LOOK(NORTH);
  991.                                                 LOOK(+0,+308);
  992.                                                 LOOK(+0,+2,1);
  993.                                                 KEY(USE);
  994.                                             ELSEIF((%XPOS%!=%#baus_xpos%)||(%YPOS%!=%#baus_ypos%)||(%ZPOS%!=%#baus_zpos%));
  995.                                                 LOG("&b&l[&f&oM&facro&b&l] &cVocê não esta onde deveria. &9&o#SLEEP");
  996.                                                 LOG("&b&l[&f&oM&facro&b&l] &cTentando resolver... &9&o#SLEEP");
  997.                                                 SET(pos_baus_verificar);
  998.                                                 UNSET(fim);
  999.                                             ENDIF;
  1000.                                     UNTIL((!fim)||(%GUI%="GUICHEST"));
  1001.                                 WAIT(5T);
  1002.                                 UNSET(item_ja_abastecido);
  1003.                                     IF(fim);
  1004.                                         UNSAFE;
  1005.                                             FOR(#sleep_slot_inv,54,89);
  1006.                                                 GETSLOTITEM(%#sleep_slot_inv%,#sleep_id_inv,#sleep_stack_inv,#sleep_data_inv);
  1007.                                                     IF(sleep_reabastecer_arma);
  1008.                                                         IF(%#sleep_id_inv%=%#arma%);
  1009.                                                             #dur_atual = %#sleep_material_dur% - %#sleep_data_inv%;
  1010.                                                                 IF((%#dur_atual%>%#sleep_quest_2%)&&(%#sleep_slot_inv%>=81));
  1011.                                                                     IF(%#dur_atual%<%#sleep_material_dur%);
  1012.                                                                     ELSE;
  1013.                                                                         SET(item_ja_abastecido);
  1014.                                                                         BREAK;
  1015.                                                                     ENDIF;
  1016.                                                                 ENDIF;                                                          
  1017.                                                         ENDIF;
  1018.                                                     ELSEIF(sleep_reabastecer_material);
  1019.                                                         IF(%#sleep_id_inv%=%#sleep_material%);
  1020.                                                             SET(item_ja_abastecido);
  1021.                                                             BREAK;
  1022.                                                         ENDIF;
  1023.                                                     ENDIF;
  1024.                                             NEXT;
  1025.                                         ENDUNSAFE;
  1026.                                     ENDIF;
  1027.                                     IF(!item_ja_abastecido);
  1028.                                         IF(fim);
  1029.                                             UNSET(item_achado);
  1030.                                             UNSET(item_inventario);
  1031.                                             UNSAFE;
  1032.                                                 DO(3);
  1033.                                                     GETSLOT(%#arma%,#slot_arma,54);
  1034.                                                         IF((%#slot_arma%!=-1)&&(%#slot_arma%<81));
  1035.                                                             SLOTCLICK(%#slot_arma%,L,TRUE);
  1036.                                                             WAIT(10T);
  1037.                                                         ENDIF;
  1038.                                                 LOOP;                                          
  1039.                                                 FOR(#sleep_slot_chest,0,53);
  1040.                                                     GETSLOTITEM(%#sleep_slot_chest%,#sleep_id_chest,#sleep_stack_chest,#sleep_data_chest);
  1041.                                                         IF(%#sleep_id_chest%=%#sleep_id_procurar%);
  1042.                                                             IF(sleep_reabastecer_arma);
  1043.                                                                 #dur_atual = %#sleep_material_dur% - %#sleep_data_chest%;
  1044.                                                                     IF(%#dur_atual%=%#sleep_material_dur%);
  1045.                                                                         SET(item_achado);
  1046.                                                                         SET(#slot_chest_arma,"%#sleep_slot_chest%");
  1047.                                                                         BREAK;
  1048.                                                                     ENDIF;
  1049.                                                             ELSE;
  1050.                                                                 SET(item_achado);
  1051.                                                                 BREAK;
  1052.                                                             ENDIF;
  1053.                                                         ENDIF;
  1054.                                                 NEXT;
  1055.                                                 IF(%GUI%="GUICHEST");
  1056.                                                     IF(item_achado);
  1057.                                                         IF(sleep_reabastecer_arma);
  1058.                                                                 DO(3);
  1059.                                                                     GETSLOT(%#arma%,#slot_arma,54);
  1060.                                                                         IF(%#slot_arma%!=-1);
  1061.                                                                             SLOTCLICK(%#slot_arma%,L,TRUE);
  1062.                                                                             WAIT(10T);
  1063.                                                                         ENDIF;
  1064.                                                                 LOOP;
  1065.                                                             SET(#slot_hot_vazio,"");
  1066.                                                                 FOR(#sleep_slot_vazio,81,89);
  1067.                                                                     GETSLOTITEM(%#sleep_slot_vazio%,#id_slot_vazio);
  1068.                                                                         IF(%#id_slot_vazio%=0);
  1069.                                                                             SET(#slot_hot_vazio,"%#sleep_slot_vazio%");
  1070.                                                                             BREAK;
  1071.                                                                         ENDIF;
  1072.                                                                 NEXT;
  1073.                                                                 IF(%#slot_hot_vazio%=0);
  1074.                                                                     SLOTCLICK(81,L,FALSE);
  1075.                                                                     WAIT(5T);
  1076.                                                                     SLOTCLICK(-999);
  1077.                                                                     WAIT(5T);
  1078.                                                                     SET(#slot_hot_vazio,"81");
  1079.                                                                 ENDIF;
  1080.                                                             SLOTCLICK(%#slot_chest_arma%,L,FALSE);
  1081.                                                             WAIT(8T);
  1082.                                                             SLOTCLICK(%#slot_hot_vazio%,L,FALSE);
  1083.                                                             WAIT(8T);
  1084.                                                             LOG("&b&l[&f&oM&facro&b&l] &aReabastecimento de &f%&arma_name% &aconcluído. &9&o#SLEEP");
  1085.                                                             UNSET(sleep_reabastecer_arma);
  1086.                                                         ELSE;
  1087.                                                                 DO(%#sleep_material_pegar%);
  1088.                                                                     GETSLOT(%#sleep_id_procurar%,#sleep_slot);
  1089.                                                                         IF((%#sleep_slot%!=-1)&&(%#sleep_slot%<54));
  1090.                                                                             SLOTCLICK(%#sleep_slot%,L,TRUE);
  1091.                                                                             WAIT(3T);
  1092.                                                                         ELSE;
  1093.                                                                             BREAK;
  1094.                                                                         ENDIF;
  1095.                                                                 LOOP;
  1096.                                                             LOG("&b&l[&f&oM&facro&b&l] &aReabastecimento de &f%&material_name% &aconcluído. &9&o#SLEEP");
  1097.                                                             UNSET(sleep_reabastecer_material);                                                          
  1098.                                                         ENDIF;
  1099.                                                     ELSE;
  1100.                                                         PICK(%#arma%);
  1101.                                                             IF((%ITEM%=%#arma%)&&(sleep_reparar)&&(sleep_reabastecer_arma));
  1102.                                                                 UNSET(sleep_reabastecer_arma);
  1103.                                                                 BREAK;
  1104.                                                             ELSE;
  1105.                                                                 LOG("&b&l[&f&oM&facro&b&l] &cNão foi encontrado &f%&procurar_name% &cno baú. &9&o#SLEEP");
  1106.                                                                 LOG("&b&l[&f&oM&facro&b&l] &cReiniciando busca... &9&o#SLEEP");
  1107.                                                                 SET(pos_baus_verificar);
  1108.                                                                 UNSET(fim);
  1109.                                                             ENDIF;
  1110.                                                     ENDIF;
  1111.                                                 ELSE;
  1112.                                                     LOG("&b&l[&f&oM&facro&b&l] &cO baú foi fechado. &9&o#SLEEP");
  1113.                                                     LOG("&b&l[&f&oM&facro&b&l] &cTentando reabrir... &9&o#SLEEP");
  1114.                                                     SET(pos_baus_verificar);
  1115.                                                     UNSET(fim);                                            
  1116.                                                 ENDIF;
  1117.                                             ENDUNSAFE;
  1118.                                         ENDIF;
  1119.                                     ELSE;
  1120.                                         LOG("&b&l[&f&oM&facro&b&l] &f%&procurar_name% &cdetectado no inventário. &9&o#SLEEP");
  1121.                                         LOG("&b&l[&f&oM&facro&b&l] &cReabastecimento cancelado. &9&o#SLEEP");          
  1122.                                         UNSET(sleep_reabastecer_arma);
  1123.                                         UNSET(sleep_reabastecer_material);                                      
  1124.                                         SET(fim);
  1125.                                     ENDIF;
  1126.                             ELSE;
  1127.                                 UNSET(fim);
  1128.                                 UNSET(block_home_baus);
  1129.                             ENDIF;
  1130.                         ENDIF;
  1131.                 UNTIL((fim)&&(!sleep_reabastecer_arma)&&(!sleep_reabastecer_material));
  1132.             SET(home_mob);
  1133.             SET(verificacao_completa);
  1134.             UNSET(sleep_armazenar);
  1135.             GUI();
  1136.         ENDIF;
  1137.     LOOP;
  1138.  
  1139. }$$