macro(500, "Auto party", function()
  local spectators = g_map.getSpectators(g_game.getLocalPlayer():getPosition())
   for i,v in pairs(spectators) do 
   if(v:isPlayer()) then
     if(v:getShield() == 1) then
       g_game.partyJoin(v:getId())
       return
     end
   end
   end
end)
 
local palavraChave = 'rk' -- tekst na ktory daje auto party
local autoParty = macro(10000, "AUTO - PARTY", function() end)
onTalk(function(name, level, mode, text, channelId, pos)
    if autoParty:isOff() then return end
    if player:getShield() == 4 then 
        g_game.partyShareExperience(not player:isPartySharedExperienceActive())
    end
    if name == player:getName() then return end
    if mode ~= 1 then  return end
    if string.find(text, palavraChave) then
        local friend = getPlayerByName(name)
        g_game.partyInvite(friend:getId())
    end
end) 
addIcon("autoParty", {item=9173, text="Auto-PT",}, function(icon, isOn) 
  autoParty.setOn(isOn) 
end)