Help! - Chronal Resonance Dust

[TiroEQ83]

Greetings!

I have been searching for a macro to use a Collapsed Chronal Transmutation Device to convert Cosgrove Powder into Chronal Resonance Dust. This combine doesnt use the new tradeskill UI. My macro coding skills are very limited =/. If anyone could help out or point me in the right direction that would be greatly appreciated. Thanks!

 

[TiroEQ83]

So this is what I came up with after tinkering around a few days. It works as long as you pre-make stack spots in your bags for the chronal resonance dust so that it doesn't autoinventory into the open container slot.

if anyone has any suggestions or changes to make it work better please let me know.

sub Main
/declare CRDCount int
/declare CPCount int
:Loop
/keypress OPEN_INV_BAGS
/varset CRDCount ${FindItemCount[=Chronal Resonance Dust]}
/varset CPCount ${FindItemCount[=Cosgrove Powder]}
/if (${CRDCount} < 1) /call NoDust
/if (${CPCount} < 9) /call NoPowder
/call FindContainer
/itemnotify ${FindItem[=Chronal Transmutation Device].InvSlot} rightmouseup
/if (${FindItem[=Chronal Transmutation Device].InvSlot} == 24) /call Combine_One
/if (${FindItem[=Chronal Transmutation Device].InvSlot} == 25) /call Combine_Two
/if (${FindItem[=Chronal Transmutation Device].InvSlot} == 26) /call Combine_Three
/if (${FindItem[=Chronal Transmutation Device].InvSlot} == 27) /call Combine_Four
/if (${FindItem[=Chronal Transmutation Device].InvSlot} == 28) /call Combine_Five
/if (${FindItem[=Chronal Transmutation Device].InvSlot} == 29) /call Combine_Six
/if (${FindItem[=Chronal Transmutation Device].InvSlot} == 30) /call Combine_Seven
/if (${FindItem[=Chronal Transmutation Device].InvSlot} == 31) /call Combine_Eight
/if (${FindItem[=Chronal Transmutation Device].InvSlot} == 32) /call Combine_Nine
/if (${FindItem[=Chronal Transmutation Device].InvSlot} == 33) /call Combine_Ten
/goto :Loop 
/return
/echo Ending Macro...
/keypress CLOSE_INV_BAGS
/endmac


sub NoDust
/echo No Chronal Resonance Dust Found...
/echo Ending Macro...
/keypress CLOSE_INV_BAGS
/endmac
/return


sub NoPowder
/echo Not Enough Cosgrove Powder...
/echo Ending Macro...
/keypress CLOSE_INV_BAGS
/endmac
/return


sub FindContainer
/declare Container bool
/varset Container ${Bool[${FindItem[=Chronal Transmutation Device]}]}
/if (${Container} == FALSE) /call Summon
/return


sub Summon
/itemnotify ${FindItem[Collapsed Chronal Transmutation Device].InvSlot} rightmouseup
/delay 2s
/autoin
/return

sub Combine_One
/declare CP int

/ctrlkey /itemnotify ${FindItem[=Chronal Resonance Dust].InvSlot} leftmouseup
/delay 1s
/nomodkey /itemnotify in Pack1 10 leftmouseup
/delay 1s

/for CP 1 to 9
/ctrlkey /itemnotify ${FindItem[=Cosgrove Powder].InvSlot} leftmouseup
/delay 1s
/nomodkey /itemnotify in Pack1 ${CP} leftmouseup
/delay 1s
/next CP

/combine Pack1
/delay 1s
/autoinv
/return


sub Combine_Two
/declare CP int

/ctrlkey /itemnotify ${FindItem[=Chronal Resonance Dust].InvSlot} leftmouseup
/delay 1s
/nomodkey /itemnotify in Pack2 10 leftmouseup
/delay 1s

/for CP 1 to 9
/ctrlkey /itemnotify ${FindItem[=Cosgrove Powder].InvSlot} leftmouseup
/delay 1s
/nomodkey /itemnotify in Pack2 ${CP} leftmouseup
/delay 1s
/next CP

/combine Pack2
/delay 1s
/autoinv
/return


sub Combine_Three
/declare CP int

/ctrlkey /itemnotify ${FindItem[=Chronal Resonance Dust].InvSlot} leftmouseup
/delay 1s
/nomodkey /itemnotify in Pack3 10 leftmouseup
/delay 1s

/for CP 1 to 9
/ctrlkey /itemnotify ${FindItem[=Cosgrove Powder].InvSlot} leftmouseup
/delay 1s
/nomodkey /itemnotify in Pack3 ${CP} leftmouseup
/delay 1s
/next CP

/combine Pack3
/delay 1s
/autoinv
/return


sub Combine_Four
/declare CP int

/ctrlkey /itemnotify ${FindItem[=Chronal Resonance Dust].InvSlot} leftmouseup
/delay 1s
/nomodkey /itemnotify in Pack4 10 leftmouseup
/delay 1s

/for CP 1 to 9
/ctrlkey /itemnotify ${FindItem[=Cosgrove Powder].InvSlot} leftmouseup
/delay 1s
/nomodkey /itemnotify in Pack4 ${CP} leftmouseup
/delay 1s
/next CP

/combine Pack4
/delay 1s
/autoinv
/return


sub Combine_Five
/declare CP int

/ctrlkey /itemnotify ${FindItem[=Chronal Resonance Dust].InvSlot} leftmouseup
/delay 1s
/nomodkey /itemnotify in Pack5 10 leftmouseup
/delay 1s

/for CP 1 to 9
/ctrlkey /itemnotify ${FindItem[=Cosgrove Powder].InvSlot} leftmouseup
/delay 1s
/nomodkey /itemnotify in Pack5 ${CP} leftmouseup
/delay 1s
/next CP

/combine Pack5
/delay 1s
/autoinv
/return


sub Combine_Six
/declare CP int

/ctrlkey /itemnotify ${FindItem[=Chronal Resonance Dust].InvSlot} leftmouseup
/delay 1s
/nomodkey /itemnotify in Pack6 10 leftmouseup
/delay 1s

/for CP 1 to 9
/ctrlkey /itemnotify ${FindItem[=Cosgrove Powder].InvSlot} leftmouseup
/delay 1s
/nomodkey /itemnotify in Pack6 ${CP} leftmouseup
/delay 1s
/next CP

/combine Pack6
/delay 1s
/autoinv
/return


sub Combine_Seven
/declare CP int

/ctrlkey /itemnotify ${FindItem[=Chronal Resonance Dust].InvSlot} leftmouseup
/delay 1s
/nomodkey /itemnotify in Pack7 10 leftmouseup
/delay 1s

/for CP 1 to 9
/ctrlkey /itemnotify ${FindItem[=Cosgrove Powder].InvSlot} leftmouseup
/delay 1s
/nomodkey /itemnotify in Pack7 ${CP} leftmouseup
/delay 1s
/next CP

/combine Pack7
/delay 1s
/autoinv
/return


sub Combine_Eight
/declare CP int

/ctrlkey /itemnotify ${FindItem[=Chronal Resonance Dust].InvSlot} leftmouseup
/delay 1s
/nomodkey /itemnotify in Pack8 10 leftmouseup
/delay 1s

/for CP 1 to 9
/ctrlkey /itemnotify ${FindItem[=Cosgrove Powder].InvSlot} leftmouseup
/delay 1s
/nomodkey /itemnotify in Pack8 ${CP} leftmouseup
/delay 1s
/next CP

/combine Pack8
/delay 1s
/autoinv
/return


sub Combine_Nine
/declare CP int

/ctrlkey /itemnotify ${FindItem[=Chronal Resonance Dust].InvSlot} leftmouseup
/delay 1s
/nomodkey /itemnotify in Pack9 10 leftmouseup
/delay 1s

/for CP 1 to 9
/ctrlkey /itemnotify ${FindItem[=Cosgrove Powder].InvSlot} leftmouseup
/delay 1s
/nomodkey /itemnotify in Pack9 ${CP} leftmouseup
/delay 1s
/next CP

/combine Pack9
/delay 1s
/autoinv
/return


sub Combine_Ten
/declare CP int

/ctrlkey /itemnotify ${FindItem[=Chronal Resonance Dust].InvSlot} leftmouseup
/delay 1s
/nomodkey /itemnotify in Pack10 10 leftmouseup
/delay 1s

/for CP 1 to 9
/ctrlkey /itemnotify ${FindItem[=Cosgrove Powder].InvSlot} leftmouseup
/delay 1s
/nomodkey /itemnotify in Pack10 ${CP} leftmouseup
/delay 1s
/next CP

/combine Pack10
/delay 1s
/autoinv
/return

 

[Maskoi]

Awesome thanks for sharing 1 thing I see that can help you out.

/itemnotify ${FindItem[=Cosgrove Powder].InvSlot} leftmouseup

is deprecated and will be removed from MQ2 all together in the next few months. This was implemented in the last patch just use the following.

/itemnotify "Cosgrove Powder" leftmouseup

this does not affect your "/itemnotify in" those are correct.

You should also note that bags need to be at least 10 slot for this macro to work. Great job.

 

[TiroEQ83]

Maskoi,

I tried to put the change you suggested in, but when i did it started to pick up the whole stack instead of just one, i left /ctrlkey in and it seemed to just ignore it.

any clue as to what i did wrong?

- - - Updated - - -

I simplified the code a little, still runs just fine. as soon as i figure out what i did wrong with Maskoi's suggestion, i will implement that as well.

 

[mckonz]

I have been looking to automate this. I see the code and thanks for posting. Where do I paste this code at after copying? Thanks

 

[ctaylor22]

Go to your macros directory in your MQ2 folder. with notepad create a file crdust.mac. Paste the code above into the file then save the file. From eq just use /mac crdust.mac

 

[eqmule]

I cringe whenever I see a macro that uses .InvSlot

/ctrl /itemnotify "Chronal Resonance Dust" leftmouseup

Should pick up 1 of them no matter which bag they are in and no matter if that bag is open or not...

 

[ctaylor22]

Getting schooled by EQMule. I love it..

 

[mckonz]

Made the crdust.mac file. When running the /mac crdust.mac, I keep getting [/itemnotify] invalid item slot 'null' and there was no container in slot 32. it also tries to put stacks of 100 in the transmuter first then adds 1 at a time and then double stacks until EQ says You can't combine stacks in this device. I am close to getting this, but hung up on why I am getting the errors and the multiple stacks.

EDIT: Figured it out. Can't have a Transmuter already populated. The macro must do it itself. Working like a charm now Thanks

 

[ToeJamSamy]

idk and idc if this is written mesy or great, but i searched out of a glimmer of hope something like this would exist and found it. looking at the date i was afraid it would not still work but it works beautifully.

 

[ChatWithThisName]

User @kyebear was looking for some help getting this working. The .InvSlot no longer works as it used to work, and thus the macro no longer worked.

Since I was in there I opted to modify the macro the remove the multiple repeated functions and use a variable to track which bag it was in. It should probably check to make sure it's all working right but EQ isn't up at the moment. Just don't want the changes to get lost. Once EQ is up we'll be checking to make sure it works as intended.

 

[TheIcyOne]

User @kyebear was looking for some help getting this working. The .InvSlot no longer works as it used to work, and thus the macro no longer worked.

Since I was in there I opted to modify the macro the remove the multiple repeated functions and use a variable to track which bag it was in. It should probably check to make sure it's all working right but EQ isn't up at the moment. Just don't want the changes to get lost. Once EQ is up we'll be checking to make sure it works as intended.

Hey Chat, I'm running into an error that is:
CRDust.mac@19 (main): /declare BAG int outer ${FindItem[=Chronal Transmutation Device].InvSlot}
/declare 'Bag' failed. Name already in use.

Can I get a hand on that?

 

[OLDBONE]

Hey Chat, I'm running into an error that is:
CRDust.mac@19 (main): /declare BAG int outer ${FindItem[=Chronal Transmutation Device].InvSlot}
/declare 'Bag' failed. Name already in use.

Can I get a hand on that?

Wouldn't something easy like changing BAG to CTD_BAG, find/replace (if needed) fix it?

 

[TheIcyOne]

Wouldn't something easy like changing BAG to CTD_BAG, find/replace (if needed) fix it?

Oh, I've no clue, Mate. I'm damn near ignorant when it comes to editing things like this.