Release Milk and Cookie Dispenser 1.0

[kaen01]

Updated: 2-23-2018

got back to this changed a few things, now it runs better and it should work properly

#turbo

Sub Main
	/declare WelcomeStr string \ay Food.mac - \ag Dispensing :
	/declare EndStr string \ay Food.mac - \ag We have enough
	/declare i int local
	/declare ii int local

|---Edit these to fit your dispensing needs---------------

	/declare Food[2] string outer NULL
	/varset Food[1] Warm Milk Dispenser|Warm Milk|10
	/varset Food[2] Fresh Cookie dispenser|Fresh Cookie|10

|---Syntax : ItemToClick|WhatIsDispensed|AmountYouWant---

	/for i 1 to ${Food.Size}
		/varset WelcomeStr ${WelcomeStr}\a-w ${Food[${i}].Arg[2,|]}
		/if (${i} != ${Food.Size}) /varset WelcomeStr ${WelcomeStr}\ag,
	/next i
	/varset WelcomeStr ${WelcomeStr}\ag Please Hold
	/echo ${WelcomeStr}

:Loop
	/for i 1 to ${Food.Size}
	/if (${FindItem[${Food[${i}].Arg[2,|]}].Stack} <${Food[${i}].Arg[3,|]}) {
		/if (${Me.ItemReady[${Food[${i}].Arg[1,|]}]}) /casting "${Food[${i}].Arg[1,|]}|item"
		/delay 5s !${Me.Casting.ID}
		/delay 2
		/autoinventory 
	}
	/next i
	/for ii 1 to ${Food.Size}	
		/if (${FindItem[${Food[${ii}].Arg[2,|]}].Stack} <${Food[${ii}].Arg[3,|]}) {
		/goto :Loop
		}
	/next ii
	
	/goto :Exit

:Exit
	/for i 1 to ${Food.Size}
		/varset EndStr ${EndStr}\a-w ${Food[${i}].Arg[2,|]}
		/if (${i} != ${Food.Size}) /varset EndStr ${EndStr}\ag,
	/next i
	/varset EndStr ${EndStr}\ag For now.
	/echo ${EndStr}

/return

 

[Sym]

Nice. I use a combination of mq2feedme, mq2cursor with auto inventory, and mq2melee

downshit1=/if (!${Posse.Strangers} && ${Me.Standing} && !${Me.Moving} && !${Me.Invis} && !${Cursor.ID} && ${FindItemCount[=Spiced Iced Tea]} < 4 && ${FindItem[Spiced Iced Tea Dispenser].TimerReady} == 0) /casting "Spiced Iced Tea Dispenser"
downshit2=/if (!${Posse.Strangers} && ${Me.Standing} && !${Me.Moving} && !${Me.Invis} && !${Cursor.ID} && ${FindItemCount[=Fresh Cookie]} < 4 && ${FindItem[Fresh Cookie Dispenser].TimerReady} == 0) /casting "Fresh Cookie Dispenser"

 

[kaen01]

yeah i figured i could use ka or mq2melee, but i just wanted something i could click and it would get me my cookies and then be done.

so first the simple version

then i was like maybe i could figure out how to do it like this or that. and then the next version.

 

[Sym]

Cool. I use the combo to keep from eating my stat food so I don't forget. Eats as needed, refills as needed.

 

[kaen01]

ogres just eat all the things!

 

[wymranar]

So I am completely clueless when it comes to coding? Or whatever language this is..

Would anyone be able to make an idiot guide on how to make this work?

It would be super helpful!

 

[NobodyKnows]

I just gave the mac a try and it still works perfectly well.
Maybe it helped if you could explain your problem a bit?

In general:
- copy the source and paste it into a file that you name "Food.mac" for example
- ingame you /mac Food.mac
- wait for it to finish

You can customize it on these two lines:

/varset Food[1] Warm Milk Dispenser|Warm Milk|10
/varset Food[2] Fresh Cookie dispenser|Fresh Cookie|10

The items used for summoning the food/drink are "Warm Milk Dispenser" and "Fresh Cookie Dispenser". If you maybe have the "Spiced Iced Team Dispenser" you would change that.
"Warm Milk" and "Fresh Cookie" designate the item that is summoned. You will need to change that, too, if you use some other item for summons.
Finally the "10" makes the macro do the summon until you have 10 of the items.

If you wanted to add a third item for example you would change this line:

/declare Food[2] string outer NULL

by changing the 2 to 3 and then add another line to the two lines quoted above like:

/varset Food[3] Spiced Iced Tea Dispenser|Spiced Iced Tea|10

I hope that helps?

 

[wymranar]

Ok. I just figured out how it all works. Thank you!!

So, by running this macro, it stops everything else? For example, if you're running KISS - it will stop KISS automatically and you'll need to restart it on your own?

 

[Sic]

Ok. I just figured out how it all works. Thank you!!

So, by running this macro, it stops everything else? For example, if you're running KISS - it will stop KISS automatically and you'll need to restart it on your own?

this is why I use mq2feedme for eating the food/drink, and I use mq2melee for auto clicking my clicky items to summon food/drink

 

[NobodyKnows]

Ok. I just figured out how it all works. Thank you!!

So, by running this macro, it stops everything else? For example, if you're running KISS - it will stop KISS automatically and you'll need to restart it on your own?

It stops any running macro - yes.
What it is good for: you can summon food/drink/whatever items at the beginning of your session for example.

You could use it in combination with mq2FeedMe for example (after having summoned a good amount). But then ... you could also just buy waterflasks and rations in full stacks
Check the plugin - there is a discussion right about that already and also instructions on how to modify the ini.

Or if you are running MQ2Melee you could use the downshits Sym posted above and check for ${FindItemCount[=Fresh Cookie]} < 4 && ${FindItem[Fresh Cookie Dispenser].TimerReady} == 0) /casting "Fresh Cookie Dispenser" where you could change the "4" to change the amount you want to keep in inventory and the items' names (just like before).
And this together with MQ2FeedMe will keep you fed easily with cheap stuff - while you can have maybe 1 stat-food sitting in the first "to be eaten"-slot and never be touched.

So to put it simple: every time you just stand around doing nothing it will check if you could use some additional food .)

 

[wymranar]

Thanks for all the help guys!

 

[drwhomphd]

/casting was tossing errors on the macro version downloaded via 'watch' & the launcher so I switched to /useitem and tightened up a couple delays.

 

[drwhomphd]

Updated again as for some reason FindItem was preferring '=' exact matching on my toons.

 

[Kaiouss]

Updated as well but to use the cast feature of MQ as intended (not that it makes any difference, I'd imagine)

[CODE title="Food.mac" highlight="27"]#turbo

Sub Main
/declare WelcomeStr string \ay Food.mac - \ag Dispensing :
/declare EndStr string \ay Food.mac - \ag We have enough
/declare i int local
/declare ii int local

|---Edit these to fit your dispensing needs---------------

/declare Food[2] string outer NULL
/varset Food[1] Warm Milk Dispenser|Warm Milk|20
/varset Food[2] Fresh Cookie dispenser|Fresh Cookie|20

|---Syntax : ItemToClick|WhatIsDispensed|AmountYouWant---

/for i 1 to ${Food.Size}
/varset WelcomeStr ${WelcomeStr}\a-w ${Food[${i}].Arg[2,|]}
/if (${i} != ${Food.Size}) /varset WelcomeStr ${WelcomeStr}\ag,
/next i
/varset WelcomeStr ${WelcomeStr}\ag Please Hold
/echo ${WelcomeStr}

:Loop
/for i 1 to ${Food.Size}
/if (${FindItem[${Food[${i}].Arg[2,|]}].Stack} <${Food[${i}].Arg[3,|]}) {
/if (${Me.ItemReady[${Food[${i}].Arg[1,|]}]}) /cast item "${Food[${i}].Arg[1,|]}"
/delay 5s !${Me.Casting.ID}
/delay 2
/autoinventory
}
/next i
/for ii 1 to ${Food.Size}
/if (${FindItem[${Food[${ii}].Arg[2,|]}].Stack} <${Food[${ii}].Arg[3,|]}) {
/goto :Loop
}
/next ii

/goto :Exit

:Exit
/for i 1 to ${Food.Size}
/varset EndStr ${EndStr}\a-w ${Food[${i}].Arg[2,|]}
/if (${i} != ${Food.Size}) /varset EndStr ${EndStr}\ag,
/next i
/varset EndStr ${EndStr}\ag For now.
/echo ${EndStr}

/return[/CODE]

 

[Cannonballdex]

Was looking over some old macros to use as Lua and found this one.

-------------------------------------------------
---------------- Cookie Dispenser -----------------
-------------------------------------------------
local function CookieDispenser()
    if mq.TLO.FindItem('Fresh Cookie Dispenser')() and mq.TLO.FindItemCount('71980')() <= 19 and not mq.TLO.Me.Moving() and mq.TLO.FindItem('=Fresh Cookie Dispenser').TimerReady() == 0 and mq.TLO.Me.FreeInventory() >= 1 then
        if mq.TLO.Me.FreeInventory() <= 2 then
            mq.cmd.echo('\arWarning - You are out of inventory!')
        end
        mq.cmdf("/useitem %s", 'Fresh Cookie Dispenser')
        mq.delay('3s')
        mq.cmd.autoinventory()
    end
end

-------------------------------------------------
---------------- Iced Tea Dispenser -----------------
-------------------------------------------------
local function TeaDispenser()
    if mq.TLO.FindItem('Spiced Iced Tea Dispenser')() and mq.TLO.FindItemCount('107807')() <= 19 and not mq.TLO.Me.Moving() and mq.TLO.FindItem('=Spiced Iced Tea Dispenser').TimerReady() == 0 and mq.TLO.Me.FreeInventory() >= 1 then
        if mq.TLO.Me.FreeInventory() <= 2 then
            mq.cmd.echo('\arWarning - You are out of inventory!')
        end
        mq.cmdf("/useitem %s", 'Spiced Iced Tea Dispenser')
        mq.delay('3s')
        mq.cmd.autoinventory()
    end
end

-------------------------------------------------
---------------- Warm Milk Dispenser ------------
-------------------------------------------------
local function MilkDispenser()
    if mq.TLO.FindItem('Warm Milk Dispenser')() and mq.TLO.FindItemCount('52199')() <= 19 and not mq.TLO.Me.Moving() and mq.TLO.FindItem('=Warm Milk Dispenser').TimerReady() == 0 and mq.TLO.Me.FreeInventory() >= 1 then
        if mq.TLO.Me.FreeInventory() <= 2 then
            mq.cmd.echo('\arWarning - You are out of inventory!')
        end
        mq.cmdf("/useitem %s", 'Warm Milk Dispenser')
        mq.delay('3s')
        mq.cmd.autoinventory()
    end
end

-------------------------------------------------
---------------- Brell's Brew Dispenser -----------------
-------------------------------------------------
local function BrewDispenser()
    if mq.TLO.FindItem('Brell\'s Brew Dispenser')() and mq.TLO.FindItemCount('48994')() <= 19 and not mq.TLO.Me.Moving() and mq.TLO.FindItem('=Brell\'s Brew Dispenser').TimerReady() == 0 and mq.TLO.Me.FreeInventory() >= 1 then
        if mq.TLO.Me.FreeInventory() <= 2 then
            mq.cmd.echo('\arWarning - You are out of inventory!')
        end
        mq.cmdf("/useitem %s", 'Brell\'s Brew Dispenser')
        mq.delay('3s')
        mq.cmd.autoinventory()
    end
end