#!@PERL@ -w
+# -*-perl-*-
=head1 TODO
}
+sub convert_0_1_0_to_0_1_1
+{
+ s/\\tempo (.*):(.*);/\\tempo $1 = $2;/g
+}
###############################################################
sub last_conversion
"0.0.58" => \&convert_0_0_57_to_0_0_58,
"0.0.59" => \&convert_0_0_58_to_0_0_59,
"0.0.60" => \&convert_0_0_59_to_0_0_60,
- "0.0.61" => \&convert_0_0_60_to_0_0_61
+ "0.0.61" => \&convert_0_0_60_to_0_0_61,
+ "0.1.1" => \&convert_0_1_0_to_0_1_1
);
sub versions
{
- return (sort keys %minor_conversions);
+ return (sort { cmpver; } (keys %minor_conversions));
}
-sub show_rules
+sub show_rules
{
- print "Rules: ", join(", ", sort keys %minor_conversions), "\n";
+ my (@v) = versions;
+
+ print "Rules: ", join(", ", @v), "\n";
}
my @applicable_conversion;
my @mudela_levels;
-# die "This is too old to convert " if $from < 50;
my @v = versions;
foreach $ver (@v) {
if (version_compare($ver, $from) > 0 && version_compare($ver,$to) <= 0 ){
\include "performer.ly"
default_midi = \midi {
- \tempo 4:60;
+ \tempo 4=60;
\requesttranslator{ \default_midi_perf }
}
Tested Features:test the Collision resolution
EndMudelaHeader
%}
-\version "0.1.0";
+\version "0.1.1";
% (maybe even sooner :-)
%
-\version "0.0.58";
+\version "0.1.1";
alto = \melodic{
Tested Features: local key, key, forced accidentals
EndMudelaHeader
%}
-\version "0.1.0";
+\version "0.1.1";
blah = \melodic{
description: bare bones version. (written down from memory :-)
composers: Mozart, KV 265
entered-by: HWN
- copyright: none
+ copyright: PD
Tested Features: example file with comments
EndMudelaHeader
%}
-\version "0.1.0";
+\version "0.1.1";
% the % is a comment.
%}
-\version "0.1.0";
+\version "0.1.1";
\score{
\melodic
% \lbheel \lbheel \lfheel \lftoe
% \rbheel \rbtoe \rfheel \rftoe
-\version "0.1.0";
+\version "0.1.1";
\score{
\melodic {
-\version "0.1.0";
+\version "0.1.1";
ritme = \melodic{ %\octave ;
\partial 8;
% scales with accents.
%
-\version "0.1.0";
+\version "0.1.1";
blah = \melodic {
\meter 6/8;
\octave 'c ;
Tested Features: scripts, text.
EndMudelaHeader
%}
-\version "0.1.0";
+\version "0.1.1";
blah = \melodic {
description:
composer(s): HWN
entered-by: HWN
- copyright: GPL
+ copyright: PD
Tested Features: test slurs and ties
EndMudelaHeader
%}
-\version "0.1.0";
+\version "0.1.1";
\score{
\melodic{\octave c';
--- /dev/null
+%{MudelaHeader
+
+ filename: twinkle.ly
+ title: Ah, vous dirais-je, maman
+ description: twinkle twinkle in pop-song-settings
+ composers: traditional
+
+ entered-by: HWN, chords by Johan Vromans
+ copyright: public domain
+
+ Tested Features: lyrics and chords
+EndMudelaHeader
+%}
+
+\version "0.1.1";
+
+melodie = \melodic {
+ \clef"violin";
+ \meter 2/4 ;
+ \octave c';
+
+ c4^"C" c | g g | a^"F" a | g2^"C" |
+ f4^"F" f | e^"C" e | d^"G7" d | c2^"C" |
+ g4^"G" g | f^"F" f | e^"C" e | d^"G7" d |
+ g^"G" g | f^"F" f | e^"C" e | d^"G7" d |
+ c4^"C" c | g g | a^"F" a | g2^"C" |
+ f4^"F" f | e^"C" e | d^"G7" d | c2^"C" |
+}
+
+texte = \lyric{
+
+ \textstyle "italic";
+ Ah!4 vous dir- ai_- je ma man2
+ Ce4 qui cau- se mon tour- ment2
+ Pa-4 pa veut que je rai- so- nne
+ Comme4 un- e grand- e per- so- nne
+ Moi4 je dis que les bon- bons2
+ Val-4 ent mieux que la rai- son2
+
+}
+
+\score {
+ < \melodic < \id "Piano" ""; \melodie >
+ \lyric < \id "Lyric" ""; \texte >
+ >
+ \paper { unitspace= 2.5\cm; }
+}