alctol.mac

bror · Jan 3, 2006

Ok, this is my first try at macroing, so be patient. This macro will take you from any value to 200 alcohol tolerance.
It is set to be run in Abysmal Sea with Dray Cuves.
The macro will buy a set of 20 ales and drink. When you become too intoxicated it will delay until you can drink more.
Again, this is my first macro, any feedback is more than welcome.

Rich (BB code):

| alctol.mac
| Takes you to 200 Alcohol Tolerance
| Version 1.0
| Date: 01-03-2006
|
| By Bror
| Based on ArmySoldier's TS macs
|
| MerchantName is the name of the merchant that sells your booze
| MaxWanted is where you want to stop: Default is 200
| Booze is the alcohol you want to buy: Default is ALE
|
| Requirement:
| Slot 8 in your inventory must be empty
| In its current state, this must be run behind Dray Cuves in Abysmal Sea to work.

#event Explode "#*#If you consumed any more drink you would explode#*#"
#event ExplodeB "#*#You could not possibly drink any more, you would explode#*#"
#event TooDrunk "#*#You could not possibly consume more alcohol or become more intoxicated#*#"
#event SkillUp  "#*#You have become better at Alcohol Tolerance#*#"

#include common/sell.inc
#include common/buy.inc
#include common/packs.inc

Sub Main
	/declare OldSkill int outer
        /declare MaxWanted int outer
        /declare MerchantName string outer
        /declare Booze string outer
	/declare i int outer
        /varset OldSkill ${Me.Skill[Alcohol Tolerance]}
	/varset i 1

| ***********************************************
| *   Change these settings if you want.        *
| ***********************************************

        /varset MerchantName "Dray Cuves"
        /varset Booze "Ale"
        /varset MaxWanted 200

| ***********************************************
| ***********************************************

	:Start
	/echo Alcohol Tolerance is at ${Me.Skill[Alcohol Tolerance]}

	/if (${Me.Skill[Alcohol Tolerance]}>=${MaxWanted}) {
		/echo Alcohol Tolerance is at or greater than ${MaxWanted}. Quiting!
                /camp
                /endmacro
	}

| ***********************************************
| Buy Booze                                     *
| ***********************************************

	/target ${MerchantName}
	/face
	/delay 1s
	/click right target
	/delay 1s
	/call Buy ${Booze} 20
	/keypress esc
	/delay 1s

	/for i 1 to 20 
		/itemnotify pack8 rightmouseup
		/delay 1s
		/doevents
	/next i
	
	/goto :Start
/return

| ***********************************************
| sUB event too much drink                      *
| ***********************************************

Sub Event_Explode
	/echo Too full, Pausing 30 seconds.
	/delay 30s
	/varcalc i ${i}-1
/return

| ***********************************************
| SUB event too much drink 2                    *
| ***********************************************

Sub Event_ExplodeB
	/echo Too full, Pausing 30 seconds.
	/delay 30s
	/varcalc i ${i}-1
/return

| ***********************************************
| SUB event too drunk                           *
| ***********************************************

Sub Event_TooDrunk
	/echo Too Drunk, Pausing 1 minute.
	/delay 1m
	/varcalc i ${i}-1

/return

| ***********************************************
| SUB event skillup                             *
| ***********************************************

Sub Event_SkillUp
	/echo Alcohol Tolerance increased - ${Me.Skill[Alcohol Tolerance]}
	/delay 5
/return

codecaster · Jan 3, 2006

Will that "UnlimitedDrunk" offset let you spam-drink and skill up in no time flat that way? To eliminate the delay needed to sober up?

-CodeCaster

bror · Jan 3, 2006

no, I tried it and drank like 80 with 0 skillups at 0 alc tol.

Normally at 0 alc tol every sip you take you get a skillup.

armysoldier · Jan 4, 2006

also why have separate events

change

Rich (BB code):

#event Explode "#*#If you consumed any more drink you would explode#*#"
#event ExplodeB "#*#You could not possibly drink any more, you would explode#*#"
#event TooDrunk "#*#You could not possibly consume more alcohol or become more intoxicated#*#"

to

Rich (BB code):

#event Explode "#*#If you consumed any more drink you would explode#*#"
#event Explode "#*#You could not possibly drink any more, you would explode#*#"
#event Explode "#*#You could not possibly consume more alcohol or become more intoxicated#*#"

and remove excess coding

armysoldier · Jan 4, 2006

and then change

Rich (BB code):

| ***********************************************
| sUB event too much drink                      *
| ***********************************************

Sub Event_Explode
	/echo Too full, Pausing 30 seconds.
	/delay 30s
	/varcalc i ${i}-1
/return

to

Rich (BB code):

| ***********************************************
| sUB event too much drink                      *
| ***********************************************

Sub Event_Explode
	/echo Feeling Sick .. gonna wait a minute or two, Pausing 1 Min.
	/delay 1min
	/varcalc i ${i}-1
/return

if your doing it afk .. 1 min is gonna be fine for all of them ...

armysoldier · Jan 4, 2006

other than that.. looks good

shadowman33 · Jan 4, 2006

they must have changed things in the past then with the unlimited drink skilling. That is how I did 3 of my toons. I have a macro for using my fisherman's companion to summon and drink from while using that plugin. Not done it in forever though.

bror · Jan 4, 2006

thanks for the comments army, i'll update this soon with those changes.

also, I don't know if the unlimited drink offset works in its current state, but when I tried it two or three patches ago, I went a long time with no skillups. /shrug

armysoldier · Jan 4, 2006

i am not sure about the unlimited drunk offset... BUT if you were to use that.. then you have to make sure that no one is around you.. because it looks a little fish when someone eats or drinks .. 40+ times or a 100 times.. etc etc

this is a nice little macro to get the job done.. while you do dishes

8-)

wolfman6801 · Apr 8, 2006

I am getting message when running this: 'Could not send notification to merchant1 left mouseup' am I missing a file or do I have to change something in code?

found thead and updated common files from http://www.redguides.com/community/showthread.php?t=9743&page=1&pp=15 I guess that was the problem cause now it works fine. Guess I shouldve check all the forums before making this post sorry.

seek&destroy · Apr 8, 2006

I'm not sure how fast this macro runs as i'm 200 AT on all my chars, but you can redrink a drink every time you 'sway'. I think it's once every tick? I just hotkeyed it and drank til i was at 200. Takes like an hour :P

Noobhaxor · Apr 9, 2006

Noob needs to explain somethings before this post gets longer.

UnlimitedDrink is not the offset you want

Try this offset

[UnlimitedDrunk]
Description="UnlimitedAlcohol"
Version="2006.03.15"
address0=55F6D3
normal0="7C"
crack0="EB"

Then buy 10 bags full and in 15 minutes. or less. You will have skill 200...

Give me a red cent BIATCH!!!! I know that helped you... lol just kidding... but no really... fuck I'm going to stop drinking in real life. Figures I am the one to know this in game lol.

lonestand · Apr 9, 2006

Did unlimited drink last night works good!

Oceanrescue · May 20, 2006

Macro ran just fine . I got tired of waiting though and loaded Docrack unlimiteddrunk and just manualy clicked. Took 5 mins to get from 40 to 200.
Not sure how fast macro would take but seemed to work just fine, thanks guys

BadPuss · Sep 23, 2006

Doesn't seem to work anymore. Buys the ale, but doesn't drink it.

alctol.mac

bror

New member

codecaster

Well-known member

bror

New member

armysoldier

Well-known member

armysoldier

Well-known member

armysoldier

Well-known member

shadowman33

Member

bror

New member

armysoldier

Well-known member

wolfman6801

New member

seek&destroy

New member

Noobhaxor

lonestand

New member

Oceanrescue

New member

BadPuss

Member

Users who are viewing this thread

Cart