https://www.dkpminus.com/wow/guides/vanilla-wow-lazy-hunter-macros/
Also:
Revive/Mend Pet
Tip: If your pet is dead, Revive Pet. Otherwise, if it’s alive, Mend Pet.
/script if not UnitExists(“pet”) then CastSpellByName(“Revive Pet”); else if UnitIsDead(“pet”) then CastSpellByName(“Revive Pet”);else CastSpellByName(“Mend Pet”);end;end

Call/Dismiss Pet
Option 1
Tip: If your pet is out, Dismiss pet otherwise Call Pet.
/script if PetCanBeAbandoned() then CastSpellByName(“Dismiss Pet”) else CastSpellByName(“Call Pet”);end

Pulling Announcement
/script smsg=”<< Incoming >> << %t >>”; if (GetNumRaidMembers() > 0) then SendChatMessage(smsg,”RAID”) elseif (GetNumPartyMembers() > 0) then SendChatMessage(smsg,”PARTY”) end

Anti-Rogue
Option 1
Tip: Hear the stealth noise? Run away and click this macro. It will target the rogue, mark him, and send your pet at him. You’re running, he’s slow in stealth mode, just jump shot at your leisure.
/script TargetNearestEnemy();
/cast Hunter’s Mark
/script PetAttack();

(Z) Option 2
/script TargetNearestEnemy(); if UnitIsPlayer(“target”) then if (UnitClass(“target”) == “Rogue”) then if (isMarked()) then CastSpellByName(“Wing Clip”) else castMark(); end; end; end

Kiting in Blackwing Lair
Option 1
/script AssistUnit(“target”); if (UnitClass(“target”) == “Hunter”) then TargetLastEnemy(); else TargetLastEnemy(); CastSpellByName(“Arcane Shot”);end

Remove bow then equip again (for Nefarian)
Tip: Requires first main bag slot to be clear.
/script PickupInventoryItem(18) if ( CursorHasItem() ) then PickupContainerItem(0, 1); else PickupContainerItem(0, 1); PickupInventoryItem(18);end

Nefarian, Stage 1
Tip: This should keep you on the right target and firing as quickly as possible. Obviously it’s not 100% foolproof, as if Arcane/Multi cooldowns aren’t up you’ll have to invoke Auto Shot manually. In the end, all you have to do to keep the damage flowing is click/hotkey this button repeatedly and toggle on Auto Shot if it’s ever off.
/assist PlayerName
/cast Arcane Shot()
/cast Multi-Shot()
/script PetAttack()