Question about columns and etc

Question about columns and etc

[Vyatcheslav Yatskovsky]

Hello,

Now I use my favourite LuaTeX for typesetting song lyrics :) I love the 
result, but I have problems when I use to columns to make long lyrics 
fit one page.

First of all, the first line of the second column is always one line 
upper then in the first one. Next, when I turn on 
\setupinterlinespace[big], it doesnt' affect text in columns at all!

And the last, I cannot prevent chorus text from splitting across 
pages/columns. I see that \vbox does this for verse, but adding it to 
chorus setup doesn't work.

Thank you for any help in advance!

Vyatchelsav
=====

\usemodule[lyrics-env]

\starttext

\title{Песенка о медведях}
\author{текст: Дербенев Л., музыка: Зацепин А.}

\startcolumns
\startverse
Где-то на белом свете
Там где всегда мороз
Трутся спиной медведи
О земную ось

Мимо плывут столетья
Спят подо льдом моря
Трутся об ось медведи
Вертится земля
\stopverse

\startchorus
Ля ля ля ля ля ля ля
Вертится быстрей земля
Ля ля ля ля ля ля ля
Вертится быстрей земля
\stopchorus

\startverse
Трутся они стараясь
Вертят земную ось
Чтобы влюблённым раньше
Встретиться пришлось

Чтобы однажды утром
Раньше на год иль два
Кто - то сказал кому - то
Главные слова
\stopverse

припев

\startverse
Вслед за весенним ливнем
Раньше прийдёт рассвет
И для двоих счастливых
Много - много лет

Будут сверкать зарницы
Будут ручьи звенеть
Будет туман клубиться
Белый как медведь
\stopverse

припев

\startverse
Где-то на белом свете
Там где всегда мороз
Трутся спиной медведи
О земную ось

Мимо плывут столетья
Спят подо льдом моря
Трутся об ось медведи
Вертится земля
\stopverse

припев
\par
припев

\stopcolumns
\stoptext

==========================
lyrics-env.tex
=========================
\usetypescriptfile[win-font]
%\usetypescript[TimesNewRoman]\setupbodyfont[TimesNewRoman, 12pt]
\usetypescript[MinionPro]\setupbodyfont[MinionPro, 13pt]


\setuppapersize
[A4][A4]

\setuplayout
[leftmargin=2cm, rightmargin=1.5cm, width=fit,
topspace=1cm, header=1cm, bottomspace=1cm,
footer=1cm, height=fit]

%\setupinterlinespace[big]

\setupcaptions[location=]

\setuppagenumbering[location=]


\definestartstop
[verse]
[before=\vbox\bgroup\startlines,
after=\stoplines\egroup]

\definestartstop
[chorus]
[before=\startnarrower\startlines,
after=\stoplines\stopnarrower]

\setuphead[title][after=\nowhitespace]

\define[1]\author{{\itx (#1)}\blank}

\define[0]\solo{{\itx Solo}}




___________________________________________________________________________________
If your question is of interest to others as well, please add an entry to the Wiki!

maillist : ntg-context@ntg.nl / http://www.ntg.nl/mailman/listinfo/ntg-context
webpage  : http://www.pragma-ade.nl / http://tex.aanhet.net
archive  : https://foundry.supelec.fr/projects/contextrev/
wiki     : http://contextgarden.net
___________________________________________________________________________________