[Macro] Carvão vegetal infinito - VIP

Pedido feito por este tópico: ASSAR 1.8

Spoiler: CODIGO

Código:

$${
    // Atendimento fórum
    // https://forum.craftlandia.com.br/xf/threads/1-8-assar-inventario-de-madeira-furnace-vip-com-carvao-vegetal.1009006/
    // Duardo_brs
    // v0.1
    // Funcionalidade
    // Assar madeira com carvao vegetal
    // Utilizando /furnace vip
    
    if(@rep);
        log("&f&l[&9&lMA&f&lCRO] &f&lDu&0&lCarvao &c&lOFF");
        unset(@rep);
        stop();
    endif;
    else;
        log("&f&l[&9&lMA&f&lCRO] &f&lDu&0&lCarvao &a&lON");
        set(@rep);
        DO();
            echo("/furnace vip");
            wait(500ms);
            FOR(#i,3,38);
              GETSLOTITEM(%#i%,&idvar);
              wait(200ms);
              log(%&idvar%);
                if(%&idvar%=="coal");
                  SLOTCLICK(%#i%,l);
                  wait(200ms);
                  SLOTCLICK(1,l);
                endif;
                if(%&idvar%=="log2");
                  SLOTCLICK(%#i%,l);
                  wait(200ms);
                  SLOTCLICK(0,l);
                endif;
                if(%&idvar%=="log");
                  SLOTCLICK(%#i%,l);
                  wait(200ms);
                  SLOTCLICK(0,l);
                endif;
                GETSLOTITEM(0,&idvar2);
                IF(%&idvar2%!="air");
                  GETSLOT("coal",#slotid);
                  SLOTCLICK(%#slotid%,l);
                  wait(200ms);
                  SLOTCLICK(1,l);
        ENDIF;
        wait(200ms);
                SLOTCLICK(2,l,true);
            NEXT;
            SLOTCLICK(0,l,true);
            wait(50ms);
            SLOTCLICK(1,l,true);
            wait(50ms);
            SLOTCLICK(2,l,true);
            log("&f&l[&9&lMA&f&lCRO] &f&lDu&0&lCarvao &c&lOFF");
            unset(@rep);
            stop();
        LOOP;
    endif;
}$$