MacroQuest64

Posted: **Tue Jun 29, 2004 8:02 pm**

heya, this is my second script (the first one was EXTREMELY simple) I'm still learning the ropes so plz don't flame me (course by saying that i prolly doom myself to being flamed and yelled at) The script is basically supposed to make my charactar beg (the goodie-class's version of pickpocketing) A simple version of the script would b to just have it as follows:

Code: Select all

Sub Main
:Loop
/doability begging
/goto :Loop
/return

I know it's pretty simple, but it works for things like track. . . just stick on and go to bed. . . The only problem is that with beg, you can DIE. . . so i have to stick in a bit of code to make my charactar walk to my target to beg. . . I am having trouble with the walk part. . . I have tried what i have found on the boards but it doesn't seem to work. . . I don't wanna just go to google or something and cut n paste in a macro. . i wanna do it myself, without being cheap. So far i have this:

Code: Select all

Sub Main
:Loop
/target "Guard Zeph"
/face "Guard Zeph"
[color=red]Here's the problem, i am not sure what would go here, but i think it would be a combo of the /if command and the /keypress commands, possibly with a /delay command, but i am not sure myself. . .[/color]
/doability begging
/goto :Loop
/return

Well all help will be appreciated! My first post so if i'm not doing it right plz tell me, but don't be mean? lol. . .

Posted: **Tue Jun 29, 2004 8:23 pm**

Yep, the only bad thing with such a script is that the more times you beg (at lower skill) the worse your (temporary) faction gets until the NPC kills you.

Might want to look into figuring out how to CON the NPC after each beg (or maybe ever 10) and see how your faction is, and if it reaches a low point where you are close to becoming KoS you sit and camp to desktop. Death should be avoided when possible.

Alternately, you could make the macro so that when you are in combat you [/attack off] then [beg] then [/attack on] then wait 8 seconds (I think that is the refresh) and do it again (loop) until mob is dead.

Just some suggestions.

Posted: **Wed Jun 30, 2004 4:53 am**

or just beg in Pok, i spent many a night in pok begging from the monk by the pool, but i found i get more imps when adding a routine to my fight macro as suggested above, anyway heres what i used in pok, enjoy.

Code: Select all

#event BegFail "#*#You must target someone to beg from first#*#"
#event BegFail "#*#You are too far away to beg#*#"
#Event SkillUp "You have become better at #1#! (#2#)"

Sub Main
   :begLoop
      /doevents
      /if (${Me.AbilityReady[begging]}==1) /doability "begging" 
   /goto :begLoop
/end

Sub event_BegFail
   /echo You must have a target and be close enough to beg.
   /echo ((( Ending Macro )))
/end 

Sub Event_SkillUp(SkillUpText,Skill,int Amount)
      /popup ${Skill} increased - ${Amount}
      /echo ${Skill} increased - ${Amount}
      /return

Posted: **Sun Jul 04, 2004 2:41 pm**

I added a few more checks and fixed the /popup, /echo reporting NULL as the skill:

Code: Select all

#event BegFail "#*#You must target someone to beg from first#*#"
#event BegFail "#*#You are too far away to beg#*#"
#event BegFail "#*#You can not use this skill while on a mount#*#"
#event BegFail "#*#You can't use that command while casting#*#"
#Event SkillUp "You have become better at #1#! (#2#)"

Sub Main
   :begLoop
      /doevents
      /if (${Me.AbilityReady[begging]}==1) /doability "begging"
   /goto :begLoop
/end

Sub event_BegFail
   /echo You must have a target and be close enough to beg.
   /echo ((( Ending Macro )))
/end

Sub Event_SkillUp(SkillUpText,SkillName,int Amount)
      /popup ${SkillName} increased - ${Amount}
      /echo ${SkillName} increased - ${Amount}
      /return

Monster

Posted: **Sun Jul 04, 2004 4:57 pm**

monster69 wrote:I added a few more checks and fixed the /popup, /echo reporting NULL as the skill:

Code: Select all

#event BegFail "#*#You must target someone to beg from first#*#"
#event BegFail "#*#You are too far away to beg#*#"
#event BegFail "#*#You can not use this skill while on a mount#*#"
#event BegFail "#*#You can't use that command while casting#*#"
#Event SkillUp "You have become better at #1#! (#2#)"

Sub Main
   :begLoop
      /doevents
      /if (${Me.AbilityReady[begging]}==1) /doability "begging"
   /goto :begLoop
/end

Sub event_BegFail
   /echo You must have a target and be close enough to beg.
   /echo ((( Ending Macro )))
/end

Sub Event_SkillUp(SkillUpText,SkillName,int Amount)
      /popup ${SkillName} increased - ${Amount}
      /echo ${SkillName} increased - ${Amount}
      /return

Monster

Yeah it would my bad Skill is a TLO therefore cant be used for a variable.

Posted: **Thu Jul 15, 2004 9:02 pm**

Thanks all of ya

i really appreciate it, and i did try the macro that you posted, and it worked. . . well most of it anyway. i have learned a bit since my last post. . i hope that i can actually get more complificated or whatever one of these days. . .

Posted: **Fri Jul 16, 2004 6:16 pm**

One small comment; the comparison in this line is redundant:

Code: Select all

/if (${Me.AbilityReady[begging]}==1) /doability "begging"

If you are ready to beg, ${Me.AbilityReady[Begging]} will come back true, no need to compare /if true=true.

It would be more efficient to simplify it to:

Code: Select all

/if (${Me.AbilityReady[begging]}) /doability "begging"

Other than that is looks like it would work fine.

If you want to insert it into a combat or stick macro, try this block somewhere inside your attack loop:

Code: Select all

/if (${Me.AbilityReady[begging]} && ${Target.Distance}<10) {
   /attack off
   /delay 1
   /doability "begging"
   /attack on
}

Good luck.

MacroQuest64

Begging Macro

Begging Macro