[Macro] Bola

[Hilde]

[Macro] Bola

Crafting Bolas can be very annoying if you don't have a macro that does everything for you. This macro will craft bolas until you run out of resources. It is assumed that your Tinkering skill is high enough to craft everything with a 100% success chance.

Setup:

Organzier-5:

Add "bola" to organizer #5 and set a bag where you want to put all the crafted bolas.

Restock-5:

Add 500 iron ingots and 100 cut up leather to your restock agent.

Display/Counters:

You need counters for two items (make sure to name them like I did):

• Tinker Tools
• Ingots

A Container:

With iron ingots and cut up leather. Make sure you have NO colored leather or ingots in that container!!!!


Macro:

You need to re-target the "Absolute Target" to the container with ingots and leather.

!Loop
Assistant.Macros.IfAction|50|0|50|Ingots
Assistant.Macros.HotKeyAction|0|Restock Agent-5
// Re-target this to your ingots/leather container
Assistant.Macros.AbsoluteTargetAction|0|0|1114849839|111|106|0|3651
// ^^^^^^
Assistant.Macros.EndIfAction
Assistant.Macros.IfAction|50|0|3|Tinker Tools
Assistant.Macros.DoubleClickTypeAction|7864|True
Assistant.Macros.WaitForGumpAction|949095101|False|30
Assistant.Macros.GumpResponseAction|8|0|0
Assistant.Macros.WaitForGumpAction|949095101|False|300
Assistant.Macros.GumpResponseAction|23|0|0
Assistant.Macros.WaitForGumpAction|949095101|False|1
Assistant.Macros.ElseAction
Assistant.Macros.ForAction|4
Assistant.Macros.DoubleClickTypeAction|7864|True
Assistant.Macros.WaitForGumpAction|949095101|False|30
Assistant.Macros.GumpResponseAction|15|0|0
Assistant.Macros.WaitForGumpAction|949095101|False|300
Assistant.Macros.GumpResponseAction|51|0|0
Assistant.Macros.WaitForGumpAction|949095101|False|1
Assistant.Macros.PauseAction|00:00:00.5000000
Assistant.Macros.EndForAction
Assistant.Macros.DoubleClickTypeAction|7864|True
Assistant.Macros.WaitForGumpAction|949095101|False|30
Assistant.Macros.GumpResponseAction|43|0|0
Assistant.Macros.WaitForGumpAction|949095101|False|300
Assistant.Macros.GumpResponseAction|44|0|0
Assistant.Macros.WaitForGumpAction|949095101|False|1
Assistant.Macros.PauseAction|00:00:01
Assistant.Macros.EndIfAction
Assistant.Macros.IfAction|5|1|400
Assistant.Macros.HotKeyAction|0|Organizer Agent-5
Assistant.Macros.PauseAction|00:00:02
Assistant.Macros.EndIfAction

 

[Lippy]

Re: [Macro] Bola

Thanks for posting this for me Hilde .

It is a sweet macro but I made some small changes :

1. Removed all wait for gumps (because they can turn into timeouts which take forever) and replaced with .50 or 1.0 sec pause as needed.

2. Added a pause to allow 1.25 seconds to restock.

3. A note about how to use this with your bank box .

!Loop
Assistant.Macros.IfAction|50|0|50|ingots
Assistant.Macros.HotKeyAction|0|Restock Agent-5
// Re-target this to your ingots/leather container
//(or to yourself if using a bank box)
Assistant.Macros.AbsoluteTargetAction|0|0|84467|983|525|-30|605
// ^^^^^^
Assistant.Macros.PauseAction|00:00:01.2500000
Assistant.Macros.EndIfAction
Assistant.Macros.IfAction|50|0|3|Tinker Tools
Assistant.Macros.DoubleClickTypeAction|7864|True
Assistant.Macros.PauseAction|00:00:00.5000000
Assistant.Macros.GumpResponseAction|8|0|0
Assistant.Macros.PauseAction|00:00:00.5000000
Assistant.Macros.GumpResponseAction|23|0|0
Assistant.Macros.PauseAction|00:00:00.5000000
Assistant.Macros.ElseAction
Assistant.Macros.ForAction|4
Assistant.Macros.DoubleClickTypeAction|7864|True
Assistant.Macros.PauseAction|00:00:00.5000000
Assistant.Macros.GumpResponseAction|15|0|0
Assistant.Macros.PauseAction|00:00:00.5000000
Assistant.Macros.GumpResponseAction|51|0|0
Assistant.Macros.PauseAction|00:00:01
Assistant.Macros.EndForAction
Assistant.Macros.DoubleClickTypeAction|7864|True
Assistant.Macros.PauseAction|00:00:00.5000000
Assistant.Macros.GumpResponseAction|43|0|0
Assistant.Macros.PauseAction|00:00:00.5000000
Assistant.Macros.GumpResponseAction|44|0|0
Assistant.Macros.PauseAction|00:00:01
Assistant.Macros.EndIfAction
Assistant.Macros.IfAction|5|1|400
Assistant.Macros.HotKeyAction|0|Organizer Agent-5
Assistant.Macros.PauseAction|00:00:02
Assistant.Macros.EndIfAction

Thanks again .