This is a consolidated list of my current hunter macros. You may notice that I'm fond of left click/right click/middle click macros for some things.
The Shot Rotation /castsequence (swap Arcane to a Steady if your Armor Pen allows)
#showtooltipChimera + Silencing + Kill Command
/castsequence Chimera Shot, Aimed Shot, Arcane Shot, Steady Shot, Steady Shot, Steady Shot
/cast Kill Command
/cast Silencing Shot
/script UIErrorsFrame:Clear();
#showtooltipMisdirect
/cast Chimera Shot
/cast Kill Command
/cast Silencing Shot
/script UIErrorsFrame:Clear();
#showtooltipStings
/cast [button:1, target=focus] Misdirection; [button:2] Misdirection; [button:3, target=pet] Misdirection
#showtooltipTaunt the Deformed Fanatic for Kiting
/cast [button:1] Serpent Sting; [button:2] Scorpid Sting; [button:3] Viper Sting
#showtooltip Distracting ShotCheetah Pack
/tar Deformed
/cast Distracting Shot
#showtooltipFire Traps
/cast [button:1] Aspect of the Cheetah; [button:2] Aspect of the Pack
#showtooltipFrost Traps
/cast [button:1] Explosive Trap; [button:2] Immolation Trap
#showtooltipFeed Pet (put the food in the appropriate slot)
/cast [button:1] Freezing Trap; [button:2] Frost Trap; [button:3] Freezing Arrow
#showtooltipMend/Revive
/cast Feed Pet
/use 3 1
#showtooltipMelee
/cast [button:1] Mend Pet; [button:2] Revive Pet
#showtooltip Auto AttackEat/Drink (put food & drink in the appropriate slots)
/cast Raptor Strike
/cast Mongoose Bite
/use 3 5Mount Macro (adapted from WoWwiki)
/use 3 9
/run C=CallCompanion if(not IsMounted())then if(((GetZoneText()=="Dalaran")and(GetSubZoneText()~="Krasus' Landing"))or not IsFlyableArea()or IsModifierKeyDown())then C("MOUNT",13)else C("MOUNT",16)end endRandom Pet (from WoWwiki)
/dismount
/run DismissCompanion("CRITTER"); CallCompanion("CRITTER", random(GetNumCompanions("CRITTER")));