Chase.mac For tanks, keeps up with mobs.

A forum for you to dump all the macros you create, allowing users to use, modify, and comment on your work.

Moderator: MacroQuest Developers

Slackerboy
decaying skeleton
decaying skeleton
Posts: 7
Joined: Sun Jan 18, 2004 10:27 pm

Chase.mac For tanks, keeps up with mobs.

Post by Slackerboy » Sun Jan 25, 2004 4:13 pm

This was made for pulling a mob back to a party with a ranged weapon, then keeping on the mob with auto bash/slam and taunt.

Please let me know how I could clean it up.

Code: Select all

|Chase.mac -- 1/25/2004
|
|Parts stolen from Bash.mac ieatacid
|Parts stolen from Hunter.mac grimjack
|
|Once combat is started you will stay 15 from your target.
|If attacking from range with a bow it will not close to the target.
|Presses bash and taunt so you don't have to.





Sub Main
/echo chase.mac Started....
   /declare RangeLong global
   /declare RangeMax global
   /declare RangeMin global
   /declare FastRange global
   /declare MyXLOC global
   /declare MyYLOC global
   /varset RangeLong 25
   /varset RangeMax 15
   /varset RangeMin 10
   /varset FastRange 14

:Start
   /if $combat=="TRUE" {
	/if n $target(distance)=<@RangeMax /call BashLoop
	}
    /if $combat=="TRUE" {
	/if n $target(distance)<@RangeLong {
	 /if n $target(distance)>@RangeMax /call MoveToMob
	 }
	}
	/goto :start
/return


Sub MoveToMob
   /face fast
   /if n $target(distance)>=@FastRange /call Fastmove
   /if n $target(distance)>@RangeMax {
      /press up
   }
   /if n $target(distance)<@RangeMin {
      /press down
   }
/return



Sub Fastmove
   /varset MyXLOC $char(x)
   /varset MyYLOC $char(y)
   :fastmoveloop
   /if $target()=="FALSE" {
      /sendkey up up
      /if $combat=="TRUE" {
         /attack off
         /return
      }
   }
   /face fast
   /if n $target(distance)>@FastRange {
      /sendkey down up
   }
   /if n $target(distance)<=@FastRange {
      /sendkey up up
      /return
   }
   /goto :fastmoveloop
/return



Sub BashLoop
   /if $combat=="TRUE" {
      /if n $char(ability,"Bash")>0 /doability "Slam"
      }
      {
      /if n $char(ability,"Taunt")>0 /doability "Taunt"
      }
/return
[/code]
Last edited by Slackerboy on Mon Jan 26, 2004 1:58 am, edited 1 time in total.

Slackerboy
decaying skeleton
decaying skeleton
Posts: 7
Joined: Sun Jan 18, 2004 10:27 pm

Post by Slackerboy » Mon Jan 26, 2004 1:57 am

If anyone used this from early today I had a major bug in it that would cause it to fail about 1 time in 3.

Don't ask me how I missed that.

It will now only engage when the mob is close.

I'm working on some auto loot code as well, not that anyone needs this script :)

Dearadin
decaying skeleton
decaying skeleton
Posts: 1
Joined: Tue Jan 27, 2004 7:04 am

Post by Dearadin » Tue Jan 27, 2004 7:07 am

Slackerboy wrote:not that anyone needs this script :)
Actually I think it's great. If you could add some auto assist MT to it, and optional taunt that would be even better :)