Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- $${
- TOGGLE(sleep_macro);
- IF(sleep_macro);
- LOG("&6&l{&fFORNALHA&6&l} &aTurn &aon &9&o#SLEEP");
- CALCYAWTO(1000,1000,#sleep_versao1);
- CALCYAWTO(%XPOS%,%ZPOS%,#sleep_versao2);
- CALCYAWTO(4321,1234,#sleep_versao3);
- IF((%#sleep_versao1%=0)&&(%#sleep_versao2%=0)&&(%#sleep_versao3%=0));
- SET(versao_152);
- SET(&id_0,"0");
- SET(&id_56,"56");
- SET(&id_14,"14");
- SET(&id_15,"15");
- SET(&id_129,"129");
- SET(&id_16,"16");
- SET(&id_153,"153");
- SET(&id_21,"21");
- SET(&id_263,"263");
- SET(&id_349,"349");
- SET(&id_17,"17");
- ELSE;
- UNSET(versao_152);
- SET(&id_0,"air");
- SET(&id_56,"diamond_ore");
- SET(&id_14,"gold_ore");
- SET(&id_15,"iron_ore");
- SET(&id_129,"emerald_ore");
- SET(&id_16,"coal_ore");
- SET(&id_153,"quartz_ore");
- SET(&id_21,"lapis_ore");
- SET(&id_263,"coal");
- SET(&id_349,"fish");
- SET(&id_17,"log");
- ENDIF;
- SET(&sleep_minerios,"<%&id_56%><%&id_14%><%&id_15%><%&id_17%><%&id_129%><%&id_16%><%&id_153%><%&id_21%><%&id_349%>");
- WAIT(10T);
- ELSE;
- LOG("&6&l{&fFORNALHA&6&l} &cTurn &coff &9&o#SLEEP");
- STOP;
- ENDIF;
- DO;
- IF(%GUI%!="GUIFURNACE");
- GUI();
- DO;
- IF((%HITID%=61)||(%HITID%="furnace"));
- WAIT(1T);
- KEY(USE);
- SET(#min_carvao,"64");
- UNSET(player_vip);
- ELSE;
- ECHO("/furnace vip");
- SET(#min_carvao,"22");
- SET(player_vip);
- ENDIF;
- DO(100);
- UNTIL(%GUI%="GUIFURNACE");
- UNTIL(%GUI%="GUIFURNACE");
- WAIT(3T);
- ENDIF;
- UNSAFE;
- IFMATCHES("%&sleep_minerios%","^<([\d\w_]+)>(.*)$");
- MATCH("%&sleep_minerios%","^<([\d\w_]+)>(.*)$",{&sleep_ore_atual,&sleep_minerio_replace});
- SET(limpar_fornalha);
- UNSET(sleep_erro);
- DO;
- IF(%GUI%="GUIFURNACE");
- GETSLOT(%&sleep_ore_atual%,#sleep_slot,3);
- IF(%#sleep_slot%!=-1);
- IF(limpar_fornalha);
- UNSET(limpar_fornalha);
- SLOTCLICK(0,L,TRUE);
- WAIT(1T);
- SLOTCLICK(2,L,TRUE);
- WAIT(1T);
- ENDIF;
- SLOTCLICK(%#sleep_slot%,L,TRUE);
- WAIT(2T);
- ELSE;
- SET(sleep_erro);
- ENDIF;
- IF(!sleep_erro);
- UNSET(carvao);
- IF(versao_152);
- GETSLOTITEM(1,#sleep_id,#sleep_stack);
- SET(&sleep_id,"%#sleep_id%");
- ELSE;
- GETSLOTITEM(1,&sleep_id,#sleep_stack);
- ENDIF;
- IFMATCHES("%&sleep_id%","^%&id_263%$");
- IF(%#sleep_stack%<%#min_carvao%);
- SET(carvao);
- ENDIF;
- ELSE;
- SET(carvao);
- ENDIF;
- IF(carvao);
- GETSLOT(%&id_263%,#sleep_slot,3);
- IF(%#sleep_slot%!=-1);
- GETSLOT(%&id_263%,#sleep_slot,3);
- IF(%#sleep_slot%!=-1);
- SLOTCLICK(%#sleep_slot%,L,TRUE);
- WAIT(1T);
- ENDIF;
- GETSLOT(%&id_263%,#sleep_slot,3);
- IF(%#sleep_slot%!=-1);
- SLOTCLICK(%#sleep_slot%,L,TRUE);
- WAIT(1T);
- ENDIF;
- ELSE;
- SET(sleep_erro);
- ENDIF;
- ENDIF;
- UNSET(concluido);
- IF(!sleep_erro);
- DO(1000);
- IF(versao_152);
- GETSLOTITEM(2,#sleep_id);
- IF(%#sleep_id%!=0);
- SET(concluido);
- ENDIF;
- ELSE;
- GETSLOTITEM(2,&sleep_id);
- IF(%#sleep_id%!="air");
- SET(concluido);
- ENDIF;
- ENDIF;
- UNTIL(concluido);
- IF(concluido);
- WAIT(2T);
- SLOTCLICK(2,L,TRUE);
- WAIT(1T);
- SLOTCLICK(2,L,TRUE);
- WAIT(1T);
- ELSE;
- SLOTCLICK(0,L,TRUE);
- WAIT(1T);
- SLOTCLICK(1,L,TRUE);
- WAIT(1T);
- SLOTCLICK(2,L,TRUE);
- WAIT(2T);
- ENDIF;
- ENDIF;
- ENDIF;
- ELSE;
- SET(sleep_erro);
- SET(&sleep_minerio_replace,"<%&sleep_ore_atual%>%&sleep_minerio_replace%");
- LOG("");
- LOG("&6&l{&fFORNALHA&6&l} &cA &cfornalha &cfechou! &cTentando &creabrir... &9&o#SLEEP");
- LOG("");
- ENDIF;
- UNTIL(sleep_erro);
- SET(&sleep_minerios,"%&sleep_minerio_replace%");
- ENDIF;
- ENDUNSAFE;
- UNTIL(%&sleep_minerios%=NONE);
- IF(%GUI%="GUIFURNACE");
- SLOTCLICK(0,L,TRUE);
- WAIT(20MS);
- SLOTCLICK(1,L,TRUE);
- WAIT(20MS);
- SLOTCLICK(2,L,TRUE);
- WAIT(20MS);
- ENDIF;
- GUI();
- LOG("");
- LOG("&6&l{&fFORNALHA&6&l} &cFim! &9&o#SLEEP");
- LOG("");
- WAIT(10T);
- LOG("&6&l{&fFORNALHA&6&l} &cTurn &coff &9&o#SLEEP");
- TOGGLE(sleep_macro);
- STOP;
- }$$
Add Comment
Please, Sign In to add comment