Its ugly, I know.. but it works..
Code: Select all
|**
GoD Tradeskill Macro! Takes advantage of the GoD freebie quests to raise your tradeskills up to 54.
You can read about the quests here:
http://www.eqtraders.com/articles/article_page.php?article=q142&menustr=120037000000
Please not that you must successfully combine ONE of the "MadeItem"s before the recipe will be
added to the tradeskill interface. You must have your bags open, and the new tradeskill window open with
The recipe for what you are combining selected.
Things to change:
/varsets must be changed to reflect the quest you are attempting
MadeItem = The item that results from the combine
EssentialItem = The componant that doesnt change for the quest you are attempting
eg. Yard of Rough Cloth, Wayfarers Resin
Questgiver = The name of ther person giving your specific quest
questphrase = The phrase that results in the componants to combine
NOTE: You will have to change the MadeItem for each portion of the tradeskill you are attempting
Have fun, its an ugly macro, but it works..
**|
#Event Done "Sorry, but you don't have everything you need for this recipe in your general inventory"
sub main
/zapvars
/declare MadeItem global
/declare EssentialItem global
/declare Questgiver global
/declare questphrase global
/varset MadeItem "Simple Pants"
/varset EssentialItem "Yard of Rough Cloth"
/varset Questgiver "Tonlyei Lyhin"
/varset questphrase "chores"
/echo GoD Mac Starting
/call Combine
/return
Sub Combine
:Loop
/doevents
/notify COMBW_CombineArea CombineButton leftmouseup
/if (${Cursor.ID}) /autoinv
/if (${FindItemCount[@EssentialItem]}==0) /Call TurnIn
/goto :Loop
/return
Sub TurnIn
/target "@Questgiver"
:giveloop
:needitem
/if (${FindItemCount[@MadeItem]}==0) /goto :Done
/ctrl /itemnotify ${FindItem[@MadeItem].InvSlot} leftmouseup
/if (!${Cursor.ID}) /goto :needitem
:wait
/delay 1s
/click left target
/if (!${Window[GiveWnd].Open}) /goto :wait
/delay 1
| /mouseto target
| /click left
:nextitem
/if (${FindItemCount[@MadeItem]}==0) /goto :give
/ctrl /itemnotify ${FindItem[@MadeItem].InvSlot} leftmouseup
/itemnotify trade2 leftmouseup
/delay 1
/if (${FindItemCount[@MadeItem]}==0) /goto :give
/ctrl /itemnotify ${FindItem[@MadeItem].InvSlot} leftmouseup
/itemnotify trade3 leftmouseup
/delay 1
/if (${FindItemCount[@MadeItem]}==0) /goto :give
/ctrl /itemnotify ${FindItem[@MadeItem].InvSlot} leftmouseup
/itemnotify trade4 leftmouseup
/delay 1
:give
/notify GiveWnd GVW_Give_Button leftmouseup
/delay 1
/goto :giveloop
:Done
/delay 3s
/say @questphrase
:needstuffs
/delay 3
/if (!${Cursor.ID}) /goto :needstuffs
:anythingelse
/if (${Cursor.ID}) {
/autoinv
/delay 1s
/goto :anythingelse
}
/if (${FindItemCount[@MadeItem]}==0 && ${FindItemCount[@EssentialItem]}==0) /call Event_Done
/return
Sub Event_Done
/echo you've completed this freebie part
/endmacro
/return