What happens:
1. Cast snare, funeral pyre, Blood of Thule
2. Start macroing the kite, pet gets sent, saryrn's kiss gets cast
3. Blood of thule wears off, and at next stop start to cast again
4. Every time I stop, blood gets cast.
Saryn's kiss works just fine.
Any help would be appriciated.
-Lane
Code: Select all
| Necrokite2.mac
| Originally By: Terramantian however highly modified by Lane
|
| Kiting macro for a 65 necromancer in a specific zone.
| Pull mob with Darkness, FP, and BT already applied, start macro
#turbo
#include spell_routines.inc
#include move.inc
#event Hit "#*#YOU for#*#"
#event exp "#*#experience!#*#"
#event blood "#*#Blood of Thule#*#"
Sub Main
/declare PetAttacking bool outer
/declare Sarynson bool outer
/declare Bloodofon bool outer
/declare startexp outer 0
/declare startaaxp outer 0
/declare currentxp outer 0
/declare xpgain outer 0
/declare currentaa outer 0
/declare aagain outer 0
/varset PetAttacking 0
/varset Sarynson 0
/varset Bloodofon 1
/varset startexp ${Me.PctExp}
/varset startaaxp ${Me.PctAAExp}
:Loop
/delay 2s (${Target.Distance} <= 120)
/call MoveToLoc -363 947
/doevents
/call checkpet
/call checkdots
/delay 5s (${Target.Distance} <= 120)
/call MoveToLoc -520 948
/doevents
/call checkpet
/call checkdots
/delay 5s (${Target.Distance} <= 120)
/call MoveToLoc -440 763
/doevents
/call checkpet
/call checkdots
/delay 5s (${Target.Distance} <= 120)
/call MoveToLoc -242 805
/doevents
/call checkpet
/call checkdots
/goto :Loop
Sub safe
/call MoveToLoc -363 947
/return
Sub checkpet
/if ((!${PetAttacking}) && (${Target.PctHPs} < 90)) {
/pet attack
/varset PetAttacking 1
}
/return
Sub checkdots
/if ((!${Sarynson}) && (${Target.Distance} >= 165)) {
/delay 1s
/call cast "Saryrn's Kiss" 2
/delay 1s
/varset Sarynson 1
}
/if ((!${Bloodofon}) && (${Target.Distance} >= 165)) {
/delay 1s
/call cast "Blood of Thule" 5
/delay 1s
/varset Bloodofon 1
}
/return
Sub Event_exp
/varset currentxp ${Me.PctExp}
/varset xpgain ${Math.Calc[${currentxp}-${startexp}]}
/varset currentaa ${Me.PctAAExp}
/varset aagain ${Math.Calc[${currentaa}-${startaaxp}]}
/popup "Gain: ${xpgain}% xp - ${aagain}% aa ## Cur: ${Me.PctExp}% xp - ${Me.PctAAExp}% aa"
/echo "Gain: ${xpgain}% xp - ${aagain}% aa ## Cur: ${Me.PctExp}% xp - ${Me.PctAAExp}% aa"
/varset startexp ${Me.PctExp}
/varset startaaxp ${Me.PctAAExp}
/end
/return
Sub Event_blood
/varset Bloodofon 0
/return

