• You've discovered RedGuides, an EverQuest multi-boxing and scripting community 🧙‍♀️⚙️. We want you to play several EQ characters at once, come join us and say hello! 👋

  • A TLP without truebox has thawed (Very Vanilla ready)
    Frostreaver

NEW Tradeskill Macros

Yeah, I'm haveing problem with tinkering mac too. I'm at 75 tinkering and it throws error when it skills up and ends mac. It also throws error when i restart mac and it tries to sell. Now when i restart it, it ignores my 75 tinkering skill and tries to but stuff to make "Standard Bow Cam" which trivials at 75. So once it gets the msg that you can nolonger skill up, it will stop and try to sell and the mac throws an error then ends:

Subroutine Sellgrease wasnt found
tinkering.mac@199 (Main):/If (!$(CombineName.Equal[FW]|) /call Sell"$(Component[3])"
Click to expand...

I manually skilled tinkering to 102 and now when i run the mac, it buys Gnomish spirits and tries to buy water flask and gives msg "Buying NOTFOUND!" "couldnt find NOTFOUND" ... i can see the water flask in the merchant window when the mac opens it.. it just ignores it. ;(
 
Last edited:
is new tradeskill macros able to be performed on progression servers......thnkin bout startin a char on one of those servers

Thang
 
bigdaddy said:
Yeah, I'm haveing problem with tinkering mac too. I'm at 75 tinkering and it throws error when it skills up and ends mac. It also throws error when i restart mac and it tries to sell. Now when i restart it, it ignores my 75 tinkering skill and tries to but stuff to make "Standard Bow Cam" which trivials at 75. So once it gets the msg that you can nolonger skill up, it will stop and try to sell and the mac throws an error then ends:



I manually skilled tinkering to 102 and now when i run the mac, it buys Gnomish spirits and tries to buy water flask and gives msg "Buying NOTFOUND!" "couldnt find NOTFOUND" ... i can see the water flask in the merchant window when the mac opens it.. it just ignores it. ;(
Click to expand...


Are you using the default UI? If you use other UIs (krust for example) it wont know what buttons are what. That is the problem i had when i 1st ran em
 
Yea I'm using the default UI (new) just keep getting an error that item cant be purchased
 
I guess with all the stuff in the news lately, Army is busy with military stuff. Hope all is well with ya Army! Please be safe!
 
Ok the error you get when it trivials is a call sub error. From what it sounds like (havent done tinkering but looked at the code) the mac knows to go to the next set of combonations but for some reason the logic is getting messed up. Now does the next skill up combonation need the standard bow cam? I dont want to mess with the code until i know what the mac needs to do.
Also do you have these 5 NEW files
Rich (BB code): 
Buy <-- updated code
sell <-- Updated Code
CommonSubs <-- common to most TS macros  <-- UPDATED
packs
cleanpacks


Also noticed that there was 2 lines with the same variable

Rich (BB code): 
 /if (${Me.Skill[Tinkering]}>75 &&  ${FindItemCount[=Firewater]}<10) {
      /varset CombItemName "FW"  
      /varset ItemTo "Firewater"
      } ELSE {
    
    } 
    /if (${Me.Skill[Tinkering]}>75 &&  ${Me.Skill[Tinkering]}<103) { 
      /varset CombItemName "SP" 
      /varset ItemTo "stalking probe"

There is a set of " missing highlighted in blue.
Now this makes 10 fire water and then makes stalking probe if im reading it right. I dont know if this double >75 is the reason its giving the error. Ill play with it a little and see what i can come up with.


i can see the water flask in the merchant window when the mac opens it.. it just ignores it. ;(
Click to expand...

I had this problem with the brew.mac cause i had the old buy code. Should work when you update it (id do all the buy,sell,commonsubs,ect..over just to be sure) Keep me informed

Subroutine Sellgrease wasnt found
tinkering.mac@199 (Main):/If (!$(CombineName.Equal[FW]|) /call Sell"$(Component[3])"
Click to expand...

Also sounds like merchant window isnt working right knowing you have it but its like it isnt there
 
Last edited:
I updated all the .inc files (again) and still same error. The mac stops when it tries to buy Water Flasks. The MQ window says:

Tinkering is at 102
Running FW recipe
Buying gnomish spirits!
Done!
Buying water flask!
Done!
Buying NOTFOUND!
couldn't find NOTFOUND
The current macro has ended.
Click to expand...

weird...
 
Rich (BB code): 
 /if (!${CombItemName.Equal[FW]}) /call Buy "${Component[3]}"

Take this line out and let me know what it does. This might be the problem. When i get on tonight ill play with it and go over all the code. (till i run out of money of course)
 
Firewater is an ingredient for a lot of tinkering combines. It trivials at 17. So the mac seems to be trying to make some Firewater for the next recipe which should be Powered Gloves (PG) which trivials at 122.
 
So it is prolly calling to buy all the firewater you sold when you start the mac?

I do know that it will throw white /call errors on all trivial combines, but this is just the way the mac is set up. The mac always checks your tinkering level and notices that you are supposed to be doing something else cause you are at 120 or whatever, but then it forces it to make the combine because it’s needed to make the next component. That’s why you get an error msg. If that makes sense.

It wont stop the mac tho just spit errors
 
Oh ok ill try and look at it today i was gonna test it out yesterday but a guildie needed help so it got put on the backburner. sorry about that. Will try it today with the new code i wrote to see if it works
 
Mistletoe is crashing me somewhere when doin ce combine?any ideas is it working for others?
 
kk when it goes to finding recipes for celestial essence it crashes me.?
 
I am also crashing when using tinkering..i buy stuff then when it tries to find recipies it crashes.? any suggestions?
 
I myself am crashing too useing the Fletching one it buys everything and gets rdy to combine then crashes to desktop ??


update :

I fixed it i didnt follow or read the top of the macro DUH!!! im now 236 in fletching thanks everyone
 
Last edited:
I didn't read through all 15 pages of posts, so forgive me if these have been mentioned before.

I love the Mistletoe macro. I just noticed a couple of things that could use tweaking.

1) CE's can be made with Concentrated solvent and 3 Marr's. Speeds things up a little, but not that big a deal.

2) I crash if anyone is using the container I am attempting to use (forge, brew barrel).

3) It seems every fool on my server wants to use the forge used in this macro. Maybe using a less used one would help alivate this. It wouldn't be that big a deal except for #2. :D

Of all the items, #2 is the most frustraiting. I'm planning to work on a patch for that one myself if nothing else.

Thanks for the hard work Army!
 
Hey when you save the .INC file what type of file is it? I mean is it a text type file, or saved as an ANSI type file like the .mac files? cause when I copy and save it auto saves as a text file and doenst work. Whats the icon look like on Windows XP. Only macs I every really used was bard macs and they didnt need all the extra add on files.
 
RipSki said:
Hey when you save the .INC file what type of file is it? I mean is it a text type file, or saved as an ANSI type file like the .mac files? cause when I copy and save it auto saves as a text file and doenst work. Whats the icon look like on Windows XP. Only macs I every really used was bard macs and they didnt need all the extra add on files.
Click to expand...

ok just open your notepad up cut and paste then goto save as and another window will popup in the box were you type <name>.inc just put a .inc after it it will save as a *.inc file
 
Re: BUY / SELL / PACKS / CLEANPACKS INC files

armysoldier said:
Packs.inc
Rich (BB code): 
| 
| packs.inc
| Open and Close Packs Include File needed for macros
| Version 1.4
| Date: August 7, 2004
|
|
| MAR 26 2006 : Modified some code to speed up the process (TKS A_Druid_00)
|
| Please be sure to get the lastest updates at http://www.soc-music.com/mq2/
|
| These file MUST be in the common directory in your macros directory.
|
| Disclaimer:
| Code was used from other programers also from the MQ Forums.
| 
 
Sub OpenPacks 
/declare bag int local 0 
/if (!${Window[InventoryWindow].Open}) /nomodkey /keypress inventory 
/delay 3s ${Window[InventoryWindow].Open} 
/for bag 1 to 8 
/if (!${Window[Pack${bag}].Open}) /nomodkey /itemnotify pack${bag} rightmouseup 
/delay 3s ${Window[Pack${bag}].Open} 
/if (${Window[TradeskillWnd].Open}) /nomodkey /notify TradeskillWnd ExperimentButton leftmouseup 
/delay 5s !${Window[TradeskillWnd].Open} 
/next bag 
/return 
 
Sub ClosePacks 
/declare bag int local 0 
/if (!${Window[InventoryWindow].Open}) /nomodkey /keypress inventory 
/delay 3s ${Window[InventoryWindow].Open}
/for bag 1 to 8 
/if (${Window[Pack${bag}].Open}) /nomodkey /itemnotify pack${bag} rightmouseup 
/delay 3s !${Window[Pack${bag}].Open}
/next bag 
/if (${Window[InventoryWindow].Open}) /nomodkey /keypress inventory 
/delay 3s !${Window[InventoryWindow].Open} 
/return
Click to expand...
That include is kinda obsolete :)
Just do a "/keypress OPEN_INV_BAGS" to open all your inventory bags, and a "/keypress CLOSE_INV_BAGS" to close all your inventory bags ;)

Here's however an addition that could be usefull at times; opening/closing all your bank bags:
Rich (BB code): 
Sub OpenBankBags
    /declare Bag    int local   0
    /if (${Window[BigBankWnd].Open}) {
        /delay 1s
        /for Bag 1 to 24
            /if (!${Window[Bank${Bag}].Open}) /nomodkey /itemnotify bank${Bag} rightmouseup
        /next Bag
        /delay 1s
    }
/return

Sub CloseBankBags
    /declare Bag    int local   0
    /if (${Window[BigBankWnd].Open}) {
        /delay 1s
        /for Bag 1 to 24
            /if (${Window[Bank${Bag}].Open}) /nomodkey /itemnotify bank${Bag} rightmouseup
        /next Bag
        /delay 1s
    }
/return
 
Iam haveing trouble with the alchemy, it gets to the merchant and it says theres not any bugbane and i have checked the merchant and its there. Any ideas?
 
i have been gone a while.. see gen discussions....

BEfore i left i was PLing / toying with a baby sham... i will hopefully get a little time this weekend and look into any errors with the TS macs

ARMY
 
Np, I posted the alchemy one before Isaw you were back. I tried the misteltoe mac and it CTD'd me. It buys the scent of mar says done then says Doing the Celestial Essence combine then says searching for recipe then trying to enter the recipe desired and then i get the CTD. Anyone have suggestions?

Great to see you back. Glad your not filling sand bags right now.
 
Well got it the Mistletoe working tonight. I manually skilled up to where the essence was trivial and it is working now past that part. But still trouble with the alchemy :)
 
Last edited:
I dont know what I am doing wrong. I am trying to use the bake.mac in Abysmal Sea. It actually crashes EQ after it opens the spit and pauses after buying. It seems that it may be crashing when adding items to the spit or combining - Not exactly sure where because it's going so fast. I think when it is combining. Eq screen goes black and the cursor turns to hour glass in the middle of the screen. Anyone have any ideas?

Thank You,

RJ
 
I had trouble with bakeing until i manually skilledit up abit then it worked fine. Army is back and stated he woudl work on teh alchemy but he hasnt posted yet, have seme him posting all over though so i guess hes still here. Wish he woudl take a look at it though.
 
bobsj2000 said:
I dont know what I am doing wrong. I am trying to use the bake.mac in Abysmal Sea. It actually crashes EQ after it opens the spit and pauses after buying. It seems that it may be crashing when adding items to the spit or combining - Not exactly sure where because it's going so fast. I think when it is combining. Eq screen goes black and the cursor turns to hour glass in the middle of the screen. Anyone have any ideas?

Thank You,

RJ
Click to expand...
Make sure you have enough room in your bags. I actually have 8 empty bags i use just for TS. I had it crash on me once cause of that.

Also make sure you do not have any other programs running. I had www.pandora.com (a really cool site that plays music for free, Just pick an artist or song and it plays stuff just like it)on once and it crashed me.

Make sure you have over .75 gigs of ram too as it tends to crash if you dont have enough. Also Be sure to have default UI on. Most other UIs dont work

And the last thing i can think of is make sure you have the buy sell ect parts to it. I just did this on an alt like 2hrs ago and went fine.

Dont have a shammie high enough to try the alch mac. But im getting there.
 
Ive never used a tradeskill macro..my smithing is 223, so do i need all the items for combine in my inventory? or will it buy from vendors? or how does this work? i read through it but still somewhat confused
 
Ive never used a tradeskill macro..my smithing is 223, so do i need all the items for combine in my inventory? or will it buy from vendors? or how does this work? i read through it but still somewhat confused
Click to expand...



Depends on the macro. Some will just hit the combine button for you over and over. Some will buy the stuff you can buy, if you have the other stuff on you. Some will buy the stuff you need, make the the item, sell it, and start over again until it reaches the max skill.

Most these ones are the latter. I don't know how high the smithing macros go, but i don't think there is a completely store recipe that goes that high, is there?
 
Last edited:
No... To get to 300 you have to make Mistletoe Cutting Sickles that require Imbued Emeralds which must be made by a Druid. Everything else can be store bought however. Also, Mistletoe is not sold in Abysmal Sea so this can not be fully macroed.
 
armysoldier said:
/echo You must have the tunare dust and mistletoe on your toon before you start
/delay 1s
/echo Smithy Hammer and 5Kpp PER set of Gems X 20 (25Kpp is needed)
/delay 1s
|
|
| Blessed dust of tunare is created with imbued emerald / Celestial essence and a jar of acid
|

army
Click to expand...
im interested in doing this...im tired of farming tae ew blood for tae ew armor for skill ups, just a pain in the ass. i read through the mac so let me get this straight, i need 25k and smithy hammer plus tunare dust and mistletoe on the character? so it will make the blessed sickle hilt and all the pieces for me?so will the mac also make the blessed dust for me? or do i need that too? never used a tradeskill macro before.
++++++++
also i have roughly 275k and some change...how far doing this macro would it get me? maybe trivial with some left over? or not even close? this is my first tradeskill this high
++++++++
hmmm...i was reading through the recepie and its saying to make the blessed dust i need pottery at 103...is this still correct? i need other skills up as well to make them?
 
Fully working Alchemy.mac now

Rich (BB code): 
| Alchemy.mac version 2.0
|
| Written by Armysoldier
|
| March 5 2006
|
| Modifications:
|
| 26 APR 06: Call to read locs was missing... added it
|
| 2 APR 06: REworked to new recipies
|
| THIS MACRO DOES NOT DESTROY OR SELL OFF YOU End result potions
|
| I suggest to reduce cost of ALCHEMY
|             1. FARM or buy DEEP ORC meat - and make Deep Orc Essence - 195 TRIV - cost 1G 2S 5C per combine
|             2. to go from 210 - 300 - FORAGE RED CUPS and COLLECT DEEP WATER INK
|                  DISTILATE of _______ VIII - 255 TRIV - Cost 14p 1G 5S 1C per combine w/ RED CUPS
|                  DISTILATE of _______ IX - 302 TRIV - COST From under 1PP - 2PP per combine w/ DEEP WATER INK
|
|
| 26 MAR 2006: moved 2 subs and event declarations to CommonSubs.inc
|
| This new line of tradeskill macros uses the NEW UI and the OLD UI for TS containers
|
| The Macro will attempt to find the recipe using the NEW UI first
| If no recipe is found it will go Old school and do a set of combines
| these macros take into account the SALVAGE function and react accordingly
|
|
| A special thanks to A_Druid_00 for advising on some streamlining modifications
| and to Override for his Tradeskill Code that has been around for so long
| and is the inspiration for this code
|
| Some of the code was pulled from other macros and modified and manipulated
| to do the tasks set forth.
|
| This code is designed for Abysmal Sea
|
| *** FOR THIS CODE TO WORK ***
| You need to Stand BETWEEN Lita Hegeway @ loc 122,-50
|                           AND Jorlan Hegeway in Abysmal Sea
| You need to be in the first person view
| You need to ensure that when you click the tradeskill container the NEW UI comes up first
| the 5 FILES need to be in the macro\common folder (see includes below)
| A Medicine Bag needs to be in slot 8 of your packs
|
|
|
|Inventory
| _______
|| 1 | 5 |
||___|___|
|| 2 | 6 |
||___|___|
|| 3 | 7 |
||___|___|
|| 4 | 8 |
||___|___|
|


#include common/sell.inc
#include common/buy.inc
#include common/packs.inc
#include common/cleanpacks.inc
#include common/CommonSubs.inc


Sub Main
    /declare OldSkill int outer ${Me.Skill[Alchemy]}
    /declare SkillMaxWanted int outer
    /declare PackCode string outer
    /declare Component[10] string outer
    /declare i int outer
    /declare MerchantNameA string Outer
    /declare MerchantNameB string Outer
    /declare MerchantNameC string Outer
    /declare CombItemName string outer
    /declare ItemTo string outer
    /declare EndingVar int outer
    /declare DelayMult int outer
    /declare Container string outer
    /declare Checkrecipe string outer
    /declare NewUI int outer

|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
| Customize these settings if you want
|                   
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

    /varset SkillMaxWanted 210
    /varset DelayMult 1
    /declare Filename string outer Alchemy.ini

|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
| Call Read INI for locations array
|                   
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

    /call ReadINIA ${Filename} "Abysmal Sea"
    /if (!${Defined[LocArray]}) {
       /echo No Loc Array Created...
       /endmacro
    }

|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
| Begin
|
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

    :start

|--- Check Current Skill against Skill wanted
    /echo Alchemy is at ${Me.Skill[Alchemy]}

    /if (${Me.Skill[Alchemy]}>=${SkillMaxWanted}) {
      /echo Alchemy is at ${SkillMaxWanted}. Quiting!
      /endmacro
    }

    /if (${Me.Skill[Alchemy]}<83) {
          /varset MerchantNameA Sara Hegeway
          /varset MerchantNameB Jensine Hegeway
      }
    /if (${Me.Skill[Alchemy]}>=83 && ${Me.Skill[Alchemy]}<135) {
          /varset MerchantNameB Jensine Hegeway
          /varset MerchantNameA Maren Hegeway
      }
    /if (${Me.Skill[Alchemy]}>=135 && ${Me.Skill[Alchemy]}<211) {
          /varset MerchantNameA Jorlan Hegeway
          /varset MerchantNameB Lita Hegeway
          /varset MerchantNameC Oline Hegeway
      }

    /if (${Me.Skill[Alchemy]}<55) {
    /varset CombItemName DI2
    /varset ItemTo Distillate of Immunization II
    }
    /if (${Me.Skill[Alchemy]}>=55 && ${Me.Skill[ALchemy]}<83) {
    /varset CombItemName DI3
    /varset ItemTo Distillate of Immunization III
    }
    /if (${Me.Skill[Alchemy]}>=83 && ${Me.Skill[Alchemy]}<100) {
    /varset CombItemName WOLF2
    /varset ItemTo Philter of the Wolf II
    }
    /if (${Me.Skill[Alchemy]}>=100 && ${Me.Skill[Alchemy]}<135) {
    /varset CombItemName WOLF3
    /varset ItemTo Philter of the Wolf III
    }
    /if (${Me.Skill[Alchemy]}>=135 && ${Me.Skill[Alchemy]}<178) {
    /varset CombItemName DS6
    /varset ItemTo Distillate of Skinspikes VI
    }
    /if (${Me.Skill[Alchemy]}>=178 && ${Me.Skill[Alchemy]}<211) {
    /varset CombItemName WOLF5
    /varset ItemTo Philter of the Wolf V
    }
   
    /call ReadIni ${CombItemName}
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
| Buy Components
|
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

    /varset EndingVar 1
    /varset NewUI 1

    /if (${Me.Skill[Alchemy]}>=135 && ${Me.Skill[Alchemy]}<211) /call Movement 3 3 0

   /if (${Me.Skill[Alchemy]}<135)  /call Movement 1 1 0

    /target ${MerchantNameA}

    /nomodkey /click right target

    /delay 5s ${Window[MerchantWnd].Open}

    /call OpenPacks

    /call Buy "${Component[2]}" 20

    /if (${Me.Skill[Alchemy]}<135) /call Buy "${Component[1]}" 20

    /if (${Me.Skill[Alchemy]}<83) /call Buy "${Component[3]}" 60

    /if (${Me.Skill[Alchemy]}>=135 && ${Me.Skill[Alchemy]}<211) /call Buy "${Component[3]}" 20

    /nomodkey /notify MerchantWnd MW_Done_Button LeftMouseUp
    /delay 1s

    /if (${Me.Skill[Alchemy]}<135) /call Movement 3 3 0

    /if (${Me.Skill[Alchemy]}>=135 && ${Me.Skill[Alchemy]}<211) /call Movement 1 1 0

    /target ${MerchantNameB}

    /nomodkey /click right target

    /delay 5s ${Window[MerchantWnd].Open}

    /delay 2s
    /call Buy "${Component[4]}" 20

    /if (${Me.Skill[Alchemy]}>=83 && ${Me.Skill[Alchemy]}<211) /call Buy "${Component[5]}" 40

    /if (${Me.Skill[Alchemy]}>=83 && ${Me.Skill[Alchemy]}<135) /call Buy "${Component[3]}" 20

    /nomodkey /notify MerchantWnd MW_Done_Button LeftMouseUp
    /delay 1s

    /if (${Me.Skill[Alchemy]}>=1 && ${Me.Skill[Alchemy]}<135) /call Movement 3 3 0

    /if (${Me.Skill[Alchemy]}>=135 && ${Me.Skill[Alchemy]}<211) {

           /call Movement 4 4 0

           /target ${MerchantNameC}

           /nomodkey /click right target

           /delay 5s ${Window[MerchantWnd].Open}

           /call Buy "${Component[1]}" 20

           /call Movement 1 1 0

           }

    /nomodkey /notify MerchantWnd MW_Done_Button LeftMouseUp

    /call ClosePacks

|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
| MAKE Items
|
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

      /nomodkey /itemnotify pack8 rightmouseup
      /doevents
      /delay 3s ${Window[TradeskillWnd].Open}
      /if (!${Window[TradeskillWnd].Open}) /nomodkey /click left Item
      /delay 3s ${Window[TradeskillWnd].Open}
      /call ChooseRecipe
      /call ClosePacks

/call Movement 3 3 0
    /target ${MerchantNameA}
   
    /delay 5s ${Target.ID}==${Spawn[${MerchantNameA}].ID}

    /nomodkey /click right target

/delay 5s ${Window[MerchantWnd].Open}

    /call OpenPacks

    /call Sell "${Component[1]}"

    /call Sell "${Component[2]}"

    /call Sell "${Component[3]}"

    /call Sell "${Component[4]}"

    /if (${Me.Skill[Alchemy]}>83) /call Sell "${Component[5]}"

    /nomodkey /notify MerchantWnd MW_Done_Button LeftMouseUp

    /call ClosePacks

    /doevents

    /goto :start

    /return


|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
|Sub Event Skill up
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Sub Event_Skillup
        /if (${Me.Skill[Alchemy]}>${OldSkill}) {
        /echo Your Alchemy Went Up!! It's now ${Me.Skill[Alchemy]}!
        /varset OldSkill ${Me.Skill[Alchemy]}
      }
/return

|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
|Sub Event No Longer Advance
|used if there are some subcombines that need to be made in some TS
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Sub Event_Advance
    /varset EndingVar 2
/return

Before you reach a skill of 135 there was no set path for MerchantA. Now there is. This should work for all skill levels now. Send me a private message if it doesn't work.
 
Last edited:
I didnt see it anywhere, so I decided to fix it up myself. There were some problems with the tinkering macro, it was defining skill as Alchemy, therefore causing problems and needed a few spaces in certain parts. Its fixed and running alright for me. Here you go...

Rich (BB code): 
| Tinker.mac version 1.0
|
| Written by Armysoldier
|
| March 5 2006
|
| Modifications:
|
| 26 MAR 2006: moved 2 subs and event declarations to CommonSubs.inc
|              Changed some syntax errors
|
| This new line of tradeskill macros uses the NEW UI and the OLD UI for TS containers
| 
| The Macro will attempt to find the recipe using the NEW UI first
| If no recipe is found it will go Old school and do a set of combines
| these macros take into account the SALVAGE function and react accordingly
| 
|
| A special thanks to A_Druid_00 for advising on some streamlining modifications
| and to Override for his Tradeskill Code that has been around for so long 
| and is the inspiration for this code
|
| Some of the code was pulled from other macros and modified and manipulated 
| to do the tasks set forth.
|
| This code is designed for Abysmal Sea
|
| *** FOR THIS CODE TO WORK ***
| You need to Stand By Tialechaety Orrthemech @ -189,72,96  in Abysmal Sea
| You need to be in the first person view
| You need to ensure that when you click the tradeskill container the NEW UI comes up first
| the 5 FILES need to be in the macro\common folder (see includes below)
| You will need a Deluxe Toolbox (in the last slot) PAck slot 8.
|  ---------------^^^^^^^^^^^^^^----VERY IMPORTANT
| 
|
|Inventory
| _______
|| 1 | 5 |
||___|___|
|| 2 | 6 | 
||___|___|
|| 3 | 7 |
||___|___|
|| 4 | 8 |
||___|___|
|


#include common/sell.inc
#include common/buy.inc
#include common/packs.inc
#include common/cleanpacks.inc
#include common/CommonSubs.inc


Sub Main
    /declare OldSkill int outer ${Me.Skill[Tinkering]}
    /declare SkillMaxWanted int outer
    /declare PackCode string outer 
    /declare Component[10] string outer
    /declare i int outer
    /declare MerchantNameA string Outer
    /declare CombItemName string outer
    /declare ItemTo string outer
    /declare EndingVar int outer
    /declare DelayMult int outer
    /declare Container string outer
    /declare Checkrecipe string outer
    /declare NewUI int outer

|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
| Customize these settings if you want
|                    
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

    /varset MerchantNameA "Tialechaety Orrthemech" 
    /varset SkillMaxWanted 300 
    /varset DelayMult 1
    /declare Filename string outer Tinkering.ini

|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
| Begin 
|
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

    :start

|--- Check Current Skill against Skill wanted 
    /echo Tinkering is at ${Me.Skill[Tinkering]}

    /if (${Me.Skill[Tinkering]}>=${SkillMaxWanted}) {
      /echo Tinkering is at ${SkillMaxWanted}. Quiting!
      /endmacro
    }
    /if (${Me.Skill[Tinkering]}>75 && ${FindItemCount[=Firewater]}<10) {
      /varset CombItemName "FW" 
      /varset ItemTo "Firewater
      } ELSE {
    /if (${Me.Skill[Tinkering]}<76) { 
      /varset CombItemName "SBC" 
      /varset ItemTo "standard bow cam" 
    } 
    /if (${Me.Skill[Tinkering]}>75 && ${Me.Skill[Tinkering]}<103) { 
      /varset CombItemName "SP" 
      /varset ItemTo "stalking probe" 
    } 
    /if (${Me.Skill[Tinkering]}>102 && ${Me.Skill[Tinkering]}<123) { 
      /varset CombItemName "PG" 
      /varset ItemTo "powered gloves" 
    } 
    /if (${Me.Skill[Tinkering]}>121 && ${Me.Skill[Tinkering]}<148) { 
       /if (${FindItemCount[=Fresh Fish]}<10) {
       /echo you need to please go buy fresh fish....
       /endMacro
       }
      /varset CombItemName "AL" 
      /varset ItemTo "Aqualung" 
    } 
    /if (${Me.Skill[Tinkering]}>147 && ${Me.Skill[Tinkering]}<176) { 
      /if (${FindItemCount[=Aqualung]}<10) {
           /echo you have Less than 10 aqualungs.... manually combine or get more
           /endmacro
           }
      /varset CombItemName "RB" 
      /varset ItemTo "Rebreather" 
    } 

}

    /call ReadIni "${CombItemName}"
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
| Buy Components
|
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

    /varset EndingVar 1
    /varset NewUI 1

    /target ${MerchantNameA}

    /nomodkey /click right target

    /delay 5s ${Window[MerchantWnd].Open}

    /call OpenPacks

    /call Buy "${Component[1]}" 10

    /call Buy "${Component[2]}" 10

    /if (!${CombItemName.Equal[FW]}) /call Buy "${Component[3]}" 10

    /if (${Me.Skill[Tinkering]}>75) {

    /if (${CombItemName.Equal[SP]}) {
    /call PCBuy "${Component[4]}" 10
           } ELSE {
    /call Buy "${Component[4]}" 10
  
           }
    }

    /if (${Me.Skill[Tinkering]}>121 && ${Me.Skill[Tinkering]}<149) /call Buy "${Component[5]}" 10

    /nomodkey /notify MerchantWnd MW_Done_Button LeftMouseUp

    /call ClosePacks

|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
| MAKE Items
|
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

      /nomodkey /itemnotify pack8 rightmouseup
      /doevents 
      /delay 3s ${Window[TradeskillWnd].Open} 
      /if (!${Window[TradeskillWnd].Open}) /nomodkey /click left Item 
      /delay 3s ${Window[TradeskillWnd].Open} 
      /call ChooseRecipe
      /call ClosePacks

    /target ${MerchantNameA}
   
    /delay 5s ${Target.ID}==${Spawn[${MerchantNameA}].ID}

    /nomodkey /click right target

/delay 5s ${Window[MerchantWnd].Open} 

    /call OpenPacks

    /if (${Me.Skill[Tinkering]}<123) /call Sell ${ItemTo}

    /call Sell "${Component[1]}"

    /call Sell "${Component[2]}"

    /if (!${CombItemName.Equal[FW]}) /call Sell "${Component[3]}"

        /if (!${CombItemName.Equal[SBC]}) /call Sell "${Component[4]}"

    /if (${Me.Skill[Tinkering]}>122 && ${Me.Skill[Tinkering]}<149) /call Sell "${Component[5]}"

    /nomodkey /notify MerchantWnd MW_Done_Button LeftMouseUp

    /call ClosePacks

    /doevents

    /goto :start

    /return


|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
|Sub Event Skill up
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ 
Sub Event_Skillup
        /if (${Me.Skill[Tinkering]}>${OldSkill}) {
        /echo Your Tinkering Went Up!! It's now ${Me.Skill[Tinkering]}!
        /varset OldSkill ${Me.Skill[Tinkering]}
/return

|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
|Sub Event No Longer Advance 
|used if there are some subcombines that need to be made in some TS
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Sub Event_Advance
    /varset EndingVar 2
/return

N
 
You must log in or register to reply here.
NEW Tradeskill Macros
Next unread thread 🦁

Users who are viewing this thread

Total: 1 (members: 0, guests: 1)
Back
Top
Cart

Cart

Total -