I ripped this macro somewhere on the board and changed it a little and LOVE it but have a few problems:
1) Attack off on enrage dosn't work
2) Attack on on enrage off dosn't work
3) Using Incite discipline dosn't work (I have it hotbuttoned as my first key on page)
4) Displaying xp, skillups etc. dosn't work either but that no biggie
5) A lot of the /popup never seems to appear on the screen
6) Sometimes when a mob dies my warrior runs off in the direction he was facing
If anyone can help me out it would be bigtime appreciated :-)
Thx guys!
Code: Select all
#event rageon "has become ENRAGED."
#event rageoff "is no longer enraged"
#event stunned "while stunned"
#event invited "To join the group, click on the 'FOLLOW' option, or 'DISBAND' to cancel"
#event mobgate " Gates."
#event appear "You appear."
#event appearing "You feel yourself starting to appear."
#event losingLev "You feel as if you are about to fall"
#event exp "experience!!"
#Event SkillUp "You have become better at"
#Event Slain "Returning to home point, please wait..."
#Event camp "seconds to prepare your camp"
sub main
/declare MaxD int outer
/declare Count global
:main
/doevents
/if (${Me.Combat}) /goto :mob
/goto :main
:mob
/if (${Target.Distance}>100) {
/echo ${Target.CleanName} IS Out Of Range
/attack off
/goto :main
}
/if (${Target.ID}) {
/varset MaxD ${Target.MaxRangeTo}
/if (${MaxD}>18) /call ToFar
/echo Attacking ${Target.CleanName} at a Distance of ${MaxD}
/echo ${Target.CleanName} is a level ${Target.Level} ${Target.Class} That Cons ${Target.ConColor}
/varset Count 0
/goto :combat
}
/goto :main
:combat
/doevents
/if (${Target.ID}==${Me.ID}) /attack off
/if (!${Me.Combat}) /goto :main
/face fast nolook
/if (${Target.Distance}>${MaxD}-2) /keypress forward hold
/if (${Target.Distance}<=${MaxD}-4) /keypress forward
/if (${Target.Distance}<${MaxD}-7) /keypress back hold
/if (${Count==0}) {
/if (${Window[HotButtonWnd].Child[HB_Button1].Checked}) {
/discipline Incite
/varadd Count 1
}
}
/if (${Target.Distance}<${MaxD}-2) /if (${Me.AbilityReady[Kick]}) /doability "Kick"
/if (${Target.Distance}<${MaxD}-2) /if (${Me.AbilityReady[Taunt]}) /doability "Taunt"
/if (${Target.ID}) /goto :combat
/keypress back
/call Delay 3
/goto :main
/return
sub ToFar
/echo Max Distance is set at ${MaxD} which is too far.
/echo Setting Max Distance to 18 for this fight.
/varset MaxD 18
/return
sub event_rageon
/if (${Target.CurrentHPs}>10) /return
/popup ENRAGED ATTACK OFF
/echo Rage On
/attack off
/return
sub event_rageoff
/if (${Target.CurrentHPs}>10) /return
/popup Rage OFF, ATTACKING NOW
/echo Rage Off
/attack on
/return
sub event_stunned
/popup STUNNED STUNNED STUNNED
/delay 1s
/return
sub event_invited
/target clear
/invite
/return
sub event_camp
/echo Camping ((( Ending Macro )))
/endmacro
/return
sub event_mobgate
/popup ${Target.CleanName} GATED Attack Off
/echo ${Target.CleanName} GATED!
/attack off
/return
sub event_appear
/popup "I am no longer invis."
/return
sub event_appearing
/popup "I am starting to appear."
/return
sub event_losingLev
/popup "I am losing Levitate"
/return
Sub event_exp
/echo "I am at ${Float[${Me.PctExp}]} percent Normal Exp."
/echo "I am at ${Float[${Me.PctAAExp}]} percent AA Exp."
/popup I am at ${Float[${Me.PctAAExp}]} percent AA Exp.
/return
Sub Delay(DelayTime)
/delay @DelayTime
/return
Sub Event_SkillUp(SkillUpText)
/declare ParseSkillLevel int local
/declare ParseSkill string local
/declare PositionStart int local
/declare PositionEnd int local
/varset PositionStart ${Math.Calc[${String["${SkillUpText}"].Find["! ("]}+2]}
/varset PositionEnd ${String["${SkillUpText}"].Find[")"]}
/varset ParseSkillLevel ${String[${SkillUpText}].Mid[${Math.Calc[${PositionStart}+1]},${Math.Calc[${PositionEnd}-${PositionStart}]}]}
/varset PositionStart ${Math.Calc[${String["${SkillUpText}"].Find["at"]}+2]}
/varset PositionEnd ${String["${SkillUpText}"].Find["!"]}
/varset ParseSkill ${String["${SkillUpText}"].Mid[${Math.Calc[${PositionStart}+1]},${Math.Calc[${PositionEnd}-${PositionStart}]}]}
/popup ${ParseSkill} increased - ${ParseSkillLevel} ...
/echo ${ParseSkill} increased - ${ParseSkillLevel} ...
/return
Sub Event_Slain
/echo ${Target.CleanName} Killed you. ((Ending Macro))
/popup ${Target.CleanName} Killed you. ((Ending Macro))
/endmacro



