Sorry for long post!!
I have been playing around with stuff and thought this could be handy for others
I added a custom macro for mount up on key f8 so you don't leave people behind when running around world and cant afford mounts for all.
index=CreateMacro("MountUp",80,"/script MountUp()",1,nil)
PickupAction(56)
ClearCursor()
PickupMacro(index)
PlaceAction(56)
then changed mount up script
function MountUp()
use(GetLink("Warhorse"))
use(GetLink("Horse"))
use(GetLink("Timber Wolf"))
use(GetLink("Kodo"))
use(GetLink("Raptor"))
use(GetLink("Charger"))
use(GetLink("Dreadsteed"))
use(GetLink("Frostsaber"))
if not buffed("Summon Felsteed") then cast("Summon Felsteed") else return end
if not buffed("Ghost Wolf") then cast("Ghost Wolf") else return end
if not buffed("Travel Form") then cast("Travel Form") else return end
if not buffed("Aspect of the Pack") then cast("Aspect of the Pack") else return end
end
Nice, man, very nice. You are savvy. You don't need the macro, though, right? Ctrl-4 calls MountUp()