Pottery.mac - Powerskilling pottery to 122

[RPZip]

My first macro, I basicially took Kiola.mac and edited it to work with pottery. I have it destroy the finished product (bowls) by default, since they sell to vendors for 0 unless you fire them, and it's just not worth it while skilling up. (NOTE: Turn fast item destroy on, or this won't work...) I have a high delay in there since otherwise it buggered up on my machine (items stuck in the hand, can't destroy fast enough, etc.), but I didn't exactly test it extensivley to determine a minimum. It's not a big deal since you're not making PP off this, and it only takes about 5 or so minutes to power it up to 122 (and for very cheap too, less than 10pp.)

Code: Select all

| - Pottery.mac -
|
| Please be near a open pottery wheel before you start this macro.
|
#include routines.mac
#turbo

Sub Main

   /itemtarget Pottery Wheel
   /face item
   /click left item
   /click left enviro combine
   :MakeKiola
      /sendkey down ctrl

      /finditem "Medium Bowl Sketch"
      /if $find()==FALSE /goto :Done
      /click left enviro 0

      /finditem "Water Flask"
      /if $find()==FALSE /goto :Done
      /click left enviro 1

      /finditem "Block of Clay"
      /if $find()==FALSE /goto :Done
      /click left enviro 2


      /sendkey up ctrl
      /click left enviro combine

      :WaitCombine
         /delay 5
      /if "$cursor()"=="FALSE" /goto :WaitCombine

      /click left destroy
   /goto :MakeKiola

   :Done
    /sendkey up ctrl
    /click left enviro done
/return

Enjoy.

[Gengis]

Nice Power Pottery macro. I used it on one of my characters and it works fast!

[powerspike]

would have to agree there, ran it myself took around 3-4 mins to get 122 skill - very nice work.

[powerspike]

first attempt at a macro here - grabed RPzip's pottery and modifed it to do Large bowls which will bring your skill upto 148.

Code: Select all

| - Pottery_148.mac - 
| 
| Please be near a open pottery wheel before you start this macro. 
| 
#include routines.mac 
#turbo 

Sub Main 

   /itemtarget Pottery Wheel 
   /face item 
   /click left item 
   /click left enviro combine 
   :MakeLargeBowl
      /sendkey down ctrl 

      /finditem "Large Bowl Sketch" 
      /if $find()==FALSE /goto :Done 
      /click left enviro 0 

      /finditem "Water Flask" 
      /if $find()==FALSE /goto :Done 
      /click left enviro 1 

      /finditem "Large Block of Clay" 
      /if $find()==FALSE /goto :Done 
      /click left enviro 2 

      /finditem "Glass Shard" 
      /if $find()==FALSE /goto :Done 
      /click left enviro 3

      /sendkey up ctrl 
      /click left enviro combine 

      :WaitCombine 
         /delay 5 
      /if "$cursor()"=="FALSE" /goto :WaitCombine 

      /click left destroy 
   /goto :MakeLargeBowl

   :Done 
    /sendkey up ctrl 
    /click left enviro done 
/return 

[L124RD]

Salutations,
how many of these components does it take (and money to buy all these components) to get to the two skill levels there are macros for?

[Gengis]

The first macro cost me about 12 pp. The second macro cost me 180pp. That's with my rogue with no extra charisma or wis gear.

I'm gonna see if I can do casserole dishes to 198. I'll need to modify the macro to make ceramic linings then casserole dishes which won't be too hard. Hopefully it won't cost to much.

[RPZip]

I think it's probably cheaper to just use Casserole Dishes after medium bowls, given large bowls expense... I'll look it up.

[RPZip]

Pottery2.mac (I'll post this in a new thread as well as here...) - For powerskilling pottery from 148 to 199.

Code: Select all

| - Pottery.mac -
|
| Please be near a open pottery wheel before you start this macro.
|
#include routines.mac
#turbo

Sub Main

   /itemtarget Pottery Wheel
   /face item
   /click left item
   /click left enviro combine
   :MakeKiola
      /sendkey down ctrl

      /finditem "casserole dish sketch"
      /if $find()==FALSE /goto :Done
      /click left enviro 0

      /finditem "Water Flask"
      /if $find()==FALSE /goto :Done
      /click left enviro 1

      /finditem "large block of clay"
      /if $find()==FALSE /goto :Done
      /click left enviro 2

      /finditem "ceramic lining"
      /if $find()==FALSE /goto :Done
      /click left enviro 2

      /sendkey up ctrl
      /click left enviro combine

      :WaitCombine
         /delay 5
      /if "$cursor()"=="FALSE" /goto :WaitCombine

      /click left destroy
   /goto :MakeKiola

   :Done
    /sendkey up ctrl
    /click left enviro done
/return

Now, keep in mind that casserole dishes (unfired) can be sold to vendors for ~48cp, a significant sum if you're trying to keep your prices down. If you want to sell it to the vendors, change the line

Code: Select all

      /click left destroy

to

Code: Select all

      /click left auto

Enjoy.

[lpmko]

i just get the "You must place items in this object in order to create something new"message, im in the old ui...newest macroques and new ini...whats the problem?

[L124RD]

Salutations,
I'd think that /click isn't working...

[ooze]

I just used the inital pottery macro, and it faces me to the pottery wheel, then gives a message "Usage: /click <left|right> <mouseloc>".

I am running XP, and used the command to enable the od UI. I also have a backpack each of the block of clay, water flask, and medium bbowl sketch. What am I doing wrong?

[L124RD]

Salutations,
if you do /filter macros none and then try it, does it not error and work fine? that is an old bug, it will sometimes spam you error messages while doing it fine...

[fan]

I also get this error Usage: /click <left|right> <mouseloc>". I tried the filter but still no go anyone have any ideas?

[boldor]

Yes, I have an idea, called that any macro involving a /click command is currently out of commission until MQ can be fixed to work with the NEWUI VI seemed so intent on us to use.