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

Began life as a copy of #536