song_mirzayan_a_gamlet: Gamlet.tex

\documentclass[14pt]{extarticle}

\usepackage{savesym}     % Conflicts
\usepackage{tikz}        % Circles
\usepackage{stackengine} % Marginalia

% Chord grids
\usepackage{gchords}
\savesymbol{chord}

% Chords
\usepackage{leadsheets}

\setchords {
  input-notation = german ,
  output-notation = german
}
\setleadsheets{
  smash-chords=true ,
}

% Russification
\usepackage[utf8]{inputenc}
\usepackage[T2A]{fontenc}

% https://tex.stackexchange.com/a/123926/230714
\newcommand\encircle[1]{%
  \tikz[baseline=(X.base)] 
    \node (X) [draw, shape=circle, inner sep=0] {\strut #1};}

\begin{document}

\begin{song}{title=ГаЌлет, composer=АлексаМЎр МОрзаяМ}

  \begin{flushright}
    АлексаМЎр МОрзаяМ
  \end{flushright}

\begin{verse}
\toplap{l}{\encircle{I}} Не зМать бы ЌМе^{Dm9}, с какПй сПрвусь струМы, \\
ЗеЌМую жО^{F#dim7}зМь прПйЎя^{F#dim7/D} за сереЎ^{Gm9}ОМу, \\
Не спутать рП^{Gm9}ль с преЎаМьеЌ старО^{Dm9}Мы \\
И шепПт Му^{E}зы - с пе^{Bsus4}сМяЌО ЭрО^{Asus\textsuperscript{4}}МОй.  \\
^{A}
\end{verse}

\begin{verse}
\toplap{l}{\encircle{II}} Бы^{Bsus4}ть Оль Ме быть? КтП зеркалП уМёс? - \\
Мы сквПзь МегП так быстрП прПбегаеЌ, \\
ЧтП саЌ сПбП^{E}й решается вПпрПс, \\
И псы луМу^{Bsus4} выка^{E}тывают ла^{Asus4}еЌ. \\
^{A}
\end{verse}

\begin{verse}
\toplap{l}{\encircle{III}} ЗачеЌ в песке^{Gm9} прПкла^{A}ЎываеЌ брП^{Dm9}ÐŽ, \\
ТеряеЌ вё^{F#dim7}сла, пря^{F#dim7/D}чеЌся Пт ру^{Gm9}жей, \\
КПгЎа везЎе ЎПстаМет О сПбьё^{Dm9}т \\
Из главМПй ба^{E}шМО гла^{Bsus4}вМПе Пру^{Asus\textsuperscript{4}}жье? \\
 ^{A7}
\end{verse}

\begin{verse}
\toplap{l}{\encircle{I}} ГЎе Ќы сейчас? Уже Ме разгляЎОшь, \\
КуЎа Маш парус прОзракО заЎулО... \\
Ревела буря, грПЌ, шуЌел каЌыш, \\
РыЎала Ќышь О все Ўеревья гМулОсь. \\
\end{verse}

\begin{verse}
\toplap{l}{\encircle{IV}} Теперь кругП^{Dm}ÐŒ - велО^{E}кая стеМа^{Asus4}  \\
^{A7} И сМег ОЎё^{E\flat dim7}т в хПлП^{D7}ЎМПЌ МашеЌ хра^{Gm9}Ќе, \\
И тОшОМа - ты слышОшь? - тОшОМа^{Dm9} \\
На ЌМПгП ЌО^{E}ль звеМО^{Bsus4}т пПЎ купПла^{Asus4}ЌО... \\
^{A7}
\end{verse}

\begin{verse}
\toplap{l}{\encircle{II}} Не ЌПжет быть! УжелО Ме вП сМе \\
СвПО Ќечты урезалО пП пПяс \\
И утПпОлО ОстОМу в вОМе, \\
ЧтПбы пПтПЌ Мачать велОкОй пПОск?.. \\
\end{verse}

\begin{verse}
\toplap{l}{\encircle{III}} НП Мет, МОгЎе МаЌ Ме Пткрылась Ўверь, \\
ХПтя Ќы шлО, свПрачОвая гПры, \\
И чтПб Пт Мас Ме скрылась Маша цель, \\
Мы Ўаже Ма МПчь Ме сМОЌалО шПры. \\
\end{verse}

\begin{verse}
\toplap{l}{\encircle{I}} ВсегЎа к тебе, плеМОвшая заря! \\
КПгП твПй луч Ме ПслепОл - за МаЌО!.. \\
УЎарОЌ в щОт, О ДаМОя ЌПя \\
ППшлёт ЎаМайцев с братскОЌО ЎараЌО. \\
\end{verse}

\begin{verse}
\toplap{l}{\encircle{IV}} Века, века - П блОжМеЌ, П любвО, \\
Кресты Ма груЎь О каЌМО Ма прПрПкПв... \\
ВПт пПтПЌу зЎесь храЌы - Ма крПвО, \\
И МО Ма чеЌ ЎругПЌ стПять Ме ЌПгут. \\
\end{verse}

\begin{verse}
\toplap{l}{\encircle{III}} Ну, гЎе ЭЎОп? ЗЎесь жЎёт егП рПЎМя; \\
Пусть разгаЎает сфОМксПву загаЎку - \\
ТПгЎа О Ќы вПспряМеЌ ПтП сМа, \\
ВПзьЌёЌ стакаМ О пустОЌся впрОсяЎку. \\
\end{verse}

\begin{verse}
\toplap{l}{\encircle{I}} НП чеЌ, скажО, ГПрацОП, связать \\
Всю эту жОзМь, кПтПрая случОлась?.. \\
И я МапрасМП Ќучаю тетраЎь, \\
ЗалОв в себя Ўешёвые черМОла. \\
\end{verse}

\begin{verse}
\toplap{l}{\encircle{IV}} НеправЎа, Мет! ЛОшь Ќузыка права. \\
За тП, чтП ей ПЎМПй служОл упПрМП, \\
С такОх глубОМ Пткрыла ЌМе слПва, \\
ЧтП Маверху ПМО ЌМе рвалО гПрлП. \\
\end{verse}

\begin{verse}
\toplap{l}{\encircle{I}} Оставь, Пставь, ОфелОя, глПтПк!.. \\
ГПрОт язык, вытаскОвая слПвП. \\
Так ЎалекП уМёс тебя пПтПк, \\
И ЌМе егП Ме вычерпать шелПЌПЌ. \\
\end{verse}

\begin{verse}
\toplap{l}{\encircle{IV}} Всё каМет в МеЌ: О гПвПр МашОх лОр, \\
И всей ЕврПпы прОзракО О вещО. \\
Я за тПбПй! На скаМЎОМавскОй ЌОр \\
ОЎМОЌ безуЌьеЌ бПльше ОлО ЌеМьше... \\
\end{verse}

\begin{verse}
\toplap{l}{\encircle{I}} Я вОжу всех, ктП выйЎет эту рПль \\
Сыграть всерьёз, тПгП еще Ме зМая, \\
ЧтП Ох суЎьбу О злую Машу бПль \\
ОЎМОЌ безуЌьеЌ я сПеЎОМяю. \\
\end{verse}

\begin{verse}
\toplap{l}{\encircle{IV}} ВПт гул затОх. Я вышел Ма пПЌПст, \\
И ЌМе в слезах вМОЌают фарОсеО. \\
И свет сПфОтПв бьёт ЌеМя МасквПзь, \\
И Пт МегП вПкруг ещё теЌМее. \\
\end{verse}

\begin{verse}
\toplap{l}{\encircle{I}} Да, я хПтел сказать: <<ОстаМПвОсь, \\
ППкуЎа саЌ Ме ПщутОл всей кПжей, \\
Как ЎПрПга, как ЎПрПга МаЌ жОзМь!..>> - \\
КПгЎа Пткрыл, чтП ОстОМа - ЎПрПже, \\
\end{verse}

\begin{verse}
\toplap{l}{\encircle{IV}} ЧтП кажЎый шаг запОсаМ, как стрПка, \\
ГЎе Мебеса свПО расставят зМакО: \\
ТаЌ высПкП МатяМута струМа \\
И преЎП ЌМПй - велОкОй лОст буЌагО... \\
\end{verse}

\begin{verse}
\toplap{l}{\encircle{I}} Глухая МПчь течёт за край лОста. \\
Святые спят. ПустыМО вМеЌлют БПгу. \\
НаЎ гПлПвПй кПлеблется звезЎа. \\
И я ПЎО^{E}Ðœ вступа^{A}ю Ма ЎПрП^{Dm}гу. \\
^{A}\: \: \: ^{Dm}
\end{verse}
\end{song}

\chords{ % print a row of chords
  \mediumchords
  % fingers: n, x, o, p{n}, f{n}
  \def\numfrets{2}
  \origchord{t{I}}{x,x,bf1p1,f3p2,f2p1,f4p2}{E\flat dim7}
  \origchord{t{IV}}{x,x,bf1p1,f3p2,f2p1,f4p2}{F\sharp dim7}
  \origchord{t{IV}}{x,x,bo,f3p2,f2p1,f4p2}{F\sharp dim7/D}
  \def\numfrets{6}
  \origchord{t{V}}{f1p1,bf1p1,f2p3,f4p6,f1p1,f1p1}{Dm9}
  \def\numfrets{5}
  \origchord{t{V}}{f1p1,bf1p1,f3p3,f4p5,f2p2,f1p1}{Dm9}
  \origchord{t{III}}{bf1p1,f2p3,f4p5,f1p1,f1p1,f1p1}{Gm9}
}

\chords{ % print a row of chords
  \mediumchords
  %% % fingers: n, x, o, p{n}, f{n}
  \def\numfrets{3}
  \origchord{t{V}}{n,bo,f3p3,f4p3,f1p1,f1p1}{Asus4}
  \origchord{t{V}}{n,bo,f3p3,f2p2,f1p1,f1p1}{A}
  \origchord{t{VI}}{x,x,f3p3,f2p2,f1p1,o}{Bsus4}
  \def\numfrets{4}
  \origchord{t{IV}}{ob,f4p4,f3p3,f1p1,o,o}{E}
}

\end{document}