My Tradeskill Combine Mac (Working)

[Fuergrissa]

enjoy, you have to open your container and pick your recipe first.
If you want it to carry on after you trivial on something delete the event -

Code: Select all

#Event SkillTrivial "#*#You can no longer advance your skill from making this item#*#"

Code: Select all

|===========================================|
| V2.1                                      |
|___________________________________________|
|fletch.mac MQ2Data Compliant by Fuergrissa |
|#Events updated 12-05-04                   |
|___________________________________________|

#Event SkillUp "You have become better at #1#! (#2#)" 
#Event nocomp "#*#You are missing#*#"
#Event SkillTrivial "#*#You can no longer advance your skill from making this item#*#"
#Event FullInventory "#*#There was no place to put that#*#" 
#Event SkillFailure "#*#You lacked the skills#*#" 
#Event SkillSuccess "#*#You have fashioned the items together to create something new#*#" 

Sub Main

      /declare SkillFailCounter int outer
      /declare SkillSuccessCounter int outer
      /declare SuccessRate int outer 
      /declare TotalAttempts int outer 
      
      /varset SkillFailCounter 0 
      /varset SkillSuccessCounter 0
      /varset SuccessRate 0 
      /varset TotalAttempts 0 

   :mainloop
      /doevents
      /call Combine
      /goto :mainloop
      /end

Sub Combine
      /notify COMBW_CombineArea CombineButton leftmouseup
      /delay 2
      /if (${Cursor.ID}) /autoinv
      /return

Sub DisplayStats 


      /echo Combine Statistics - Successes: ${SkillSuccessCounter}, Failures: ${SkillFailCounter}
      /varcalc TotalAttempts ${SkillFailCounter} + ${SkillSuccessCounter} 
      /varcalc SuccessRate ${SkillSuccessCounter} / ${TotalAttempts} * 100 
      /echo Success Rate: ${SuccessRate} % out of ${TotalAttempts} attempts
      /return 

Sub Event_SkillUp(SkillUpText,TheSkill,int Amount)
      /popup ${TheSkill} increased - ${Amount}
      /echo ${TheSkill} increased - ${Amount}
      /return 
      
Sub Event_nocomp
      /echo "You have run out of Componants. ((Ending Macro)) "
      /popup You have run out of Componants. ((Ending Macro))   
      /if (${Cursor.ID}) /autoinv
      /call DisplayStats
      /end

Sub Event_SkillTrivial
      /echo "You can no longer advance your skill from making this item. ((Ending Macro))"
      /popup You can no longer advance your skill from making this item. ((Ending Macro))   
      /if (${Cursor.ID}) /autoinv
      /call DisplayStats
      /end

Sub Event_FullInventory 
      /echo "Your inventory is full, ((( Ending Macro ))) "
      /popup Your inventory is full, ((( Ending Macro )))
      /call DisplayStats 
      /end 

Sub Event_SkillFailure
      /varcalc SkillFailCounter ${SkillFailCounter}+1
      /return 

Sub Event_SkillSuccess  
      /varcalc SkillSuccessCounter ${SkillSuccessCounter}+1
      /return 

[DumbStruck]

I got error subroutine main not found . i dont see it stating anything about the enviro container etc ?

[Fuergrissa]

i missed a line in the instructions at the top, you have to open your container and choose your recipe first. then run the macro.
this mac will report skill ups and give you a small report on stats.

[DumbStruck]

I did have the window opened and had the receipe highllighted have u tested it ?

[Fuergrissa]

i use it all the time, it works perfectly.
I stand infront of the fletching merchant, open my planar fletching kit, choose recipe, buy 100 of each item then type
/macro fletch

wait untill it ends.

[DumbStruck]

there inlies the problem .

U say a generic ts macro . when in fact its for fletching . i was trying to use it for a brewing combine . so i guess some where it would need to know it was an enviro windo rather then a pack window .

[Fuergrissa]

my apoligies, post heading corrected.

[Joeur]

works perfectly for me, with any tradeskill UI window.

Only problem is if MQ is loaded after the character is,
then you'll get a error message about "cannot send notification
to COMBW_CombineArea CombineButton" and the macro will
loop without doing anything.

Just wanted to point that out, so if anybody else gets that error, they just need to camp out & back in, and it will work.

[DumbStruck]

My bad .. This macro works great i finally realised im a noob . and was saving file under wrong format .. wasnt using ansi .

[Fuergrissa]

as long as it works and people can get some use out of it, im a happy chappy.

[Fuergrissa]

updated events

[Mano]

your a god rocking my domain

[Davef139]

heres a general TS macro that you just run once selected item.
Downloaded this ages ago..

Code: Select all

#event OutOfStuff "Sorry, but you don't have everything you need for this recipe in your general inventory." 

Sub Main 
   :Loop 

      :ClearCursor 
      /if (${Cursor.ID}) { 
         /autoinventory 
         /goto :ClearCursor 
      } 

      /notify TradeskillWnd CombineButton leftmouseup 
      /doevents 
      /goto :Loop 
/return 

Sub Event_OutOfStuff 
   /endmacro 
/return

[/code]

[inspiron]

This macro no longer works for me any ideas whats wrong with the code? Just ends the macro soon as I start it.

[Slackro]

Replacing

Code: Select all

/notify COMBW_CombineArea CombineButton leftmouseup

with

Code: Select all

/notify TradeskillWnd CombineButton leftmouseup

(in sub combine) fixed Fuergrissa's .mac for me.