$${

&fromwhat = "gold_nugget"
&towhat = "gold_ingot"

Wait(40t)
Log(Get ready...)
Wait(20t)
ECHO(/craft)
Wait(50ms)
Log(Crafting...)
For(&counter,1,2)
    For(#invslot,10,46)
        getslotitem(%#invslot%,&item)
        if(%&item%= &fromwhat )
            SLOTCLICK(%#invslot%)
            getslotitem(1,&Slot1)
            Wait(20ms)
            getslotitem(2,&Slot2)
            Wait(20ms)
            getslotitem(3,&Slot3)
            Wait(20ms)
            getslotitem(4,&Slot4)
            Wait(20ms)
            getslotitem(5,&Slot5)
            Wait(20ms)
            getslotitem(6,&Slot6)
            Wait(20ms)
            getslotitem(7,&Slot7)
            Wait(20ms)
            getslotitem(8,&Slot8)
            Wait(20ms)
            getslotitem(9,&Slot9)
            Wait(20ms)
            if(%&slot1%!= &fromwhat )
                SLOTCLICK(1)
            elseif(%&slot2%!= &fromwhat )
                SLOTCLICK(2)
            elseif(%&slot3%!= &fromwhat )
                SLOTCLICK(3)
            elseif(%&slot4%!= &fromwhat )
                SLOTCLICK(4)
            elseif(%&slot5%!= &fromwhat )
                SLOTCLICK(5)
            elseif(%&slot6%!= &fromwhat )
                SLOTCLICK(6)
            elseif(%&slot7%!= &fromwhat )
                SLOTCLICK(7)
            elseif(%&slot8%!= &fromwhat )
                SLOTCLICK(8)
            elseif(%&slot9%!= &fromwhat )
                SLOTCLICK(9)
            else
                SLOTCLICK(0,l,true)
            endif
        endif
    NEXT
Log(Check %&counter% of 2)
getslotitem(0,&slot0)
If(%&slot0%= &towhat )
    SLOTCLICK(0,l,true)
endif
NEXT
Log("Crafting finished")?
}$$