head_music 8.3.0 → 9.0.1

data/lib/head_music/instruments/score_orders.yml

@@ -0,0 +1,130 @@
+---
+orchestral:
+  name: "Orchestral"
+  sections:
+    - section_key: woodwind
+      instruments:
+        - piccolo_flute
+        - flute
+        - alto_flute
+        - alto_recorder
+        - soprano_recorder
+        - tenor_recorder
+        - oboe
+        - english_horn
+        - clarinet
+        - alto_clarinet
+        - bass_clarinet
+        - soprano_saxophone
+        - alto_saxophone
+        - tenor_saxophone
+        - baritone_saxophone
+        - bassoon
+        - contrabassoon
+    - section_key: brass
+      instruments:
+        - french_horn
+        - trumpet
+        - cornet
+        - trombone
+        - bass_trombone
+        - tuba
+    - section_key: percussion
+      instruments:
+        - timpani
+        - snare_drum
+        - bass_drum
+        - cymbal
+        - gong
+        - xylophone
+        - glockenspiel
+        - marimba
+        - vibraphone
+        - percussion
+    - section_key: keyboard
+      instruments:
+        - harp
+        - piano
+        - celesta
+        - harpsichord
+        - organ
+    - section_key: voice
+      instruments:
+        - soprano_voice
+        - alto_voice
+        - tenor_voice
+        - bass_voice
+    - section_key: string
+      instruments:
+        - violin
+        - viola
+        - cello
+        - double_bass
+
+band:
+  name: "Concert Band"
+  sections:
+    - section_key: woodwind
+      instruments:
+        - piccolo
+        - flute
+        - oboe
+        - english_horn
+        - bassoon
+        - contrabassoon
+        - clarinet
+        - alto_clarinet
+        - bass_clarinet
+        - soprano_saxophone
+        - alto_saxophone
+        - tenor_saxophone
+        - baritone_saxophone
+    - section_key: brass
+      instruments:
+        - cornet
+        - trumpet
+        - french_horn
+        - trombone
+        - bass_trombone
+        - euphonium
+        - baritone_horn
+        - tuba
+    - section_key: percussion
+      instruments:
+        - timpani
+        - snare_drum
+        - bass_drum
+        - cymbal
+        - percussion
+
+brass_quintet:
+  name: "Brass Quintet"
+  sections:
+    - section_key: brass
+      instruments:
+        - trumpet  # First trumpet
+        - trumpet  # Second trumpet
+        - french_horn
+        - trombone
+        - tuba
+
+woodwind_quintet:
+  name: "Woodwind Quintet"
+  sections:
+    - section_key: mixed
+      instruments:
+        - flute
+        - oboe
+        - clarinet
+        - french_horn  # Horn is traditional in woodwind quintets
+        - bassoon
+
+string_quartet:
+  name: "String Quartet"
+  sections:
+    - section_key: string
+      instruments:
+        - violin  # First violin
+        - violin  # Second violin
+        - viola
+        - cello

data/lib/head_music/instruments/variant.rb

@@ -35,4 +35,10 @@ class HeadMusic::Instruments::Variant
     @default_staff_scheme ||=
       staff_schemes.find(&:default?) || staff_schemes.first
   end
+
+  def ==(other)
+    return false unless other.is_a?(self.class)
+
+    key == other.key && attributes == other.attributes
+  end
 end

data/lib/head_music/locales/de.yml

@@ -1,5 +1,11 @@
 de:
   head_music:
+    alterations:
+      sharp: Kreuz
+      flat: Be
+      natural: Auflösungszeichen
+      double_sharp: Doppelkreuz
+      double_flat: Doppel-Be
     chromatic_intervals:
       perfect_unison: reine Prime
       minor_second: kleine Sekunde

data/lib/head_music/locales/en.yml

@@ -1,5 +1,11 @@
 en:
   head_music:
+    alterations:
+      sharp: sharp
+      flat: flat
+      natural: natural
+      double_sharp: double sharp
+      double_flat: double flat
     chromatic_intervals:
       perfect_unison: perfect unison
       minor_second: minor second

data/lib/head_music/locales/es.yml

@@ -1,5 +1,11 @@
 es:
   head_music:
+    alterations:
+      sharp: sostenido
+      flat: bemol
+      natural: becuadro
+      double_sharp: doble sostenido
+      double_flat: doble bemol
     chromatic_intervals:
       perfect_unison: unísono perfecto
       minor_second: segunda menor

data/lib/head_music/locales/fr.yml

@@ -1,5 +1,11 @@
 fr:
   head_music:
+    alterations:
+      sharp: dièse
+      flat: bémol
+      natural: bécarre
+      double_sharp: double dièse
+      double_flat: double bémol
     chromatic_intervals:
       perfect_unison: unisson parfait
       minor_second: seconde mineure

data/lib/head_music/locales/it.yml

@@ -1,5 +1,11 @@
 it:
   head_music:
+    alterations:
+      sharp: diesis
+      flat: bemolle
+      natural: bequadro
+      double_sharp: doppio diesis
+      double_flat: doppio bemolle
     chromatic_intervals:
       perfect_unison: unisono perfetto
       minor_second: seconda minore

data/lib/head_music/locales/ru.yml

@@ -1,5 +1,11 @@
 ru:
   head_music:
+    alterations:
+      sharp: диез
+      flat: бемоль
+      natural: бекар
+      double_sharp: дубль-диез
+      double_flat: дубль-бемоль
     chromatic_intervals:
       perfect_unison: чистый унисон
       minor_second: малая секунда

data/lib/head_music/rudiment/alteration.rb

@@ -5,8 +5,9 @@ module HeadMusic::Rudiment; end
 
 # An Alteration is a symbol that modifies pitch, such as a sharp, flat, or natural.
 # In French, sharps and flats in the key signature are called "altérations".
-class HeadMusic::Rudiment::Alteration
+class HeadMusic::Rudiment::Alteration < HeadMusic::Rudiment::Base
   include Comparable
+  include HeadMusic::Named
 
   attr_reader :identifier, :cents, :musical_symbols
 
@@ -36,6 +37,9 @@ class HeadMusic::Rudiment::Alteration
   ].freeze
 
   ALTERATION_IDENTIFIERS = ALTERATION_RECORDS.map { |attributes| attributes[:identifier] }.freeze
+  SYMBOLS = ALTERATION_RECORDS.map { |attributes| attributes[:symbols].map { |symbol| [symbol[:unicode], symbol[:ascii]] } }.flatten.freeze
+  PATTERN = Regexp.union(SYMBOLS.reject { |s| s.nil? || s.empty? })
+  MATCHER = PATTERN
 
   def self.all
     ALTERATION_RECORDS.map { |attributes| new(attributes) }
@@ -45,12 +49,8 @@ class HeadMusic::Rudiment::Alteration
     @symbols ||= all.map { |alteration| [alteration.ascii, alteration.unicode] }.flatten.reject { |s| s.nil? || s.empty? }
   end
 
-  def self.matcher
-    @matcher ||= Regexp.new symbols.join("|")
-  end
-
   def self.symbol?(candidate)
-    candidate =~ /^(#{matcher})$/
+    SYMBOLS.include?(candidate)
   end
 
   def self.get(identifier)
@@ -67,8 +67,16 @@ class HeadMusic::Rudiment::Alteration
     end
   end
 
-  def name
-    identifier.to_s.tr("_", " ")
+  def self.get_by_name(name)
+    all.detect { |alteration| alteration.name == name.to_s }
+  end
+
+  def self.from_pitched_item(input)
+    nil
+  end
+
+  def name(locale_code: I18n.locale)
+    super || identifier.to_s.tr("_", " ")
   end
 
   def representions
@@ -103,6 +111,13 @@ class HeadMusic::Rudiment::Alteration
     @identifier = attributes[:identifier]
     @cents = attributes[:cents]
     initialize_musical_symbols(attributes[:symbols])
+    initialize_localized_names
+  end
+
+  def initialize_localized_names
+    # Initialize default English names
+    ensure_localized_name(name: identifier.to_s.tr("_", " "), locale_code: :en)
+    # Additional localized names will be loaded from locale files
   end
 
   def initialize_musical_symbols(list)

data/lib/head_music/rudiment/base.rb

@@ -0,0 +1,9 @@
+module HeadMusic::Rudiment; end
+
+class HeadMusic::Rudiment::Base
+  private
+
+  def initialize
+    raise NotImplementedError, "Cannot instantiate abstract rudiment base class"
+  end
+end

data/lib/head_music/rudiment/chromatic_interval.rb

@@ -2,7 +2,7 @@
 module HeadMusic::Rudiment; end
 
 # A chromatic interval is the distance between two pitches measured in half-steps.
-class HeadMusic::Rudiment::ChromaticInterval
+class HeadMusic::Rudiment::ChromaticInterval < HeadMusic::Rudiment::Base
   include Comparable
   include HeadMusic::Named
 
@@ -23,11 +23,8 @@ class HeadMusic::Rudiment::ChromaticInterval
   end
 
   def initialize(identifier)
-    if /^\D/i.match?(identifier.to_s.strip)
-      candidate = identifier.to_s.downcase.gsub(/\W+/, "_")
-      semitones = NAMES.index(candidate) || identifier.to_i
-    end
-    @semitones = semitones || identifier.to_i
+    candidate = HeadMusic::Utilities::HashKey.for(identifier).to_s
+    @semitones = NAMES.index(candidate) || identifier.to_i
     set_name
   end
 

data/lib/head_music/rudiment/clef.rb

@@ -4,7 +4,7 @@ require "yaml"
 module HeadMusic::Rudiment; end
 
 # A clef assigns pitches to the lines and spaces of a staff.
-class HeadMusic::Rudiment::Clef
+class HeadMusic::Rudiment::Clef < HeadMusic::Rudiment::Base
   include HeadMusic::Named
 
   RECORDS = YAML.load_file(File.expand_path("clefs.yml", __dir__)).freeze

data/lib/head_music/rudiment/consonance.rb

@@ -1,13 +1,30 @@
 # A module for music rudiments
 module HeadMusic::Rudiment; end
 
-# Consonance describes a category or degree of harmonic pleasantness: perfect, imperfect, or dissonant
-class HeadMusic::Rudiment::Consonance
-  LEVELS = %w[perfect imperfect dissonant].freeze
+# Consonance describes a category or degree of harmonic pleasantness
+class HeadMusic::Rudiment::Consonance < HeadMusic::Rudiment::Base
+  # Detailed categories aligned with music theory
+  LEVELS = %w[
+    perfect_consonance
+    imperfect_consonance
+    contextual
+    mild_dissonance
+    harsh_dissonance
+    dissonance
+  ].freeze
+
+  # Constants for each consonance level
+  PERFECT_CONSONANCE = :perfect_consonance
+  IMPERFECT_CONSONANCE = :imperfect_consonance
+  CONTEXTUAL = :contextual
+  MILD_DISSONANCE = :mild_dissonance
+  HARSH_DISSONANCE = :harsh_dissonance
+  DISSONANCE = :dissonance
 
   def self.get(name)
     @consonances ||= {}
-    @consonances[name.to_sym] ||= new(name) if LEVELS.include?(name.to_s)
+    name_sym = name.to_sym
+    @consonances[name_sym] ||= new(name) if LEVELS.include?(name.to_s)
   end
 
   attr_reader :name
@@ -22,6 +39,22 @@ class HeadMusic::Rudiment::Consonance
     to_s == other.to_s
   end
 
+  # Check if this represents a consonance (perfect or imperfect)
+  def consonant?
+    [PERFECT_CONSONANCE, IMPERFECT_CONSONANCE].include?(name)
+  end
+
+  # Check if this represents any form of dissonance
+  def dissonant?
+    [MILD_DISSONANCE, HARSH_DISSONANCE, DISSONANCE].include?(name)
+  end
+
+  # Contextual is special - neither strictly consonant nor dissonant
+  def contextual?
+    name == CONTEXTUAL
+  end
+
+  # Predicate methods for each level
   LEVELS.each do |method_name|
     define_method(:"#{method_name}?") { to_s == method_name }
   end

data/lib/head_music/rudiment/diatonic_context.rb

@@ -0,0 +1,25 @@
+# A module for music rudiments
+module HeadMusic::Rudiment; end
+
+# Abstract class representing a diatonic tonal context (7-note scale system)
+class HeadMusic::Rudiment::DiatonicContext < HeadMusic::Rudiment::TonalContext
+  def scale_type
+    raise NotImplementedError, "Subclasses must implement #scale_type"
+  end
+
+  def scale
+    @scale ||= HeadMusic::Rudiment::Scale.get(tonic_spelling, scale_type)
+  end
+
+  def key_signature
+    @key_signature ||= HeadMusic::Rudiment::KeySignature.from_scale(scale)
+  end
+
+  def relative
+    raise NotImplementedError, "Subclasses must implement #relative"
+  end
+
+  def parallel
+    raise NotImplementedError, "Subclasses must implement #parallel"
+  end
+end

data/lib/head_music/rudiment/key.rb

@@ -0,0 +1,77 @@
+# A module for music rudiments
+module HeadMusic::Rudiment; end
+
+# Represents a musical key (major or minor)
+class HeadMusic::Rudiment::Key < HeadMusic::Rudiment::DiatonicContext
+  include HeadMusic::Named
+
+  QUALITIES = %i[major minor].freeze
+
+  attr_reader :quality
+
+  def self.get(identifier)
+    return identifier if identifier.is_a?(HeadMusic::Rudiment::Key)
+
+    @keys ||= {}
+    tonic_spelling, quality_name = parse_identifier(identifier)
+    hash_key = HeadMusic::Utilities::HashKey.for(identifier)
+    @keys[hash_key] ||= new(tonic_spelling, quality_name)
+  end
+
+  def self.parse_identifier(identifier)
+    tonic_spelling, quality_name = identifier.to_s.strip.split(/\s+/)
+    quality_name ||= "major"
+    [tonic_spelling, quality_name]
+  end
+
+  def initialize(tonic_spelling, quality = :major)
+    super(tonic_spelling)
+    @quality = quality.to_s.downcase.to_sym
+    raise ArgumentError, "Quality must be :major or :minor" unless QUALITIES.include?(@quality)
+  end
+
+  def scale_type
+    @scale_type ||= HeadMusic::Rudiment::ScaleType.get(quality)
+  end
+
+  def major?
+    quality == :major
+  end
+
+  def minor?
+    quality == :minor
+  end
+
+  def relative
+    if major?
+      # Major to relative minor: down a minor third (3 semitones)
+      relative_pitch = tonic_pitch + -3
+      self.class.get("#{relative_pitch.spelling} minor")
+    else
+      # Minor to relative major: up a minor third (3 semitones)
+      relative_pitch = tonic_pitch + 3
+      self.class.get("#{relative_pitch.spelling} major")
+    end
+  end
+
+  def parallel
+    if major?
+      self.class.get("#{tonic_spelling} minor")
+    else
+      self.class.get("#{tonic_spelling} major")
+    end
+  end
+
+  def name
+    "#{tonic_spelling} #{quality}"
+  end
+
+  def to_s
+    name
+  end
+
+  def ==(other)
+    other = self.class.get(other)
+    tonic_spelling == other.tonic_spelling && quality == other.quality
+  end
+end

data/lib/head_music/rudiment/key_signature/enharmonic_equivalence.rb

@@ -1,4 +1,4 @@
-# Key signatures are enharmonic when all pitch classes in one are respellings of the pitch classes in the other.
+# Key signatures are enharmonic when they represent the same set of altered pitch classes but with different spellings.
 class HeadMusic::Rudiment::KeySignature::EnharmonicEquivalence
   attr_reader :key_signature
 

data/lib/head_music/rudiment/key_signature.rb

@@ -1,9 +1,10 @@
 # A module for music rudiments
 module HeadMusic::Rudiment; end
 
-# Represents a key signature.
-class HeadMusic::Rudiment::KeySignature
-  attr_reader :tonic_spelling, :scale_type, :scale
+# Represents a key signature (traditionally associated with a key)
+# This class maintains backward compatibility while delegating to Key/Mode internally
+class HeadMusic::Rudiment::KeySignature < HeadMusic::Rudiment::Base
+  attr_reader :tonal_context
 
   ORDERED_LETTER_NAMES_OF_SHARPS = %w[F C G D A E B].freeze
   ORDERED_LETTER_NAMES_OF_FLATS = ORDERED_LETTER_NAMES_OF_SHARPS.reverse.freeze
@@ -16,14 +17,32 @@ class HeadMusic::Rudiment::KeySignature
     return identifier if identifier.is_a?(HeadMusic::Rudiment::KeySignature)
 
     @key_signatures ||= {}
-    tonic_spelling, scale_type_name = identifier.strip.split(/\s/)
-    hash_key = HeadMusic::Utilities::HashKey.for(identifier.gsub(/#|♯/, " sharp").gsub(/(\w)[b♭]/, '\\1 flat'))
-    @key_signatures[hash_key] ||= new(tonic_spelling, scale_type_name)
+
+    if identifier.is_a?(String)
+      tonic_spelling, scale_type_name = identifier.strip.split(/\s/)
+      hash_key = HeadMusic::Utilities::HashKey.for(identifier.gsub(/#|♯/, " sharp").gsub(/(\w)[b♭]/, '\\1 flat'))
+      @key_signatures[hash_key] ||= new(tonic_spelling, scale_type_name)
+    elsif identifier.is_a?(HeadMusic::Rudiment::DiatonicContext)
+      identifier.key_signature
+    end
+  end
+
+  def self.from_tonal_context(tonal_context)
+    new_from_context(tonal_context)
   end
 
+  def self.from_scale(scale)
+    # Find a key or mode that uses this scale
+    tonic = scale.root_pitch.spelling
+    scale_type = scale.scale_type
+    new(tonic, scale_type)
+  end
+
+  attr_reader :tonic_spelling, :scale_type, :scale
+
   delegate :pitch_class, to: :tonic_spelling, prefix: :tonic
-  delegate :to_s, to: :name
   delegate :pitches, :pitch_classes, to: :scale
+  delegate :to_s, to: :name
 
   def initialize(tonic_spelling, scale_type = nil)
     @tonic_spelling = HeadMusic::Rudiment::Spelling.get(tonic_spelling)
@@ -31,6 +50,26 @@ class HeadMusic::Rudiment::KeySignature
     @scale_type ||= HeadMusic::Rudiment::ScaleType.default
     @scale_type = @scale_type.parent || @scale_type
     @scale = HeadMusic::Rudiment::Scale.get(@tonic_spelling, @scale_type)
+
+    # Create appropriate tonal context
+    scale_type_str = scale_type.to_s.downcase if scale_type
+
+    @tonal_context = if %w[major minor].include?(scale_type_str)
+      HeadMusic::Rudiment::Key.get("#{tonic_spelling} #{scale_type}")
+    elsif scale_type
+      HeadMusic::Rudiment::Mode.get("#{tonic_spelling} #{scale_type}")
+    else
+      HeadMusic::Rudiment::Key.get("#{tonic_spelling} major")
+    end
+  rescue ArgumentError
+    # Fall back to creating a major key if mode is not recognized
+    @tonal_context = HeadMusic::Rudiment::Key.get("#{tonic_spelling} major")
+  end
+
+  def self.new_from_context(context)
+    instance = allocate
+    instance.instance_variable_set(:@tonal_context, context)
+    instance
   end
 
   def spellings

data/lib/head_music/rudiment/letter_name.rb

@@ -2,8 +2,10 @@
 module HeadMusic::Rudiment; end
 
 # Music has seven lette names that are used to identify pitches and pitch classes.
-class HeadMusic::Rudiment::LetterName
+class HeadMusic::Rudiment::LetterName < HeadMusic::Rudiment::Base
   NAMES = %w[C D E F G A B].freeze
+  PATTERN = /[A-Ga-g]/
+  MATCHER = /^#{PATTERN}$/
 
   NATURAL_PITCH_CLASS_NUMBERS = {
     "C" => 0,
@@ -96,6 +98,4 @@ class HeadMusic::Rudiment::LetterName
       series
     end
   end
-
-  private_class_method :new
 end

data/lib/head_music/rudiment/meter.rb

@@ -2,7 +2,7 @@
 module HeadMusic::Rudiment; end
 
 # Meter is the rhythmic size of a measure, such as 4/4 or 6/8
-class HeadMusic::Rudiment::Meter
+class HeadMusic::Rudiment::Meter < HeadMusic::Rudiment::Base
   attr_reader :top_number, :bottom_number
 
   NAMED = {
@@ -15,7 +15,7 @@ class HeadMusic::Rudiment::Meter
     hash_key = HeadMusic::Utilities::HashKey.for(identifier)
     time_signature_string = NAMED[hash_key] || identifier
     @meters ||= {}
-    @meters[hash_key] ||= new(*time_signature_string.split("/").map(&:to_i))
+    @meters[hash_key] ||= new(*time_signature_string.split("/"))
   end
 
   def self.default
@@ -31,8 +31,8 @@ class HeadMusic::Rudiment::Meter
   end
 
   def initialize(top_number, bottom_number)
-    @top_number = top_number
-    @bottom_number = bottom_number
+    @top_number = top_number.to_i
+    @bottom_number = bottom_number.to_i
   end
 
   def simple?
@@ -63,6 +63,10 @@ class HeadMusic::Rudiment::Meter
     top_number
   end
 
+  def counts_per_quarter_note
+    0.25 / count_unit.relative_value
+  end
+
   def beat_strength(count, tick: 0)
     return 100 if downbeat?(count, tick)
     return 80 if strong_beat?(count, tick)
@@ -76,19 +80,25 @@ class HeadMusic::Rudiment::Meter
     @ticks_per_count ||= count_unit.ticks
   end
 
+  # The rhythmic unit for the count (bottom number).
+  # This unit is also used as "beats" in a sequencer context
+  #   For example, "1:3:000"
   def count_unit
     HeadMusic::Rudiment::RhythmicUnit.for_denominator_value(bottom_number)
   end
 
-  def beat_unit
-    @beat_unit ||=
+  def beat_value
+    @beat_value ||=
       if compound?
-        HeadMusic::Content::RhythmicValue.new(HeadMusic::Rudiment::RhythmicUnit.for_denominator_value(bottom_number / 2), dots: 1)
+        HeadMusic::Rudiment::RhythmicValue.new(HeadMusic::Rudiment::RhythmicUnit.for_denominator_value(bottom_number / 2), dots: 1)
       else
-        HeadMusic::Content::RhythmicValue.new(count_unit)
+        HeadMusic::Rudiment::RhythmicValue.new(count_unit)
       end
   end
 
+  # for consistency with conversational usage
+  alias_method :beat_unit, :beat_value
+
   def to_s
     [top_number, bottom_number].join("/")
   end
@@ -133,6 +143,6 @@ class HeadMusic::Rudiment::Meter
   end
 
   def beat?(tick)
-    tick.zero?
+    tick.to_i.zero?
   end
 end