Automated Skinspikes I - VI

[Villageidiot]

I created this macro to automate creating Distillate of skinspikes I - VI
This macro is intended to be started in the alchemist guild in PoK and will make 20 of whatever potion you choose.

It requires you have the two includes below which were made by Armysoldier (i think)

Please let me know what you think about these or if you have any problems. Also any feedback is nice feedback. If you tried it and like it let me know so atleast i know someone enjoys what i'm doing.

This mac was written to be used with a Medicine bag
you can use something else if you like but would have to edit the part of the mac that calls for the bag.

|    This macro was created by Villageidiot
|    This macro is intended to automate the creation of the damage shield 
|    potions "Distillate of Skinspikes I - VI"  to use this macro type
|   /mac spikes #                   the # indicates which potion you want. IE
|    If you want Skinspikes I you would type /mac spikes 1 
|    If you want Skinspikes V you would type /mac spikes 5
|    It will make a batch of 20 then end.  I set this macro to not start unless
|   You have atleast 500pp on you.


#include buy.inc
#include Common.inc



Sub Main


/if (!${Plugin[MQ2Moveutils].Name.Equal[mq2moveutils]}) /squelch /plugin MQ2moveutils nocheck



/if (!${Defined[Param0]}) {
  /echo Proper usage: /macro spikes (1 thru 6)
  /end
}

   /declare Version string outer ${Param0}
   /declare Combine_Count 	int outer 0

:Loop


/if (${Me.Platinum}<500) {
	/echo You don't have enough Platinum.
	/echo Please have more than 500 PP on you.  Macro won't run if you
	/echo have less than 1kPP.
	/echo Head your ass to the bank and then restart this macro!
/endm
}
/if (${Param0}==1) /call Skinspikes_I
/if (${Param0}==2) /call Skinspikes_II
/if (${Param0}==3) /call Skinspikes_III
/if (${Param0}==4) /call Skinspikes_IV
/if (${Param0}==5) /call Skinspikes_V
/if (${Param0}==6) /call Skinspikes_VI
/call combine

/echo Restart me if you want to make another batch
/endm
/return



Sub Skinspikes_I
   /target npc Ludvik
   /moveto ID
   /delay 4s
   /nomodkey /click right target
   /delay 3s
   /call buy "Acaana Leaf" 20
   /delay 3s
   /call buy "Comfrey Leaf" 20
   /delay 3s
   /call buy "Flamewort Leaf" 40
   /delay 5s
   /call buy "Primitive Potion Vial" 20
   /delay 3s
   /nomodkey /notify MerchantWnd MW_Done_Button LeftMouseUp
   /target npc Henrik
   /moveto ID
   /delay 4s
   /nomodkey /click right target
   /delay 2s
   /call buy "Sticklewort" 20
   /delay 2s
   /nomodkey /notify MerchantWnd MW_Done_Button LeftMouseUp
/return

Sub Skinspikes_II
  /target npc Ludvik
  /moveto ID
  /delay 4s
  /nomodkey /click right target
  /delay 3s
  /call buy "Acaana Leaf" 20
  /delay 3s
  /call buy "Comfrey Leaf" 20
  /delay 3s
  /call buy "Flamewort Leaf" 40
  /delay 3s
  /call buy "Crude Potion Vial" 20
  /delay 3s
  /nomodkey /notify MerchantWnd MW_Done_Button LeftMouseUp
  /delay 1s
  /target npc Henrik
  /moveto ID
  /delay 4s
  /nomodkey /click right target
  /delay 3s
  /call buy "Vox's Dust" 20
  /delay 3s
  /nomodkey /notify MerchantWnd MW_Done_Button LeftMouseUp  
/return

Sub Skinspikes_III
  /target npc Ludvik
  /moveto ID
  /delay 4s
  /nomodkey /click right target
  /delay 3s
  /call buy "Acaana Leaf" 20
  /delay 3s
  /call buy "Comfrey Leaf" 20
  /delay 3s
  /call buy "Flamewort Leaf" 40
  /delay 3s
  /call buy "Rough Potion Vial" 20
  /nomodkey /notify MerchantWnd MW_Done_Button LeftMouseUp
  /delay 2s
  /target npc Henrik
  /moveto ID
  /delay 4s
  /nomodkey /click right target
  /delay 3s
  /call buy "Violet Tri-Tube Sap" 20
  /delay 3s
  /nomodkey /notify MerchantWnd MW_Done_Button LeftMouseUp
/return

Sub Skinspikes_IV
  /target npc Henrik
  /moveto ID
  /delay 3s
  /nomodkey /click right target
  /delay 3s
  /call buy "Blue Vervain Bulb" 20
  /delay 2s
  /call buy "Makeshift Potion Vial" 20
  /delay 2s
  /nomodkey /notify MerchantWnd MW_Done_Button LeftMouseUp
  /delay 1s
  /target npc Andreas
  /moveto ID
  /delay 3s
  /nomodkey /click right target
  /delay 3s
  /call buy "Sprig of Flamewort" 40
  /delay 2s
  /call buy "Sprig of Comfrey" 20
  /delay 2s
  /call buy "Sprig of Acaana" 20
  /delay 2s
  /nomodkey /notify MerchantWnd MW_Done_Button LeftMouseUp
/return

Sub Skinspikes_V
  /target npc Henrik
  /moveto ID
  /delay 3s
  /nomodkey /click right target
  /delay 3s
  /call buy "Betherium Bark" 20
  /delay 3s
  /call buy "Simple Potion Vial" 20
  /delay 3s
  /nomodkey /notify MerchantWnd MW_Done_Button LeftMouseUp
  /delay 1s
  /target npc Andreas
  /moveto ID
  /delay 3s
  /nomodkey /click right target
  /delay 2s
  /call buy "Sprig of Flamewort" 40
  /delay 2s
  /call buy "Sprig of Comfrey" 20
  /delay 2s
  /call buy "Sprig of Acaana" 20
  /delay 2s
  /nomodkey /notify MerchantWnd MW_Done_Button LeftMouseUp
/return

Sub Skinspikes_VI
  /target npc Edvard
  /moveto ID
  /delay 3s
  /nomodkey /click right target
  /delay 3s
  /call buy "Acaana" 20 
  /delay 3s
  /call buy "Comfrey" 20
  /delay 3s
  /call buy "Flamewort" 40
  /delay 3s
  /nomodkey /notify MerchantWnd MW_Done_Button LeftMouseUp
  /delay 1s
  /target npc Henrik
  /moveto ID
  /delay 3s
  /nomodkey /click right target
  /delay 2s
  /call buy "Plain Potion Vial" 20
  /delay 3s
  /call buy "Bugbane" 20
  /delay 1s
  /nomodkey /notify MerchantWnd MW_Done_Button LeftMouseUp
/return
 
/return
  
  



Sub Combine

	 /if (${Version}==1) /declare VRS I
	 /if (${Version}==2) /declare VRS II
	 /if (${Version}==3) /declare VRS III
	 /if (${Version}==4) /declare VRS IV
	 /if (${Version}==5) /declare VRS V
	 /if (${Version}==6) /declare VRS VI
	 /Varset Combine_Count 0
	 /itemnotify ${FindItem[=Medicine Bag].InvSlot} rightmouseup
   	 /delay 1s
         /nomodkey /notify TradeskillWnd COMBW_SearchTextEdit leftmouseup 
         /delay 5 
         /echo Searching for Recipe
         /call Type "Skinspikes ${VRS}"
	 /delay 1m ${Window[TradeskillWnd].Child[COMBW_SearchButton].Enabled}  
         /nomodkey /notify TradeskillWnd COMBW_SearchButton leftmouseup 
         /delay 10
	 /notify TradeskillWnd RecipeList listselect 1
	:Loop
	/if (${Combine_Count}==21) {
		/notify TradeskillWnd CloseButton Leftmouseup
		/return
}
	 /notify TradeskillWnd CombineButton Leftmouseup
	 /delay 1s
	 /notify TradeskillWnd AutoInvButton Leftmouseup
	 /varcalc Combine_Count (${Combine_Count}+1) 
	 /echo ${Combine_Count} Potions made!
	 /delay 1m ${Window[TradeskillWnd].Child[COMBW_CombineButton].Enabled}
	 /goto :loop
/return

 

[memset]

Just tried this macro... it works GREAT! Absolutely amazing.. awesome work!

 

[memset]

Something is up now.. I do /mac spikes 6

It does its thing for a second... gets to Henrik O`Danos to buy stuff, and EQ crashes immediately.

 

[Villageidiot]

sounds like the buy.inc has something wrong with it. hmm i'll look around see what has changed and if anyone knows the fix.

 

[Armysoldier]

sounds like the buy.inc has something wrong with it. hmm i'll look around see what has changed and if anyone knows the fix.

the buy.inc on my TS thread works villiage... DL the zip and then you can use it in yours

ARMY

 

[Villageidiot]

the buy.inc on my TS thread works villiage... DL the zip and then you can use it in yours

ARMY

Honestly i thought i was.... i could be wrong though. Have you changed it since you came back?

I just don't know why it would CTD honestly but thats why they call me VI

 

[Villageidiot]

I just tested the original posted version No CTD , not sure why you would man sorry.

 

[MRPRANKSTER]

Crash

Something is up now.. I do /mac spikes 6

It does its thing for a second... gets to Henrik O`Danos to buy stuff, and EQ crashes immediately.

I just tested this out and I crashed also. I read over the macro and noticed the name on my bag was not the same. I bought a cheapo bag from the merchant and it worked like a charm.

 

[Villageidiot]

edited the first post to show the need for a medicine bag as the combine container.

 

[memset]

Strange. I've used this macro a TON because it's awesome... but that last time I tried I kept crashing. It's very possible I overlooked the container.. I'll give it a shot again here in a bit.

 

[rawwar]

It's the bag ....

I love this mac .... and if my reinficed bag is already open it works get if not I crash .... I tried editing the name in the mac to mine and syill crashed ... going to buy a regular med bag and will try that .... ok bought a new medicine bag and the mac ran 100% ...

couple requests .. I know demanding ...

Can you someone how set a varaile set so that you can set the number of combines oyu wish to try ... something like /mac spikes 6 60 to make 60 combines of #6 spikes?