Code: Select all
[BearFillet]
Cont=enviro
Comp0=Bear Meat
Comp1=Filleting KnifeCode: Select all
[Patty]
Cont=enviro
Comp0=Bear Meat
Comp1=Cheese
Comp2=Loaf of Bread
Comp3=Non-stick Frying PanModerator: MacroQuest Developers

Code: Select all
[BearFillet]
Cont=enviro
Comp0=Bear Meat
Comp1=Filleting KnifeCode: Select all
[Patty]
Cont=enviro
Comp0=Bear Meat
Comp1=Cheese
Comp2=Loaf of Bread
Comp3=Non-stick Frying PanCode: Select all
| - Pottery.mac -
#turbo
Sub Main
/declare Counter local
:Combine
/itemtarget Pottery Wheel
/face item
/click left item
/delay 1s
| Open up entire inventory
/press i
/for Counter 0 to 7
/delay 2
/click right inventory @Counter
/next Counter
:Make
/sendkey down ctrl
/finditem "Idol Sketch"
/delay 2
/if $find()==FALSE /goto :Done
/click left enviro 0
/delay 5
/finditem "Imbued Amber"
/delay 2
/if $find()==FALSE /goto :Done
/click left enviro 1
/delay 5
/finditem "Large Block of Magic Clay"
/delay 2
/if $find()==FALSE /goto :Done
/click left enviro 2
/delay 5
/finditem "vial of clear mana"
/delay 2
/if $find()==FALSE /goto :Done
/click left enviro 3
/delay 5
/finditem "Sculpting Tools"
/delay 2
/if $find()==FALSE /goto :Done
/click left enviro 4
/delay 5
/sendkey up ctrl
/click left enviro combine
/delay 5
| Empty cursor
:ClearCursor
/if "$cursor(name)"~~"Sculpting Tools" {
/autoinventory
/delay 5
} else {
/click left destroy
/delay 5
}
/if "$cursor()"!="TRUE" /goto :Make
/goto :ClearCursor
:Done
/sendkey up ctrl
/click left enviro done
/for Counter 1 to 9
/press esc
/next Counter
/return