[UOsteam] Esk's Taming Dye Crafting 2.1

If you make a Client-side script you can publish it here for other players to use
Locked
Esk
Novice Scribe
Posts: 6
Joined: Wed Dec 21, 2016 11:02 pm

[UOsteam] Esk's Taming Dye Crafting 2.1

Post by Esk »

NOTE: this doesnt check for gold amounts so please have enough on hand to buy the amount you called for in buydyes keep in mind most vendors only have 20 of the item.
Changes
*decreased the wait durations
*Added buy support for dyes
*fixed alias name issue

The first script requirements:
*Under Agents->Vendor Add a new product you want to buy (specifically dyes in this case) rename it to buydyes
*Make sure you jumped off your mount
* Be within distance of the vendor you want to buy from.

NOTE: when you are done, make sure to disable your vendor agent, as it will look at every vendor you click on otherwise.
NOTE: the gump was made to do rare dyes, simply change the gump and it should work fine
NOTE: If you changes vendors or mount or even the bottles, make sure to clear your active objects. (clearing aliases) I plan to fix this.

Code: Select all

//Date:12/25/2016
//Author: Esk
//Purpose: Make Rare Dye and use it on current mount
if not findalias 'mountz'
  promptalias 'mountz'
endif
if not findalias 'vendor'
  promptalias 'vendor'
  useobject! 'vendor'
  buy 'buydyes'
endif
if @counttype! 0xfa9 0 'backpack' > 0 and @counttype! 0xf0e 0 'backpack' > 0
  if @findtype 0x1373 'any' 'backpack'
    useobject 'found'
    waitforgump 949095101 1500
    replygump 0x38920abd 9
    waitforgump 949095101 1500
  endif
else if @countype! 0xe2b 1152 'backpack'> 0
  if @findtype 0xe2b 1152
    useobject 'found'
    waitfortarget 1500
    target! 'mountz'
  endif
else
  stop
endif

Changes:
*decreased the wait time of the script

Requirements:
*be close to a water source (trough, water barrel, etc)
*must have dirty bottles needing to be cleaned.

Code: Select all

//Date:12/25/2016
//Author: Esk
//Purpose: Cleaning dye bottles that have a large amount of bottles.
if not findalias 'water'
  promptalias 'water'
endif
if @findtype 0xf0e 1042
  useobject 'found'
  waitfortarget 15000
  target! 'water'
else
  sysmsg 'Finished cleaning bottles...' 89
  stop
endif


P.S. this script is currently being critiqued so please bare this in mind, it's basically beta, but at least this will get the ball rolling.

:dance Esk :dance
Rican
Passer by
Posts: 1
Joined: Sat Dec 13, 2014 3:20 am

Re: [UOsteam] Esk's Taming Dye Crafting 2.1

Post by Rican »

Can I add up these 2 together or I need to run them separately ?

Also if you could tell me how to edit the part that instead of buying from vendor, I could grab dyes from a chest I would really appreciate it! thanks a lot for your help and time, good day.
Esk
Novice Scribe
Posts: 6
Joined: Wed Dec 21, 2016 11:02 pm

Re: [UOsteam] Esk's Taming Dye Crafting 2.1

Post by Esk »

Rican wrote:Can I add up these 2 together or I need to run them separately ?

Also if you could tell me how to edit the part that instead of buying from vendor, I could grab dyes from a chest I would really appreciate it! thanks a lot for your help and time, good day.

You would runs these separately, or at least that's what I did, cleaned them afterward since it required me to move.

As for pulling them out of a chest, create a new macro record yourself pulling it out, and copy and paste it where I buy from the vendor. then simply change the serial of the bottle to the type instead so it pulls all the bottles out. If you need more guidance. Do the first part (copy and pasting) and then I can show you the later part easily. Welcome to even post it here and I can help and modify it.
Thanks,
Esk
Locked