Warrior Combat assist with ato-respond

Macro depository for macros written before the user variable changes that broke all of them.

Moderator: MacroQuest Developers

Mutter
a ghoul
a ghoul
Posts: 105
Joined: Sat Nov 16, 2002 1:09 pm

Warrior Combat assist with ato-respond

Post by Mutter » Tue Sep 09, 2003 10:43 am

This is some of my code, some of other peoples.. but what it does is very very simple. It just ato-faces and attacks anything that hits you, and if yer already fighting, it ignores them until yer done killing the mob yer on. I find it's great for my warrior, this does not move you AT ALL. I do not want an un-attened bot, I just wanted to stop having to press the taunt button 800 times a day!

Btw... nother fighter type almost 5 lvls above me couldn't get aggro off me when i ran this.
Works sweet. I am going to make the same thing for doing bandages, and such

oh yeah..the code. lol almost forgot:

Code: Select all

#include routines.mac
#event HitsYou "YOU for"
Sub Main
:Start
   /if n $target(id)==$char(id) /endmacro
   /doevents
   | RestUp
   /if "$combat"=="TRUE" /stand
   /if "$combat"=="TRUE" /call DoAbilities
   /if n $target(id)==0 /delay 5
/goto :Start

Sub DoAbilities 
      /if n $char(ability,taunt)>0 /doability taunt 
      /if n $char(ability,kick)>0 /doability kick 
     | /if n $char(ability,begging)>0 { 
     |    /attack off 
     |    /doability begging 
     |    /attack on }
/return
sub Event_HitsYou
/if "$combat"=="FALSE" {
/stand
/attack on
/face nopredict
}
/return	

Epsilon
a lesser mummy
a lesser mummy
Posts: 61
Joined: Wed Apr 30, 2003 5:46 pm

Post by Epsilon » Tue Sep 09, 2003 5:42 pm

sweet...exactly what i was looking for..will try this when they get MQ rolling again

Zeus
a hill giant
a hill giant
Posts: 180
Joined: Wed Feb 19, 2003 10:03 am
Contact:

Post by Zeus » Tue Sep 09, 2003 8:39 pm

Hmm kick.... Large races own you :P slam > all /nod

Mutter
a ghoul
a ghoul
Posts: 105
Joined: Sat Nov 16, 2002 1:09 pm

Large races

Post by Mutter » Wed Sep 10, 2003 5:27 pm

Actually this is FOR an Ogre warrior.. Just was building my kick skill it is sadly neglected

boredom
a lesser mummy
a lesser mummy
Posts: 49
Joined: Thu Jun 19, 2003 3:45 pm

my autoattack

Post by boredom » Thu Sep 11, 2003 12:26 am

I built mine a little different. Tryed to take into account all the idiots that shout out "Vindi hits YOU for 10000000 points of damage" (I hate them so much). Also, this will react when you are swung at and missed, not just when you are hit. Anyway, here's mine.

Code: Select all


#Event AttackedHit " YOU for "
#Event AttackedMiss " YOU, but "

Sub Event_AttackedHit
	/if n $strlen("$p0")<25 /return
	/if "$right(17,"$p0")"=="points of damage." /goto :HitConfirm
	/if "$right(16,"$p0")"=="point of damage." /goto :HitConfirm
	/return
	:HitConfirm
	/call Attacked

/return

Sub Event_AttackedMiss
	/if n $strlen("$p0")<25 /return
	/if "$right(14,"$p0")"=="but YOU block!" /goto :MissConfirm
	/if "$right(14,"$p0")"=="but YOU dodge!" /goto :MissConfirm
	/if "$right(16,"$p0")"=="but YOU riposte!" /goto :MissConfirm
	/if "$right(16,"$p0")"=="YOU, but misses!" /goto :MissConfirm
	/return
	:MissConfirm
	/call Attacked

/return

Sub Attacked
	/if n $Combatstatus==1 /return
	/if $target(type)==NPC {
		/if $char(state)!=STAND /stand
			/attack on
			/call Combatcheck
		}
	}
/return
mine is a little different, but you get the jist of it.

/Bored

Mutter
a ghoul
a ghoul
Posts: 105
Joined: Sat Nov 16, 2002 1:09 pm

nice

Post by Mutter » Thu Sep 11, 2003 9:31 am

I really like that you have them missing you as events.. gonna try that fer sure!!