HEROIC MACRO
/run bag,slot,texture,count = FindItem("High Warlord's Blade")
/run if slot then RunLine("/eqoff High Warlord's Razor") RunLine("/eq High Warlord's Blade") else CastSpellByName("Heroic Strike") end

BT MACRO
/run bag,slot,texture,count = FindItem("High Warlord's Blade")
/run if slot then RunLine("/eqoff High Warlord's Razor") RunLine("/eq High Warlord's Blade") else CastSpellByName("Bloodthirst") end

WW MACRO
/run bag,slot,texture,count = FindItem("High Warlord's Greatsword")
/run if slot then RunLine("/eq High Warlord's Greatsword") else CastSpellByName("Whirlwind") end