stanza numbering

[Thomas Willhalm]

Hello,

Christmas is approaching and so I'm typesetting some Christmas songs. 
Attached to this email you should a version of one. Obviously, the numbering 
of the stanzas isn't satisfying. Any ideas how this can be improved? 

Best regards 
Thomas
\header {
 mutopiatitle = "Es kam ein treuer Bote"
 mutopiacomposer = "Nikolaus Beuttner"
 mutopiapoet = "Joseph Mohr"
 mutopiainstrument = "Voice"
 date = "1602"
 source = "Gotteslob"
 style = "Hymn"
 copyright = "MutopiaBSD"
 maintainer = "Thomas Willhalm"
 maintainerEmail = "[EMAIL PROTECTED]"
 lastupdated = "2001/Dec/10"
}
melodie = \notes \relative c' { \key f \major
 \property Staff.midiInstrument = "flute"
 \property Staff.transposing = #+12
 \property Staff.automaticMelismata = ##t
 \partial 4
 f4 | f g a bes | c2 c4 \breathe c | d c bes c | a2 r4 \bar "empty" \break
 c4 | bes a g bes | a()g f \breathe a | g f g g | f2 r4
 \bar "|."
}
textstrophea = \lyrics { 
 Es kam ein treu -- er Bo -- te, er kam vom Him -- mels -- thron;
 wen fand er in dem Hütt -- lein? Ma -- ri -- a,der Jung -- fraun Kron.
}
textstropheb = \lyrics {
 Der Bo -- te, den ich mei -- ne, der ist uns wohl -- be -- kannt;
 es ist ein En -- gel Got -- tes, wird Ga -- bri -- el ge -- nannt.
}
textstrophec = \lyrics {
 Die Stim -- me er  er -- he --bet, die lau -- tet al -- so wohl:
 \"`Ge -- grüßt seist du, Ma -- ri -- a, bist vol -- ler Gna -- den voll.
}
textstrophed = \lyrics {
 Ge -- grüßt seist du, Ma -- ri -- a, du ed -- le Jung -- frau rein;
 durch Kraft des Heil -- gen Geis -- tes sollst Got -- tes Mut -- ter sein.''
}
textstrophee = \lyrics {
 Ma -- ri -- a, die Er -- wähl -- te, fiel nie -- der auf die Knie;  
 dann bat sie Gott im Him -- mel: \"`Dein Will ge -- scheh all -- hie.
}
textstrophef = \lyrics {
 Dein Wil -- le soll ge -- sche -- hen'',  so fleht sie him -- mel -- wärts; 
 da nahm sie Je -- sus Chris -- tus in ihr jung -- fräu -- lich Herz.
}
textstropheg = \lyrics {
 O hei -- li -- ge Ma -- ri -- a,  nun bitt für uns dein Kind, 
 dass es uns Gnad ver -- lei -- he,  ver -- zei -- he uns -- re Sünd.
}

\score {
 \notes {
  \simultaneous {
     \addlyrics
     \context Staff \melodie
     \context Lyrics <
         \context LyricsVoice = "strophe-1" {\property LyricsVoice.stanza = "1." 
\textstrophea }  
         \context LyricsVoice = "strophe-2" {\property LyricsVoice.stanza = "2." 
\textstropheb }  
         \context LyricsVoice = "strophe-3" {\property LyricsVoice.stanza = "3." 
\textstrophec }  
         \context LyricsVoice = "strophe-4" {\property LyricsVoice.stanza = "4." 
\textstrophed }  
         \context LyricsVoice = "strophe-5" {\property LyricsVoice.stanza = "5." 
\textstrophee }  
         \context LyricsVoice = "strophe-6" {\property LyricsVoice.stanza = "6." 
\textstrophef }  
         \context LyricsVoice = "strophe-7" {\property LyricsVoice.stanza = "7." 
\textstropheg }  
         >
  }
 }
  \midi  { \tempo 4 = 120 }
  \paper { linewidth = 6.375 \in indent = 0.0 }
}