Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

Expand octave range a bit to allow bass clef tunes.

  • Loading branch information...
commit fb9a8ffc813287e3ad41461e5218d3c021f33343 1 parent e6cc1fa
@colomon authored
Showing with 7 additions and 1 deletion.
  1. +7 −1 bin/abc2ly
View
8 bin/abc2ly
@@ -20,7 +20,9 @@ my %accidental-map = ( '' => "",
'_' => "es",
'__' => "eses" );
-my %octave-map = ( -1 => "",
+my %octave-map = ( -3 => ",,",
+ -2 => ",",
+ -1 => "",
0 => "'",
1 => "''",
2 => "'''" );
@@ -49,6 +51,10 @@ class Context {
when /\,/ { $octave -= $abc-pitch.octave.chars }
when /\'/ { $octave += $abc-pitch.octave.chars }
}
+ # say $octave;
+ # say $abc-pitch.basenote.lc;
+ # say %accidental-map{$real-accidental};
+ # say %octave-map{$octave};
$abc-pitch.basenote.lc ~ %accidental-map{$real-accidental} ~ %octave-map{$octave};
}
Please sign in to comment.
Something went wrong with that request. Please try again.