Beg.mac - Begging skill up macro

[Draimen]

Didn't see one of these, so made my own. Open to comments, suggestions. Macro is self explanitory. Use at your own risk and preferably on npc's that don't attack you hehe.

Code: Select all

|**---------------------------------------------------------------------------------------------------------------
Beg.mac by Draimen
   This macro will beg a target forever.
   To end, simply press esc to clear your target then wait ~15 seconds.  You will then receive a report.
   If you somehow get out of beg range, but less than 30 ft away, the macro will move you closer.
   If you get more than 30 ft away it will end.
   Use this macro on stationary mobs that you know will not attack you.  Onytir Seavin in N Freeport if a good one.
   If you piss off an npc and it attacks, the macro has no way of saving you, so use wisely.
----------------------------------------------------------------------------------------------------------------**|

#Event fail "Your attempt at begging was unsuccessful."
#Event skillup "You have become better at Begging#*#"
#Event suc "You have begged#*#"


Sub Main

/declare failcount int outer 0
/declare skillup int outer 0
/declare attempt int outer 0
/declare scount int outer 0
/declare copper int outer

/if (!${Target.ID}) {
   /echo You must target an npc before using this macro!
   /endmacro
}

/if (${Target.Distance}>14) {
   /echo Too far away from target to beg, get closer and start the macro again
   /endmacro
}

/echo Starting begging skillup macro on ${Target.CleanName}

/vardata copper Me.Copper

:begloop
/if (!${Target.ID}) /call End
/if (${Target.Distance}>30) {
   /echo Target got too far out of range, ending macro
   /call End
}
/if ((${Target.Distance}>14)&&(${Target.Distance}<30)) {
   :farloop
   /if (${Me.Sitting}) /stand
   /face
   /keypress forward hold
   /delay 5 ${Target.Distance}<14
   /keypress forward
   /if (${Target.Distance}>14) /goto :farloop
}
/delay 15s ${Me.AbilityReady[begging]}
/if ((${Target.ID})&&(${Me.AbilityReady[begging]})) /doability begging
/varcalc attempt ${attempt}+1
/delay 15s ${Me.AbilityReady[begging]}
/doevents
/goto :begloop

/return

Sub Event_fail
/varcalc failcount ${failcount}+1
/return

Sub Event_skillup
/varcalc skillup ${skillup}+1
/return

Sub Event_suc
/varcalc scount ${scount}+1
/return

Sub End
/echo You failed begging ${failcount} out of ${attempt} tries.
/echo You succeeded in begging ${scount} out of ${attempt} tries.
/echo You got ${skillup} skill ups.
/echo You received ${Math.Calc[${Me.Copper}-${copper}]} copper for all your hard work.
/endmacro
/return

[aChallenged1]

add in a sub routine that cons the NPC being begged after each time you beg with an IF statement that stops the macro if the con is almost KoS.

Code: Select all

Event danger "reguards you #1#

|do this next part after each beg
: ConNPC
   /keypress c
/goto begloop


Sub Event_danger

  /IF (${#1#}=Threateningly) /call End
/goto begloop

I do not know if it will work as shown, but you get the idea. This would stop the begging process the first time it comes up Threateningly.
Of course you could make it to be Doubiously so that there is no way you could end up getting killed.

[Draimen]

So, does a mobs con get worse each time you beg? Meaning, if you are say, warmly to an npc, then beg it, will the con go down the same each time, or can it go from like warmly to scowl.

I don't know much about begging. Changing the macro soon cause I actually got 1 silver last night hehe. Need to add that in.

Also, if you are wanting to just skill up, find a mob that doesn't atack you.

Will add in the con stuff later.

[aChallenged1]

I'm not sure how fast it goes down, but it is not each time, and it may be different for each mob/socialgroup. I know if you get begging agro from one mob of a social group, any near it of the same social group will also attack you; personal experience.

[Eryi]

Toxidil in WFP Tunnels is another good one..

Got to love them off-the-beaten path merchants..

[Draimen]

When begging air breel in N FP the other night, which was amiable, I went from amiable to threateningly and kos with no warning and no other con in between them.

So it is my experience that begging aggro can happen instantly on any beg attempt and simply takes you straight to threateningly.

So the /con code wouldn't do any good.

I will add in silver, gold, and plat beg tracking soon and skill up, fail %'s and then that should do it for this macro. Don't really see a need for any more features.

[aChallenged1]

The con code would still be good. The majority of NPC's don't drop like a stone.

[Crackmaster]

Sorry to bring up an older post, but I can add some insight on the con information. Any mob that is attacking you will go straight to threateningly if it's attacking you and it cons better than KoS, so basically if you go up to your guild leader and attack them, they will con threateningly. I'm not sure if the con goes down while begging since I've never begged much, but the guys who suddenly con threateningly are just pissed off at you for begging and then con threateningly because they are attacking you

Edit - and obviously the next time you go back to them, they will con whatever it was they conned before you attacked them

[missingfiles]

Cant you beg in PoK without fear or something I forget

[The_Cuban]

I might have been unlucky but I tried this in the pok overnight and I did not get one skill up.

[AndyZaft]

Do it in Abysmal or any LDoN camp. Magus doesn't give up the cash but begging goes up. In Abysmal any NPC will do from what I've seen, I usually go deep into the belly of the ship so people leave me alone.

[JoeyRats]

Nice macro, thanks for posting it. Really all you need are these 4 lines:

:begloop
/if ((${Target.ID})&&(${Me.AbilityReady[begging]})) /doability begging
/delay 15s ${Me.AbilityReady[begging]}
/goto :begloop

I wrote a macro that was about like that to get my skill up, and then realized I should search in case somebody posted a better one that took the NPC's dispostition into account. Can think of only 1 improvement to this: endmac when begging skill reaches a target number.

The suggestion about using a ldon Magus is a great one though, they don't seem to attack you no matter what you do, and do give skill ups. I had started this macro in the Guild Hall, then Guild Lobby, then PoK and got 0 skill ups after a long while. I also noticed that when I try to attack any mob in these zones EQ just won't let you, so my guess is that skills like begging won't increase in these zones. The magus also can't be aggrod, but is in zones with normal mobs that can fight, so give skill ups.

You can't drop faction against 1 mob, you have faction against that kind of mob and that's how it always cons. Unless you manage to get on its hate list, then it must con Threat/Scowl, but you still really have the same faction with that mob type. So the idea for a great begging macro I just got is (pseudo-code):
Be near Magus in Abysmal Sea or Nedaria and run it, here's the main loop:
- if no target, target Magus
- if not close enough to target, face it and move forward until you are
- delay until begging skill is ready
- beg
- if target is aggro, /say take me to Nedaria or Abysmal Sea plzz

I think that'd work, but no need since the Magus will never aggro anyway hehe.

[redhead psycho]

Can anyone add in a taunt and a disarm line to this? if so it would be a nice macro for aggro control.

[fearless]

Can anyone add in a taunt and a disarm line to this? if so it would be a nice macro for aggro control.

There are other, better, macro's to use for agro control.

[jaq]

Can anyone add in a taunt and a disarm line to this? if so it would be a nice macro for aggro control.

I'll write one for you.. we can call it

Buttonmashingwarriorsgotdiscstofixagro.mac