1. This site uses cookies. By continuing to use this site, you are agreeing to our use of cookies. Learn More.

Ultimate *Restock Potions* without butler **version 2.1 update**

Discussion in 'UOSteam' started by baddie, Jun 16, 2017.

  1. baddie

    baddie Well-Known Member

    172
    52
    28
    Jan 6, 2014
    Dolf Lundgren
    Banshee Cry
    who needs sleep when you get a wicked macro idea to write. this macro will take 1-2 minutes to permanently configure, as you MUST object inspect your kegs for the colors they are dyed and enter them in. very detailed instructions at every step for doing this is provided, just read all the //notes.

    i also added bandages, arrows, and deadly poisons, but left their default quantities at 0. if you have a request for some other item and aren't sure how to add it yourself, let me know and i'll add it in for you.

    you have to put all your kegs into one container, i'd recommend keeping em lined up and neat like this so you can inspect and see how full your kegs are.

    [​IMG]

    edit: version 2.0 now stores empty kegs and continues macro, and fixed a bug where only some characters wouldn't store empty bottles at the end.


    //by baddie, version 2.1
    //Place all your kegs into one container
    //Have a separate container for macro to store empty kegs- cannot be within Keg Container
    //KEGS MUST BE DYED IN MATCHING COLORS ACCORDING TO TYPE
    //Object inspect your kegs and replace the color number for each of the potion types below, additional details listed at every step. Will take a couple minutes to setup, but really simple.
    //Have enough empty bottles in the keg container, as the macro will pull when needed and store any leftover
    //Bandages is also listed, but the default is 0 until you change it.
    //Remember to click SAVE after you make your edits
    headmsg '╪≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡╪ ' '28'
    headmsg ' Restocking Potions ' 88
    headmsg '╪≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡╪ ' '28'
    clearjournal
    canceltarget
    pause 700
    if not @findalias 'keg container' or not @findobject 'keg container'
    headmsg 'Select Keg Container' 88
    promptalias 'keg container'
    endif
    if not @findalias 'empty keg container' or not @findobject 'empty keg container'
    headmsg 'Select Empty Keg Container' 88
    promptalias 'empty keg container'
    endif
    //
    //GREATER STRENGTH POTIONS
    //Change "10" to whatever quantity you want
    if counttype 0xf09 0 'self' >= 10
    else
    //OBJECT INSPECT YOUR KEG AND REPLACE 906 WITH YOUR GREATER STRENGTH KEGS' COLOR
    if findtype 0x1940 906 'keg container' 'any' 1
    useobject 'found'
    else
    headmsg 'Out of Strength Kegs!' 33
    stop
    endif
    if @injournal "The keg is empty" 'system'
    pause 1000
    moveitem 'found' 'empty keg container'
    endif
    if @injournal 'Where is a' 'system'
    canceltarget
    pause 700
    movetype 0xf0e 'keg container' 'self' 44 74 0 0 50 2
    endif
    replay
    endif
    //
    //GREATER AGILITY POTIONS
    //Change "10" to whatever quantity you want
    if counttype 0xf08 0 'self' >= 10
    else
    //OBJECT INSPECT YOUR GREATER AGILITY KEG AND REPLACE 96 WITH YOUR GREATER AGILITY KEGS' COLOR
    if findtype 0x1940 96 'keg container' 'any' 1
    useobject 'found'
    else
    headmsg 'Out of Agility Kegs!' 33
    stop
    endif
    if @injournal "The keg is empty" 'system'
    pause 1000
    moveitem 'found' 'empty keg container'
    endif
    if @injournal 'Where is a' 'system'
    canceltarget
    pause 700
    movetype 0xf0e 'keg container' 'self' 44 74 0 0 50 2
    endif
    replay
    endif
    //
    //GREATER REFRESHMENT POTIONS
    //Change "20" to whatever quantity you want
    if counttype 0xf0b 0 'self' >= 20
    else
    //OBJECT INSPECT YOUR KEG AND REPLACE 33 WITH YOUR GREATER REFRESHMENT KEGS' COLOR
    if findtype 0x1940 33 'keg container' 'any' 1
    useobject 'found'
    else
    headmsg 'Out of Refresh Kegs!' 34
    stop
    endif
    if @injournal "The keg is empty" 'system'
    pause 1000
    moveitem 'found' 'empty keg container'
    endif
    if @injournal 'Where is a' 'system'
    canceltarget
    pause 700
    movetype 0xf0e 'keg container' 'self' 44 74 0 0 50 2
    endif
    replay
    endif
    //
    //GREATER HEAL POTIONS
    //Change "10" to whatever quantity you want
    if counttype 0xf0c 0 'self' >= 10
    else
    //OBJECT INSPECT YOUR GREATER HEAL KEG AND REPLACE 56 WITH YOUR GREATER HEAL KEGS' COLOR
    if findtype 0x1940 56 'keg container' 'any' 1
    useobject 'found'
    else
    headmsg 'Out of Heal Kegs!' 33
    stop
    endif
    if @injournal "The keg is empty" 'system'
    pause 1000
    moveitem 'found' 'empty keg container'
    endif
    if @injournal 'Where is a' 'system'
    canceltarget
    pause 700
    movetype 0xf0e 'keg container' 'self' 44 74 0 0 50 2
    endif
    replay
    endif
    //
    //GREATER CURE POTIONS
    //Change "15" to whatever quantity you want
    if counttype 0xf07 0 'self' >= 15
    else
    //OBJECT INSPECT YOUR GREATER CURE KEG AND REPLACE 46 WITH YOUR GREATER CURE KEGS' COLOR
    if findtype 0x1940 46 'keg container' 'any' 1
    useobject 'found'
    else
    headmsg 'Out of Cure Kegs!' 33
    stop
    endif
    if @injournal "The keg is empty" 'system'
    pause 1000
    moveitem 'found' 'empty keg container'
    endif
    if @injournal 'Where is a' 'system'
    canceltarget
    pause 700
    movetype 0xf0e 'keg container' 'self' 44 74 0 0 50 2
    endif
    replay
    endif
    //
    //DEADLY POISON POTIONS
    //Change "0" (the one after the ">=" sign) to whatever quantity you want
    if counttype 0xf0a 0 'self' >= 0
    else
    //OBJECT INSPECT YOUR DEADLY POISON KEG AND REPLACE 71 WITH YOUR DEADLY POISON KEGS' COLOR
    if findtype 0x1940 71 'keg container' 'any' 1
    useobject 'found'
    else
    headmsg 'Out of Poison Kegs!' 33
    stop
    endif
    if @injournal "The keg is empty" 'system'
    pause 1000
    moveitem 'found' 'empty keg container'
    endif
    if @injournal 'Where is a' 'system'
    canceltarget
    pause 700
    movetype 0xf0e 'keg container' 'self' 44 74 0 0 50 2
    endif
    replay
    endif
    //
    //GREATER EXPLOSION POTIONS
    //Change "0" (the one after the ">=" sign) to whatever quantity you want
    if counttype 0xf0d 0 'self' >= 0
    else
    //OBJECT INSPECT YOUR GREATER EXPLOSION KEG AND REPLACE 71 WITH YOUR GREATER EXPLOSION KEGS' COLOR
    if findtype 0x1940 71 'keg container' 'any' 1
    useobject 'found'
    else
    headmsg 'Out of Explosion Kegs!' 33
    stop
    endif
    if @injournal "The keg is empty" 'system'
    pause 1000
    moveitem 'found' 'empty keg container'
    endif
    if @injournal 'Where is a' 'system'
    canceltarget
    pause 700
    movetype 0xf0e 'keg container' 'self' 44 74 0 0 50 2
    endif
    replay
    endif
    //
    //BANDAGES
    //
    //Change "0" to quantities divisible by 20 (ie., 60, or 100, or 140, etc...)
    if counttype 0xe21 'any' 'self' >= 0
    else
    if @findtype '0xe21' '88' 'keg container' '20' 2
    movetype 0xe21 'keg container' 'self' 44 74 0 '88' '20' 2
    replay
    else
    headmsg 'Out of bandages' 33
    endif
    endif
    //
    //ARROWS
    //
    //Change "0" to quantities divisible by 20 (ie., 60, or 100, or 140, etc...)
    if counttype 0xf3f 'any' 'self' >= 0
    else
    if @findtype '0xf3f' 'any' 'keg container' '20' 2
    movetype 0xf3f 'keg container' 'self' 44 74 0 'any' '20' 2
    replay
    else
    headmsg 'Out of arrows' 33
    endif
    endif
    pause 600
    //store empty bottles
    if @findtype '0xf0e' 'any' 'backpack' 'any' 2
    movetype 0xf0e 'backpack' 'keg container' 44 74 0 0 'any' 2
    endif
    headmsg 'Ready' 5
    headmsg 'For' 22
    headmsg 'Battle!' 33
     
    Last edited: Sep 30, 2017
    Alucard, the_bubba and Peav like this.
  2. baddie

    baddie Well-Known Member

    172
    52
    28
    Jan 6, 2014
    Dolf Lundgren
    Banshee Cry
    version 1.1, resave if you're 1.0
     
  3. kolbycrouch

    kolbycrouch Well-Known Member

    267
    171
    43
    May 4, 2014
    Clutch.

    Was literally about to write a script for this tonight.
     
    baddie likes this.
  4. baddie

    baddie Well-Known Member

    172
    52
    28
    Jan 6, 2014
    Dolf Lundgren
    Banshee Cry
    version 2.0 minor bug fix and now auto stores empty kegs to continue macro!

    i have a personal version that temporarily auto stores weapons, runs [organizeme, and pulls the weapons back into backpack so that there's no weapons sort bag. let me know if you want help setting something like this up. ezpz

    report problems and let me know if you have any questions!
     
    Last edited: Jun 27, 2017
  5. baddie

    baddie Well-Known Member

    172
    52
    28
    Jan 6, 2014
    Dolf Lundgren
    Banshee Cry
    2.1 only replaces the "playmacro" command with "replay," allowing you to save the macro multiple times with different quantities easier and letting you name the macro whatever you want.

    troubleshooting from my own experience:

    "the macro will keep filling up a certain pot to infinity!"
    you accidentally filled one of the kegs with the wrong type of potion.

    "the macro says i'm out of kegs, but i still see two left and filled in the container!"
    those kegs are not the exact hue as the other kegs, if you object inspect them they'll show a different number. redye those ones.

    tip, use:

    autocolorpick 33

    as a single, one line macro to dye a dye tub a particular color according to a number. change 33 to whatever number you want, play macro, click dyes, then dye tub.
     
    Last edited: Jul 9, 2017

Share This Page