get("#175") -- tableToString

get("#349") -- table functions

startID = input or error("Need snippet ID as input")

function makeChain(id, seen, result)

  if not seen[id] then

    seen[id] = true

    local refs = getTitleReferences(id)

    --print("Refs: "..tableToString(refs))

    for r in all(refs) do

      local title = getSnippetTitle(r)

      if not hasNTTitle("Invalidate "..r) and (title:find("^A translation of ") or title:find("^Translation of ")) then

        local _, _, translatorID = title:find(" with #([0-9]+)")

        table.insert(result, translatorID)

        print("r:", r)

        print("translator:", translatorID)

        makeChain(r, seen, result)

        goto out

      end

    end

    ::out::

  end

end

result = {}

makeChain(startID, {}, result)

result = "!"..table.concat(result, " ")

print(result)

return result