⌈⌋ ⎇ branch:  Bitrhythm


Hex Artifact Content

Artifact 9bd285dd5ccae3a8d136e1aa1e17a1ac263a25490e2596583ee928146d9680cc:


0000: 76 61 72 20 64 61 63 63 6f 72 64 20 3d 20 72 65  var daccord = re
0010: 71 75 69 72 65 28 27 64 61 63 63 6f 72 64 27 29  quire('daccord')
0020: 3b 0a 76 61 72 20 6b 6e 6f 77 6c 65 64 67 65 20  ;.var knowledge 
0030: 3d 20 72 65 71 75 69 72 65 28 27 2e 2f 6b 6e 6f  = require('./kno
0040: 77 6c 65 64 67 65 27 29 3b 0a 76 61 72 20 4e 6f  wledge');.var No
0050: 74 65 20 3d 20 72 65 71 75 69 72 65 28 27 2e 2f  te = require('./
0060: 6e 6f 74 65 27 29 3b 0a 76 61 72 20 49 6e 74 65  note');.var Inte
0070: 72 76 61 6c 20 3d 20 72 65 71 75 69 72 65 28 27  rval = require('
0080: 2e 2f 69 6e 74 65 72 76 61 6c 27 29 3b 0a 0a 66  ./interval');..f
0090: 75 6e 63 74 69 6f 6e 20 43 68 6f 72 64 28 72 6f  unction Chord(ro
00a0: 6f 74 2c 20 6e 61 6d 65 29 20 7b 0a 20 20 69 66  ot, name) {.  if
00b0: 20 28 21 28 74 68 69 73 20 69 6e 73 74 61 6e 63   (!(this instanc
00c0: 65 6f 66 20 43 68 6f 72 64 29 29 20 72 65 74 75  eof Chord)) retu
00d0: 72 6e 20 6e 65 77 20 43 68 6f 72 64 28 72 6f 6f  rn new Chord(roo
00e0: 74 2c 20 6e 61 6d 65 29 3b 0a 20 20 6e 61 6d 65  t, name);.  name
00f0: 20 3d 20 6e 61 6d 65 20 7c 7c 20 27 27 3b 0a 20   = name || '';. 
0100: 20 74 68 69 73 2e 6e 61 6d 65 20 3d 20 72 6f 6f   this.name = roo
0110: 74 2e 6e 61 6d 65 28 29 2e 74 6f 55 70 70 65 72  t.name().toUpper
0120: 43 61 73 65 28 29 20 2b 20 72 6f 6f 74 2e 61 63  Case() + root.ac
0130: 63 69 64 65 6e 74 61 6c 28 29 20 2b 20 6e 61 6d  cidental() + nam
0140: 65 3b 0a 20 20 74 68 69 73 2e 73 79 6d 62 6f 6c  e;.  this.symbol
0150: 20 3d 20 6e 61 6d 65 3b 0a 20 20 74 68 69 73 2e   = name;.  this.
0160: 72 6f 6f 74 20 3d 20 72 6f 6f 74 3b 0a 20 20 74  root = root;.  t
0170: 68 69 73 2e 69 6e 74 65 72 76 61 6c 73 20 3d 20  his.intervals = 
0180: 5b 5d 3b 0a 20 20 74 68 69 73 2e 5f 76 6f 69 63  [];.  this._voic
0190: 69 6e 67 20 3d 20 5b 5d 3b 0a 0a 20 20 76 61 72  ing = [];..  var
01a0: 20 62 61 73 73 20 3d 20 6e 61 6d 65 2e 73 70 6c   bass = name.spl
01b0: 69 74 28 27 2f 27 29 3b 0a 20 20 69 66 20 28 62  it('/');.  if (b
01c0: 61 73 73 2e 6c 65 6e 67 74 68 20 3d 3d 3d 20 32  ass.length === 2
01d0: 20 26 26 20 62 61 73 73 5b 31 5d 2e 74 72 69 6d   && bass[1].trim
01e0: 28 29 20 21 3d 3d 20 27 39 27 29 20 7b 0a 20 20  () !== '9') {.  
01f0: 20 20 6e 61 6d 65 20 3d 20 62 61 73 73 5b 30 5d    name = bass[0]
0200: 3b 0a 20 20 20 20 62 61 73 73 20 3d 20 62 61 73  ;.    bass = bas
0210: 73 5b 31 5d 2e 74 72 69 6d 28 29 3b 0a 20 20 7d  s[1].trim();.  }
0220: 20 65 6c 73 65 20 7b 0a 20 20 20 20 62 61 73 73   else {.    bass
0230: 20 3d 20 6e 75 6c 6c 3b 0a 20 20 7d 0a 0a 20 20   = null;.  }..  
0240: 74 68 69 73 2e 69 6e 74 65 72 76 61 6c 73 20 3d  this.intervals =
0250: 20 64 61 63 63 6f 72 64 28 6e 61 6d 65 29 2e 6d   daccord(name).m
0260: 61 70 28 49 6e 74 65 72 76 61 6c 2e 74 6f 43 6f  ap(Interval.toCo
0270: 6f 72 64 29 3b 0a 20 20 74 68 69 73 2e 5f 76 6f  ord);.  this._vo
0280: 69 63 69 6e 67 20 3d 20 74 68 69 73 2e 69 6e 74  icing = this.int
0290: 65 72 76 61 6c 73 2e 73 6c 69 63 65 28 29 3b 0a  ervals.slice();.
02a0: 0a 20 20 69 66 20 28 62 61 73 73 29 20 7b 0a 20  .  if (bass) {. 
02b0: 20 20 20 76 61 72 20 69 6e 74 65 72 76 61 6c 73     var intervals
02c0: 20 3d 20 74 68 69 73 2e 69 6e 74 65 72 76 61 6c   = this.interval
02d0: 73 2c 20 62 61 73 73 49 6e 74 65 72 76 61 6c 2c  s, bassInterval,
02e0: 20 6e 6f 74 65 3b 0a 20 20 20 20 2f 2f 20 4d 61   note;.    // Ma
02f0: 6b 65 20 73 75 72 65 20 74 68 65 20 62 61 73 73  ke sure the bass
0300: 20 69 73 20 61 74 6f 70 20 6f 66 20 74 68 65 20   is atop of the 
0310: 72 6f 6f 74 20 6e 6f 74 65 0a 20 20 20 20 6e 6f  root note.    no
0320: 74 65 20 3d 20 4e 6f 74 65 2e 66 72 6f 6d 53 74  te = Note.fromSt
0330: 72 69 6e 67 28 62 61 73 73 20 2b 20 28 72 6f 6f  ring(bass + (roo
0340: 74 2e 6f 63 74 61 76 65 28 29 20 2b 20 31 29 29  t.octave() + 1))
0350: 3b 20 2f 2f 20 63 72 75 64 65 0a 0a 20 20 20 20  ; // crude..    
0360: 62 61 73 73 49 6e 74 65 72 76 61 6c 20 3d 20 49  bassInterval = I
0370: 6e 74 65 72 76 61 6c 2e 62 65 74 77 65 65 6e 28  nterval.between(
0380: 72 6f 6f 74 2c 20 6e 6f 74 65 29 3b 0a 20 20 20  root, note);.   
0390: 20 62 61 73 73 20 3d 20 62 61 73 73 49 6e 74 65   bass = bassInte
03a0: 72 76 61 6c 2e 73 69 6d 70 6c 65 28 29 3b 0a 20  rval.simple();. 
03b0: 20 20 20 62 61 73 73 49 6e 74 65 72 76 61 6c 20     bassInterval 
03c0: 3d 20 62 61 73 73 49 6e 74 65 72 76 61 6c 2e 69  = bassInterval.i
03d0: 6e 76 65 72 74 28 29 2e 64 69 72 65 63 74 69 6f  nvert().directio
03e0: 6e 28 27 64 6f 77 6e 27 29 3b 0a 0a 20 20 20 20  n('down');..    
03f0: 74 68 69 73 2e 5f 76 6f 69 63 69 6e 67 20 3d 20  this._voicing = 
0400: 5b 62 61 73 73 49 6e 74 65 72 76 61 6c 5d 3b 0a  [bassInterval];.
0410: 20 20 20 20 66 6f 72 20 28 76 61 72 20 69 20 3d      for (var i =
0420: 20 30 2c 20 6c 65 6e 67 74 68 20 3d 20 69 6e 74   0, length = int
0430: 65 72 76 61 6c 73 2e 6c 65 6e 67 74 68 3b 20 20  ervals.length;  
0440: 69 20 3c 20 6c 65 6e 67 74 68 3b 20 69 2b 2b 29  i < length; i++)
0450: 20 7b 0a 20 20 20 20 20 20 69 66 20 28 21 69 6e   {.      if (!in
0460: 74 65 72 76 61 6c 73 5b 69 5d 2e 73 69 6d 70 6c  tervals[i].simpl
0470: 65 28 29 2e 65 71 75 61 6c 28 62 61 73 73 29 29  e().equal(bass))
0480: 0a 20 20 20 20 20 20 20 20 74 68 69 73 2e 5f 76  .        this._v
0490: 6f 69 63 69 6e 67 2e 70 75 73 68 28 69 6e 74 65  oicing.push(inte
04a0: 72 76 61 6c 73 5b 69 5d 29 3b 0a 20 20 20 20 7d  rvals[i]);.    }
04b0: 0a 20 20 7d 0a 7d 0a 0a 43 68 6f 72 64 2e 70 72  .  }.}..Chord.pr
04c0: 6f 74 6f 74 79 70 65 20 3d 20 7b 0a 20 20 6e 6f  ototype = {.  no
04d0: 74 65 73 3a 20 66 75 6e 63 74 69 6f 6e 28 29 20  tes: function() 
04e0: 7b 0a 20 20 20 20 76 61 72 20 72 6f 6f 74 20 3d  {.    var root =
04f0: 20 74 68 69 73 2e 72 6f 6f 74 3b 0a 20 20 20 20   this.root;.    
0500: 72 65 74 75 72 6e 20 74 68 69 73 2e 76 6f 69 63  return this.voic
0510: 69 6e 67 28 29 2e 6d 61 70 28 66 75 6e 63 74 69  ing().map(functi
0520: 6f 6e 28 69 6e 74 65 72 76 61 6c 29 20 7b 0a 20  on(interval) {. 
0530: 20 20 20 20 20 72 65 74 75 72 6e 20 72 6f 6f 74       return root
0540: 2e 69 6e 74 65 72 76 61 6c 28 69 6e 74 65 72 76  .interval(interv
0550: 61 6c 29 3b 0a 20 20 20 20 7d 29 3b 0a 20 20 7d  al);.    });.  }
0560: 2c 0a 0a 20 20 73 69 6d 70 6c 65 3a 20 66 75 6e  ,..  simple: fun
0570: 63 74 69 6f 6e 28 29 20 7b 0a 20 20 20 20 72 65  ction() {.    re
0580: 74 75 72 6e 20 74 68 69 73 2e 6e 6f 74 65 73 28  turn this.notes(
0590: 29 2e 6d 61 70 28 66 75 6e 63 74 69 6f 6e 28 6e  ).map(function(n
05a0: 29 20 7b 20 72 65 74 75 72 6e 20 6e 2e 74 6f 53  ) { return n.toS
05b0: 74 72 69 6e 67 28 74 72 75 65 29 3b 20 7d 29 3b  tring(true); });
05c0: 0a 20 20 7d 2c 0a 0a 20 20 62 61 73 73 3a 20 66  .  },..  bass: f
05d0: 75 6e 63 74 69 6f 6e 28 29 20 7b 0a 20 20 20 20  unction() {.    
05e0: 72 65 74 75 72 6e 20 74 68 69 73 2e 72 6f 6f 74  return this.root
05f0: 2e 69 6e 74 65 72 76 61 6c 28 74 68 69 73 2e 5f  .interval(this._
0600: 76 6f 69 63 69 6e 67 5b 30 5d 29 3b 0a 20 20 7d  voicing[0]);.  }
0610: 2c 0a 0a 20 20 76 6f 69 63 69 6e 67 3a 20 66 75  ,..  voicing: fu
0620: 6e 63 74 69 6f 6e 28 76 6f 69 63 69 6e 67 29 20  nction(voicing) 
0630: 7b 0a 20 20 20 20 2f 2f 20 47 65 74 20 74 68 65  {.    // Get the
0640: 20 76 6f 69 63 69 6e 67 0a 20 20 20 20 69 66 20   voicing.    if 
0650: 28 21 76 6f 69 63 69 6e 67 29 20 7b 0a 20 20 20  (!voicing) {.   
0660: 20 20 20 72 65 74 75 72 6e 20 74 68 69 73 2e 5f     return this._
0670: 76 6f 69 63 69 6e 67 3b 0a 20 20 20 20 7d 0a 0a  voicing;.    }..
0680: 20 20 20 20 2f 2f 20 53 65 74 20 74 68 65 20 76      // Set the v
0690: 6f 69 63 69 6e 67 0a 20 20 20 20 74 68 69 73 2e  oicing.    this.
06a0: 5f 76 6f 69 63 69 6e 67 20 3d 20 5b 5d 3b 0a 20  _voicing = [];. 
06b0: 20 20 20 66 6f 72 20 28 76 61 72 20 69 20 3d 20     for (var i = 
06c0: 30 2c 20 6c 65 6e 67 74 68 20 3d 20 76 6f 69 63  0, length = voic
06d0: 69 6e 67 2e 6c 65 6e 67 74 68 3b 20 69 20 3c 20  ing.length; i < 
06e0: 6c 65 6e 67 74 68 3b 20 69 2b 2b 29 20 7b 0a 20  length; i++) {. 
06f0: 20 20 20 20 20 74 68 69 73 2e 5f 76 6f 69 63 69       this._voici
0700: 6e 67 5b 69 5d 20 3d 20 49 6e 74 65 72 76 61 6c  ng[i] = Interval
0710: 2e 74 6f 43 6f 6f 72 64 28 76 6f 69 63 69 6e 67  .toCoord(voicing
0720: 5b 69 5d 29 3b 0a 20 20 20 20 7d 0a 0a 20 20 20  [i]);.    }..   
0730: 20 72 65 74 75 72 6e 20 74 68 69 73 3b 0a 20 20   return this;.  
0740: 7d 2c 0a 0a 20 20 72 65 73 65 74 56 6f 69 63 69  },..  resetVoici
0750: 6e 67 3a 20 66 75 6e 63 74 69 6f 6e 28 29 20 7b  ng: function() {
0760: 0a 20 20 20 20 74 68 69 73 2e 5f 76 6f 69 63 69  .    this._voici
0770: 6e 67 20 3d 20 74 68 69 73 2e 69 6e 74 65 72 76  ng = this.interv
0780: 61 6c 73 3b 0a 20 20 7d 2c 0a 0a 20 20 64 6f 6d  als;.  },..  dom
0790: 69 6e 61 6e 74 3a 20 66 75 6e 63 74 69 6f 6e 28  inant: function(
07a0: 61 64 64 69 74 69 6f 6e 61 6c 29 20 7b 0a 20 20  additional) {.  
07b0: 20 20 61 64 64 69 74 69 6f 6e 61 6c 20 3d 20 61    additional = a
07c0: 64 64 69 74 69 6f 6e 61 6c 20 7c 7c 20 27 27 3b  dditional || '';
07d0: 0a 20 20 20 20 72 65 74 75 72 6e 20 6e 65 77 20  .    return new 
07e0: 43 68 6f 72 64 28 74 68 69 73 2e 72 6f 6f 74 2e  Chord(this.root.
07f0: 69 6e 74 65 72 76 61 6c 28 27 50 35 27 29 2c 20  interval('P5'), 
0800: 61 64 64 69 74 69 6f 6e 61 6c 29 3b 0a 20 20 7d  additional);.  }
0810: 2c 0a 0a 20 20 73 75 62 64 6f 6d 69 6e 61 6e 74  ,..  subdominant
0820: 3a 20 66 75 6e 63 74 69 6f 6e 28 61 64 64 69 74  : function(addit
0830: 69 6f 6e 61 6c 29 20 7b 0a 20 20 20 20 61 64 64  ional) {.    add
0840: 69 74 69 6f 6e 61 6c 20 3d 20 61 64 64 69 74 69  itional = additi
0850: 6f 6e 61 6c 20 7c 7c 20 27 27 3b 0a 20 20 20 20  onal || '';.    
0860: 72 65 74 75 72 6e 20 6e 65 77 20 43 68 6f 72 64  return new Chord
0870: 28 74 68 69 73 2e 72 6f 6f 74 2e 69 6e 74 65 72  (this.root.inter
0880: 76 61 6c 28 27 50 34 27 29 2c 20 61 64 64 69 74  val('P4'), addit
0890: 69 6f 6e 61 6c 29 3b 0a 20 20 7d 2c 0a 0a 20 20  ional);.  },..  
08a0: 70 61 72 61 6c 6c 65 6c 3a 20 66 75 6e 63 74 69  parallel: functi
08b0: 6f 6e 28 61 64 64 69 74 69 6f 6e 61 6c 29 20 7b  on(additional) {
08c0: 0a 20 20 20 20 61 64 64 69 74 69 6f 6e 61 6c 20  .    additional 
08d0: 3d 20 61 64 64 69 74 69 6f 6e 61 6c 20 7c 7c 20  = additional || 
08e0: 27 27 3b 0a 20 20 20 20 76 61 72 20 71 75 61 6c  '';.    var qual
08f0: 69 74 79 20 3d 20 74 68 69 73 2e 71 75 61 6c 69  ity = this.quali
0900: 74 79 28 29 3b 0a 0a 20 20 20 20 69 66 20 28 74  ty();..    if (t
0910: 68 69 73 2e 63 68 6f 72 64 54 79 70 65 28 29 20  his.chordType() 
0920: 21 3d 3d 20 27 74 72 69 61 64 27 20 7c 7c 20 71  !== 'triad' || q
0930: 75 61 6c 69 74 79 20 3d 3d 3d 20 27 64 69 6d 69  uality === 'dimi
0940: 6e 69 73 68 65 64 27 20 7c 7c 0a 20 20 20 20 20  nished' ||.     
0950: 20 20 20 71 75 61 6c 69 74 79 20 3d 3d 3d 20 27     quality === '
0960: 61 75 67 6d 65 6e 74 65 64 27 29 20 7b 0a 20 20  augmented') {.  
0970: 20 20 20 20 74 68 72 6f 77 20 6e 65 77 20 45 72      throw new Er
0980: 72 6f 72 28 27 4f 6e 6c 79 20 6d 61 6a 6f 72 2f  ror('Only major/
0990: 6d 69 6e 6f 72 20 74 72 69 61 64 73 20 68 61 76  minor triads hav
09a0: 65 20 70 61 72 61 6c 6c 65 6c 20 63 68 6f 72 64  e parallel chord
09b0: 73 27 29 3b 0a 20 20 20 20 7d 0a 0a 20 20 20 20  s');.    }..    
09c0: 69 66 20 28 71 75 61 6c 69 74 79 20 3d 3d 3d 20  if (quality === 
09d0: 27 6d 61 6a 6f 72 27 29 20 7b 0a 20 20 20 20 20  'major') {.     
09e0: 20 72 65 74 75 72 6e 20 6e 65 77 20 43 68 6f 72   return new Chor
09f0: 64 28 74 68 69 73 2e 72 6f 6f 74 2e 69 6e 74 65  d(this.root.inte
0a00: 72 76 61 6c 28 27 6d 33 27 2c 20 27 64 6f 77 6e  rval('m3', 'down
0a10: 27 29 2c 20 27 6d 27 29 3b 0a 20 20 20 20 7d 20  '), 'm');.    } 
0a20: 65 6c 73 65 20 7b 0a 20 20 20 20 20 20 72 65 74  else {.      ret
0a30: 75 72 6e 20 6e 65 77 20 43 68 6f 72 64 28 74 68  urn new Chord(th
0a40: 69 73 2e 72 6f 6f 74 2e 69 6e 74 65 72 76 61 6c  is.root.interval
0a50: 28 27 6d 33 27 2c 20 27 75 70 27 29 29 3b 0a 20  ('m3', 'up'));. 
0a60: 20 20 20 7d 0a 20 20 7d 2c 0a 0a 20 20 71 75 61     }.  },..  qua
0a70: 6c 69 74 79 3a 20 66 75 6e 63 74 69 6f 6e 28 29  lity: function()
0a80: 20 7b 0a 20 20 20 20 76 61 72 20 74 68 69 72 64   {.    var third
0a90: 2c 20 66 69 66 74 68 2c 20 73 65 76 65 6e 74 68  , fifth, seventh
0aa0: 2c 20 69 6e 74 65 72 76 61 6c 73 20 3d 20 74 68  , intervals = th
0ab0: 69 73 2e 69 6e 74 65 72 76 61 6c 73 3b 0a 0a 20  is.intervals;.. 
0ac0: 20 20 20 66 6f 72 20 28 76 61 72 20 69 20 3d 20     for (var i = 
0ad0: 30 2c 20 6c 65 6e 67 74 68 20 3d 20 69 6e 74 65  0, length = inte
0ae0: 72 76 61 6c 73 2e 6c 65 6e 67 74 68 3b 20 69 20  rvals.length; i 
0af0: 3c 20 6c 65 6e 67 74 68 3b 20 69 2b 2b 29 20 7b  < length; i++) {
0b00: 0a 20 20 20 20 20 20 69 66 20 28 69 6e 74 65 72  .      if (inter
0b10: 76 61 6c 73 5b 69 5d 2e 6e 75 6d 62 65 72 28 29  vals[i].number()
0b20: 20 3d 3d 3d 20 33 29 20 7b 0a 20 20 20 20 20 20   === 3) {.      
0b30: 20 20 74 68 69 72 64 20 3d 20 69 6e 74 65 72 76    third = interv
0b40: 61 6c 73 5b 69 5d 3b 0a 20 20 20 20 20 20 7d 20  als[i];.      } 
0b50: 65 6c 73 65 20 69 66 20 28 69 6e 74 65 72 76 61  else if (interva
0b60: 6c 73 5b 69 5d 2e 6e 75 6d 62 65 72 28 29 20 3d  ls[i].number() =
0b70: 3d 3d 20 35 29 20 7b 0a 20 20 20 20 20 20 20 20  == 5) {.        
0b80: 66 69 66 74 68 20 3d 20 69 6e 74 65 72 76 61 6c  fifth = interval
0b90: 73 5b 69 5d 3b 0a 20 20 20 20 20 20 7d 20 65 6c  s[i];.      } el
0ba0: 73 65 20 69 66 20 28 69 6e 74 65 72 76 61 6c 73  se if (intervals
0bb0: 5b 69 5d 2e 6e 75 6d 62 65 72 28 29 20 3d 3d 3d  [i].number() ===
0bc0: 20 37 29 20 7b 0a 20 20 20 20 20 20 20 20 73 65   7) {.        se
0bd0: 76 65 6e 74 68 20 3d 20 69 6e 74 65 72 76 61 6c  venth = interval
0be0: 73 5b 69 5d 3b 0a 20 20 20 20 20 20 7d 0a 20 20  s[i];.      }.  
0bf0: 20 20 7d 0a 0a 20 20 20 20 69 66 20 28 21 74 68    }..    if (!th
0c00: 69 72 64 29 20 7b 0a 20 20 20 20 20 20 72 65 74  ird) {.      ret
0c10: 75 72 6e 3b 0a 20 20 20 20 7d 0a 0a 20 20 20 20  urn;.    }..    
0c20: 74 68 69 72 64 20 3d 20 28 74 68 69 72 64 2e 64  third = (third.d
0c30: 69 72 65 63 74 69 6f 6e 28 29 20 3d 3d 3d 20 27  irection() === '
0c40: 64 6f 77 6e 27 29 20 3f 20 74 68 69 72 64 2e 69  down') ? third.i
0c50: 6e 76 65 72 74 28 29 20 3a 20 74 68 69 72 64 3b  nvert() : third;
0c60: 0a 20 20 20 20 74 68 69 72 64 20 3d 20 74 68 69  .    third = thi
0c70: 72 64 2e 73 69 6d 70 6c 65 28 29 2e 74 6f 53 74  rd.simple().toSt
0c80: 72 69 6e 67 28 29 3b 0a 0a 20 20 20 20 69 66 20  ring();..    if 
0c90: 28 66 69 66 74 68 29 20 7b 0a 20 20 20 20 20 20  (fifth) {.      
0ca0: 66 69 66 74 68 20 3d 20 28 66 69 66 74 68 2e 64  fifth = (fifth.d
0cb0: 69 72 65 63 74 69 6f 6e 20 3d 3d 3d 20 27 64 6f  irection === 'do
0cc0: 77 6e 27 29 20 3f 20 66 69 66 74 68 2e 69 6e 76  wn') ? fifth.inv
0cd0: 65 72 74 28 29 20 3a 20 66 69 66 74 68 3b 0a 20  ert() : fifth;. 
0ce0: 20 20 20 20 20 66 69 66 74 68 20 3d 20 66 69 66       fifth = fif
0cf0: 74 68 2e 73 69 6d 70 6c 65 28 29 2e 74 6f 53 74  th.simple().toSt
0d00: 72 69 6e 67 28 29 3b 0a 20 20 20 20 7d 0a 0a 20  ring();.    }.. 
0d10: 20 20 20 69 66 20 28 73 65 76 65 6e 74 68 29 20     if (seventh) 
0d20: 7b 0a 20 20 20 20 20 20 73 65 76 65 6e 74 68 20  {.      seventh 
0d30: 3d 20 28 73 65 76 65 6e 74 68 2e 64 69 72 65 63  = (seventh.direc
0d40: 74 69 6f 6e 20 3d 3d 3d 20 27 64 6f 77 6e 27 29  tion === 'down')
0d50: 20 3f 20 73 65 76 65 6e 74 68 2e 69 6e 76 65 72   ? seventh.inver
0d60: 74 28 29 20 3a 20 73 65 76 65 6e 74 68 3b 0a 20  t() : seventh;. 
0d70: 20 20 20 20 20 73 65 76 65 6e 74 68 20 3d 20 73       seventh = s
0d80: 65 76 65 6e 74 68 2e 73 69 6d 70 6c 65 28 29 2e  eventh.simple().
0d90: 74 6f 53 74 72 69 6e 67 28 29 3b 0a 20 20 20 20  toString();.    
0da0: 7d 0a 0a 20 20 20 20 69 66 20 28 74 68 69 72 64  }..    if (third
0db0: 20 3d 3d 3d 20 27 4d 33 27 29 20 7b 0a 20 20 20   === 'M3') {.   
0dc0: 20 20 20 69 66 20 28 66 69 66 74 68 20 3d 3d 3d     if (fifth ===
0dd0: 20 27 41 35 27 29 20 7b 0a 20 20 20 20 20 20 20   'A5') {.       
0de0: 20 72 65 74 75 72 6e 20 27 61 75 67 6d 65 6e 74   return 'augment
0df0: 65 64 27 3b 0a 20 20 20 20 20 20 7d 20 65 6c 73  ed';.      } els
0e00: 65 20 69 66 20 28 66 69 66 74 68 20 3d 3d 3d 20  e if (fifth === 
0e10: 27 50 35 27 29 20 7b 0a 20 20 20 20 20 20 20 20  'P5') {.        
0e20: 72 65 74 75 72 6e 20 28 73 65 76 65 6e 74 68 20  return (seventh 
0e30: 3d 3d 3d 20 27 6d 37 27 29 20 3f 20 27 64 6f 6d  === 'm7') ? 'dom
0e40: 69 6e 61 6e 74 27 20 3a 20 27 6d 61 6a 6f 72 27  inant' : 'major'
0e50: 3b 0a 20 20 20 20 20 20 7d 0a 0a 20 20 20 20 20  ;.      }..     
0e60: 20 72 65 74 75 72 6e 20 27 6d 61 6a 6f 72 27 3b   return 'major';
0e70: 0a 20 20 20 20 7d 20 65 6c 73 65 20 69 66 20 28  .    } else if (
0e80: 74 68 69 72 64 20 3d 3d 3d 20 27 6d 33 27 29 20  third === 'm3') 
0e90: 7b 0a 20 20 20 20 20 20 69 66 20 28 66 69 66 74  {.      if (fift
0ea0: 68 20 3d 3d 3d 20 27 50 35 27 29 20 7b 0a 20 20  h === 'P5') {.  
0eb0: 20 20 20 20 20 20 72 65 74 75 72 6e 20 27 6d 69        return 'mi
0ec0: 6e 6f 72 27 3b 0a 20 20 20 20 20 20 7d 20 65 6c  nor';.      } el
0ed0: 73 65 20 69 66 20 28 66 69 66 74 68 20 3d 3d 3d  se if (fifth ===
0ee0: 20 27 64 35 27 29 20 7b 0a 20 20 20 20 20 20 20   'd5') {.       
0ef0: 20 72 65 74 75 72 6e 20 28 73 65 76 65 6e 74 68   return (seventh
0f00: 20 3d 3d 3d 20 27 6d 37 27 29 20 3f 20 27 68 61   === 'm7') ? 'ha
0f10: 6c 66 2d 64 69 6d 69 6e 69 73 68 65 64 27 20 3a  lf-diminished' :
0f20: 20 27 64 69 6d 69 6e 69 73 68 65 64 27 3b 0a 20   'diminished';. 
0f30: 20 20 20 20 20 7d 0a 0a 20 20 20 20 20 20 72 65       }..      re
0f40: 74 75 72 6e 20 27 6d 69 6e 6f 72 27 3b 0a 20 20  turn 'minor';.  
0f50: 20 20 7d 0a 20 20 7d 2c 0a 0a 20 20 63 68 6f 72    }.  },..  chor
0f60: 64 54 79 70 65 3a 20 66 75 6e 63 74 69 6f 6e 28  dType: function(
0f70: 29 20 7b 20 2f 2f 20 49 6e 20 6e 65 65 64 20 6f  ) { // In need o
0f80: 66 20 62 65 74 74 65 72 20 6e 61 6d 65 0a 20 20  f better name.  
0f90: 20 20 76 61 72 20 6c 65 6e 67 74 68 20 3d 20 74    var length = t
0fa0: 68 69 73 2e 69 6e 74 65 72 76 61 6c 73 2e 6c 65  his.intervals.le
0fb0: 6e 67 74 68 2c 20 69 6e 74 65 72 76 61 6c 2c 20  ngth, interval, 
0fc0: 68 61 73 2c 20 69 6e 76 65 72 74 2c 20 69 2c 20  has, invert, i, 
0fd0: 6e 61 6d 65 3b 0a 0a 20 20 20 20 69 66 20 28 6c  name;..    if (l
0fe0: 65 6e 67 74 68 20 3d 3d 3d 20 32 29 20 7b 0a 20  ength === 2) {. 
0ff0: 20 20 20 20 20 72 65 74 75 72 6e 20 27 64 79 61       return 'dya
1000: 64 27 3b 0a 20 20 20 20 7d 20 65 6c 73 65 20 69  d';.    } else i
1010: 66 20 28 6c 65 6e 67 74 68 20 3d 3d 3d 20 33 29  f (length === 3)
1020: 20 7b 0a 20 20 20 20 20 20 68 61 73 20 3d 20 7b   {.      has = {
1030: 75 6e 69 73 6f 6e 3a 20 66 61 6c 73 65 2c 20 74  unison: false, t
1040: 68 69 72 64 3a 20 66 61 6c 73 65 2c 20 66 69 66  hird: false, fif
1050: 74 68 3a 20 66 61 6c 73 65 7d 3b 0a 20 20 20 20  th: false};.    
1060: 20 20 66 6f 72 20 28 69 20 3d 20 30 3b 20 69 20    for (i = 0; i 
1070: 3c 20 6c 65 6e 67 74 68 3b 20 69 2b 2b 29 20 7b  < length; i++) {
1080: 0a 20 20 20 20 20 20 20 20 69 6e 74 65 72 76 61  .        interva
1090: 6c 20 3d 20 74 68 69 73 2e 69 6e 74 65 72 76 61  l = this.interva
10a0: 6c 73 5b 69 5d 3b 0a 20 20 20 20 20 20 20 20 69  ls[i];.        i
10b0: 6e 76 65 72 74 20 3d 20 69 6e 74 65 72 76 61 6c  nvert = interval
10c0: 2e 69 6e 76 65 72 74 28 29 3b 0a 20 20 20 20 20  .invert();.     
10d0: 20 20 20 69 66 20 28 69 6e 74 65 72 76 61 6c 2e     if (interval.
10e0: 62 61 73 65 28 29 20 69 6e 20 68 61 73 29 20 7b  base() in has) {
10f0: 0a 20 20 20 20 20 20 20 20 20 20 68 61 73 5b 69  .          has[i
1100: 6e 74 65 72 76 61 6c 2e 62 61 73 65 28 29 5d 20  nterval.base()] 
1110: 3d 20 74 72 75 65 3b 0a 20 20 20 20 20 20 20 20  = true;.        
1120: 7d 20 65 6c 73 65 20 69 66 20 28 69 6e 76 65 72  } else if (inver
1130: 74 2e 62 61 73 65 28 29 20 69 6e 20 68 61 73 29  t.base() in has)
1140: 20 7b 0a 20 20 20 20 20 20 20 20 20 20 68 61 73   {.          has
1150: 5b 69 6e 76 65 72 74 2e 62 61 73 65 28 29 5d 20  [invert.base()] 
1160: 3d 20 74 72 75 65 3b 0a 20 20 20 20 20 20 20 20  = true;.        
1170: 7d 0a 20 20 20 20 20 20 7d 0a 0a 20 20 20 20 20  }.      }..     
1180: 20 6e 61 6d 65 20 3d 20 28 68 61 73 2e 75 6e 69   name = (has.uni
1190: 73 6f 6e 20 26 26 20 68 61 73 2e 74 68 69 72 64  son && has.third
11a0: 20 26 26 20 68 61 73 2e 66 69 66 74 68 29 20 3f   && has.fifth) ?
11b0: 20 27 74 72 69 61 64 27 20 3a 20 27 74 72 69 63   'triad' : 'tric
11c0: 68 6f 72 64 27 3b 0a 20 20 20 20 7d 20 65 6c 73  hord';.    } els
11d0: 65 20 69 66 20 28 6c 65 6e 67 74 68 20 3d 3d 3d  e if (length ===
11e0: 20 34 29 20 7b 0a 20 20 20 20 20 20 68 61 73 20   4) {.      has 
11f0: 3d 20 7b 75 6e 69 73 6f 6e 3a 20 66 61 6c 73 65  = {unison: false
1200: 2c 20 74 68 69 72 64 3a 20 66 61 6c 73 65 2c 20  , third: false, 
1210: 66 69 66 74 68 3a 20 66 61 6c 73 65 2c 20 73 65  fifth: false, se
1220: 76 65 6e 74 68 3a 20 66 61 6c 73 65 7d 3b 0a 20  venth: false};. 
1230: 20 20 20 20 20 66 6f 72 20 28 69 20 3d 20 30 3b       for (i = 0;
1240: 20 69 20 3c 20 6c 65 6e 67 74 68 3b 20 69 2b 2b   i < length; i++
1250: 29 20 7b 0a 20 20 20 20 20 20 20 20 69 6e 74 65  ) {.        inte
1260: 72 76 61 6c 20 3d 20 74 68 69 73 2e 69 6e 74 65  rval = this.inte
1270: 72 76 61 6c 73 5b 69 5d 3b 0a 20 20 20 20 20 20  rvals[i];.      
1280: 20 20 69 6e 76 65 72 74 20 3d 20 69 6e 74 65 72    invert = inter
1290: 76 61 6c 2e 69 6e 76 65 72 74 28 29 3b 0a 20 20  val.invert();.  
12a0: 20 20 20 20 20 20 69 66 20 28 69 6e 74 65 72 76        if (interv
12b0: 61 6c 2e 62 61 73 65 28 29 20 69 6e 20 68 61 73  al.base() in has
12c0: 29 20 7b 0a 20 20 20 20 20 20 20 20 20 20 68 61  ) {.          ha
12d0: 73 5b 69 6e 74 65 72 76 61 6c 2e 62 61 73 65 28  s[interval.base(
12e0: 29 5d 20 3d 20 74 72 75 65 3b 0a 20 20 20 20 20  )] = true;.     
12f0: 20 20 20 7d 20 65 6c 73 65 20 69 66 20 28 69 6e     } else if (in
1300: 76 65 72 74 2e 62 61 73 65 28 29 20 69 6e 20 68  vert.base() in h
1310: 61 73 29 20 7b 0a 20 20 20 20 20 20 20 20 20 20  as) {.          
1320: 68 61 73 5b 69 6e 76 65 72 74 2e 62 61 73 65 28  has[invert.base(
1330: 29 5d 20 3d 20 74 72 75 65 3b 0a 20 20 20 20 20  )] = true;.     
1340: 20 20 20 7d 0a 20 20 20 20 20 20 7d 0a 0a 20 20     }.      }..  
1350: 20 20 20 20 69 66 20 28 68 61 73 2e 75 6e 69 73      if (has.unis
1360: 6f 6e 20 26 26 20 68 61 73 2e 74 68 69 72 64 20  on && has.third 
1370: 26 26 20 68 61 73 2e 66 69 66 74 68 20 26 26 20  && has.fifth && 
1380: 68 61 73 2e 73 65 76 65 6e 74 68 29 20 7b 0a 20  has.seventh) {. 
1390: 20 20 20 20 20 20 20 6e 61 6d 65 20 3d 20 27 74         name = 't
13a0: 65 74 72 61 64 27 3b 0a 20 20 20 20 20 20 7d 0a  etrad';.      }.
13b0: 20 20 20 20 7d 0a 0a 20 20 20 20 72 65 74 75 72      }..    retur
13c0: 6e 20 6e 61 6d 65 20 7c 7c 20 27 75 6e 6b 6e 6f  n name || 'unkno
13d0: 77 6e 27 3b 0a 20 20 7d 2c 0a 0a 20 20 67 65 74  wn';.  },..  get
13e0: 3a 20 66 75 6e 63 74 69 6f 6e 28 69 6e 74 65 72  : function(inter
13f0: 76 61 6c 29 20 7b 0a 20 20 20 20 69 66 20 28 74  val) {.    if (t
1400: 79 70 65 6f 66 20 69 6e 74 65 72 76 61 6c 20 3d  ypeof interval =
1410: 3d 3d 20 27 73 74 72 69 6e 67 27 20 26 26 20 69  == 'string' && i
1420: 6e 74 65 72 76 61 6c 20 69 6e 20 6b 6e 6f 77 6c  nterval in knowl
1430: 65 64 67 65 2e 73 74 65 70 4e 75 6d 62 65 72 29  edge.stepNumber)
1440: 20 7b 0a 20 20 20 20 20 20 76 61 72 20 69 6e 74   {.      var int
1450: 65 72 76 61 6c 73 20 3d 20 74 68 69 73 2e 69 6e  ervals = this.in
1460: 74 65 72 76 61 6c 73 2c 20 69 2c 20 6c 65 6e 67  tervals, i, leng
1470: 74 68 3b 0a 0a 20 20 20 20 20 20 69 6e 74 65 72  th;..      inter
1480: 76 61 6c 20 3d 20 6b 6e 6f 77 6c 65 64 67 65 2e  val = knowledge.
1490: 73 74 65 70 4e 75 6d 62 65 72 5b 69 6e 74 65 72  stepNumber[inter
14a0: 76 61 6c 5d 3b 0a 20 20 20 20 20 20 66 6f 72 20  val];.      for 
14b0: 28 69 20 3d 20 30 2c 20 6c 65 6e 67 74 68 20 3d  (i = 0, length =
14c0: 20 69 6e 74 65 72 76 61 6c 73 2e 6c 65 6e 67 74   intervals.lengt
14d0: 68 3b 20 69 20 3c 20 6c 65 6e 67 74 68 3b 20 69  h; i < length; i
14e0: 2b 2b 29 20 7b 0a 20 20 20 20 20 20 20 20 69 66  ++) {.        if
14f0: 20 28 69 6e 74 65 72 76 61 6c 73 5b 69 5d 2e 6e   (intervals[i].n
1500: 75 6d 62 65 72 28 29 20 3d 3d 3d 20 69 6e 74 65  umber() === inte
1510: 72 76 61 6c 29 20 7b 0a 20 20 20 20 20 20 20 20  rval) {.        
1520: 20 20 72 65 74 75 72 6e 20 74 68 69 73 2e 72 6f    return this.ro
1530: 6f 74 2e 69 6e 74 65 72 76 61 6c 28 69 6e 74 65  ot.interval(inte
1540: 72 76 61 6c 73 5b 69 5d 29 3b 0a 20 20 20 20 20  rvals[i]);.     
1550: 20 20 20 7d 0a 20 20 20 20 20 20 7d 0a 0a 20 20     }.      }..  
1560: 20 20 20 20 72 65 74 75 72 6e 20 6e 75 6c 6c 3b      return null;
1570: 0a 20 20 20 20 7d 20 65 6c 73 65 20 7b 0a 20 20  .    } else {.  
1580: 20 20 20 20 74 68 72 6f 77 20 6e 65 77 20 45 72      throw new Er
1590: 72 6f 72 28 27 49 6e 76 61 6c 69 64 20 69 6e 74  ror('Invalid int
15a0: 65 72 76 61 6c 20 6e 61 6d 65 27 29 3b 0a 20 20  erval name');.  
15b0: 20 20 7d 0a 20 20 7d 2c 0a 0a 20 20 69 6e 74 65    }.  },..  inte
15c0: 72 76 61 6c 3a 20 66 75 6e 63 74 69 6f 6e 28 69  rval: function(i
15d0: 6e 74 65 72 76 61 6c 29 20 7b 0a 20 20 20 20 72  nterval) {.    r
15e0: 65 74 75 72 6e 20 6e 65 77 20 43 68 6f 72 64 28  eturn new Chord(
15f0: 74 68 69 73 2e 72 6f 6f 74 2e 69 6e 74 65 72 76  this.root.interv
1600: 61 6c 28 69 6e 74 65 72 76 61 6c 29 2c 20 74 68  al(interval), th
1610: 69 73 2e 73 79 6d 62 6f 6c 29 3b 0a 20 20 7d 2c  is.symbol);.  },
1620: 0a 0a 20 20 74 72 61 6e 73 70 6f 73 65 3a 20 66  ..  transpose: f
1630: 75 6e 63 74 69 6f 6e 28 69 6e 74 65 72 76 61 6c  unction(interval
1640: 29 20 7b 0a 20 20 20 20 74 68 69 73 2e 72 6f 6f  ) {.    this.roo
1650: 74 2e 74 72 61 6e 73 70 6f 73 65 28 69 6e 74 65  t.transpose(inte
1660: 72 76 61 6c 29 3b 0a 20 20 20 20 74 68 69 73 2e  rval);.    this.
1670: 6e 61 6d 65 20 3d 20 74 68 69 73 2e 72 6f 6f 74  name = this.root
1680: 2e 6e 61 6d 65 28 29 2e 74 6f 55 70 70 65 72 43  .name().toUpperC
1690: 61 73 65 28 29 20 2b 0a 20 20 20 20 20 20 20 20  ase() +.        
16a0: 20 20 20 20 20 20 20 20 74 68 69 73 2e 72 6f 6f          this.roo
16b0: 74 2e 61 63 63 69 64 65 6e 74 61 6c 28 29 20 2b  t.accidental() +
16c0: 20 74 68 69 73 2e 73 79 6d 62 6f 6c 3b 0a 0a 20   this.symbol;.. 
16d0: 20 20 20 72 65 74 75 72 6e 20 74 68 69 73 3b 0a     return this;.
16e0: 20 20 7d 2c 0a 0a 20 20 74 6f 53 74 72 69 6e 67    },..  toString
16f0: 3a 20 66 75 6e 63 74 69 6f 6e 28 29 20 7b 0a 20  : function() {. 
1700: 20 20 20 72 65 74 75 72 6e 20 74 68 69 73 2e 6e     return this.n
1710: 61 6d 65 3b 0a 20 20 7d 0a 7d 3b 0a 0a 6d 6f 64  ame;.  }.};..mod
1720: 75 6c 65 2e 65 78 70 6f 72 74 73 20 3d 20 43 68  ule.exports = Ch
1730: 6f 72 64 3b 0a                                   ord;.