Alguem tem o sistema de pet por talkaction ? se tiver por favor me passe?

function onSay(cid, words, param)

local pet = {

["Orc"] = {10, 20},

["Dragon"] = {30,40},

["Cyclops"] = {50,500000}

}

local a = getCreatureSummons(cid)

for k,v in pairs(pet) do

if getPlayerLevel(cid) >= v[1] and getPlayerLevel(cid) <= v[2] then

if (table.maxn(a) < 1)then

x = doSummonCreature(k, getThingPos(cid))

doConvinceCreature(cid,x)

doCreatureSay(cid,"Help my "..k.." pet",TALKTYPE_ORANGE_1)

doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 2)

elseif words == "!removepet" then

doCreatureSay(cid,"Thanks my "..getCreatureName(a[1]).." pet",TALKTYPE_ORANGE_1)

doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 2)

doRemoveCreature(a[1])

else

doPlayerSendCancel(cid,"you have pet summoned")

return TRUE

end

end

end

end

<talkaction words="!pet;!removepet" script="nome arquivo.lua"/>