Btukfyl

I would like that a new environment of quotation/quote detect how many lines a text has, then will increase or decrease the quotation length/margin.

For example:

newenvironment{citacao}[1]%

  {list{}

    % if a quotation has less than 3 lines, it will be set to 1.cm

    ifthenelse{equal{citacao}{true}}

    {%

        setlength{citacao}{1.8cm}

    }

    % if a quotation has more than 3 lines, it will be set to 4cm

    {% else

        setlength{citacao}{4cm}

    }

  }%

  {endlist}

If a new environment detects that a quotation has more than 3 lines, it will set the text to 4cm, if not, the text will be set to 1.8cm. Similar to:

newenvironment{citacao}[1]%

  {list{}{leftmargin=1.8cmrightmargin=1.8cm}item}%

  {endlist}



newenvironment{citacao}[1]%

  {list{}{leftmargin=4cmrightmargin=4cm}item}%

  {endlist}

I also would like to add the selection of a language for hyphenation like:

newenvironment{citacao}[1][english]%

  {list{}{leftmargin=1.8cmrightmargin=1.8cm}item}%

  {endlist}

I tried to code like:

newenvironment{citacao}[2]%

  {selectotherlanguage[#1]list{}

    % if a quotation has less than 3 lines, it will be set to 1.cm

    ifthenelse{equal{citacao}{true}}

    {%

        setlength{citacao}{1.8cm}

    }

    % if a quotation has more than 3 lines, it will be set to 4cm

    {% else

        setlength{citacao}{4cm}

    }

  }%

  {endlist}

Observe that I use XeLaTeX and the package csquotes.

If your quotations are single paragraphs, this will work: the idea is to typeset the paragraph with the wide margins and use prevgraf to know the number of lines. If the number is greater than 3, the margin is reduced when calling list.

The same idea could be used for multiparagraph quotations, with some complications.

documentclass{article}

usepackage[latin,english]{babel}

usepackage{fontspec}

usepackage{environ}



newlength{citacaoindent}

setlength{citacaoindent}{4cm}



NewEnviron{citacao}[1][english]{%

  csname otherlanguage*endcsname{#1}%

  setbox0=vbox{

    hsize=dimexprhsize-2citacaoindentrelax

    BODYparexpandafter

  }expandafterifnumtheprevgraf>3 setlength{citacaoindent}{1.8cm}fi

  list{}{leftmargin=citacaoindent rightmargin=citacaoindent}

  itemBODY

  endlist

}



begin{document}



begin{citacao}

This is a short quotation in languagename,

typeset with a wide margin.

end{citacao}



begin{citacao}

This is a long quotation in languagename, that should be

typeset with a narrower margin

because it fills more than three lines

because it fills more than three lines

because it fills more than three lines

because it fills more than three lines.

end{citacao}



begin{citacao}[latin]

This is a short quotation in languagename,

typeset with a wide margin.

end{citacao}



begin{citacao}[latin]

This is a long quotation in languagename, that should be

typeset with a narrower margin

because it fills more than three lines

because it fills more than three lines

because it fills more than three lines

because it fills more than three lines.

end{citacao}



end{document}