Someone

function petmenu(userid)
_PrintMessage(userid, HUD_PRINTCONSOLE,"------------------------------")
_PrintMessage(userid, HUD_PRINTCONSOLE,"         Sylar pet menu       ")
_PrintMessage(userid, HUD_PRINTCONSOLE,"------------------------------")
_PrintMessage(userid, HUD_PRINTCONSOLE,"      s_pet - spawn pet      \n")


end
CONCOMMAND("petmenu", petmenu);


function s_pet(userid)

local pos = _PlayerGetShootPos(userid)
local ang = _PlayerGetShootAng(userid)
local str = _TraceLine(pos,ang,99999,userid)
local tre = _TraceEndPos(userid)
local TargetPos = vecAdd(tre,vector3(0,0,50))

monster = _EntCreate( "npc_antlion")	
_EntFire( monster, "setrelationship", "player D_LI 99", 0)
_EntFire( monster, "sethealth", "100", 0)
_EntFire( monster, "targetname", "pet", 0)

_EntSpawn (monster)
_EntSetPos(monster,TargetPos)


end
CONCOMMAND("s_pet", s_pet)