I've looked around but it seems every puller macro I've seen has the macro deleted from the post. Does anyone have a good pulling macro for a monk? This is what I have so far but it doesnt pull.
Rich (BB code):
#Event BitchBoyHit "#*#YOU for#*#points of damage.#*#
#Event SwitchTargets "#*#tells the group, 'Switch Targets#*#"
#Event SitBooBoo "#*#tells the group, 'Back off'"
#Event YourFDSkillSucks "#*#has fallen to the ground#*#"
#Chat group
Sub Main
| Mend at in %. IE if you want to mend when your down to 50% you would set this to 50.
/declare RV_MendPct int outer 35
| What % HP do you wish to assist at?
/declare RV_Assistat int outer 98
/echo --------------------------------------
/echo Monk Bitch Boy 2.5 Initializing
/echo -----{Real Monks Pull!~}-----
/echo --------------------------------------
/echo
/declare RV_Looper int outer 0
/declare RV_MyTargetID int outer 0
/declare RV_MyTargetName string outer
/declare RV_MyTargetDead int outer 0
/declare RV_RandomWait int outer 0
/declare RV_CheckLook int outer 0
/declare RV_Fighting int outer 0
/declare RV_TargetDead int outer 0
/declare RV_MyXLOC int outer 0
/declare RV_MyYLOC int outer 0
/declare AnchorX int outer ${Me.X}
/declare AnchorY int outer ${Me.Y}
/declare RV_resetheading int outer ${Me.Heading.DegreesCCW.Int}
/declare NotBitchBoy string outer ${Target.CleanName}
/declare NotBitchBoysID int outer ${Target.ID}
/declare SitBooBooID int outer
/declare RV_FastRange int outer
/declare RV_Subreset int outer 0
/declare Exper float outer
/declare AAExp float outer
/declare Mobs_Killed int outer 0
/declare BackTimer timer outer 0
/varset Exper ${Me.PctExp}
/varset AAExp ${Me.PctAAExp}
/if (${Target.Type.NotEqual["PC"]}) /call WhatTheFuckBitch
:Start
/doevents
/call GetTarget
/call ResetSub
/goto :Start
/return
|--------------------------------------------------------------------------------
|SUB: Aquire Target
|--------------------------------------------------------------------------------
Sub GetTarget
:NotYetBitchBoy
/delay 5
/doevents
/assist ${NotBitchBoy}
/if (!${Target.ID}) /goto :NotYetBitchBoy
/if ((${Target.ID}!=${NotBitchBoysID}) && (${Target.PctHPs}<${RV_Assistat}) && (${Target.Distance}<150) && ${Spawn[${Target.ID}].Type.Equal[NPC]} ${Spawn[${Target.ID}].Type.NotEqual[Corpse]}) /call CombatSub
/goto :NotYetBitchBoy
/return
Sub MoveToAnchor
/declare iCount int local
/varset iCount 0
/varset RV_MyXLOC ${Int[${Me.X}]}
/varset RV_MyYLOC ${Int[${Me.Y}]}
/declare RV_DistanceTimer timer 15
:AnchorMoveLoop
/delay 1
/doevents
/face fast nolook loc ${AnchorY},${AnchorX}
/if (${Math.Distance[${AnchorY},${AnchorX}]}>12) {
/keypress forward hold
} else {
/keypress forward
/face fast away nolook loc ${AnchorY},${AnchorX}
/return
}
/if (${iCount}>2) {
/face fast nolook loc ${AnchorY},${AnchorX}
/varset iCount 0
}
/if (!${RV_DistanceTimer}) {
/if ((${RV_MyXLOC}==${Int[${Me.X}]})&&(${RV_MyYLOC}==${Int[${Me.Y}]})) /call HitObstacle
/varset RV_MyXLOC ${Int[${Me.X}]}
/varset RV_MyYLOC ${Int[${Me.Y}]}
/varset RV_DistanceTimer 15
}
}
/varcalc iCount ${iCount}+1
/goto :AnchorMoveLoop
/return
|--------------------------------------------------------------------------------
|SUB: Obstacle Avoidance
|--------------------------------------------------------------------------------
Sub HitObstacle
/keypress strafe_left hold
/delay 4
/keypress strafe_left
/keypress back hold
/delay 3
/keypress left
| /gsay Uhm I'm stuck, I either can't get back to camp or I can't get to the Mob. Damn I suck.
| /gsay Feigning Death, get me set back up when you can.
| /doability "Feign Death"
| /endmacro
/return
|--------------------------------------------------------------------------------
|SUB: Reset
|--------------------------------------------------------------------------------
Sub ResetSub
/varset RV_TargetDead 0
/varset RV_Fighting 0
/doevents
/attack off
/keypress ESC
/face fast heading ${RV_resetheading}
/return
Sub CombatSub
/if (${Me.Feigning} || ${Me.Sitting}) /stand
/varset BackTimer 0
/varset RV_Fighting 1
/varset RV_TargetDead 0
/if ((${Target.ID})&&(${Target.Type.Equal["NPC"]})) /attack on
:CombatLoop
/doevents
/attack on
/if (!${BackTimer}) {
/squelch /stick 10 behindonce moveback
/varset BackTimer 50
}
/call SpecialIT
:nocombat
/if ((!${Target.ID}) || (${Target.Type.Equal["Corpse"]})) {
/varcalc Mobs_Killed (${Mobs_Killed}+1)
/attack off
/squelch /stick off
/delay 3
/keypress forward
/keypress back
/varset AAExp ${Math.Calc[${Me.PctAAExp}-${AAExp}]}
/varset Exper ${Math.Calc[${Me.PctExp}-${Exper}]}
/echo EXP: ${Exper}:${Me.PctExp}% - AAXP: ${AAExp}:${Me.PctAAExp}% - ${Math.Calc[${Macro.RunTime}/60]} minutes
/popup EXP: ${Exper}:${Me.PctExp}% - AAXP: ${AAExp}:${Me.PctAAExp}% - ${Math.Calc[${Macro.RunTime}/60]} minutes
/echo Total Mobs killed so far: ${Mobs_Killed}
/varset Exper ${Me.PctExp}
/varset AAExp ${Me.PctAAExp}
/varset RV_TargetDead 1
/varset RV_Fighting 0
/call MoveToAnchor
}
/if (!${RV_TargetDead}) {
/goto :CombatLoop
}
/return
Sub SpecialIT
/if (${Me.AbilityReady["Flying Kick"]}) /doability "Flying Kick"
/if (!${Me.Buff[Celestial Tranquility].ID} && ${FindItem["Celestial Fist"].InvSlot.Name.Equal["hands"]}) /cast item "Celestial Fists"
/if ((${Me.PctHPs} < ${RV_MendPct}) && (${Me.AbilityReady["Mend"]})) /doability "Mend"
/if ((${Me.PctHPs} < 10) && (${Me.AbilityReady["Feign Death"]})) {
/attack off
/delay 1s !${Me.Combat}
/doability "Feign Death"
/Echo ${Target} Beat me to within moments of my life.
}
/return
Sub WhatTheFuckBitch
/echo Uhm target the person you want to assist before starting this macro.
/endmacro
/return
Sub Event_BitchBoyHit
/doevents flush
/doability "Feign Death"
/delay 5
/return
Sub Event_SwitchTargets
/assist ${NotBitchBoy}
/gsay ${Target.CleanName} is my new target.
/return
Sub Event_SitBooBoo
/varset SitBooBooID ${Target.ID}
/gsay Ok if you say so.
/call CheckAnchor
/doability "Feign Death"
/gsay Gonna sit here FD till you target something else or what ya got targeted dies.
:SitBooBooLoop
/assist ${NotBitchBoy}
/delay 3
/if (${Target.ID}==${SitBooBooID}) /goto :SitBooBooLoop
/return
Sub Event_YourFDSkillSucks
/delay 10s
/doability "Feign Death"
/echo My FD skill Sucks!~
/return
Sub Event_Unduck
/call CheckAnchor
/return