Como modificar bst para abreviar para et al. depois de n autores

Como modificar bst para abreviar para et al. depois de n autores

Eu tenho um arquivo bst que encurta entradas com mais de 5 autores parae outros. mas gostaria de modificá-lo para fazê-lo para mais de 4 autores. Acredito que este seja o trecho de código relevante, mas como posso alterá-lo para obter o comportamento modificado?
Esta questão é semelhante aAlterando a função "format.names" do BibTeX no arquivo .bst para forçar "et al." citações para entradas com mais de 3 autoresmas como este arquivo bst já executa com sucesso uma função semelhante, talvez a probabilidade desta pergunta obter uma resposta seja maior.

Essa sintaxe é realmente uma Besta... Se alguém pudesse me explicar o que está acontecendo aqui, eu agradeceria muito.

FUNCTION {format.names}
{ 'bibinfo :=
  duplicate$ empty$ 'skip$ {
  's :=
  "" 't :=
  #1 'nameptr :=
  s num.names$ 'numnames :=
  numnames 'namesleft :=
    { namesleft #0 > }
    { s nameptr
      "{vv~}{ll}{, f.}{, jj}"
      format.name$
      bibinfo bibinfo.check
      't :=
      nameptr #1 >
        {
          nameptr #1
          #1 + =
          numnames #5
          > and
            { "others" 't :=
              #1 'namesleft := }
            'skip$
          if$
          namesleft #1 >
            { ", " * t * }
            {
              s nameptr "{ll}" format.name$ duplicate$ "others" =
                { 't := }
                { pop$ }
              if$
              t "others" =
                {
                  " " * bbl.etal emphasize *
                }
                {
                  "\&"
                  space.word * t *
                }
              if$
            }
          if$
        }
        't
      if$
      nameptr #1 + 'nameptr :=
      namesleft #1 - 'namesleft :=
    }
  while$
  } if$
}

Fonte:http://mirror.unl.edu/ctan/macros/latex/contrib/nature/naturemag.bst

Responder1

Por razões que não são totalmente claras para mim, mudar o número 5 para o número 3 funciona. Parece que os números 5 e 4 têm o mesmo comportamento... Aceitaria com prazer uma resposta que explicasse o que está acontecendo aqui.

FUNCTION {format.names}
{ 'bibinfo :=
  duplicate$ empty$ 'skip$ {
  's :=
  "" 't :=
  #1 'nameptr :=
  s num.names$ 'numnames :=
  numnames 'namesleft :=
    { namesleft #0 > }
    { s nameptr
      "{vv~}{ll}{, f.}{, jj}"
      format.name$
      bibinfo bibinfo.check
      't :=
      nameptr #1 >
        {
          nameptr #1
          #1 + =
          numnames #3
          > and
            { "others" 't :=
              #1 'namesleft := }
            'skip$
          if$
          namesleft #1 >
            { ", " * t * }
            {
              s nameptr "{ll}" format.name$ duplicate$ "others" =
                { 't := }
                { pop$ }
              if$
              t "others" =
                {
                  " " * bbl.etal emphasize *
                }
                {
                  "\&"
                  space.word * t *
                }
              if$
            }
          if$
        }
        't
      if$
      nameptr #1 + 'nameptr :=
      namesleft #1 - 'namesleft :=
    }
  while$
  } if$
}

informação relacionada