Ver 0.27
 Major Chord Progression Rule file
 Space is Comment Line
 Level
 $R:  Chord Rule Name
 $0:  Top Level key = Major/Minor 
 $1:  Level 1  $1: = $Key
 $2:  Level 2  Chord Progression
 $3:  Level 3  Root+Position Name
 $4:  Level 4  Chord Name
 $5:  Level 5  Voicing
 $6:  Level 6  Chord Select Value
 $7:  Level 7  Chord Select Param
 $8:  Level 8  Exstra Chord
 $9:  Level 9  Special Chord Progression
 $A:  Available Note Scale
 $M:  Temperment
 $N:  Chord Name voicing

$R:Default Major_Chord_Progression mebcpj.dat

 T [I,I6,IM7][I7][VIm7(VIm),IIIm7(IIIm)][#IVm7(&5),IIIm7(&5)]            Tonic
 S [IV,IV6,IVM7][IV7][IIm7(IIm),VIm7(VIm)][&VIIM7,VII7]            Subdominant
 SM [IVm,IVm6,IVM7,IVm7][-][IIm7(&5),&VII7,&VI(&VI6)][&IIM7,&VI7]    SD Minore
 D [V7][-][VIIm7(&5)=VII%][&II7]                                      Dominant
 SED [I7,II7(DD),III7,IV7,VI7,VII7]                         Secondary Dominant
 DD [II7]                                                      Double Dominant
 2-5 IIm7 -> V7  Two Five

 Major Chord Progression
 I -> IV,(IVm),VIm,IIIm
 I6 -> V7
 IM7 -> V7
 IIm -> VII%
 IIm7 -> I,I6,IM7,IIIm7,VIm7,V7
 IIIm
 IIIm7 -> V7
 IV(IVm) -> V7,I,VII%,IIm,IIIm
 IVm -> I,IIm
 IVM7 -> I,I6,IM7
 IV6 -> I,I6,IM7
 V
 V7(IIm7$V7) -> I,I6,IM7,IIIm7,VIm7,IIm,Iv
 VIm -> IIm
 VIm7 -> V7,VIIm7(&5)
 VIIm(&5)
 VIIm7(&5) -> I,I6,IM7,IIIm7
 VII%=VIIm7(&5) -> IIIm

 Memo
             Major Chord
         T   I     -> All
        (SD) IIm   -> V
        (D)  IIIm  -> I,VI
 I7  ->  SD  IV    -> All (ng. VI)
 II7 ->  D   V     -> I,VI
        (T)  VIm   -> All (ng. I)
             VII% 

                   Parallel Chord 
         T   I     Im 
        (SD) IIm   II% 
        (D)  IIIm  &III
         SD  IV    IVm 
         D   V     V  
        (T)  VIm   &VI 
             VII%  &VII

 !skey abc     : Put skey abc
 !skey = Value : Put Value
 $skey         : Set skey to $ Level
 $skey = Value : Set skey & Value to $ Level


!K1 T[I,VI] -> D[V,V7,V9] -> T  Cadence
!K2 T[I,VI] -> S[II,IV] -> D[V,V7,V9] ->T  Cadence
!K3 T[I,VI] -> S[II,IV] -> T  Cadence
!Major Chord [Original][Special][Substitute][Non Diatonic]

 Chord Pattern
 -> Dominant motion
!P Chord Pattern  P1:T-SD-D  P2:T-SD-D  P3:T-DD-SD-D  P4:T-SD-SDM
!P1  T-SD-D  [I,IIIm7,VIm7,#IV%]-VIm7-IV-V7  [I,..]-IIm7-V7
!P2  T-SD-D  [I,VIm7,IIIm7,#IV%]-I7->IV-V7  [I,..]-VI7-IIm7-V7
!P3  T-DD-SD-D  [I,#IV%,VIm7,IIIm7]-II7-IV-V7  [I,..]-II7-IIm7-V7
!P4  T-SD-SDM  [I,#IV%]-[I7,IIIm7,III7,IV7,VII7]->IV-IVm
!Mod I-IV(&VI)-VII%(II%)-V7(Minor)-Im(Minor)

 ----Major Code Progression----
$0:Major dur Reserve
!T   [I,I6,IM7][I7][VIm7(VIm),IIIm7(IIIm)][#IVm7(&5),IIIm7(&5)] Tonic
!S   [IV,IV6,IVM7][IV7][IIm7(IIm),VIm7(VIm)][&VIIM7,VII7] Subdominant
!SD  [IV,IV6,IVM7][IV7][IIm7(IIm),VIm7(VIm)][&VIIM7,VII7] Subdominant
!SM  [IVm,IVm6,IVM7,IVm7][-][IIm7(&5),&VII7,&VI(&VI6)][&IIM7,&VI7] Sub D
!SDM [IVm,IVm6,IVM7,IVm7][-][IIm7(&5),&VII7,&VI(&VI6)][&IIM7,&VI7] Sub D
!D   [V7][-][VIIm7(&5)=VII%][&II7] Dominant
!SED [I7,II7(DD),III7,IV7,VI7,VII7] Secondary Dominant
!DD  [II7] Double Dominant
!2-5 IIm7 -> V7  Two Five

$2:Default_Chord_Progression Default
$2:I = "I $I $4:M $3:M T-> "
$2:I6 = "I6 $I6 $4:6 $3:6 T-> "
$2:I69 = "I69 $I69 $4:69 $3:69 T-> "
$2:Isus4 = "Isus4 $Isus4 $4:sus4 $3:sus4 -> I"
$2:IM7 = "IM7 $IM7 $4:M7 $3:M7 T-> "
$2:IM79 = "IM79 $IM79 $4:M79 $3:M79 T-> "
$2:IM7(9) = "IM7(9) $IM7(9) $4:M7(9) $3:M7(9) T-> "
$2:&IIM7 = "&IIM7 $&IIM7 $4:M7 $3:M7 SDM-> I"
$2:IIm = "IIm $IIm $4:m $3:m SD-> VII%"
$2:IIm7 = "IIm7 $IIm7 $4:m7 $3:m7 SD-> I,I6,IM7,IIIm7,VIm7,V7"
$2:IIm7(&5) = "IIm7(&5) $IIm7(&5) $4:m7(&5) $3:m7(&5) SDM-> V7"
$2:&IIIdim = "&IIIdim $&IIIdim $4:dim $3:dim -> IIm7"
$2:IIIm = "IIIm $IIIm $4:m $3:m T->"
$2:IIIm7 = "IIIm7 $IIIm7 $4:m7 $3:m7 T-> V7"
$2:IIIm7(&5) = "IIIm7(&5) $IIIm7(&5) $4:m7(&5) $3:m7(&5) T->"
$2:IV = "IV $IV $4:M $3:M SD-> V7,I,VII%,IIm,IIIm"
$2:IVM = "IVM $IVM $4:M $3:M SD-> V7,I,VII%,IIm,IIIm"
$2:IVsus4 = "IVsus4 $IVsus4 $4:sus4 $3:sus4 -> IV"
$2:IVm = "IVm $IVm $4:m $3:m SDM-> I,IIm"
$2:IVm6 = "IVm6 $IVm6 $4:m6 $3:m6 SDM->"
$2:IVm69 = "IVm69 $IVm69 $4:m69 $3:m69 SDM->"
$2:IVm6(9) = "IVm6(9) $IVm6(9) $4:m6(9) $3:m6(9) SDM->"
$2:IVmM7 = "IVmM7 $IVmM7 $4:mM7 $3:mM7 SDM->"
$2:IVm7 = "IVm7 $IVm7 $4:m7 $3:m7 SDM->"
$2:#IVm7(&5) = "#IVm7(&5) $#IVm7(&5) $4:m7(&5) $3:m7(&5)"
$2:IVM7 = "IVM7 $IVM7 $4:M7 $3:M7 SD-> I,I6,IM7"
$2:IV6 = "IV6 $IV6 $4:6 $3:6 SD-> I,I6,IM7"
$2:IV69 = "IV69 $IV69 $4:69 $3:69 SD-> I,I6,IM7"
$2:IV7 = "IV7 $IV7 $4:7 $3:7 SD->"
$2:V = "V $V $4:M $3:M"
$2:Vsus4 = "Vsus4 $Vsus4 $4:sus4 $3:sus4 -> V"
$2:V7 = "V7 $V7 $4:7 $3:7  D-> I,I6,IM7,I7,IIIm7,VIm7,IIm,Iv"
$2:Vm7(9) = "Vm7(9) $Vm7(9) $4:m7(9) $3:m7(9) -> test"
$2:VIm = "VIm $VIm $4:m $3:m SD-> IIm"
$2:VIm7 = "VIm7 $VIm7 $4:m7 $3:m7 SD-> V7,VIIm7(&5)" 
$2:VIm79 = "VIm79 $VIm79 $4:m79 $3:m79 SD-> " 
$2:VIm7(9) = "VIm7(9) $VIm7(9) $4:m7(9) $3:m7(9) ->" 
$2:&VI = "&VI $&VI $4:M $3:M SDM->"
$2:&VI6 = "&VI6 $&VI6 $4:6 $3:6 SDM->"
$2:&VI69 = "&VI69 $&VI69 $4:69 $3:69 SDM->"
$2:&VIM7 = "&VIM7 $&VIM7 $4:M7 $3:M7 SDM->"
$2:VIIm7(&5) = "VIIm7(&5) $VIIm7(&5) $4:m7(&5) $3:m7(&5) D-> I,I6,IM7,IIIm7"
$2:&VIIM7 = "&VIIM7 $&VIIM7 $4:M7 $3:M7 SD->"
$2:I7 = "I7 $I7 $4:7 $3:7 T-> IV,IV7"
$2:II = "II $II $4:M $3:M"
$2:II7 = "II7 $II7 $4:7 $3:7"
$2:III7 = "III7 $III7 $4:7 $3:7 -> VIm7,VI7"
$2:VI7 = "VI7 $VI7 $4:7 $3:7 -> IIm7,II7"
$2:VII7 = "VII7 $VII7 $4:7 $3:7 SD-> IIIm7,III7"
$2:Vm7 = "Vm7 $Vm7 $4:m7 $3:m7 -> I7"
$2:VIIm7(&5) = "VIIm7(&5) $VIIm7(&5) $4:m7(&5) $3:m7(&5) -> III7"
$2:Im = "Im $Im $4:m $3:m ->"
$2:Im7 = "Im7 $Im7 $4:m7 $3:m7 -> IV7"
$2:IIIm7 = "IIIm7 $IIIm7 $4:m7 $3:m7 -> VI7"
$2:#IVm7(&5) = "#IVm7(&5) $#IVm7(&5) $4:m7(&5) $3:m7(&5) T-> VII7"
$2:&V7 = "&V7 $&V7 $4:7 $3:7 sub(I7) -> IV,IV7"
$2:#IV7 = "#IV7 $#IV7 $4:7 $3:7 sub(I7) -> IV,IV7"
$2:&VI7 = "&VI7 $&VI7 $4:7 $3:7 sub(II7) -> V7"
$2:#V7 = "#V7 $#V7 $4:7 $3:7 sub(II7) -> V7"
$2:&VII7 = "&VII7 $&VII7 $4:7 $3:7 sub(III7) -> VIm7,VI7"
$2:&II7 = "&II7 $&II7 $4:7 $3:7 sub(V7) -> I"
$2:#I7 = "#I7 $#I7 $4:7 $3:7 sub(V7) -> I"
$2:&III7 = "&III7 $&III7 $4:7 $3:7 sub(VI7) -> IIm7,II7"
$2:#Idim = "#Idim $#I $4:dim $3:dim -> IIm7"
$2:#IIdim = "#IIdim $#II $4:dim $3:dim -> IIIm7"
$2:#IVdim = "#IVdim $#IV $4:dim $3:dim -> V7"   
$2:#Vdim = "#Vdim $#V $4:dim $3:dim -> VIm7" 
$2:#VIdim = "#VIdim $#VI $4:dim $3:dim -> VIIm7(&5)"
$2:&Vdim = "&Vdim $&V $4:dim $3:dim -> IV6"
$2:END

$2:Advance_Chord_Progression Advance
$2:END

$2:Special_Chord_Progression Special
$2:I = "I $I $4:M $3:M -> IV,IVm,VIm,IIIm"
$2:I6 = "I6 $I6 $4:6 $3:6 -> V7"
$2:IM7 = "IM7 $IM7 $4:M7 $3:M7 -> V7"
$2:&IIM7 = "&IIM7 $&IIM7 $4:M7 $3:M7 -> I"
$2:II7 = "II7 $II7 $4:7 $3:7 -> IV"
$2:IIm = "IIm $IIm $4:m $3:m -> VII%"
$2:IIm7 = "IIm7 $IIm7 $4:m7 $3:m7 -> I,I6,IM7,IIIm7,VIm7,V7"
$2:IIm7(&5) = "IIm7(&5) $IIm7(&5) $4:m7(&5) $3:m7(&5) -> V7"
$2:&IIIdim = "&IIIdim $&IIIdim $4:dim $3:dim -> IIm7"
$2:IIIm = "IIIm $IIIm $4:m $3:m"
$2:IIIm7 = "IIIm7 $IIIm7 $4:m7 $3:m7 -> V7"
$2:III7 = "III7 $III7 $4:7 $3:7 -> VIm"
$2:IV = "IV $IV $4:M $3:M -> V7,I,VII%,IIm,IIIm"
$2:IVm = "IVm $IVm $4:m $3:m -> I,IIm"
$2:IVM7 = "IVM7 $IVM7 $4:M7 $3:M7 -> I,I6,IM7"
$2:IV6 = "IV6 $IV6 $4:6 $3:6 -> I,I6,IM7"
$2:V = "V $V $4:M $3:M"
$2:V7 = "V7 $V7 $4:7 $3:7  -> I,I6,IM7,IIIm7,VIm7,IIm,Iv"
$2:VIm = "VIm $VIm $4:m $3:m -> IIm"
$2:VIm7 = "VIm7 $VIm7 $4:m7 $3:m7 -> V7,VIIm7(&5)"
$2:VIIm7(&5) = "VIIm7(&5) $VIIm7(&5) $4:m7(&5) $3:m7(&5) -> I,I6,IM7,IIIm7"
$2:VIIm(&5) = "VIIm(&5) $VIIm(&5) $4:m(&5) $3:m(&5)"
$2:END

$2:Yesterday_Once_More
$2:I = "I $I $4:M $3:M -> IIIm/VII"
$2:IIIm/VII = "IIIm/VII $IIIm $4:m $3:m -> VIm"
$2:VIm = "VIm $VIm $4:m $3:m -> VIm/V" 
$2:VIm/V = "VIm/V $VIm $4:m $3:m -> IVM7"  
$2:IVM7 = "IVM7 $IVM7 $4:M7 $3:M7 -> IIIm"
$2:IIIm = "IIIm $IIIm $4:m $3:m -> IIm7"
$2:IIm7 = "IIm7 $IIm7 $4:m7 $3:m7 -> V7"
$2:V7 = "V7 $V7 $4:7 $3:7 -> I~2"
$2:I~2 = "I $I $4:M $3:M -> IIIm/VII~2"
$2:IIIm/VII~2 = "IIIm/VII $IIIm $4:m $3:m -> VIm~2"
$2:VIm~2 = "VIm $VIm $4:m $3:m -> VIm/V~2"
$2:VIm/V~2 = "VIm/V $VIm $4:m $3:m -> IVM7~2"
$2:IVM7~2 = "IVM7 $IVM7 $4:M7 $3:M7 -> VIIm7~(Minor_IIm7)"
$2:VIIm7~(Minor_IIm7) = "VIIm7 $VIIm7 $4:m7 $3:m7 -> III7~(Minor_V7)"      
$2:III7~(Minor_V7) = "III7 $III7 $4:7 $3:7 -> VIm~(Minor_Im)"      
$2:VIm~(Minor_Im) = "VIm $VIm $4:m $3:m -> VIm7/V~3"
$2:VIm7/V~3 = "VIm7/V $VIm7 $4:m7 $3:m7 -> IVM7~3"
$2:IVM7~3 = "IVM7 $IVM7 $4:M7 $3:M7 -> IIm7~3"
$2:IIm7~3 = "IIm7 $IIm7 $4:m7 $3:m7 -> V7~3"
$2:V7~3 = "V7 $V7 $4:7 $3:7 -> IV~3"
$2:IV~3 = "IV $IV $4:M $3:M -> V7~4"
$2:V7~4 = "V7 $V7 $4:7 $3:7 -> I"
$2:END

$2:Dominant_Motion
$2:I7 = "I7 $I7 $4:7 $3:7 -> IV,IVm,IV7"       
$2:&V7 = "&V7 $&V7 $4:7 $3:7 -> IV,IVm,IV7"
$2:#IV7 = "#IV7 $#IV7 $4:7 $3:7 -> IV,IVm,IV7"
$2:II7 = "II7 $II7 $4:7 $3:7 -> V7"    
$2:&VI7 = "&VI7 $&VI7 $4:7 $3:7 -> V7"
$2:#V7 = "#V7 $#V7 $4:7 $3:7 -> V7"
$2:III7 = "II7 $II7 $4:7 $3:7 -> VIm7"
$2:&VII7 = "&VII7 $&VII7 $4:7 $3:7 -> VIm7"
$2:IIm7 = "IIm7 $IIm7 $4:m7 $3:m7 -> V7"
$2:V7 = "V7 $V7 $4:7 $3:7  -> I,I7,I6,IM7,IIIm7,VIm7,IIm"
$2:&II7 = "&II7 $&II7 $4:7 $3:7 -> I,I7,IM7,IIIm7,VIm7,IIm"
$2:#I7 = "#I7 $#I7 $4:7 $3:7 -> I,I7,IM7,IIIm7,VIm7,IIm"
$2:VI7 = "VI7 $VI7 $4:7 $3:7  -> IIm7"                      
$2:&III7 = "&III7 $&III7 $4:7 $3:7 -> IIm7"
$2:VII7 = "VII7 $VII7 $4:7 $3:7  -> IIIm7"
$2:I6 = "I6 $I6 $4:6 $3:6 -> IM7"
$2:IM7 = "IM7 $IM7 $4:M7 $3:M7 -> V7"
$2:END  

$2:T-D
!T-D [I,I6,IM7,IIIm7,VIm7] Tonic -> Dominant
$2:I = "I $I $4:M $3:M -> V7"
$2:I6 = "I6 $I6 $4:6 $3:6 -> V7"
$2:IM7 = "IM7 $IM7 $4:M7 $3:M7 -> V7"
$2:IIIm7 = "IIIm7 $IIIm7 $4:m7 $3:m7 -> [][V7]"
$2:VIm7 = "VIm7 $VIm7 $4:m7 $3:m7 -> [V7][VIIm7(&5)]"
$2:END

$2:D-T
!D-T [V7,VIIm7(&5),VII%] Dominant -> Tonic
$2:V7 = "V7 $V7 $4:7 $3:7 -> I,I6,IM7,IIIm7,VIm7"
$2:VIIm7(&5) = "VIIm7(&5) $VIIm7(&5) $4:m7(&5) -> I,I6,IM7,IIIm7"
$2:VII% = "VII% $VII% $4:% $3:% -> I,I6,IM7,IIIm7"
$2:END

$2:Deceptiv_cadence_III
$2:V7 = "V7 $V7 $4:7 $3:7 -> IIIm7,IIIm,IIIm7(&5),III7,III7#5),III7(&5)"
$2:END

$2:Deceptiv_cadence_VIm7
$2:V7 = "V7 $V7 $4:7 $3:7 -> VIm7,VIm,#IVm7(&5)"
$2:END

$2:Deceptiv_cadence_etc
$2:V7 = "V7 $V7 $4:7 -> &VIM7,&IIM7,&VIM7-&IIM7 => I(M7)"
$2:END

$2:T-S T-SD
!T-SD [I,I6,IM7,IIIm7,VIm7] Tonic -> Subdominant
$2:I = "I $I $4:M $3:M -> IV,IV6,IVM7,IIm7,VIm7"
$2:I6 = "I6 $I6 $4:6 $3:6 -> IV,IV6,IVM7,IIm7,VIm7"
$2:IM7 = "IM7 $IM7 $4:M7 $3:M7 -> IV,IV6,IVM7,IIm7,VIm7"
$2:IIIm7 = "IIIm7 $IIIm7 $4:m7 $3:m7 -> IV,IV6,IVM7,IIm7,VIm7"
$2:VIm7 = "VIm7 $VIm7 $4:m7 $3:m7 -> IV,IV6,IVM7,IIm7"
$2:END

$2:S-T SD-T
!SD-T [IV,IV6,IV7,IVM7,IIm7,VIm7] Subdominant -> Tonic
$2:IV = "IV $IV $4:M $3:M -> I,I6,IM7,IIIm7,VIm7"
$2:IV6 = "IV6 $IV6 $4:6 $3:6 -> I,I6,IM7,IIIm7,VIm7"
$2:IV7 = "IV7 $IV7 $4:7 $3:7 (Bluenote) -> I,IIIm7"
$2:IVM7 = "IVM7 $IVM7 $4:M7 $3:M7 -> I,I6,IM7,IIIm7,VIm7"
$2:IIm7 = "IIm7 $IIm7 $4:m7 $3:m7 -> I,I6,IM7,IIIm7,VIm7"
$2:VIm7 = "VIm7 $VIm7 $4:m7 $3:m7 -> I,I6,IM7,IIIm7"
$2:END

$2:S-D SD-D
!SD-D [IV,IV6,IVM7,IV7,IIm7,VIm7] Subdominant -> Dominant
$2:IV = "IV $IV $4:M $3:M -> V7,VIIm7(&5)"
$2:IV6 = "IV6 $IV6 $4:6 $3:6 -> V7,VIIm7(&5)"
$2:IVM7 = "IVM7 $IVM7 $4:M7 $3:M7 -> V7,VIIm7(&5)"
$2:IV7 = "IV7 $IV7 $4:7 $3:7 (Bluenote) -> V7"
$2:IIm7 = "IIm7 $IIm7 $4:m7 $3:m7 -> V7(Two Five),VIIm7(&5)"
$2:VIm7 = "VIm7 $VIm7 $4:m7 $3:m7 -> V7,VIIm7(&5)"
$2:END

$2:D-S D-SD
!D-SD [V7] Dominant -> Subdominant
$2:V7 = "V7 $V7 $4:7 $3:7 -> IV,IV6,IVM7,IV7(Bluenote)"
$2:END

$2:T-T
!T-T [I,I6,IM7,IIIm7,VIm7] Tonic -> Tonic
$2:I = "I $I $4:M $3:M -> IIIm7,VIm7"
$2:I6 = "I6 $I6 $4:6 $3:6 -> IIIm7,VIm7"
$2:IM7 = "IM7 $IM7 $4:7 $3:7 -> IIIm7,VIm7"
$2:IIIm7 = "IIIm7 $IIIm7 $4:m7 $3:m7 -> VIm7,I,I6,IM7"
$2:VIm7 = "VIm7 $VIm7 $4:m7 $3:m7 -> IIIm7,I,I6,IM7"
$2:END

$2:S-S SD-SD
!SD-SD [IV,IV6,IVM7,IIm7,VIm7] Subdominant -> Subdominant
$2:IV = "IV $IV $4:M $3:M -> IIm7,VIm7"
$2:IV6 = "IV6 $IV6 $4:6 $3:6 -> IIm7,VIm7"
$2:IVM7 = "IVM7 $IVM7 $4:M7 $3:M7 -> IIm7,VIm7"
$2:IIm7 = "IIm7 $IIm7 $4:m7 $3:m7 -> VIm7,IV,IV6,IVM7"
$2:VIm7 = "VIm7 $VIm7 $4:m7 $3:m7 -> IIm7,IV,IV6,IVM7"
$2:END

!Up2   [$I--$IIm7(&5)--$IIIm7--$IV--$V7--$VIm7..$VIIm7(&5)..$I]
!Down2 [$I--$VIIm7(&5)..$VIm7__$V7__$IV--$IIIm7..$IIm7(&5)--$I]
!Up3   [$I--$IIIm7..$V7..$VIIm7..$IIm7(&5)__$IV__$VIm7__$I]
!Down3 [$I--$VIm7--$IV--$IIm7(&5)..$VIIm7..$V7--$IIIm7..$I]
!Up4   [$I--$IV--$VIIm7(&5)..$IIIm7--$VIm7--$IIm7(&5)--$V7--$I]
!Down5 [$I--$IV--$VIIm7(&5)..$IIIm7--$VIm7--$IIm7(&5)--$V7--$I]
!Down4 [$I--$V7__$IIm7(&5)__$VIm7__$IIIm7..$VIIm7(&5)..$IV--$I]
!Up5   [$I--$V7__$IIm7(&5)__$VIm7__$IIIm7..$VIIm7(&5)..$IV--$I]

$2:Up2 Base_Up2
!2+ [$I--$IIm7(&5)--$IIIm7--$IV--$V7--$VIm7..$VIIm7(&5)..$I]
$2:I = "I $I $4:M $3:M -> IIm7(&5)"
$2:IIm7(&5) = "IIm7(&5) $IIm7(&5) $4:m7(&5) -> IIIm7"
$2:IIIm7 = "IIIm7 $IIIm7 $4:m7 $3:m7 -> IV"
$2:IV = "IV $IV $4:M $3:M -> V7"
$2:V7 = "V7 $V7 $4:7 $3:7 -> VIm7"
$2:VIm7 = "VIm7 $VIm7 $4:m7 $3:m7 -> VIIm7(&5)"
$2:VIIm7(&5) = "VIIm7(&5) $VIIm7(&5) $4:m7(&5) -> I"
$2:END

$2:Down2 Base_Down2
!2- [$I--$VIIm7(&5)..$VIm7__$V7__$IV--$IIIm7..$IIm7(&5)--$I]
$2:I = "I $I $4:M $3:M -> VIIm7(&5)"
$2:VIIm7(&5) = "VIIm7(&5) $VIIm7(&5) $4:m7(&5) -> VIm7"
$2:VIm7 = "VIm7 $VIm7 $4:m7 $3:m7 -> V7"
$2:V7 = "V7 $V7 $4:7 $3:7 -> IV"
$2:IV = "IV $IV $4:M $3:M -> IIIm7"
$2:IIIm7 = "IIIm7 $IIIm7 $4:m7 $3:m7 -> IIm7(&5)"
$2:IIm7(&5) = "IIm7(&5) $IIm7(&5) $4:m7(&5) -> I"
$2:END

$2:Up3 Base_Up3
!3+ [$I--$IIIm7..$V7..$VIIm7..$IIm7(&5)__$IV__$VIm7__$I]
$2:I = "I $I $4:M $3:M -> IIIm7"
$2:IIIm7 = "IIIm7 $IIIm7 $4:m7 $3:m7 -> V7"
$2:V7 = "V7 $V7 $4:7 $3:7 -> VIIm7(&5)"
$2:VIIm7 = "VIIm7 $VIIm7 $4:m7 $3:m7 -> IIm7(&5)"
$2:IIm7(&5) = "IIm7(&5) $IIm7(&5) $4:m7(&5) -> IV"
$2:IV = "IV $IV $4:M $3:M -> VIm7"
$2:VIm7 = "VIm7 $VIm7 $4:m7 $3:m7 -> I"
$2:END

$2:Down3 Base_Down3
!3- [$I--$VIm7--$IV--$IIm7(&5)..$VIIm7..$V7--$IIIm7..$I]
$2:I = "I $I $4:M $3:M -> VIm7"
$2:VIm7 = "VIm7 $VIm7 $4:m7 $3:m7 -> IV"
$2:IV = "IV $IV $4:M $3:M -> IIm7(&5)"
$2:IIm7(&5) = "IIm7(&5) $IIm7(&5) $4:m7(&5) -> VIIm7"
$2:VIIm7 = "VIIm7 $VIIm7 $4:m7 $3:m7 -> V7"
$2:V7 = "V7 $V7 $4:7 $3:7 -> IIIm7"
$2:IIIm7 = "IIIm7 $IIIm7 $4:m7 $3:m7 -> I"
$2:END

$2:Up4 Base_Up4
!4+ [$I--$IV--$VIIm7(&5)..$IIIm7--$VIm7--$IIm7(&5)--$V7--$I]
$2:I = "I $I $4:M $3:M -> IV"
$2:IV = "IV $IV $4:M $3:M -> VIIm7(&5)"
$2:VIIm7(&5) = "VIIm7(&5) $VIIm7(&5) $4:m7(&5) -> IIIm7"
$2:IIIm7 = "IIIm7 $IIIm7 $4:m7 $3:m7 -> VIm7"
$2:VIm7 = "VIm7 $VIm7 $4:m7 $3:m7 -> IIm7(&5)"
$2:IIm7(&5) = "IIm7(&5) $IIm7(&5) $4:m7(&5) -> V7"
$2:V7 = "V7 $V7 $4:7 $3:7 -> I"
$2:END

$2:Down4 Base_Down4
!4- [$I--$V7__$IIm7(&5)__$VIm7__$IIIm7..$VIIm7(&5)..$IV--$I]
$2:I = "I $I $4:M $3:M -> V7"
$2:V7 = "V7 $V7 $4:7 $3:7 -> IIm7(&5)"
$2:IIm7(&5) = "IIm7(&5) $IIm7(&5) $4:m7(&5) -> VIm7"
$2:VIm7 = "VIm7 $VIm7 $4:m7 $3:m7 -> IIIm7"
$2:IIIm7 = "IIIm7 $IIIm7 $4:m7 $3:m7 -> VIIm7(&5)"
$2:VIIm7(&5) = "VIIm7(&5) $VIIm7(&5) $4:m7(&5) -> IV"
$2:IV = "IV $IV $4:M $3:M -> I"
$2:END

$2:Up5 Base_Up5
!5+ [$I--$V7__$IIm7(&5)__$VIm7__$IIIm7..$VIIm7(&5)..$IV--$I]
$2:I = "I $I $4:M $3:M -> V7"
$2:V7 = "V7 $V7 $4:7 $3:7 -> IIm7(&5)"
$2:IIm7(&5) = "IIm7(&5) $IIm7(&5) $4:m7(&5) -> VIm7"
$2:VIm7 = "VIm7 $VIm7 $4:m7 $3:m7 -> IIIm7"
$2:IIIm7 = "IIIm7 $IIIm7 $4:m7 $3:m7 -> VIIm7(&5)"
$2:VIIm7(&5) = "VIIm7(&5) $VIIm7(&5) $4:m7(&5) -> IV"
$2:IV = "IV $IV $4:M $3:M -> I"
$2:END

$2:Down5 Base_Down5
!5- [$I--$IV--$VIIm7(&5)..$IIIm7--$VIm7--$IIm7(&5)--$V7--$I]
$2:I = "I $I $4:M $3:M -> IV"
$2:IV = "IV $IV $4:M $3:M -> VIIm7(&5)"
$2:VIIm7(&5) = "VIIm7(&5) $VIIm7(&5) $4:m7(&5) -> IIIm7"
$2:IIIm7 = "IIIm7 $IIIm7 $4:m7 $3:m7 -> VIm7"
$2:VIm7 = "VIm7 $VIm7 $4:m7 $3:m7 -> IIm7(&5)"
$2:IIm7(&5) = "IIm7(&5) $IIm7(&5) $4:m7(&5) -> V7"
$2:V7 = "V7 $V7 $4:7 $3:7 -> I"
$2:END

$2:SM-T SDM-T
!SM-T [IVm,IIm7(&5),&VI,&VIM7,&VII7] Subdominant Minor -> Tonic
$2:IVm = "IVm $IVm $4:m $3:m -> I,I6,IM7,IIIm7"
$2:IIm7(&5) = "IIm7(&5) $IIm7(&5) $4:m7(&5) $3:m7(&5) -> I,I6,IM7"
$2:II% = "II% $II% $4:% $3:% -> I,I6,IM7"
$2:&VI = "&VI $&VI $4:M $3:M -> I,I6,IM7"
$2:&VIM7 = "&VIM7 $&VIM7 $4:M7 $3:M7 -> I,I6,IM7"
$2:&VII7 = "&VII7 $&VII7 $4:7 $3:7 -> I,I6,IM7,VIm7,[IIIm7]"
$2:END

$2:T-SM T-SDM
!T-SM [I,I6,IM7,IIIm7,VIm7] Tonic -> Subdominant Minor
$2:I = "I $I $4:M $3:M -> IVm,6,m7,mM7,IIm7(&5),&VI,M7,&VII7"
$2:I6 = "I6 $I6 $4:6 $3:6 -> IVm,6,7,mM7,IIm7(&5),&VI,M7,&VII7"
$2:IM7 = "IM7 $IM7 $4:M7 $3:M7 -> IVm,6,7,mM7,IIm7(&5),&VI,M7,&VII7"
$2:IIIm7 = "IIIm7 $IIIm7 $4:m7 $3:m7 -> [IVm,m6,m7,mM7,IIm7(&5),&VI,M7,&VII7]"
$2:VIm7 = "VIm7 $VIm7 $4:m7 $3:m7 -> IVm,6,7,M7,IIm7(&5),&VI,M7,[&VII7]"
$2:END

$2:D-SM D-SDM
!D-SM [V7] Dominant -> Subdominant Minor
$2:V7 = "V7 $V7 $4:7 $3:7 -> [IVm,IVm6,IVm7,IVmM7]"
$2:END

$2:SM-D SDM-D
!SM-D [IVm,IVm6,IVm7,IVmM7,IIm7(&5),VI,VIM7,VII7] Subdominant Minor -> Dominant
$2:IVm = "IVm $IVm $4:m $3:m -> V7"
$2:IVm6 = "IVm6 $IVm6 $4:m6 $3:m6 -> V7"
$2:IVm7 = "IVm7 $IVm7 $4:m7 $3:m7 -> V7"
$2:IVmM7 = "IVmM7 $IVmM7 $4:mM7 $3:mM7 -> V7"
$2:IIm7(&5) = "IIm7(&5) $IIm7(&5) $4:m7(&5) $3:m7(&5) -> V7"
$2:II% = "II% $II% $4:% $3:% -> V7"
$2:VI = "VI $VI $4:M $3:M -> V7"
$2:VIM7 = "VIM7 $VIM7 $4:M7 $3:M7 -> V7"
$2:VII7 = "VII7 $VII7 $4:7 $3:7 -> V7"
$2:END

$2:S-SM SD-SDM
!S-SM [IV,IV6,IVM7,IV7,IIm7,VIm7] Subdominant -> Subdominant Minor
$2:IV = "IV $IV $4:M $3:M -> IVm,IVm6,IVmM7"
$2:IV6 = "IV6 $IV6 $4:6 $3:6 -> IVm,6,mM7,IIm7(&5),&VI,6,&VIM7,&VII7"
$2:IVM7 = "IVM7 $IVM7 $4:M7 $3:M7 -> IVm,m6,mM7,IIm7(&5),&VI,6,&VIM7,&VII7"
$2:IV7 = "IV7 $IV7 $4:7 $3:7 (Bluenote) -> IVm7,IIm7(&5),&VI,&VII7"
$2:IIm7 = "IIm7 $IIm7 $4:m7 $3:m7 -> IVm,m6,mM7,IIm7(&5),&VII7,[&VI,6,M7]"
$2:VIm7 = "VIm7 $VIm7 $4:m7 $3:m7 -> IVm,m6,mM7,IIm7(&5),&VI,6,M7,[&VII7]"
$2:END

$2:SM-S SDM-SD
!SM-S [IVm,IVm6,IVm7,IVmM7,IIm7(&5),&VI,&VII7] Subdominant Minor -> Subdominant
$2:IVm = "IVm $IVm $4:m $3:m -> IV,6,M7,IIm7,VIm7"
$2:IVm6 = "IVm6 $IVm6 $4:m6 $3:m6 -> IV,IV6,IVM7,IIm7,VIm7"
$2:IVm7 = "IVm7 $IVm7 $4:m7 $3:m7 -> IV,IV6,IVM7,IIm7,VIm7"
$2:IVmM7 = "IVmM7 $IVmM7 $4:mM7 $3:mM7 -> IV,IV6,IVM7,IIm7,VIm7"
$2:IIm7(&5) = "IIm7(&5) $IIm7(&5) $4:m7(&5) $3:m7(&5) -> IV,6,M7,IIm7,VIm7"
$2:II% = "II% $II% $4:% $3:% -> IV,6,M7,IIm7,VIm7"
$2:&VI = "&VI $&VI $4:M $3:M -> IV,IV6,IVM7,VIm7,[IIm7]"
$2:&VII7 = "&VII7 $&VII7 $4:7 $3:7 -> IV,IV6,IVM7,IIm7,[VIm7]"
$2:END

$2:SM-SM SDM-SDM
!SM-SM [IVm,IVm6,IVm7,IVmM7,IIm7(&5),&VI,&VII7] Subdominant Minor -> SM
$2:IVm = "IVm $IVm $4:m $3:m -> IIm7(&5),&VI,6,M7,&VII7"
$2:IVm6 = "IVm6 $IVm6 $4:m6 $3:m6 -> IIm7(&5),&VI,6,M7,&VII7"
$2:IVm7 = "IVm7 $IVm7 $4:m7 $3:m7 -> IIm7(&5),&VI,6,M7,&VII7"
$2:IVmM7 = "IVmM7 $IVmM7 $4:mM7 $3:mM7 -> IIm7(&5),&VI,6,M7,&VII7"
$2:IIm7(&5) = "IIm7(&5) $IIm7(&5) $4:m7(&5) $3:m7(&5) -> IVm.,&VII7[&VI.&VIM7]"
$2:II% = "II% $II% $4:% $3:% -> IVm.,&VII7[&VI.&VIM7]"
$2:II% = "$II% $II $4:% $3:%  ->IVm,m6,m7,mM7,&VII7,[&VI,6,&VIM7]"
$2:&VI = "&VI $&VI $4:M $3:M -> IIm7(&5),IVm,m6,m7,mM7,&VII7"
$2:&VII7 = "&VII7 $&VII7 $4:7 $3:7 -> [&VI,6,M7][IIm7(&5),IVm,m6,m7,mM7]"
$2:END

$2:Dominant_Motion
!Dominant_motion [I7,II7,III7,VI7,VII7,V7] -> Dominant
$2:I7 = "I7 $I7 $4:7 $3:7 -> IV,IVm,IV7"
$2:II7 = "II7 $II7 $4:7 $3:7 -> V7,IV,IVm(SM),IIm7,II%  Double Dominant"
$2:III7 = "III7 $III7 $4:7 $3:7 -> VIm7,VI7"
$2:VI7 = "VI7 $VI7 $4:7 $3:7 -> IIm7,II7"
$2:VII7 = "VII7 $VII7 $4:7 $3:7 -> IIIm7,III7"
$2:V7 = "V7 $V7 $4:7 $3:7 -> I,I7"
$2:END

$2:2-5
!2-5 Vm7-I7,VIm7-II7,VIIm7(&5)-III7,Im7-IV7,IIIm7-VI7,#IVm7(&5)-VII7 Two Five
$2:Vm7 = "Vm7 $Vm7 $4:m7 $3:m7 -> I7"
$2:VIm7 = "VIm7 $VIm7 $4:m7 $3:m7 -> II7"
$2:VIIm7(&5) = "VIIm7(&5) $VIIm7(&5) $4:m7(&5) $3:m7(&5) -> III7"
$2:VII% = "VII% $VII% $4:% $3:% -> III7"
$2:Im7 = "Im7 $Im7 $4:m7 $3:m7 -> IV7"
$2:IIm7 = "IIm7 $IIm7 $4:m7 $3:m7 -> V7  Two Five"
$2:IIIm7 = "IIIm7 $IIIm7 $4:m7 $3:m7 -> VI7"
$2:#IVm7(&5) = "#IVm7(&5) $#IVm7(&5) $4:m7(&5) $3:m7(&5) -> VII7"
$2:#IV% = "#IV% $#IV% $4:% $3:% -> VII7"
$2:END

 Chord Pattern 1
$2:P1
$2:I = "I $I $4:M -> VIm7*2,#IVm7(&5),IIIm7,&IIIm7,IV"
$2:I6 = "I6 $I6 $4:6 -> VIm7*2,#IVm7(&5),IIIm7,&IIIm7,IV"
$2:IM7 = "IM7 $IM7 $4:M7 -> VIm7*2,#IVm7(&5),IIIm7,&IIIm7,IV"
$2:IIIm7 = "IIIm7 $IIIm7 $4:m7 -> VIm7*2,&IIIm7,IV"
$2:VIm7 = "VIm7 $VIm7 $4:m7 -> #IVm7(&5),&IIIm7,IV,IIm7"
$2:VIm7*2 = "VIm7*2 $VIm7 $4:m7 $3:m7 -> IV,IIm7"
$2:#IVm7(&5) = "#IVm7(&5) $#IVm7(&5) $4:m7(&5) $3:m7(&5) -> IV"
$2:#IV% = "#IV% $#IV% $4:% $3:% -> IV"
$2:&IIIm7 = "&IIIm7 $&IIIm7 $4:m7 $3:m7 -> IIm7"
$2:IV = "IV $IV $4:M $3:M -> V7,IIm7,&II7" 
$2:IIm7 = "IIm7 $IIm7 $4:m7 $3:m7 -> V7,&II7]
$2:V7 = "V7 $V7 $4:7 $3:7"
$2:&II7 = "&II7 $&II7 $4:7 $3:7"
$2:END

 Chord Pattern 2
$2:P2
$2:I = "I $I $4:M -> I7,IIIdim,&V7,III7,VI7,&III7,#Idim,IV7"
$2:I6 = "I6 $I6 $4:6 -> I7,IIIdim,&V7,III7,VI7,&III7,#Idim,IV7"
$2:IM7 = "IM7 $IM7 $4:M7 -> I7,IIIdim,&V7,III7,VI7,&III7,#Idim,IV7"
$2:VIm7 = "VIm7 $VIm7 $4:m7 -> &V7,VI7,&III7,IV7"
$2:IIIm7 = "IIIm7 $IIIm7 $4:m7 $3:m7 -> III7,VI7,&III7"
$2:#IVm7(&5) = "#IVm7(&5) $#IVm7(&5) $4:m7(&5) $3:m7(&5) -> IV7"
$2:#IV% = "#IV% $#IV% $4:% $3:% -> IV7"
$2:I7 = "I7 $I7 $4:7 $3:7 -> IV"
$2:IIIdim = "IIIdim $IIIdim $4:dim $3:dim -> IV"
$2:&V7 = "&V7 $&V7 $4:7 $3:7 -> IV"
$2:III7 = "III7 $III7 $4:7 $3:7 -> IV"
$2:VI7 = "VI7 $VI7 $4:7 $3:7 -> IIm7"
$2:&III7 = "&III7 $&III7 $4:7 $3:7 -> IIm7"
$2:#Idim = "#Idim $#Idim $4:dim $3:dim -> IIm7"
$2:IV7 = "IV7 $IV7 $4:7 $3:7 -> IIm7"
$2:IV = "IV $IV $4:M $3:M -> V7,&II7"
$2:IIm7 = "IIm7 $IIm7 $4:m7 $3:m7 -> V7,&II7"
$2:V7 = "V7 $V7 $4:7 $3:7"
$2:&II7 = "&II7 $&II7 $4:7 $3:7"
$2:END

 Chord Pattern 3
$2:P3
$2:I = "I $I $4:M -> II7,&Vdim,&VI7,#IV%*2,&IIIdim"
$2:I6 = "I6 $I6 $4:6 -> II7,&Vdim,&VI7,#IV%*2,&IIIdim"
$2:IM7 = "IM7 $IM7 $4:M7 -> II7,&Vdim,&VI7,#IV%*2,&IIIdim"
$2:#IVm7(&5) = "#IVm7(&5) $#IVm7(&5) $4:m7(&5) $3:m7(&5) -> II7"
$2:#IV% = "#IV% $#IV% $4:% $3:% -> II7"
$2:VIm7 = "VIm7 $VIm7 $4:m7 $3:m7 -> II7,&VI7,#IV%*2"
$2:IIIm7 = "IIIm7 $IIIm7 $4:m7 $3:m7 -> &IIIdim"
$2:II7 = "II7 $II7 $4:7 $3:7 -> IV,IIm7"
$2:&Vdim = "&Vdim $&Vdim $4:dim $3:dim -> IV"
$2:&VI7 = "&VI7 $&VI7 $4:7 $3:7 -> IV,V7,IIm7,&II7"
$2:#IVm7(&5)*2 = "#IVm7(&5)*2 $#IVm7(&5) $4:m7(&5) $3:m7(&5) -> IV,IIm7"
$2:#IV%*2 = "#IV%*2 $#IV% $4:% $3:% -> IV,IIm7"
$2:&IIIdim = "&IIIdim $&IIIdim $4:dim $3:dim = IIm7"
$2:IV = "IV $IV $4:M $3:M -> V7,&II7"
$2:IIm7 = "IIm7 $IIm7 $4:m7 $3:m7 -> V7,&II7"
$2:V7 = "V7 $V7 $4:7 $3:7"
$2:&II7 = "&II7 $&II7 $4:7 $3:7"
$2:END

 Chord Pattern 4
$2:P4
$2:I = "I $I $4:M -> I7,IIIm7,III7,IV7,VII7"
$2:I6 = "I6 $I6 $4:6 -> I7,IIIm7,III7,IV7,VII7"
$2:IM7 = "IM7 $IM7 $4:M7 -> I7,IIIm7,III7,IV7,VII7"
$2:#IVm7(&5) = "#IVm7(&5) $#IVm7(&5) $4:m7(&5) $3:m7(&5) -> IV7,VII7"
$2:#IV% = "#IV% $#IV% $4:% $3:% -> IV7*1,VII7"
$2:I7 = "I7 $I7 $4:7 -> IV IIm7 IV7*2 VIm7 &VIIM7"
$2:IIIm7 = "IIIm7 $IIIm7 $4:m7 $3:m7 -> VIm7"
$2:III7 = "III7 $III7 $4:7 $3:7 -> VIm7"
$2:IV7*1 = "IV7 $IV7 $4:7 $3:7 -> &VIIM7"
$2:VII7 = "VII7 $VII7 $4:7 $3:7 -> &VIIM7"
$2:IV = "IV $IV $4:M -> IVm II% &IIM7 &VI &VI6 &VIM7 &VI7 &VII7"
$2:IIm7 = "IIm7 $IIm7 $4:m7 -> IVm II% &IIM7 &VI &VI6 &VIM7 &VI7 &VII7"
$2:IV7*2 = "IV7*2 $IV7 $4:7 -> IVm,IIm7(&5),&IIM7,&VI(6,M7),&VI7,&VII7"
$2:VIm7 = "VIm7 $VIm7 $4:m7 -> IVm,IIm7(&5),&IIM7,&VI(6,7),&VI7"
$2:&VIIM7 = "&VIIM7 $&VIIM7 $4:M7 -> &VI(6,M7),&VI7,&VII7"
$2:V7 = "V7 $V7 $4:7 $3:7"
$2:&II7 = "&II7 $&II7 $4:7 $3:7"
$2:END

 modulation ,a change of key
$2:Modulate_to_Relative_Key Mod Modulation
$2:I = "I $I $4:M $3:M -> IV (&VI Pivot Chord)"
$2:I6 = "I6 $I6 $4:6 $3:6 -> IV (&VI Pivot Chord)"
$2:IM7 = "IM7 $IM7 $4:M7 $3:M7 -> IV (&VI Pivot Chord)"
$2:IV = "IV $IV $4:M $3:M -> VIIm7(&5) (II% Pivot Chord)"
$2:VIIm7(&5) = "VIIm7(&5) $VIIm7(&5) $4:m7(&5) -> V7 (Minor key)"
$2:VII% = "VII% $VII% $4:% $3:% -> V7 (Minor key)"
$2:V7 = "V7 $V7 V7(Minor key) -> Im (Minor key)"
$2:Im = "Im $Im $4:m $3:m"
$2:END

$2:Mod_T
$2:IV = "IV $IV $m:I_Major T -> "
$2:IV6 = "IV6 $IV6 $m:I6_Major T -> "
$2:IVM7 = "IVM7 $IVM7 $m:IM7_Major $m:&IIIM7_minor $m:&VIM7_minor T -> "
$2:IV7 = "IV7 $IV7 $m:I7_Major $m:IV7_minor T -> "
$2:V7 = "V7 $V7 $m:I7_Major $m:IV7_minor T -> "
$2:&II7 = "&II7 $&II7 $m:I7_Major $m:IV7_minor T -> "
$2:&VI7 = "&VI7 $&VI7 $m:I7_Major $m:IV7_minor T -> "
$2:VII7 = "VII7 $VII7 $m:I7_Major $m:IV7_minor T -> "
$2:IIm7 = "IIm7 $IIm7 $m:IIIm7_Maj $m:VIm7_Maj $m:Im7_min T -> "
$2:IVm7 = "IVm7 $IVm7 $m:IIIm7_Maj $m:VIm7_Maj $m:Im7_min T -> "
$2:VIm7 = "VIm7 $VIm7 $m:IIIm7_Maj $m:Im7_min T -> " 
$2:IIm = "IIm $IIm $m:IIIm_Maj $m:VIm_Maj $m:Im_min T -> "
$2:IVm = "IVm $IVm $m:IIIm_Maj $m:VIm_Maj $m:Im_min T -> "
$2:VIm = "VIm $VIm $m:IIIm_Maj $m:VIm_Maj $m:Im_min T -> "
$2:IIm7(&5) = "IIm7(&5) $IIm7(&5) $m:IIIm7(&5)_Maj $m:#IV_j $m:VI_min T -> "
$2:VIIm7(&5) = "VIIm7(&5) $VIIm7(&5) $m:IIIm7(&5)_Maj $m:#IV_j $m:VI_i T -> "
$2:END

$2:Mod_SD
$2:I = "I $I $m:IV_Major IV_minor SD -> "
$2:I6 = "I6 $I6 $m:IV6_Maj $m:&VI6_min SD -> "
$2:&VI6 = "&VI6 $&VI6 $m:IV6_Maj $m:&VI6_min SD -> "
$2:IM7 = "IM7 $IM7 $m:IVM7_Major $m:&VIIM7_j $m:&IIM7_i $m:&VIM7_i SD -> "
$2:I7 = "I7 $I7 $m:IV7_Maj $m:VII7_j $m:IV7_min $m:&VI7_i $m:&VII7_i SD -> "
$2:IV7 = "I7 $I7 $m:IV7_min $m:&VI7_i $m:&VII7_i SD -> "
$2:V7 = "V7 $V7 $m:IV7_Maj $m:VII7_j $m:IV7_min $m:&VI7_i $m:&VII7_i SD -> "
$2:IIm = "IIm $IIm $m:IVm_minor SD -> "
$2:IIIm = "IIIm $IIIm $m:IVm_minor SD -> "
$2:IVm = "IVm $IVm $m:IVm_minor SD -> "
$2:IVm6 = "IVm6 $IVm6 $m:IVm6_minor SD -> "
$2:IVmM7 = "IVmM7 $IVmM7 $m:IVmM7_minor SD -> "
$2:IVm7 = "IVm7 $IVm7 $m:IVm7_minor $m:IIm7_minor SD -> "
$2:IIm7(&5) = "IIm7(&5) $IIm7(&5) $m:IIm7(&5)_minor SD -> "
$2:IIIm7(&5) = "IIIm7(&5) $IIIm7(&5) $m:IIm7(&5)_minor SD -> "
$2:#IVm7(&5) = "#IVm7(&5) $#IVm7(&5) $m:IIm7(&5)_minor SD -> "
$2:VIIm7(&5) $VIIm7(&5) $m:IIm7(&5)_minor SD -> "
$2:IM7 = "IM7 $IM7 $m:IVM7_Maj $m:&VIIM7_Maj $m:&IIM7_i $m:&VII7_i SD -> "
$2:IVmM7 = "IVmM7 $IVmM7 $m:IVM7_Maj $m:&VIIM7_j $m:&IIM7_i $m:&VII7_i SD -> "
$2:&IIM7 = "&IIM7 $&IIM7 $m:IVM7_Maj $m:&VIIM7_j $m:&IIM7_i $m:&VII7_i SD -> "
$2:&VIM7 = "&VIM7 $&VIM7 $m:IVM7_Maj $m:&VIIM7_j $m:&IIM7_i $m:&VII7_i SD -> "
$2:END

$2:Mod_SDM
$2:IIm = "IIm $IIm $m:IVm_Major SDM -> "
$2:IIIm = "IIIm $IIIm $m:IVm_Major SDM -> "
$2:VIm = "VIm $VIm $m:IVm_Major SDM -> "
$2:I7 = "I7 $I7 $m:&VI7_Maj $m:&VII7_Maj SDM -> "
$2:IV7 = "IV7 $IV7 $m:&VI7_Maj $m:&VII7_Maj SDM -> "
$2:VII7 = "VII7 $VII7 $m:&VI7_Maj $m:&VII7_Maj SDM -> "
$2:IIm7 = "IIm7 $IIm7 $m:IVm7_Maj SDM -> "
$2:IIIm7 = "IIIm7 $IIIm7 $m:IVm7_Major SDM -> "
$2:VIm7 = "VIm7 $VIm7 $m:IVm7_Major SDM -> "
$2:IIIm7(&5) = "IIIm7(&5) $IIIm7(&5) $m:IIm7(&5)_Major SDM -> "
$2:#IVm7(&5) = "#IVm7(&5) $#IVm7(&5) $m:IIm7(&5)_Major SDM -> "
$2:END

$2:Mod_D
$2:I7 = "I7 $I7 $m:V7_Major $m:&II7_Maj $m:V7_min $m:&II7_min D -> "
$2:IV7 = "IV7 $IV7 $m:V7_Major $m:&II7_Maj $m:V7_min $m:&II7_min D -> "
$2:VII7 = "VII7 $VII7 $m:V7_Major $m:&II7_Maj $m:V7_min $m:&II7_min D -> "
$2:IIIm7(&5) = "IIIm7(&5) $IIIm7(&5) $m:VIIm7(&5)_Major SDM -> "
$2:#IVm7(&5) = "#IVm7(&5) $#IVm7(&5) $m:VIIm7(&5)_Major SDM -> "
$2:IVm = "IVm $IVm $m:Vm_minor D -> "
$2:IVm7 = "IVm7 $IVm7 $m:Vm7_minor D -> "
$2:END

$2:Mod_IIm7
$2:IIIm7 = "IIIm7 $IIIm7 $m:II_Major $m:II_minor SD-D -> V7"
$2:VIm7 = "VIm7 $VIm7 $m:II_Major $m:II_minor SD-D -> V7"
$2:END

$2:Mod_IIIm7
$2:IIIm7 = "IIIm7 $IIIm7 $m:III_Major Tonic -> IV,V7,VI7"
$2:VIm7 = "VIm7 $VIm7 $m:III_Major Tonic -> IV,V7,VI7"
$2:END

$2:Mod_IVm7
$2:IIIm7 = "IIIm7 $IIIm7 $m:IV_Major $m:IV_minor SM -> V7,IV,&VII7"
$2:VIm7 = "VIm7 $VIm7 $m:IV_Major $m:IV_minor SM -> V7,IV,&VII7"
$2:END

$2:Mod_&IIm7 Mod_&Shift
$2:IIIm7 = "IIIm7 $IIIm7 $&IIIm7 $m:II_Major SD-D -> V7"
$2:VIm7 = "VIm7 $VIm7 $&VIm7 $m:II_Major SD-D -> V7"
$2:END 

$2:Mod_#IIm7 Mod_#Shift
$2:IIIm7 = "IIIm7 $#IIIm7 $m:II_Major SD-D -> V7"
$2:VIm7 = "VIm7 $#VIm7 $m:II_Major SD-D -> V7"
$2:END 

$2:Worm
$2:I = "I $I $4:M $3:M -> III7,VII7"
$2:III7 = "III7 $III7 $4:7 $3:7 -> VIm"
$2:VIm = "VIm $VIm $4:m $3:m -> V"
$2:V = "V $V $4:M $3:M -> I,IV" 
$2:IV = "IV $IV $4:M $3:M -> V"
$2:END

$2:Canon
$2:I = "I $I $4:M $3:M -> V V/II"
$2:V = "V $V $4:M $3:M -> VIm"
$2:VIm = "VIm $VIm $4:m $3:m -> IIIm IIIm/V"
$2:IIIm = "IIIm $IIIm $4:m $3:m -> IV"
$2:IV = "IV $IV $4:M $3:M -> I"
$2:I = "I $I $4;M $3;M -> IV"
$2:IV = "IV $IV $4:M $3:M -> V"
$2:V = "V $V $4:M $3:M -> I"
$2:END

$3:Default_Root
$3:M = ,Root+M3+P5
$3:m = ,Root+m3+P5
$3:dim = ,Root+m3+dim5
$3:aug = ,Root+M3+aug5
$3:M7 = ,Root+M3+P5+M7
$3:M79 = ,Root+M3+P5+M7+M9
$3:7 = ,Root+M3+P5+m7
$3:m7 = ,Root+m3+P5+m7
$3:% = ,Root+m3+dim5+m7
$3:m7(&5) = ,Root+m3+dim5+m7
$3:dim7 = ,Root+m3+dim5+dim7
$3:mM7 = ,Root+m3+P5+M7
$3:6 = ,Root+M3+P5+M6
$3:m6 = ,Root+m3+P5+M6
$3:69 = ,Root+M3+P5+M6+M9
$3:m69 = ,Root+m3+P5+M6+M9
$3:m6(9) = ,Root+m3+P5+M6+M9
$3:m7(9) = ,Root+m3+P5+M7+M9
$3:m79 = ,Root+m3+P5+M7+M9
$3:m6(9) = ,Root+m3+P5+M6+M9
$3:sus4 = ,Root+P4+P5
$3:7sus4 = ,Root+P4+P5+m7
$3:M9 = ,Root+M3+P5+M7+M9
$3:m9 = ,Root+m3+P5+m7+M9
$3:9 = ,Root+M3+P5+m7+M9
$3:%9 = ,Root+m3+dim5+m7+M9
$3:7#9 = ,Root+M3+P5+m7+aug9
$3:7(#9) = ,Root+M3+P5+m7+aug9
$3:7+9 = ,Root+M3+P5+m7+aug9
$3:7&9 = ,Root+M3+P5+m7+m9
$3:7(&9) = ,Root+M3+P5+m7+m9
$3:7-9 = ,Root+M3+P5+m7+m9
$3:7&5 = ,Root+M3+dim5+m7
$3:7(&5) = ,Root+M3+dim5+m7
$3:7-5 = ,Root+M3+dim5+m7
$3:7#5 = ,Root+M3+aug5+m7
$3:7(#5) = ,Root+M3+aug5+m7
$3:7+5 = ,Root+M3+aug5+m7
$3:add9 = ,Root+M3+P5+M9
$3:M7+11 = ,Root+M3+P5+M7+aug11
$3:M6+11 = ,Root+M3+P5+M6+aug11
$3:M9+11 = ,Root+M3+P5+M9+aug11
$3:m711 = ,Root+m3+P5+m7+P11 
$3:m7(11) = ,Root+m3+P5+m7+P11 
$3:m911 = ,Root+m3+P5+m9+P11 
$3:m9(11) = ,Root+m3+P5+m9+P11 
$3:%11 = ,Root+m3+dim5+m7+P11
$3:7+11 = ,Root+M3+P5+m7+aug11
$3:79+11 = ,Root+M3+P5+m7+M9+aug11
$3:9+11 = ,Root+M3+P5+M9+aug11
$3:713 = ,Root+M3+P5+m7+M13
$3:7(13) = ,Root+M3+P5+m7+M13
$3:7913 = ,Root+M3+P5+m7+M9+M13
$3:7(913) = ,Root+M3+P5+m7+M9+M13
$3:7(9,13) = ,Root+M3+P5+m7+M9+M13
$3:913 = ,Root+M3+P5+M9+M13
$3:9(13) = ,Root+M3+P5+M9+M13
$3:7-13 = ,Root+M3+P5+m7+m13
$3:79-13 = ,Root+M3+P5+m7+m9+m13
$3:Special = ,..
$3:END

$4:Default_Name
$4:M = "Major chord"
$4:m = "minor chord"
$4:dim = "Diminished chord"
$4:aug = "Augmented chord"
$4:M7 = "Major 7th chord"
$4:7 = "Dominant 7th chord"
$4:m7 = "minor 7th chord"
$4:m7(&5) = "Half Diminished chord"
$4:% = "Half Diminished chord"
$4:dim7 = "Diminished 7th chord"
$4:mM7 = "minor Major 7th chord"
$4:6 = "Major 6th chord"
$4:m6 = "minor 6th chord"
$4:69 = "Major 6th 9th chord"
$4:6(9) = "Major 6th 9th chord"
$4:m69 = "minor 6th 9th chord"
$4:m6(9) = "minor 6th 9th chord"
$4:m79 = "minor 7th 9th chord"
$4:m7(9) = "minor 7th 9th chord"
$4:sus4 = "Suspended fourth chord"
$4:7sus4 = "Dominant 7th with suspended 4th"
$4:M9 = "Major 9th chord"
$4:m9 = "minor 9th chord"
$4:9 = "Dominant 9th chord"
$4:%9 = "Half Diminished with 9th"
$4:7#9 = "Dominant 7th with #9th
$4:7(#9) = "Dominant 7th with #9th
$4:7+9 = "Dominant 7th with #9th
$4:7&9 = "Dominant 7th with &9th
$4:7(&9) = "Dominant 7th with &9th
$4:7-9 = "Dominant 7th with &9th
$4:7#5 = "Dominant 7th with augmented 5th
$4:7(#5) = "Dominant 7th with augmented 5th
$4:7+5 = "Dominant 7th with augmented 5th
$4:7&5 = "Dominant 7th with flatted 5th
$4:7(&5) = "Dominant 7th with flatted 5th
$4:7-5 = "Dominant 7th with flatted 5th
$4:add9 = "Added 9th chord"
$4:M7+11 = "Major 7th with #11th 
$4:M6+11 = "Major 6th with #11th 
$4:M9+11 = "Major 9th with #11th 
$4:m711 = "minor 7th with 11th
$4:m7(11) = "minor 7th with 11th
$4:m911 = "minor 9th with 11th
$4:m9(11) = "minor 9th with 11th
$4:%11 = "Half Diminished with 11th
$4:7+11 = "Dominant 7th with #11th 
$4:79+11 = "Dominant 7th 9th with #11th 
$4:9+11 = "Dominant 9th with #11th 
$4:713 = "Dominant 7th with 13th
$4:7(13) = "Dominant 7th with 13th
$4:913 = "Dominant 9th with 13th
$4:9(13) = "Dominant 9th with 13th
$4:7913 = "Dominant 7th 9th with 13th
$4:7(913) = "Dominant 7th 9th with 13th
$4:7(9,13) = "Dominant 7th 9th with 13th
$4:7-13 = "Dominant 7th with &13th 
$4:79-13 = "Dominant 7th 9th with &13th 
$4:Special = "Your own chord"
$4:END

$5:Default_Note Default_Voicing Default
 #define chord_base_position 0

                   C:Root
                   |
                   v
 m0000005 _-1______0______1______2______*______4______5______6______7
$5:M =            ". . ."
$5:m =            ". & ."
$5:dim =          ". & &"
$5:aug =          ". . #"
$5:M7 =           ". . . ."
$5:7 =            ". . . &"
$5:m7 =           ". & . &"
$5:m7(&5) =       ". & & &"
$5:m7&5 =         ". & & &"
$5:m7-5 =         ". & & &"
$5:% =            ". & & &"
$5:dim7 =         ". & &."
$5:mM7 =          ". & . ."
$5:6 =            ". . .."
$5:m6 =           ". & .."
$5:69 =           ". . ..  ."
$5:6(9) =         ". . ..  ."
$5:m69 =          ". & ..  ."
$5:m6(9) =        ". & ..  ."
$5:sus4 =         ". # ."
$5:7sus4 =        ". # . &"
$5:M9 =           ". . . . ."
$5:m79 =          ". & . & ."
$5:m7(9) =        ". & . & ."
$5:m9 =           ". & . & ."
$5:9 =            ". . . & ."
$5:%9 =           ". & & & ."
$5:7(#9) =        ". . . & #"
$5:7#9 =          ". . . & #"
$5:7+9 =          ". . . & #"
$5:7(&9) =        ". . . & &"
$5:7&9 =          ". . . & &"
$5:7-9 =          ". . . & &"
$5:7(#5) =        ". . # &"
$5:7#5 =          ". . # &"
$5:7+5 =          ". . # &"
$5:7(&5) =        ". . & &"
$5:7&5 =          ". . & &"
$5:7-5 =          ". . & &"
$5:add9 =         ". . .   ."
$5:M7+11 =        ". . . .   #"
$5:M7(#11) =      ". . . .   #"
$5:M6+11 =        ". . ..    #"
$5:M6(#11) =      ". . ..    #"
$5:M9+11 =        ". . . . . #"
$5:M9(#11) =      ". . . . . #"
$5:m711 =         ". & . &   ."
$5:m7(11) =       ". & . &   ."
$5:m911 =         ". & . & . ."
$5:m9(11) =       ". & . & . ."
$5:%11 =          ". & & &   ."
$5:7+11 =         ". . . &   ."
$5:7(#11) =       ". . . &   ."
$5:9+11 =         ". . . & . #"
$5:79+11 =        ". . . & . #"
$5:79(#11) =      ". . . & . #"
$5:713 =          ". . . &     ."
$5:7(13) =        ". . . &     ."
$5:913 =          ". . .   .   ."
$5:9(13) =        ". . .   .   ."
$5:7913 =         ". . . & .   ."
$5:7(913) =       ". . . & .   ."
$5:7(9,13)=       ". . . & .   ."
$5:7-13 =         ". . . &     &"
$5:7(&13) =       ". . . &     &"
$5:79-13 =        ". . . & .   &"
$5:79(&13) =      ". . . & .   &"
$5:%-13 =         ". & & &     &"
$5:%(&13) =       ". & & &     &"
$5:END 

$5:Close
 m0000005 _-1______0______1______2______*______4______5______6______7
$5:M =            ". . ."
$5:m =            ". & ."
$5:dim =          ". & &"
$5:aug =          ". . #"
$5:M7 =           ". . . ."
$5:7 =            ". . . &"
$5:m7 =           ". & . &"
$5:m7(&5) =       ". & & &"
$5:m7&5 =         ". & & &"
$5:m7-5 =         ". & & &"
$5:% =            ". & & &"
$5:dim7 =         ". & &."
$5:mM7 =          ". & . ."
$5:6 =            ". . .."
$5:m6 =           ". & .."
$5:69 =           "  . ..  ."
$5:6(9) =         "  . ..  ."
$5:m69 =          "  & ..  ."
$5:m6(9) =        "  & ..  ."
$5:sus4 =         ". # ."
$5:7sus4 =        ". # . &"
$5:M9 =           "  . . . ."
$5:m79 =          "  & . & ."
$5:m7(9) =        "  & . & ."
$5:m9 =           "  & . & ."
$5:9 =            "  . . & ."
$5:79 =           "  . . & ."
$5:%9 =           "  & & & ."
$5:7(#9) =        "  . . & #"
$5:7#9 =          "  . . & #"
$5:7+9 =          "  . . & #"
$5:7(&9) =        "  . . & &"
$5:7&9 =          "  . . & &"
$5:7-9 =          "  . . & &"
$5:7(#5) =        "  . # &."
$5:7#5 =          "  . # &."
$5:7+5 =          "  . # &."
$5:7(&5) =        "  . & &."
$5:7&5 =          "  . & &."
$5:7-5 =          "  . & &."
$5:add9 =         "  . .  .."
$5:M7+11 =        "    . ..  #"
$5:M7(#11) =      "    . ..  #"
$5:M6+11 =        "    .. .  #"
$5:M6(#11) =      "    .. .  #"
$5:M9+11 =        "    . . . #"
$5:M9(#11) =      "    . . . #"
$5:m711 =         "    . &.  ."
$5:m7(11) =       "    . &.  ."
$5:m911 =         "    . & . ."
$5:m9(11) =       "    . & . ."
$5:%11 =          "    & &.  ."
$5:7+11 =         "    . &.  #"
$5:7(#11) =       "    . &.  #"
$5:9+11 =         "    . &.. #"
$5:79+11 =        "    . &.. #"
$5:79(#11) =      "    . &.. #"
$5:713 =          "  .  .&. "
$5:7(13) =        "  .  .&. "
$5:913 =          "  .  . .."
$5:9(13) =        "  .  . .."
$5:7913 =         "  .  .&.."
$5:7(913) =       "  .  .&.."
$5:7(9,13) =      "  .  .&.."
$5:7-13 =         "  .  &&. "
$5:7(&13) =       "  .  &&. "
$5:79-13 =        "  .  &&.."
$5:79(&13) =      "  .  &&.."
$5:%-13 =         "  &  &&. "
$5:%(&13) =       "  &  &&. "
$5:END

$5:3Way_Close
 m0000005 _-1______0______1______2______*______4______5______6______7
$5:M =            ". . ."
$5:m =            ". & ."
$5:dim =          ". & &"
$5:aug =          ". . #"
$5:M7 =           "  . . ."
$5:7 =            "  . . &"
$5:m7 =           "  & . &"
$5:m7(&5) =       "  & & &"
$5:m7&5 =         "  & & &"
$5:m7-5 =         "  & & &"
$5:% =            "  & & &"
$5:dim7 =         "  & &."
$5:mM7 =          "  & . ." 
$5:6 =            "  . .."
$5:m6 =           "  & .."
$5:69 =           " ..  ." 
$5:6(9) =         " ..  ." 
$5:m69 =          " .&  ." 
$5:m6(9) =        " .&  ." 
$5:sus4 =         ". # ." 
$5:7sus4 =        "  # . &" 
$5:M9 =           "      . .." 
$5:m79 =          "      & .&" 
$5:m7(9) =        "      & .&" 
$5:m9 =           "      & .&" 
$5:9 =            "      & .." 
$5:79 =           "      & .." 
$5:7(9) =         "      & .." 
$5:%9 =           "      & .&" 
$5:7(#9) =        "      & #." 
$5:7#9 =          "      & #." 
$5:7+9 =          "      & #." 
$5:7(&9) =        "      & &." 
$5:7&9 =          "      & &." 
$5:7-9 =          "      & &." 
$5:7(#5) =        "  . # & "
$5:7#5 =          "  . # & "
$5:7+5 =          "  . # & "
$5:7(&5) =        "  . & & "
$5:7&5 =          "  . & & "
$5:7-5 =          "  . & & "
$5:add9 =         " .. .   "
$5:M7+11 =        "   #. ."
$5:M7(#11) =      "   #. ."
$5:M6+11 =        "   #.. "
$5:M6(#11) =      "   #.. "
$5:M9+11 =        "      . . #"
$5:M9(#11) =      "      . . #"
$5:m711 =         "      &  &."
$5:m7(11) =       "      &  &."
$5:m911 =         "      & . ."
$5:m9(11) =       "      & . ."
$5:%11 =          "    & &   ."
$5:7+11 =         "   #. &"
$5:7(#11) =       "   #. &"
$5:9+11 =         "      & . #"
$5:79+11 =        "      & . #"
$5:79(#11) =      "      & . #"
$5:713 =          "  .  .&" 
$5:7(13) =        "  .  .&"
$5:913 =          "     .  .."
$5:9(13) =        "     .  .." 
$5:7913 =         "     .& ." 
$5:7(913) =       "     .& ." 
$5:7(9,13) =      "     .& ." 
$5:7-13 =         "  .  &&" 
$5:7(&13) =       "  .  &&" 
$5:79-13 =        "     && ." 
$5:79(&13) =      "     && ." 
$5:%-13 =         "  &  &&  " 
$5:%(&13) =       "  &  &&  " 
$5:END

$5:4Way_Close
 m0000005 _-1______0______1______2______*______4______5______6______7
$5:M =            ". . .  ."
$5:m =            ". & .  ."
$5:dim =          ". & &  ."
$5:aug =          ". . #  ."
$5:M7 =           ". . . ."
$5:7 =            ". . . &"
$5:m7 =           ". & . &"
$5:m7(&5) =       ". & & &"
$5:m7&5 =         ". & & &"
$5:m7-5 =         ". & & &"
$5:% =            ". & & &"
$5:dim7 =         ". & &."
$5:mM7 =          ". & . ."
$5:6 =            ". . .."
$5:m6 =           ". & .."
$5:69 =           "  . ..  ."
$5:6(9) =         "  . ..  ."
$5:m69 =          "  & ..  ."
$5:m6(9) =        "  & ..  ."
$5:sus4 =         ". # .  ."
$5:7sus4 =        ". # . &"
$5:M9 =           "  . . . ."
$5:m79 =          "  & . & ."
$5:m7(9) =        "  & . & ."
$5:m9 =           "  & . & ."
$5:9 =            "  . . & ."
$5:%9 =           "  & & & ."
$5:7(#9) =        "  . . & #"
$5:7#9 =          "  . . & #"
$5:7+9 =          "  . . & #"
$5:7(&9) =        "  . . & &"
$5:7&9 =          "  . . & &"
$5:7-9 =          "  . . & &"
$5:7(#5) =        ". . # &"
$5:7#5 =          ". . # &"
$5:7+5 =          ". . # &"
$5:7(&5) =        ". . & &"
$5:7&5 =          ". . & &"
$5:7-5 =          ". . & &"
$5:add9 =         ". . .   ."
$5:M7+11 =        "  .#. . "
$5:M7(#11) =      "  .#. . "
$5:M6+11 =        "  .#..  "
$5:M6(#11) =      "  .#..  "
$5:M9+11 =        " ..#  . "
$5:M9(#11) =      " ..#  . "
$5:m711 =         "  &.. & "
$5:m7(11) =       "  &.. & "
$5:m911 =         " .&.  & "
$5:m9(11) =       " .&.  & "
$5:%11 =          "  &.& & "
$5:7+11 =         "  .#. & "
$5:7(#11) =       "  .#. & "
$5:9+11 =         " ..#  & "
$5:79+11 =        " ..#  & "
$5:79(#11) =      " ..#  & "
$5:713 =          "  . ..& "
$5:7(13) =        "  . ..& "
$5:913 =          " .. .."
$5:9(13) =        " .. .."
$5:7913 =         " .. ..&"
$5:7(913) =       " .. ..&"
$5:7(9,13) =      " .. ..&"
$5:7-13 =         "  . .&&  "
$5:7(&13) =       "  . .&&  "
$5:79-13 =        "     && .."
$5:79(&13) =      "     && .."
$5:%-13 =         "  & &&&  "
$5:%(&13) =       "  & &&&  "
$5:END

$5:5Way_Close
 m0000005 _-1______0______1______2______*______4______5______6______7
$5:M =            ". . .  . ."
$5:m =            ". & .  . &"
$5:dim =          ". & &  . &"
$5:aug =          ". . #  . ."
$5:M7 =           ". . . .."
$5:7 =            ". . . &."
$5:m7 =           ". & . &."
$5:m7(&5) =       ". & & &."
$5:m7&5 =         ". & & &."
$5:m7-5 =         ". & & &."
$5:% =            ". & & &."
$5:dim7 =         ". & &. ."
$5:mM7 =          ". & . .."
$5:6 =            ". . .. ."
$5:m6 =           ". & .. ."
$5:69 =           ". . .. .."
$5:6(9) =         ". . .. .."
$5:m69 =          ". & .. .."
$5:m6(9) =        ". & .. .."
$5:sus4 =         ". # .  .."
$5:7sus4 =        ". # . &.."
$5:M9 =           ". . . ..."
$5:m79 =          ". & . &.."
$5:m7(9) =        ". & . &.."
$5:m9 =           ". & . &.."
$5:9 =            ". . . &.."
$5:%9 =           ". & & &.."
$5:7(#9) =        ". . . &.#"
$5:7#9 =          ". . . &.#"
$5:7+9 =          ". . . &.#"
$5:7(&9) =        ". . . &.&"
$5:7&9 =          ". . . &.&"
$5:7-9 =          ". . . &.&"
$5:7(#5) =        ". . # &."
$5:7#5 =          ". . # &."
$5:7+5 =          ". . # &."
$5:7(&5) =        ". . & &."
$5:7&5 =          ". . & &."
$5:7-5 =          ". . & &."
$5:add9 =         ". . .  .."
$5:M7+11 =        ". .#. . "
$5:M7(#11) =      ". .#. . "
$5:M6+11 =        ". .#..  "
$5:M6(#11) =      ". .#..  "
$5:M9+11 =        " ..#. . "
$5:M9(#11) =      " ..#. . "
$5:m711 =         ". &.. & "
$5:m7(11) =       ". &.. & "
$5:m911 =         " .&.. & "
$5:m9(11) =       " .&.. & "
$5:%11 =          ". &.& & "
$5:7+11 =         ". .#. & "
$5:7(#11) =       ". .#. & "
$5:9+11 =         " ..#. & "
$5:79+11 =        " ..#. & "
$5:79(#11) =      " ..#. & "
$5:713 =          ". . ..& "
$5:7(13) =        ". . ..& "
$5:913 =          " .. ..  "
$5:9(13) =        " .. ..  "
$5:7913 =         " .. ..& "
$5:7(913) =       " .. ..& "
$5:7(9,13) =      " .. ..& "
$5:7-13 =         ". . .&& "
$5:7(&13) =       ". . .&& "
$5:79-13 =        " .. .&& "
$5:79(&13) =      " .. .&& "
$5:%-13 =         ". & &&& "
$5:%(&13) =       ". & &&& "
$5:END

$5:Open
 m0000005 _-1______0______1______2______*______4______5______6______7
$5:M =            ".   .    ."
$5:m =            ".   .    &"
$5:dim =          ".   &    &"
$5:aug =          ".   #    ."
$5:M7 =           ".   . .  ."
$5:7 =            ".   . &  ."
$5:m7 =           ".   . &  &"
$5:m7(&5) =       ".   & &  &"
$5:m7&5 =         ".   & &  &"
$5:m7-5 =         ".   & &  &"
$5:% =            ".   & &  &"
$5:dim7 =         ".   &.   &"
$5:mM7 =          ".   . .  &"
$5:6 =            ".   ..   ."
$5:m6 =           ".   ..   &"
$5:69 =           ". . ..  . "
$5:6(9) =         ". . ..  . "
$5:m69 =          ". & ..  . "
$5:m6(9) =        ". & ..  . "
$5:sus4 =         ".   .    #"
$5:7sus4 =        ".   . &  #"
$5:M9 =           ". . . . ." 
$5:m79 =          ". & . & ." 
$5:m7(9) =        ". & . & ." 
$5:m9 =           ". & . & ." 
$5:9 =            ". .   & ."
$5:%9 =           ". & & & ."
$5:7(#9) =        ". .   & #"
$5:7#9 =          ". .   & #"
$5:7+9 =          ". .   & #"
$5:7(&9) =        ". .   & &"
$5:7&9 =          ". .   & &"
$5:7-9 =          ". .   & &"
$5:7(#5) =        ".   # &  ."
$5:7#5 =          ".   # &  ."
$5:7+5 =          ".   # &  ."
$5:7(&5) =        ".   & &  ."
$5:7&5 =          ".   & &  ."
$5:7-5 =          ".   & &  ."
$5:add9 =         ". . .   ."
$5:M7+11 =        ".   . .   #"
$5:M7(#11) =      ".   . .   #"
$5:M6+11 =        ". .  .    #"
$5:M6(#11) =      ". .  .    #"
$5:M9+11 =        ". .   . . #"
$5:M9(#11) =      ". .   . . #"
$5:m711 =         ". &   &   ."
$5:m7(11) =       ". &   &   ."
$5:m911 =         ". &   & . ."
$5:m9(11) =       ". &   & . ."
$5:%11 =          ". & &     ."
$5:7+11 =         ". .   &   #"
$5:7(#11) =       ". .   &   #"
$5:9+11 =         ". .   & . #"
$5:79+11 =        ". .   & . #"
$5:79(#11) =      ". .   & . #"
$5:713 =          ". .   &     ."
$5:7(13) =        ". .   &     ."
$5:913 =          ". .     .   ."
$5:9(13) =        ". .     .   ."
$5:7913 =         ". .   & .   ."
$5:7(913) =       ". .   & .   ."
$5:7(9,13) =      ". .   & .   ."
$5:7-13 =         ". .   &     &"
$5:7(&13) =       ". .   &     &"
$5:79-13 =        ". .   & .   &"
$5:79(&13) =      ". .   & .   &"
$5:%-13 =         ". & &       &"
$5:%(&13) =       ". & &       &"
$5:END

 Drop2&4
$5:Voice4 Drop2&4
 m0000005 _-1______0______1______2______*______4______5______6______7
$5:M =            "  . .    .    ." 
$5:m =            "  & .    &    ." 
$5:dim =          "  & &    &    ."   
$5:aug =          "  & #    &    ."   
$5:M7 =           ".   .    .   ."
$5:7 =            ".   .    .   &"
$5:m7 =           ".   .    &   &" 
$5:m7(&5) =       ".   &    &   &"
$5:m7&5 =         ".   &    &   &"
$5:m7-5 =         ".   &    &   &"
$5:% =            ".   &    &   &" 
$5:dim7 =         ".   &    &  ."  
$5:mM7 =          ".   .    &   ." 
$5:6 =            ".   .    .  ."
$5:m6 =           ".   .    &  ."
$5:69 =           "  .  .     .   ."
$5:6(9) =         "  .  .     .   ."
$5:m69 =          "  &  .     .   ."
$5:m6(9) =        "  &  .     .   ."
$5:sus4 =         "  # .    #    ."
$5:7sus4 =        ".   .    #   &" 
$5:M9 =           "  .   .    .   ."
$5:m79 =          "  &   &    .   ."
$5:m7(9) =        "  &   &    .   ."
$5:m9 =           "  &   &    .   ."
$5:9 =            "  .   &    .   ."
$5:%9 =           "  &   &    &   ."
$5:7(#9) =        "  .   &    .   #"
$5:7#9 =          "  .   &    .   #"
$5:7+9 =          "  .   &    .   #"
$5:7(&9) =        "  .   &    .   &"
$5:7&9 =          "  .   &    .   &"
$5:7-9 =          "  .   &    .   &"
$5:7(#5) =        ".   #    .   &"
$5:7#5 =          ".   #    .   &"
$5:7+5 =          ".   #    .   &"
$5:7(&5) =        ".   &    .   &"
$5:7&5 =          ".   &    .   &"
$5:7-5 =          ".   &    .   &"
$5:add9 =         ".   .    .     ." 
$5:END 

 Drop2&4_Close
$5:Voice4_Close Drop2&4_Close
 m0000005 _-1______0______1______2______*______4______5______6______7
$5:M =            "  . .  ." 
$5:m =            "  & .  ." 
$5:dim =          "  & &  ."   
$5:aug =          "  & #  ."   
$5:M7 =           ".   . ."
$5:7 =            ".   . &"
$5:m7 =           ".   . &" 
$5:m7(&5) =       ".   & &"
$5:m7&5 =         ".   & &"
$5:m7-5 =         ".   & &"
$5:% =            ".   & &" 
$5:dim7 =         ".   &."  
$5:mM7 =          ".   . ." 
$5:6 =            ".   .."
$5:m6 =           ".   .."
$5:69 =           "  .  .  ."
$5:6(9) =         "  .  .  ."
$5:m69 =          "  &  .  ."
$5:m6(9) =        "  &  .  ."
$5:sus4 =         "  # .  ."
$5:7sus4 =        ".   . &" 
$5:M9 =           "  .   . ."
$5:m79 =          "  &   & ."
$5:m7(9) =        "  &   & ."
$5:m9 =           "  &   & ."
$5:9 =            "  .   & ."
$5:%9 =           "  &   & ."
$5:7(#9) =        "  .   & #"
$5:7#9 =          "  .   & #"
$5:7+9 =          "  .   & #"
$5:7(&9) =        "  .   & &"
$5:7&9 =          "  .   & &"
$5:7-9 =          "  .   & &"
$5:7(#5) =        ".   # &"
$5:7#5 =          ".   # &"
$5:7+5 =          ".   # &"
$5:7(&5) =        ".   & &"
$5:7&5 =          ".   & &"
$5:7-5 =          ".   & &"
$5:add9 =         ". . .   ." 
$5:END 

$5:4Way_Spread 4Way_Open
 #define chord_base_position 1
 m0000005 _-1______0______1______2______*______4______5______6______7
$5:M =            ".   .    .    ."
$5:m =            ".   .    &    ."
$5:dim =          ".   &    &    ."
$5:aug =          ".   #    .    ."
$5:M7 =           ".   .    .   . "
$5:7 =            ".   .    .   & "
$5:m7 =           ".   .    &   & "
$5:m7(&5) =       ".   &    &   & "
$5:m7&5 =         ".   &    &   & "
$5:m7-5 =         ".   &    &   & "
$5:% =            ".   &    &   & "
$5:dim7 =         ".    .   &    ."
$5:mM7 =          ".   .    &   . "
$5:6 =            ".    .   .    ."
$5:m6 =           ".    .   &    ."
$5:69 =           ".    .   .     ."
$5:6(9) =         ".    .   .     ."
$5:m69 =          ".    .   &     ."
$5:m6(9) =        ".    .   &     ."
$5:sus4 =         ".   .    #    ."
$5:7sus4 =        ".   .    #   & "
$5:M9 =           ".     .  .     ."
$5:m79 =          ".     &  &     ."
$5:m7(9)  =       ".     &  &     ."
$5:m9 =           ".     &  &     ."
$5:9 =            ".     &  .     ."
$5:%9 =           ".     &  &     ."
$5:7(#9) =        ".     &  .     #"
$5:7#9 =          ".     &  .     #"
$5:7+9 =          ".     &  .     #"
$5:7(&9) =        ".     &  .     &"
$5:7&9 =          ".     &  .     &"
$5:7-9 =          ".     &  .     &"
$5:7(#5) =        ".   #    .   &"
$5:7#5 =          ".   #    .   &"
$5:7+5 =          ".   #    .   &"
$5:7(&5) =        ".   &    .   &"
$5:7&5 =          ".   &    .   &"
$5:7-5 =          ".   &    .   &"
$5:add9 =         ".   .    .     ."
$5:M7+11 =        ".     .   #     ."
$5:M7(#11) =      ".     .   #     ."
$5:M6+11 =        ".    .    #     ."
$5:M6(#11) =      ".    .    #     ."
$5:M9+11 =        ".     .   #    ."
$5:M9(#11) =      ".     .   #    ."
$5:m711 =         ".     &   .     &"
$5:m7(11) =       ".     &   .     &"
$5:m911 =         "  &   &   .    ."
$5:m9(11) =       "  &   &   .    ."
$5:%11 =          ".     &    &    &"
$5:7+11 =         ".     &   #     ."
$5:7(#11) =       ".     &   #     ."
$5:9+11 =         ".     &   #    ."
$5:79+11 =        ".     &   #    ."
$5:79(#11) =      ".     &   #    ."
$5:713 =          ".     &  .  ."
$5:7(13) =        ".     &  .  ."
$5:913 =          ".    .   .     ."
$5:9(13) =        ".    .   .     ."
$5:7913 =         ".     &  .     ."
$5:7(913) =       ".     &  .     ."
$5:7(9,13) =      ".     &  .     ."
$5:7-13 =         ".    &       &  ."
$5:7(&13) =       ".    &       &  ."
$5:79-13 =        ".    &  .    &"
$5:79(&13) =      ".    &  .    &"
$5:%-13 =         ".   &    &  &"
$5:%(&13) =       ".   &    &  &"
$5:END 

$5:5Way_Spread 5Way_Open
 m0000005 _-1______0______1______2______*______4______5______6______7
$5:M =            ".   .    . .  ."
$5:m =            ".   .    & .  ."
$5:dim =          ".   &    & &  ."
$5:aug =          ".   #    . #  ."
$5:M7 =           ".   .    . . . "
$5:7 =            ".   .    . . & "
$5:m7 =           ".   .    & . & "
$5:m7(&5) =       ".   &    & & & "
$5:m7&5 =         ".   &    & & & "
$5:m7-5 =         ".   &    & & & "
$5:% =            ".   &    & & & "
$5:dim7 =         ".   &    &  . ."
$5:mM7 =          ".   .    & . . "
$5:6 =            ".   .    .  . ."
$5:m6 =           ".   .    &  . ."
$5:69 =           ".   .    .  .  ."
$5:6(9) =         ".   .    .  .  ."
$5:m69 =          ".   .    &  .  ."
$5:m6(9) =        ".   .    &  .  ."
$5:sus4 =         ".   .    # .  ."
$5:7sus4 =        ".   .      . &  #"
$5:M9 =           ".   .    .   . ."
$5:m79 =          ".   .    &   & ."
$5:m7(9) =        ".   .    &   & ."
$5:m9 =           ".   .    &   & ."
$5:9 =            ".   .    .   & ."
$5:%9 =           ".   &    &   & ."
$5:7(#9) =        ".   .    .   & #"
$5:7#9 =          ".   .    .   & #"
$5:7+9 =          ".   .    .   & #"
$5:7(&9) =        ".   .    .   & &"
$5:7&9 =          ".   .    .   & &"
$5:7-9 =          ".   .    .   & &"
$5:7(#5) =        ".   #    . # &"
$5:7#5 =          ".   #    . # &"
$5:7+5 =          ".   #    . # &"
$5:7(&5) =        ".   &    . & &"
$5:7&5 =          ".   &    . & &"
$5:7-5 =          ".   &    . & &"
$5:add9 =         ".   .    . .   ."
$5:M7+11 =        ".   .     #  .  ."
$5:M7(#11) =      ".   .     #  .  ."
$5:M6+11 =        ".   .     # .   ."
$5:M6(#11) =      ".   .     # .   ."
$5:M9+11 =        ".   .   . #  ."
$5:M9(#11) =      ".   .   . #  ."
$5:m711 =         ".   .     .  &  &"
$5:m7(11) =       ".   .     .  &  &"
$5:m911 =         ".  .     &   & ."
$5:m9(11) =       ".  .     &   & ."
$5:%11 =          ".  .     & & &"
$5:7+11 =         ".   .    .#  &"
$5:7(#11) =       ". . . &   #  &"
$5:9+11 =         ".   .   . #  &"
$5:79+11 =        ".   .   . #  &"
$5:79(#11) =      ".   .   . #  &"
$5:713 =          ".   . &  .  ."
$5:7(13) =        ".   . &  .  ."
$5:913 =          ".   .    .  .  ."
$5:9(13) =        ".   .    .  .  ."
$5:7913 =         ".     &  .  .  ."
$5:7(913) =       ".     &  .  .  ."
$5:7(9,13) =      ".     &  .  .  ."
$5:7-13 =         ".    &     . &  ."
$5:7(&13) =       ".    &     . &  ."
$5:79-13 =        ".    &  .  . &"
$5:79(&13) =      ".    &  .  . &"
$5:%-13 =         ".   & &  &  &"
$5:%(&13) =       ".   & &  &  &"
$5:END 

$5:2Way_Base
 m0000005 _-1______0______1______2______*______4______5______6______7
$5:M =            ".   ."
$5:m =            ".   ."
$5:dim =          ".   &"
$5:aug =          ".   #"
$5:M7 =           ".   ."
$5:7 =            ".     &"
$5:m7 =           ".     &"
$5:m7(&5) =       ".     &"
$5:m7&5 =         ".     &"
$5:m7-5 =         ".     &"
$5:% =            ".     &"
$5:dim7 =         ".    ."
$5:mM7 =          ".   ."
$5:6 =            ".    ."
$5:m6 =           ".    ."
$5:69 =           ".    ."
$5:6(9) =         ".    ."
$5:m69 =          ".    ."
$5:m6(9) =        ".    ."
$5:sus4 =         ".    "
$5:7sus4 =        ".     &"
$5:M9 =           ".   ."
$5:m79 =          ".     &"
$5:m7(9) =        ".     &"
$5:m9 =           ".     &"
$5:9 =            ".     &"
$5:%9 =           ".     &"
$5:7(#9) =        ".     &"
$5:7#9 =          ".     &"
$5:7+9 =          ".     &"
$5:7(&9) =        ".     &"
$5:7&9 =          ".     &"
$5:7-9 =          ".     &"
$5:7(#5) =        ".   #"
$5:7#5 =          ".   #"
$5:7+5 =          ".   #"
$5:7(&5) =        ".   &"
$5:7&5 =          ".   &"
$5:7-5 =          ".   &"
$5:add9 =         ".   ."
$5:M7+11 =        ".   ."
$5:M7(#11) =      ".   ."
$5:M6+11 =        ".   ."
$5:M6(#11) =      ".   ."
$5:M9+11 =        ".   ."
$5:M9(#11) =      ".   ."
$5:m711 =         ".     &"
$5:m7(11) =       ".     &"
$5:m911 =         ".     &"
$5:m9(11) =       ".     &"
$5:%11 =          ".   &"
$5:7+11 =         ".     &"
$5:7(#11) =       ".     &"
$5:9+11 =         ".     &"
$5:79+11 =        ".     &"
$5:79(#11) =      ".     &"
$5:713 =          ".     &"
$5:7(13) =        ".     &"
$5:913 =          ".   ."
$5:9(13) =        ".   ."
$5:7913 =         ".   ."
$5:7(913) =       ".   ."
$5:7(9,13) =      ".   ."
$5:7-13 =         ".   ."
$5:7(&13) =       ".   ."
$5:79-13 =        ".   ."
$5:79(&13) =      ".   ."
$5:%-13 =         ".   &"
$5:%(&13) =       ".   &"
$5:END

$5:3Way_Base
 m0000005 _-1______0______1______2______*______4______5______6______7
$5:M =            ". . ."
$5:m =            ". & ."
$5:dim =          ". & &"
$5:aug =          ". . #"
$5:M7 =           ".   . ."
$5:7 =            ".   . &"
$5:m7 =           ".   . &"
$5:m7(&5) =       ".   & &"
$5:m7&5 =         ".   & &"
$5:m7-5 =         ".   & &"
$5:% =            ".   & &"
$5:dim7 =         ".   &."
$5:mM7 =          ".   . ."
$5:6 =            ".   .."
$5:m6 =           ".   .."
$5:69 =           ".    .  ."
$5:6(9) =         ".    .  ."
$5:m69 =          ".    .  ."
$5:m6(9) =        ".    .  ."
$5:sus4 =         ".   ."
$5:7sus4 =        ".   . &"
$5:M9 =           ".     . ."
$5:m79 =          ".     & ."
$5:m7(9) =        ".     & ."
$5:m9 =           ".     & ."
$5:9 =            ".     & ."
$5:%9 =           ".     & ."
$5:7(#9) =        ".     & #"
$5:7#9 =          ".     & #"
$5:7+9 =          ".     & #"
$5:7(&9) =        ".     & &"
$5:7&9 =          ".     & &"
$5:7-9 =          ".     & &"
$5:7(#5) =        ".   # &"
$5:7#5 =          ".   # &"
$5:7+5 =          ".   # &"
$5:7(&5) =        ".   & &"
$5:7&5 =          ".   & &"
$5:7-5 =          ".   & &"
$5:add9 =         ".   .   ."
$5:M7+11 =        ".   . ."
$5:M7(#11) =      ".   . ."
$5:M6+11 =        ".   .. "
$5:M6(#11) =      ".   .. "
$5:M9+11 =        ".   . ."
$5:M9(#11) =      ".   . ."
$5:m711 =         ".   . &"
$5:m7(11) =       ".   . &"
$5:m911 =         ".   . &"
$5:m9(11) =       ".   . &"
$5:%11 =          ".   & &"
$5:7+11 =         ".   . &"
$5:7(#11) =       ".   . &"
$5:9+11 =         ".   . &"
$5:79+11 =        ".   . &"
$5:79(#11) =      ".   . &"
$5:713 =          ".   . &"
$5:7(13) =        ".   . &"
$5:913 =          ".   .. "
$5:9(13) =        ".   .. "
$5:7913 =         ".   . &"
$5:7(913) =       ".   . &"
$5:7(9,13) =      ".   . &"
$5:7-13 =         ".   . &"
$5:7(&13) =       ".   . &"
$5:79-13 =        ".   . &"
$5:79(&13) =      ".   . &"
$5:%-13 =         ".   & &"
$5:%(&13) =       ".   & &"
$5:END

 Exchange ! Chord progression line
!&I = $2:&I
!&I6 = $2:&I6
!&I7 = $2:&I7
!&I69 = $2:&I69
!&I6(9) = $2:&I6(9)
!&Iaug = $2:&Iaug
!&IM7 = $2:&IM7
!&I7(&5) = $2:&I7(&5)
!&I7&5 = $2:&I7&5
!&I7-5 = $2:&I7-5
!&I9 = $2:&I9
!&I(&5) = $2:&I(&5)
!&I&5 = $2:&I&5
!&I-5 = $2:&I-5
!&IM9 = $2:&IM9
!&I7(#5) = $2:&I7(#5)
!&I7#5 = $2:&I7#5
!&I7+5 = $2:&I7+5
!&I7(#9) = $2:&I7(#9)
!&I7#9 = $2:&I7#9
!&I7+9 = $2:&I7+9
!&I7(&10) = $2:&I7+9
!&I7&10 = $2:&I7+9
!&I7-10 = $2:&I7+9
!&I7(&9) = $2:&I7(&9)
!&I7&9 = $2:&I7&9
!&I7-9 = $2:&I7-9
!&Im = $2:&Im
!&Im6 = $2:&Im6
!&Im7 = $2:&Im7
!&ImM7 = $2:&ImM7
!&Im9 = $2:&Im9
!&Im69 = $2:&Im69
!&Im79 = $2:&Im79
!&Im6(9) = $2:&Im6(9)
!&Im7(&5) = $2:&Im7(&5)
!&Im7&5 = $2:&Im7&5
!&Im7-5 = $2:&Im7-5
!&I% = $2:&I%
!&Idim = $2:&Idim
!&Idim = $2:&Idim
!&Idim7 = $2:&Idim7
!&Isus4 = $2:&Isus4
!&I7sus4 = $2:&I7sus4

!I = $2:I
!I6 = $2:I6
!I7 = $2:I7
!I69 = $2:I69
!I6(9) = $2:I6(9)
!Iaug = $2:Iaug
!IM7 = $2:IM7
!I7(&5) = $2:I7(&5)
!I7&5 = $2:I7&5
!I7-5 = $2:I7-5
!I9 = $2:I9
!I(&5) = $2:I(&5)
!I&5 = $2:I&5
!I-5 = $2:I-5
!IM9 = $2:IM9
!I7(#5) = $2:I7(#5)
!I7#5 = $2:I7#5
!I7+5 = $2:I7+5
!I7(&10) = $2:I7(#9)
!I7&10 = $2:I7#9
!I7-10 = $2:I7+9
!I7(#9) = $2:I7(#9)
!I7#9 = $2:I7#9
!I7+9 = $2:I7+9
!I7(&9) = $2:I7(&9)
!I7&9 = $2:I7&9
!I7-9 = $2:I7-9
!Im = $2:Im
!Im6 = $2:Im6
!Im7 = $2:Im7
!ImM7 = $2:ImM7
!Im9 = $2:Im9
!Im69 = $2:Im69
!Im79 = $2:Im79
!Im6(9) = $2:Im6(9)
!Im7(9) = $2:Im7(9)
!Im7(&5) = $2:Im7(&5)
!Im7&5 = $2:Im7&5
!Im7-5 = $2:Im7-5
!I% = $2:I%
!Idim = $2:Idim
!Idim = $2:Idim
!Idim7 = $2:Idim7
!Isus4 = $2:Isus4
!I7sus4 = $2:I7sus4

!#I = $2:#I
!#I6 = $2:#I6
!#I7 = $2:#I7
!#I69 = $2:#I69
!#I6(9) = $2:#I6(9)
!#Iaug = $2:#Iaug
!#IM7 = $2:#IM7
!#I7(&5) = $2:#I7(&5)
!#I7&5 = $2:#I7&5
!#I7-5 = $2:#I7-5
!#I9 = $2:#I9
!#I(&5) = $2:#I(&5)
!#I&5 = $2:#I&5
!#I-5 = $2:#I-5
!#IM9 = $2:#IM9
!#I7(#5) = $2:#I7(#5)
!#I7#5 = $2:#I7#5
!#I7+5 = $2:#I7+5
!#I7(#9) = $2:#I7(#9)
!#I7#9 = $2:#I7#9
!#I7+9 = $2:#I7+9
!#I7(&10) = $2:#I7(#9)
!#I7&10 = $2:#I7#9
!#I7-10 = $2:#I7+9
!#I7(&9) = $2:#I7(&9)
!#I7&9 = $2:#I7&9
!#I7-9 = $2:#I7-9
!#Im = $2:#Im
!#Im6 = $2:#Im6
!#Im7 = $2:#Im7
!#ImM7 = $2:#ImM7
!#Im9 = $2:#Im9
!#Im69 = $2:#Im69
!#Im79 = $2:#Im79
!#Im6(9) = $2:#Im6(9)
!#Im7(9) = $2:#Im7(9)
!#Im7(&5) = $2:#Im7(&5)
!#Im7&5 = $2:#Im7&5
!#Im7-5 = $2:#Im7-5
!#I% = $2:#I%
!#Idim = $2:#Idim
!#Idim = $2:#Idim
!#Idim7 = $2:#Idim7
!#Isus4 = $2:#Isus4
!#I7sus4 = $2:#I7sus4

!&II = $2:&II
!&II6 = $2:&II6
!&II7 = $2:&II7
!&II69 = $2:&II69
!&II6(9) = $2:&II6(9)
!&IIaug = $2:&IIaug
!&IIM7 = $2:&IIM7
!&II7(&5) = $2:&II7(&5)
!&II7&5 = $2:&II7&5
!&II7-5 = $2:&II7-5
!&II9 = $2:&II9
!&II(&5) = $2:&II(&5)
!&II&5 = $2:&II&5
!&II-5 = $2:&II-5
!&IIM9 = $2:&IIM9
!&II7(#5) = $2:&II7(#5)
!&II7#5 = $2:&II7#5
!&II7+5 = $2:&II7+5
!&II7(#9) = $2:&II7(#9)
!&II7#9 = $2:&II7#9
!&II7+9 = $2:&II7+9
!&II7(&10) = $2:&II7(#9)
!&II7&10 = $2:&II7#9
!&II7-10 = $2:&II7+9
!&II7(&9) = $2:&II7(&9)
!&II7&9 = $2:&II7&9
!&II7-9 = $2:&II7-9
!&IIm = $2:&IIm
!&IIm6 = $2:&IIm6
!&IIm7 = $2:&IIm7
!&IImM7 = $2:&IImM7
!&IIm9 = $2:&IIm9
!&IIm69 = $2:&IIm69
!&IIm79 = $2:&IIm79
!&IIm6(9) = $2:&IIm6(9)
!&IIm7(9) = $2:&IIm7(9)
!&IIm7(&5) = $2:&IIm7(&5)
!&IIm7&5 = $2:&IIm7&5
!&IIm7-5 = $2:&IIm7-5
!&II% = $2:&II%
!&IIdim = $2:&IIdim
!&IIdim = $2:&IIdim
!&IIdim7 = $2:&IIdim7
!&IIsus4 = $2:&IIsus4
!&II7sus4 = $2:&II7sus4

!II = $2:II
!II6 = $2:II6
!II7 = $2:II7
!II69 = $2:II69
!II6(9) = $2:II6(9)
!IIaug = $2:IIaug
!IIM7 = $2:IIM7
!II7(&5) = $2:II7(&5)
!II7&5 = $2:II7&5
!II7-5 = $2:II7-5
!II9 = $2:II9
!II(&5) = $2:II(&5)
!II&5 = $2:II&5
!II-5 = $2:II-5
!IIM9 = $2:IIM9
!II7(#5) = $2:II7(#5)
!II7#5 = $2:II7#5
!II7+5 = $2:II7+5
!II7(&10) = $2:II7(#9)
!II7&10 = $2:II7#9
!II7-10 = $2:II7+9
!II7(#9) = $2:II7(#9)
!II7#9 = $2:II7#9
!II7+9 = $2:II7+9
!II7(&9) = $2:II7(&9)
!II7&9 = $2:II7&9
!II7-9 = $2:II7-9
!IIm = $2:IIm
!IIm6 = $2:IIm6
!IIm7 = $2:IIm7
!IImM7 = $2:IImM7
!IIm9 = $2:IIm9
!IIm69 = $2:IIm69
!IIm79 = $2:IIm79
!IIm6(9) = $2:IIm6(9)
!IIm7(9) = $2:IIm7(9)
!IIm7(&5) = $2:IIm7(&5)
!IIm7&5 = $2:IIm7&5
!IIm7-5 = $2:IIm7-5
!II% = $2:II%
!IIdim = $2:IIdim
!IIdim = $2:IIdim
!IIdim7 = $2:IIdim7
!IIsus4 = $2:IIsus4
!II7sus4 = $2:II7sus4

!#II = $2:#II
!#II6 = $2:#II6
!#II7 = $2:#II7
!#II69 = $2:#II69
!#II6(9) = $2:#II6(9)
!#IIaug = $2:#IIaug
!#IIM7 = $2:#IIM7
!#II7(&5) = $2:#II7(&5)
!#II7&5 = $2:#II7&5
!#II7-5 = $2:#II7-5
!#II9 = $2:#II9
!#II(&5) = $2:#II(&5)
!#II&5 = $2:#II&5
!#II-5 = $2:#II-5
!#IIM9 = $2:#IIM9
!#II7(#5) = $2:#II7(#5)
!#II7#5 = $2:#II7#5
!#II7+5 = $2:#II7+5
!#II7(&10) = $2:#II7(#9)
!#II7&10 = $2:#II7#9
!#II7-10 = $2:#II7+9
!#II7(#9) = $2:#II7(#9)
!#II7#9 = $2:#II7#9
!#II7+9 = $2:#II7+9
!#II7(&9) = $2:#II7(&9)
!#II7&9 = $2:#II7&9
!#II7-9 = $2:#II7-9
!#IIm = $2:#IIm
!#IIm6 = $2:#IIm6
!#IIm7 = $2:#IIm7
!#IImM7 = $2:#IImM7
!#IIm9 = $2:#IIm9
!#IIm69 = $2:#IIm69
!#IIm79 = $2:#IIm79
!#IIm6(9) = $2:#IIm6(9)
!#IIm7(9) = $2:#IIm7(9)
!#IIm7(&5) = $2:#IIm7(&5)
!#IIm7&5 = $2:#IIm7&5
!#IIm7-5 = $2:#IIm7-5
!#II% = $2:#II%
!#IIdim = $2:#IIdim
!#IIdim = $2:#IIdim
!#IIdim7 = $2:#IIdim7
!#IIsus4 = $2:#IIsus4
!#II7sus4 = $2:#II7sus4

!&III = $2:&III
!&III6 = $2:&III6
!&III7 = $2:&III7
!&III69 = $2:&III69
!&III6(9) = $2:&III6(9)
!&IIIaug = $2:&IIIaug
!&IIIM7 = $2:&IIIM7
!&III7(&5) = $2:&III7(&5)
!&III7&5 = $2:&III7&5
!&III7-5 = $2:&III7-5
!&III9 = $2:&III9
!&III(&5) = $2:&III(&5)
!&III&5 = $2:&III&5
!&III-5 = $2:&III-5
!&IIIM9 = $2:&IIIM9
!&III7(#5) = $2:&III7(#5)
!&III7#5 = $2:&III7#5
!&III7+5 = $2:&III7+5
!&III7(&10) = $2:&III7(#9)
!&III7&10 = $2:&III7#9
!&III7-10 = $2:&III7+9
!&III7(#9) = $2:&III7(#9)
!&III7#9 = $2:&III7#9
!&III7+9 = $2:&III7+9
!&III7(&9) = $2:&III7(&9)
!&III7&9 = $2:&III7&9
!&III7-9 = $2:&III7-9
!&IIIm = $2:&IIIm
!&IIIm6 = $2:&IIIm6
!&IIIm7 = $2:&IIIm7
!&IIImM7 = $2:&IIImM7
!&IIIm9 = $2:&IIIm9
!&IIIm69 = $2:&IIIm69
!&IIIm79 = $2:&IIIm79
!&IIIm6(9) = $2:&IIIm6(9)
!&IIIm7(9) = $2:&IIIm7(9)
!&IIIm7(&5) = $2:&IIIm7(&5)
!&IIIm7&5 = $2:&IIIm7&5
!&IIIm7-5 = $2:&IIIm7-5
!&III% = $2:&III%
!&IIIdim = $2:&IIIdim
!&IIIdim = $2:&IIIdim
!&IIIdim7 = $2:&IIIdim7
!&IIIsus4 = $2:&IIIsus4
!&III7sus4 = $2:&III7sus4

!III = $2:III
!III6 = $2:III6
!III7 = $2:III7
!III69 = $2:III69
!III6(9) = $2:III6(9)
!IIIaug = $2:IIIaug
!IIIM7 = $2:IIIM7
!III7(&5) = $2:III7(&5)
!III7&5 = $2:III7&5
!III7-5 = $2:III7-5
!III9 = $2:III9
!III(&5) = $2:III(&5)
!III&5 = $2:III&5
!III-5 = $2:III-5
!IIIM9 = $2:IIIM9
!III7(#5) = $2:III7(#5)
!III7#5 = $2:III7#5
!III7+5 = $2:III7+5
!III7(&10) = $2:III7(#9)
!III7&10 = $2:III7#9
!III7-10 = $2:III7+9
!III7(#9) = $2:III7(#9)
!III7#9 = $2:III7#9
!III7+9 = $2:III7+9
!III7(&9) = $2:III7(&9)
!III7&9 = $2:III7&9
!III7-9 = $2:III7-9
!IIIm = $2:IIIm
!IIIm6 = $2:IIIm6
!IIIm7 = $2:IIIm7
!IIImM7 = $2:IIImM7
!IIIm9 = $2:IIIm9
!IIIm69 = $2:IIIm69
!IIIm79 = $2:IIIm79
!IIIm6(9) = $2:IIIm6(9)
!IIIm7(9) = $2:IIIm7(9)
!IIIm7(&5) = $2:IIIm7(&5)
!IIIm7&5 = $2:IIIm7&5
!IIIm7-5 = $2:IIIm7-5
!III% = $2:III%
!IIIdim = $2:IIIdim
!IIIdim = $2:IIIdim
!IIIdim7 = $2:IIIdim7
!IIIsus4 = $2:IIIsus4
!III7sus4 = $2:III7sus4

!#III = $2:#III
!#III6 = $2:#III6
!#III7 = $2:#III7
!#III69 = $2:#III69
!#III6(9) = $2:#III6(9)
!#IIIaug = $2:#IIIaug
!#IIIM7 = $2:#IIIM7
!#III7(&5) = $2:#III7(&5)
!#III7&5 = $2:#III7&5
!#III7-5 = $2:#III7-5
!#III9 = $2:#III9
!#III(&5) = $2:#III(&5)
!#III&5 = $2:#III&5
!#III-5 = $2:#III-5
!#IIIM9 = $2:#IIIM9
!#III7(#5) = $2:#III7(#5)
!#III7#5 = $2:#III7#5
!#III7+5 = $2:#III7+5
!#III7(&10) = $2:#III7(#9)
!#III7&10 = $2:#III7#9
!#III7-10 = $2:#III7+9
!#III7(#9) = $2:#III7(#9)
!#III7#9 = $2:#III7#9
!#III7+9 = $2:#III7+9
!#III7(&9) = $2:#III7(&9)
!#III7&9 = $2:#III7&9
!#III7-9 = $2:#III7-9
!#IIIm = $2:#IIIm
!#IIIm6 = $2:#IIIm6
!#IIIm7 = $2:#IIIm7
!#IIImM7 = $2:#IIImM7
!#IIIm9 = $2:#IIIm9
!#IIIm69 = $2:#IIIm69
!#IIIm79 = $2:#IIIm79
!#IIIm6(9) = $2:#IIIm6(9)
!#IIIm7(9) = $2:#IIIm7(9)
!#IIIm7(&5) = $2:#IIIm7(&5)
!#IIIm7&5 = $2:#IIIm7&5
!#IIIm7-5 = $2:#IIIm7-5
!#III% = $2:#III%
!#IIIdim = $2:#IIIdim
!#IIIdim = $2:#IIIdim
!#IIIdim7 = $2:#IIIdim7
!#IIIsus4 = $2:#IIIsus4
!#III7sus4 = $2:#III7sus4

!&IV = $2:&IV
!&IV6 = $2:&IV6
!&IV7 = $2:&IV7
!&IV69 = $2:&IV69
!&IV6(9) = $2:&IV6(9)
!&IVaug = $2:&IVaug
!&IVM7 = $2:&IVM7
!&IV7(&5) = $2:&IV7(&5)
!&IV7&5 = $2:&IV7&5
!&IV7-5 = $2:&IV7-5
!&IV9 = $2:&IV9
!&IV(&5) = $2:&IV(&5)
!&IV&5 = $2:&IV&5
!&IV-5 = $2:&IV-5
!&IVM9 = $2:&IVM9
!&IV7(#5) = $2:&IV7(#5)
!&IV7#5 = $2:&IV7#5
!&IV7+5 = $2:&IV7+5
!&IV7(&10) = $2:&IV7(#9)
!&IV7&10 = $2:&IV7#9
!&IV7-10 = $2:&IV7+9
!&IV7(#9) = $2:&IV7(#9)
!&IV7#9 = $2:&IV7#9
!&IV7+9 = $2:&IV7+9
!&IV7(&9) = $2:&IV7(&9)
!&IV7&9 = $2:&IV7&9
!&IV7-9 = $2:&IV7-9
!&IVm = $2:&IVm
!&IVm6 = $2:&IVm6
!&IVm7 = $2:&IVm7
!&IVmM7 = $2:&IVmM7
!&IVm9 = $2:&IVm9
!&IVm69 = $2:&IVm69
!&IVm79 = $2:&IVm79
!&IVm6(9) = $2:&IVm6(9)
!&IVm7(9) = $2:&IVm7(9)
!&IVm7(&5) = $2:&IVm7(&5)
!&IVm7&5 = $2:&IVm7&5
!&IVm7-5 = $2:&IVm7-5
!&IV% = $2:&IV%
!&IVdim = $2:&IVdim
!&IVdim = $2:&IVdim
!&IVdim7 = $2:&IVdim7
!&IVsus4 = $2:&IVsus4
!&IV7sus4 = $2:&IV7sus4

!IV6 = $2:IV6
!IV7 = $2:IV7
!IV69 = $2:IV69
!IV6(9) = $2:IV6(9)
!IVaug = $2:IVaug
!IVM7 = $2:IVM7
!IV7(&5) = $2:IV7(&5)
!IV7&5 = $2:IV7&5
!IV7-5 = $2:IV7-5
!IV9 = $2:IV9
!IV(&5) = $2:IV(&5)
!IV&5 = $2:IV&5
!IV-5 = $2:IV-5
!IVM9 = $2:IVM9
!IV7(#5) = $2:IV7(#5)
!IV7#5 = $2:IV7#5
!IV7+5 = $2:IV7+5
!IV7(&10) = $2:IV7(#9)
!IV7&10 = $2:IV7#9
!IV7-10 = $2:IV7+9
!IV7(#9) = $2:IV7(#9)
!IV7#9 = $2:IV7#9
!IV7+9 = $2:IV7+9
!IV7(&9) = $2:IV7(&9)
!IV7&9 = $2:IV7&9
!IV7-9 = $2:IV7-9
!IVm = $2:IVm
!IVm6 = $2:IVm6
!IVm7 = $2:IVm7
!IVmM7 = $2:IVmM7
!IVm9 = $2:IVm9
!IVm69 = $2:IVm69
!IVm79 = $2:IVm79
!IVm6(9) = $2:IVm6(9)
!IVm7(9) = $2:IVm7(9)
!IVm7(&5) = $2:IVm7(&5)
!IVm7&5 = $2:IVm7&5
!IVm7-5 = $2:IVm7-5
!IV% = $2:IV%
!IVdim = $2:IVdim
!IVdim = $2:IVdim
!IVdim7 = $2:IVdim7
!IVsus4 = $2:IVsus4
!IV7sus4 = $2:IV7sus4

!#IV = $2:#IV
!#IV6 = $2:#IV6
!#IV7 = $2:#IV7
!#IV69 = $2:#IV69
!#IV6(9) = $2:#IV6(9)
!#IVaug = $2:#IVaug
!#IVM7 = $2:#IVM7
!#IV7(&5) = $2:#IV7(&5)
!#IV7&5 = $2:#IV7&5
!#IV7-5 = $2:#IV7-5
!#IV9 = $2:#IV9
!#IV(&5) = $2:#IV(&5)
!#IV&5 = $2:#IV&5
!#IV-5 = $2:#IV-5
!#IVM9 = $2:#IVM9
!#IV7(#5) = $2:#IV7(#5)
!#IV7#5 = $2:#IV7#5
!#IV7+5 = $2:#IV7+5
!#IV7(&10) = $2:#IV7(#9)
!#IV7&10 = $2:#IV7#9
!#IV7-10 = $2:#IV7+9
!#IV7(#9) = $2:#IV7(#9)
!#IV7#9 = $2:#IV7#9
!#IV7+9 = $2:#IV7+9
!#IV7(&9) = $2:#IV7(&9)
!#IV7&9 = $2:#IV7&9
!#IV7-9 = $2:#IV7-9
!#IVm = $2:#IVm
!#IVm6 = $2:#IVm6
!#IVm7 = $2:#IVm7
!#IVmM7 = $2:#IVmM7
!#IVm9 = $2:#IVm9
!#IVm69 = $2:#IVm69
!#IVm79 = $2:#IVm79
!#IVm6(9) = $2:#IVm6(9)
!#IVm7(9) = $2:#IVm7(9)
!#IVm7(&5) = $2:#IVm7(&5)
!#IVm7&5 = $2:#IVm7&5
!#IVm7-5 = $2:#IVm7-5
!#IV% = $2:#IV%
!#IVdim = $2:#IVdim
!#IVdim = $2:#IVdim
!#IVdim7 = $2:#IVdim7
!#IVsus4 = $2:#IVsus4
!#IV7sus4 = $2:#IV7sus4

!&V = $2:&V
!&V6 = $2:&V6
!&V7 = $2:&V7
!&V69 = $2:&V69
!&V6(9) = $2:&V6(9)
!&Vaug = $2:&Vaug
!&VM7 = $2:&VM7
!&V7(&5) = $2:&V7(&5)
!&V7&5 = $2:&V7&5
!&V7-5 = $2:&V7-5
!&V9 = $2:&V9
!&V(&5) = $2:&V(&5)
!&V&5 = $2:&V&5
!&V-5 = $2:&V-5
!&VM9 = $2:&VM9
!&V7(#5) = $2:&V7(#5)
!&V7#5 = $2:&V7#5
!&V7+5 = $2:&V7+5
!&V7(&10) = $2:&V7(#9)
!&V7&10 = $2:&V7#9
!&V7-10 = $2:&V7+9
!&V7(#9) = $2:&V7(#9)
!&V7#9 = $2:&V7#9
!&V7+9 = $2:&V7+9
!&V7(&9) = $2:&V7(&9)
!&V7&9 = $2:&V7&9
!&V7-9 = $2:&V7-9
!&Vm = $2:&Vm
!&Vm6 = $2:&Vm6
!&Vm7 = $2:&Vm7
!&VmM7 = $2:&VmM7
!&Vm9 = $2:&Vm9
!&Vm69 = $2:&Vm69
!&Vm79 = $2:&Vm79
!&Vm6(9) = $2:&Vm6(9)
!&Vm7(9) = $2:&Vm7(9)
!&Vm7(&5) = $2:&Vm7(&5)
!&Vm7&5 = $2:&Vm7&5
!&Vm7-5 = $2:&Vm7-5
!&V% = $2:&V%
!&Vdim = $2:&Vdim
!&Vdim = $2:&Vdim
!&Vdim7 = $2:&Vdim7
!&Vsus4 = $2:&Vsus4
!&V7sus4 = $2:&V7sus4

!V = $2:V
!V6 = $2:V6
!V7 = $2:V7
!V69 = $2:V69
!V6(9) = $2:V6(9)
!Vaug = $2:Vaug
!VM7 = $2:VM7
!V7(&5) = $2:V7(&5)
!V7&5 = $2:V7&5
!V7-5 = $2:V7-5
!V9 = $2:V9
!V(&5) = $2:V(&5)
!V&5 = $2:V&5
!V-5 = $2:V-5
!VM9 = $2:VM9
!V7(#5) = $2:V7(#5)
!V7#5 = $2:V7#5
!V7+5 = $2:V7+5
!V7(&10) = $2:V7(#9)
!V7&10 = $2:V7#9
!V7-10 = $2:V7+9
!V7(#9) = $2:V7(#9)
!V7#9 = $2:V7#9
!V7+9 = $2:V7+9
!V7(&9) = $2:V7(&9)
!V7&9 = $2:V7&9
!V7-9 = $2:V7-9
!Vm = $2:Vm
!Vm6 = $2:Vm6
!Vm7 = $2:Vm7
!VmM7 = $2:VmM7
!Vm9 = $2:Vm9
!Vm69 = $2:Vm69
!Vm79 = $2:Vm79
!Vm6(9) = $2:Vm6(9)
!Vm7(9) = $2:Vm7(9)
!Vm7(&5) = $2:Vm7(&5)
!Vm7&5 = $2:Vm7&5
!Vm7-5 = $2:Vm7-5
!V% = $2:V%
!Vdim = $2:Vdim
!Vdim = $2:Vdim
!Vdim7 = $2:Vdim7
!Vsus4 = $2:Vsus4
!V7sus4 = $2:V7sus4

!#V = $2:#V
!#V6 = $2:#V6
!#V7 = $2:#V7
!#V69 = $2:#V69
!#V6(9) = $2:#V6(9)
!#Vaug = $2:#Vaug
!#VM7 = $2:#VM7
!#V7(&5) = $2:#V7(&5)
!#V7&5 = $2:#V7&5
!#V7-5 = $2:#V7-5
!#V9 = $2:#V9
!#V(&5) = $2:#V(&5)
!#V&5 = $2:#V&5
!#V-5 = $2:#V-5
!#VM9 = $2:#VM9
!#V7(#5) = $2:#V7(#5)
!#V7#5 = $2:#V7#5
!#V7+5 = $2:#V7+5
!#V7(&10) = $2:#V7(#9)
!#V7&10 = $2:#V7#9
!#V7-10 = $2:#V7+9
!#V7(#9) = $2:#V7(#9)
!#V7#9 = $2:#V7#9
!#V7+9 = $2:#V7+9
!#V7(&9) = $2:#V7(&9)
!#V7&9 = $2:#V7&9
!#V7-9 = $2:#V7-9
!#Vm = $2:#Vm
!#Vm6 = $2:#Vm6
!#Vm7 = $2:#Vm7
!#VmM7 = $2:#VmM7
!#Vm9 = $2:#Vm9
!#Vm69 = $2:#Vm69
!#Vm79 = $2:#Vm79
!#Vm6(9) = $2:#Vm6(9)
!#Vm7(9) = $2:#Vm7(9)
!#Vm7(&5) = $2:#Vm7(&5)
!#Vm7&5 = $2:#Vm7&5
!#Vm7-5 = $2:#Vm7-5
!#V% = $2:#V%
!#Vdim = $2:#Vdim
!#Vdim = $2:#Vdim
!#Vdim7 = $2:#Vdim7
!#Vsus4 = $2:#Vsus4
!#V7sus4 = $2:#V7sus4

!&VI = $2:&VI
!&VI6 = $2:&VI6
!&VI7 = $2:&VI7
!&VI69 = $2:&VI69
!&VI6(9) = $2:&VI6(9)
!&VIaug = $2:&VIaug
!&VIM7 = $2:&VIM7
!&VI7(&5) = $2:&VI7(&5)
!&VI7&5 = $2:&VI7&5
!&VI7-5 = $2:&VI7-5
!&VI9 = $2:&VI9
!&VI(&5) = $2:&VI(&5)
!&VI&5 = $2:&VI&5
!&VI-5 = $2:&VI-5
!&VIM9 = $2:&VIM9
!&VI7(#5) = $2:&VI7(#5)
!&VI7#5 = $2:&VI7#5
!&VI7+5 = $2:&VI7+5
!&VI7(&10) = $2:&VI7(#9)
!&VI7&10 = $2:&VI7#9
!&VI7-10 = $2:&VI7+9
!&VI7(#9) = $2:&VI7(#9)
!&VI7#9 = $2:&VI7#9
!&VI7+9 = $2:&VI7+9
!&VI7(&9) = $2:&VI7(&9)
!&VI7&9 = $2:&VI7&9
!&VI7-9 = $2:&VI7-9
!&VIm = $2:&VIm
!&VIm6 = $2:&VIm6
!&VIm7 = $2:&VIm7
!&VImM7 = $2:&VImM7
!&VIm9 = $2:&VIm9
!&VIm69 = $2:&VIm69
!&VIm79 = $2:&VIm79
!&VIm6(9) = $2:&VIm6(9)
!&VIm7(9) = $2:&VIm7(9)
!&VIm7(&5) = $2:&VIm7(&5)
!&VIm7&5 = $2:&VIm7&5
!&VIm7-5 = $2:&VIm7-5
!&VI% = $2:&VI%
!&VIdim = $2:&VIdim
!&VIdim = $2:&VIdim
!&VIdim7 = $2:&VIdim7
!&VIsus4 = $2:&VIsus4
!&VI7sus4 = $2:&VI7sus4

!VI = $2:VI
!VI6 = $2:VI6
!VI7 = $2:VI7
!VI69 = $2:VI69
!VI6(9) = $2:VI6(9)
!VIaug = $2:VIaug
!VIM7 = $2:VIM7
!VI7(&5) = $2:VI7(&5)
!VI7&5 = $2:VI7&5
!VI7-5 = $2:VI7-5
!VI9 = $2:VI9
!VI(&5) = $2:VI(&5)
!VI&5 = $2:VI&5
!VI-5 = $2:VI-5
!VIM9 = $2:VIM9
!VI7(#5) = $2:VI7(#5)
!VI7#5 = $2:VI7#5
!VI7+5 = $2:VI7+5
!VI7(&10) = $2:VI7(#9)
!VI7&10 = $2:VI7#9
!VI7-10 = $2:VI7+9
!VI7(#9) = $2:VI7(#9)
!VI7#9 = $2:VI7#9
!VI7+9 = $2:VI7+9
!VI7(&9) = $2:VI7(&9)
!VI7&9 = $2:VI7&9
!VI7-9 = $2:VI7-9
!VIm = $2:VIm
!VIm6 = $2:VIm6
!VIm7 = $2:VIm7
!VImM7 = $2:VImM7
!VIm9 = $2:VIm9
!VIm69 = $2:VIm69
!VIm79 = $2:VIm79
!VIm6(9) = $2:VIm6(9)
!VIm7(9) = $2:VIm7(9)
!VIm7(&5) = $2:VIm7(&5)
!VIm7&5 = $2:VIm7&5
!VIm7-5 = $2:VIm7-5
!VI% = $2:VI%
!VIdim = $2:VIdim
!VIdim = $2:VIdim
!VIdim7 = $2:VIdim7
!VIsus4 = $2:VIsus4
!VI7sus4 = $2:VI7sus4

!#VI = $2:#VI
!#VI6 = $2:#VI6
!#VI7 = $2:#VI7
!#VI69 = $2:#VI69
!#VI6(9) = $2:#VI6(9)
!#VIaug = $2:#VIaug
!#VIM7 = $2:#VIM7
!#VI7(&5) = $2:#VI7(&5)
!#VI7&5 = $2:#VI7&5
!#VI7-5 = $2:#VI7-5
!#VI9 = $2:#VI9
!#VI(&5) = $2:#VI(&5)
!#VI&5 = $2:#VI&5
!#VI-5 = $2:#VI-5
!#VIM9 = $2:#VIM9
!#VI7(#5) = $2:#VI7(#5)
!#VI7#5 = $2:#VI7#5
!#VI7+5 = $2:#VI7+5
!#VI7(&10) = $2:#VI7(#9)
!#VI7&10 = $2:#VI7#9
!#VI7-10 = $2:#VI7+9
!#VI7(#9) = $2:#VI7(#9)
!#VI7#9 = $2:#VI7#9
!#VI7+9 = $2:#VI7+9
!#VI7(&9) = $2:#VI7(&9)
!#VI7&9 = $2:#VI7&9
!#VI7-9 = $2:#VI7-9
!#VIm = $2:#VIm
!#VIm6 = $2:#VIm6
!#VIm7 = $2:#VIm7
!#VImM7 = $2:#VImM7
!#VIm9 = $2:#VIm9
!#VIm69 = $2:#VIm69
!#VIm79 = $2:#VIm79
!#VIm6(9) = $2:#VIm6(9)
!#VIm7(9) = $2:#VIm7(9)
!#VIm7(&5) = $2:#VIm7(&5)
!#VIm7&5 = $2:#VIm7&5
!#VIm7-5 = $2:#VIm7-5
!#VI% = $2:#VI%
!#VIdim = $2:#VIdim
!#VIdim = $2:#VIdim
!#VIdim7 = $2:#VIdim7
!#VIsus4 = $2:#VIsus4
!#VI7sus4 = $2:#VI7sus4

!&VII = $2:&VII
!&VII6 = $2:&VII6
!&VII7 = $2:&VII7
!&VII69 = $2:&VII69
!&VII6(9) = $2:&VII6(9)
!&VIIaug = $2:&VIIaug
!&VIIM7 = $2:&VIIM7
!&VII7(&5) = $2:&VII7(&5)
!&VII7&5 = $2:&VII7&5
!&VII7-5 = $2:&VII7-5
!&VII9 = $2:&VII9
!&VII(&5) = $2:&VII(&5)
!&VII&5 = $2:&VII&5
!&VII-5 = $2:&VII-5
!&VIIM9 = $2:&VIIM9
!&VII7(#5) = $2:&VII7(#5)
!&VII7#5 = $2:&VII7#5
!&VII7+5 = $2:&VII7+5
!&VII7(&10) = $2:&VII7(#9)
!&VII7&10 = $2:&VII7#9
!&VII7-10 = $2:&VII7+9
!&VII7(#9) = $2:&VII7(#9)
!&VII7#9 = $2:&VII7#9
!&VII7+9 = $2:&VII7+9
!&VII7(&9) = $2:&VII7(&9)
!&VII7&9 = $2:&VII7&9
!&VII7-9 = $2:&VII7-9
!&VIIm = $2:&VIIm
!&VIIm6 = $2:&VIIm6
!&VIIm7 = $2:&VIIm7
!&VIImM7 = $2:&VIImM7
!&VIIm9 = $2:&VIIm9
!&VIIm69 = $2:&VIIm69
!&VIIm79 = $2:&VIIm79
!&VIIm6(9) = $2:&VIIm6(9)
!&VIIm7(9) = $2:&VIIm7(9)
!&VIIm7(&5) = $2:&VIIm7(&5)
!&VIIm7&5 = $2:&VIIm7&5
!&VIIm7-5 = $2:&VIIm7-5
!&VII% = $2:&VII%
!&VIIdim = $2:&VIIdim
!&VIIdim = $2:&VIIdim
!&VIIdim7 = $2:&VIIdim7
!&VIIsus4 = $2:&VIIsus4
!&VII7sus4 = $2:&VII7sus4

!VII = $2:VII
!VII6 = $2:VII6
!VII7 = $2:VII7
!VII69 = $2:VII69
!VII6(9) = $2:VII6(9)
!VIIaug = $2:VIIaug
!VIIM7 = $2:VIIM7
!VII7(&5) = $2:VII7(&5)
!VII7&5 = $2:VII7&5
!VII7-5 = $2:VII7-5
!VII9 = $2:VII9
!VII(&5) = $2:VII(&5)
!VII&5 = $2:VII&5
!VII-5 = $2:VII-5
!VIIM9 = $2:VIIM9
!VII7(#5) = $2:VII7(#5)
!VII7#5 = $2:VII7#5
!VII7+5 = $2:VII7+5
!VII7(&10) = $2:VII7(#9)
!VII7&10 = $2:VII7#9
!VII7-10 = $2:VII7+9
!VII7(#9) = $2:VII7(#9)
!VII7#9 = $2:VII7#9
!VII7+9 = $2:VII7+9
!VII7(&9) = $2:VII7(&9)
!VII7&9 = $2:VII7&9
!VII7-9 = $2:VII7-9
!VIIm = $2:VIIm
!VIIm6 = $2:VIIm6
!VIIm7 = $2:VIIm7
!VIImM7 = $2:VIImM7
!VIIm9 = $2:VIIm9
!VIIm69 = $2:VIIm69
!VIIm79 = $2:VIIm79
!VIIm6(9) = $2:VIIm6(9)
!VIIm7(9) = $2:VIIm7(9)
!VIIm7(&5) = $2:VIIm7(&5)
!VIIm7&5 = $2:VIIm7&5
!VIIm7-5 = $2:VIIm7-5
!VII% = $2:VII%
!VIIdim = $2:VIIdim
!VIIdim = $2:VIIdim
!VIIdim7 = $2:VIIdim7
!VIIsus4 = $2:VIIsus4
!VII7sus4 = $2:VII7sus4

!#VII = $2:#VII
!#VII6 = $2:#VII6
!#VII7 = $2:#VII7
!#VII69 = $2:#VII69
!#VII6(9) = $2:#VII6(9)
!#VIIaug = $2:#VIIaug
!#VIIM7 = $2:#VIIM7
!#VII7(&5) = $2:#VII7(&5)
!#VII7&5 = $2:#VII7&5
!#VII7-5 = $2:#VII7-5
!#VII9 = $2:#VII9
!#VII(&5) = $2:#VII(&5)
!#VII&5 = $2:#VII&5
!#VII-5 = $2:#VII-5
!#VIIM9 = $2:#VIIM9
!#VII7(#5) = $2:#VII7(#5)
!#VII7#5 = $2:#VII7#5
!#VII7+5 = $2:#VII7+5
!#VII7(&10) = $2:#VII7(#9)
!#VII7&10 = $2:#VII7#9
!#VII7-10 = $2:#VII7+9
!#VII7(#9) = $2:#VII7(#9)
!#VII7#9 = $2:#VII7#9
!#VII7+9 = $2:#VII7+9
!#VII7(&9) = $2:#VII7(&9)
!#VII7&9 = $2:#VII7&9
!#VII7-9 = $2:#VII7-9
!#VIIm = $2:#VIIm
!#VIIm6 = $2:#VIIm6
!#VIIm7 = $2:#VIIm7
!#VIImM7 = $2:#VIImM7
!#VIIm9 = $2:#VIIm9
!#VIIm69 = $2:#VIIm69
!#VIIm79 = $2:#VIIm79
!#VIIm6(9) = $2:#VIIm6(9)
!#VIIm7(9) = $2:#VIIm7(9)
!#VIIm7(&5) = $2:#VIIm7(&5)
!#VIIm7&5 = $2:#VIIm7&5
!#VIIm7-5 = $2:#VIIm7-5
!#VII% = $2:#VII%
!#VIIdim = $2:#VIIdim
!#VIIdim = $2:#VIIdim
!#VIIdim7 = $2:#VIIdim7
!#VIIsus4 = $2:#VIIsus4
!#VII7sus4 = $2:#VII7sus4
$2:END
 -------Chord Select Param-----
 Ex. procedure
 V1 = ka*a + kb*b + kc*c + kd*d; /* Note1 */
 V2 = ka*a + kb*b + kc*c + kd*d; /* Note2 */
 V3 = ka*a + kb*b + kc*c + kd*d; /* Note3 */
 V = V1 + V2 + V3 ..

 Make Before Note Selsect chord line
 Chord M
  IM V = 11
 Chord m
  Im V = 55
 Chord dim
  IIdim V = 33
  :
 Compear IM & Im & IIdim ..
 ?IM,IIdim,Im,...

 Make Current Note Selsect chord line
  Same above
 ?Im,IIdim,V..

 Make After Note Select chord line
 ?I,...

 Check Chord Progress ex.$2:T-T & finally set Current Chord
 ?IM,IIdim,..

$6:Default_chord_select
 m0000006 _-1______0______1______2______*______4______5______6______7
  Val(Root,2nd,3d,5th,.) Comment
$6:M = 5,5.6,5           ". . ."
$6:m = 5,5,5             ". & ."
$6:dim = 5,5,5           ". & &"
$6:aug = 5,5,5           ". . #"
$6:M7 = 5,5,5,5          ". . . ."
$6:7 = 5,5,5,5           ". . . &"
$6:m7 = 5,5,5,5          ". & . &"
$6:m79   = 5,5,5,5,5     ". & . & ."
$6:m7(9) = 5,5,5,5,5     ". & . & ."
$6:m7(&5L) = 5,5,5,5      ". & & &"
$6:m7&5 = 5,5,5,5        ". & & &"
$6:m7-5 = 5,5,5,5        ". & & &"
$6:% = 5,5,5,5           ". & & &"
$6:dim7 = 5,5,5,5        ". & &."
$6:mM7 = 5,5,5,5         ". & . ."
$6:6 = 5,5,5,5           ". . .."
$6:m6 = 5,5,5,5          ". & .."
$6:69 = 5,5,5,5,5        ". . ..  ."
$6:6(9)= 5 5,5,5,5       ". . ..  ."
$6:m69 = 5,5,5,5,5       ". & ..  ."
$6:m6(9) = 5,5,5,5,5     ". & ..  ."
$6:sus4 = 5,5,5          ". # ."
$6:7sus4 = 5,5,5,5       ". # . &"
$6:M9 = 5,5,5,5,5        ". . . . ."
$6:m9 = 5,5,5,5,5        ". & . & ."
$6:9 = 5,5,5,5,5         ". . . & ."
$6:%9 = 5,5,5,5,5        ". & & & ."
$6:7(#9) = 5,5,5,5,5     ". . . & #"
$6:7#9 = 5,5,5,5,5       ". . . & #"
$6:7+9 = 5,5,5,5,5       ". . . & #"
$6:7(&9) = 5,5,5,5,5     ". . . & &"
$6:7&9 = 5,5,5,5,5       ". . . & &"
$6:7-9 = 5,5,5,5,5       ". . . & &"
$6:7(#5) = 5,5,5,5       ". . # &"
$6:7#5 = 5,5,5,5         ". . # &"
$6:7+5 = 5,5,5,5         ". . # &"
$6:7(&5) = 5,5,5,5       ". . & &"
$6:7&5 = 5,5,5,5         ". . & &"
$6:7-5 = 5,5,5,5         ". . & &"
$6:add9 = 5,5,5,5        ". . .   ."
$6:m(11) = 5,5,5,5,5     ". & .   . ."
 m0000006 _-1______0______1______2______*______4______5______6______7
$6:END

$6:Special_chord_select
 m0000006 _-1______0______1______2______*______4______5______6______7
  Val(Root,2nd,3d,5th,.) Comment
$6:M = 6,5.6,6           ". . ."
$6:m = 6,5,6             ". & ."
$6:dim = 6,5,6           ". & &"
$6:aug = 6,5,6           ". . #"
$6:M7 = 6,5,6,4          ". . . ."
$6:7 = 6,5,6,4           ". . . &"
$6:m7 = 6,5,6,4          ". & . &"
$6:m79   = 5,5,5,5,5     ". & . & ."
$6:m7(9) = 5,5,5,5,5     ". & . & ."
$6:m7(&5) = 6,5,6,4      ". & & &"
$6:m7&5 = 6,5,6,4        ". & & &"
$6:m7-5 = 6,5,6,4        ". & & &"
$6:% = 6,5,6,4           ". & & &"
$6:dim7 = 6,5,6,4        ". & &."
$6:mM7 = 6,5,6,4         ". & . ."
$6:6 = 6,5,6,4           ". . .."
$6:m6 = 6,5,6,4          ". & .."
$6:69 = 6,5,6,4,3        ". . ..  ."
$6:6(9)= 5 5,5,5,5       ". . ..  ."
$6:m69 = 6,5,6,4,3       ". & ..  ."
$6:m6(9) = 6,5,6,4,3     ". & ..  ."
$6:sus4 = 6,5,6          ". # ."
$6:7sus4 = 6,5,6,4       ". # . &"
$6:M9 = 6,5,6,4,3        ". . . . ."
$6:m9 = 6,5,6,4,3        ". & . & ."
$6:9 = 6,5,6,4,3         ". . . & ."
$6:%9 = 6,5,6,4,3        ". & & & ."
$6:7(#9) = 6,5,6,4,3     ". . . & #"
$6:7#9 = 6,5,6,4,4       ". . . & #"
$6:7+9 = 6,5,6,4,4       ". . . & #"
$6:7(&9) = 6,5,6,4,3     ". . . & &"
$6:7&9 = 6,5,6,4,3       ". . . & &"
$6:7-9 = 6,5,6,4,3       ". . . & &"
$6:7(#5) = 6,5,6,4       ". . # &"
$6:7#5 = 6,5,6,4         ". . # &"
$6:7+5 = 6,5,6,4         ". . # &"
$6:7(&5) = 6,5,6,4       ". . & &"
$6:7&5 = 6,5,6,4         ". . & &"
$6:7-5 = 6,5,6,4         ". . & &"
$6:add9 = 6,5,6,4        ". . .   ."
$6:m(11) = 6,5,6,4       ". & .   . ."
$6:END

 current = kcp * (klp*nval + kvp*velo + knp*keyp)
 befor   = kbp * (klp*nval + kvp*velo + knp*keyp)
 after   = kap * (klp*nval + kvp*velo + knp*keyp)
 cs->scv[n] = current + befor + after

$7:Chord_Select_Param
$7:klp = 0.00053  /* Note length */
$7:knp = -0.4     /* Note Position */
$7:kvp = 0.5      /* Velocity */
$7:kgc = 0.3      /* Global Current Chord */
$7:kgb = 0.05     /* Global Before Chord */
$7:kcp = 0.14     /* Current Chord */  
$7:kbp = 0.1      /* Before Chord */
$7:kap = 0.08     /* After Chord */
$7:END

$8:Exstra_Chord
$8:~M = "~ $:~ $4:M $3:M $9:~M"
$8:~6 = "~ $:~ $4:6 $3:6 $9:~6"
$8:~7 = "~ $:~ $4:7 $3:7 $9:~7"
$8:~69 = "~ $:~ $4:69 $3:69 $9:~69"
$8:~6(9) = "~ $:~ $4:6(9) $3:6(9) $9:~6(9)"
$8:~aug = "~ $:~ $4:aug $3:aug $9:~aug"
$8:~M7 = "~ $:~ $4:M7 $3:M7 $9:~M7"
$8:~7(&5) = "~ $:~ $4:7(&5) $3:7(&5) $9:~7(&5)"
$8:~7&5 = "~ $:~ $4:7&5 $3:7&5 $9:~7&5"
$8:~7-5 = "~ $:~ $4:7-5 $3:7-5 $9:~7-5"
$8:~9 = "~ $:~ $4:9 $3:9 $9:~9"
$8:~(&5) = "~ $:~ $4:(&5) $3:(&5) $9:~(&5)"
$8:~&5 = "~ $:~ $4:&5 $3:&5 $9:~&5"
$8:~-5 = "~ $:~ $4:-5 $3:-5 $9:~-5"
$8:~M9 = "~ $:~ $4:M9 $3:M9 $9:~M9"
$8:~7(#5) = "~ $:~ $4:7(#5) $3:7(#5) $9:~7(#5)"
$8:~7#5 = "~ $:~ $4:7#5 $3:7#5 $9:~7#5"
$8:~7+5 = "~ $:~ $4:7+5 $3:7+5 $9:~7+5"
$8:~7(&10) = "~ $:~ $4:7(&10) $3:7(&10) $9:~7(&10)"
$8:~7&10 = "~ $:~ $4:7&10 $3:7&10 $9:~7&10"
$8:~7-10 = "~ $:~ $4:7-10 $3:7-10 $9:~7-10"
$8:~7(#9) = "~ $:~ $4:7(#9) $3:7(#9) $9:~7(#9)"
$8:~7#9 = "~ $:~ $4:7#9 $3:7#9 $9:~7#9"
$8:~7+9 = "~ $:~ $4:7+9 $3:7+9 $9:~7+9"
$8:~7(&9) = "~ $:~ $4:7(&9) $3:7(&9) $9:~7(&9)"
$8:~7&9 = "~ $:~ $4:7&9 $3:7&9 $9:~7&9"
$8:~7-9 = "~ $:~ $4:7-9 $3:7-9 $9:~7-9"
$8:~m = "~ $:~ $4:m $3:m $9:~m"
$8:~m6 = "~ $:~ $4:m6 $3:m6 $9:~m6"
$8:~m7 = "~ $:~ $4:m7 $3:m7 $9:~m7"
$8:~mM7 = "~ $:~ $4:mM7 $3:mM7 $9:~mM7"
$8:~m9 = "~ $:~ $4:m9 $3:m9 $9:~m9"
$8:~m69 = "~ $:~ $4:m69 $3:m69 $9:~m69"
$8:~m6(9) = "~ $:~ $4:m6(9) $3:m6(9) $9:~m6(9)"
$8:~m7(&5) = "~ $:~ $4:m7(&5) $3:m7(&5) $9:~m7(&5)"
$8:~m7&5 = "~ $:~ $4:m7&5 $3:m7&5 $9:~m7&5"
$8:~m7-5 = "~ $:~ $4:m7-5 $3:m7-5 $9:~m7-5"
$8:~% = "~ $:~ $4:% $3:% $9:~%"
$8:~dim = "~ $:~ $4:dim $3:dim $9:~dim"
$8:~dim7 = "~ $:~ $4:dim7 $3:dim7 $9:~dim7"
$8:~sus4 = "~ $:~ $4:sus4 $3:sus4 $9:~sus4"
$8:~7sus4 = "~ $:~ $4:7sus4 $3:7sus4 $9:~7sus4"
$8:~7+11 = "~ $:~ $4:7+11 $3:7+11 $9:~7+11"
$8:~M7+11 = "~ $:~ $4:M7+11 $3:M7+11 $9:~M7+11"
$8:~m711 = "~ $:~ $4:m711 $3:m711 $9:~m711"
$8:~m7(11) = "~ $:~ $4:m7(11) $3:m7(11) $9:~m7(11)"
$8:~%11 = "~ $:~ $4:%11 $3:%11 $9:~%11"
$8:~713 = "~ $:~ $4:713 $3:713 $9:~713"
$8:~7(13) = "~ $:~ $4:7(13) $3:7(13) $9:~7(13)"
$8:~7-13 = "~ $:~ $4:7-13 $3:7-13 $9:~7-13"

 Special_Chord
$8:~Special = "~Special $:~Special $4:Special $3:Special $9:~Special"

 Original_Chord
$8:~Original = "~Original $:~Original $4:Original $3:Original $9:~Original"

$8:END

$9:Special_Chord_Progression Original_Chord_Progression
$9:ISpecial = "-> xxx"
$9:END


 Available Note Scale
 - = &  : Flat
 + = #  : Sharp
 [ = @  : Duble Flat
 ] = *  : Duble Sharp   
 p = .+ : Both Available
 q = -. : Both Available
 1 -9   : Note Velocity
 <  >   : Note Velocity 5 (& #)
$A:Default_Scale
 C_Major key
 m0000006 _-1______0______1______2______*______4______5______6______7
$A:I  =           "...x...."  C_Ionian
$A:I6 =           "...x...."  C_Ionian
$A:IM7 =          "...x...."  C_Ionian
$A:IM7+11 =       "...+...."  C_Lydian
$A:I7 =           "...x..-."  C_Mix-Lydian
$A:I7 =           "...+..-."  C_Lydian-&7th
$A:&IIM7 =        " --..--.-"  D&_Lydian
$A:&II7 =         " --..----"  D&_Lydian7th
$A:IIm7 =         " .....x.."  D_Dorian
$A:IIm9 =         " .....x.."  D_Dorian
$A:IIIm7 =        "  .x...o.."  E_Phrygian
$A:IIIm9 =        "  .+...x.."  E_Dorian
$A:IV6  =         "   ........"  F_Lydian
$A:IVM7 =         "   ........"  F_Lydian
$A:IV7 =          "   ......-."  F_Lydian-7th
$A:IV7 =          "   . --. -."  F_Bule-Note-Penta.
$A:IVM9 =         "   ........"  F_Lydian
$A:#IVm7(&5)   =  "   +x...o.+"  F#_Locrian 
$A:V9 =           "    ...x...."  G_Mixo-Lydian
$A:VIm7 =         "     .....x.."  A_Aeolian
$A:VIm9 =         "     .....x.."  A_Aeolian
$A:VIIm7(&5) =    "      .x...o.."  B_Locrian
$A:VIIm9(&5) =    "      .+...o.."  B_Alt-Dor-Loc-9th
$A:&IIM7 =        " --..--.-"  D&_Lydian
$A:&IIIM7 =       "  -...-..-"  E&_Lydian
$A:&VIM7 =        "     --..-..-"  A&_Lydian
$A:&VIIM7 =       "      -......-"  B&_Lydian
$A:&IIIm7 =       "  -.---.--"  E&_Dorian
 $A:IVm7 =         "   ..--.x-."  F_Dorian
 $A:V7 =           "    ...x...."  G_Mixo-Lydian
$A:V7   =         "    .-.x.-.."  G_Hmp5D
 $A:V7   =         "    .--+ -.."  G_Alterd-Dominant-7th
 $A:V7   =         "    ...+...."  G_Lydian-Dominant-7th
 $A:V7   =         "    .--+ ..."  G_Combination-of-Diminished
 $A:V7   =         "    ...+ -.."  G_Whole-Tone
$A:&III7 =        "  -...-.--"  E&_Lydian7th
$A:IV7 =          "   ......-."  F_Lydian7th
$A:&V7 =          "    ---.----"  G&_Lydian7th
$A:&VI7 =         "     --..-.--"  A&_Lydian7th
$A:&VII7 =        "      -.....--"  B&_Lydian7th/dim
$A:&VIIM7 =       "      -......-"  B&_Lydian
$A:#IVdim =       "   ++....-."  F#_Dinished
$A:IIIm7(&5) =    "  .x..-o.."  E_Locrian
$A:#IVm7(&5) =    "   +x...o.+"  F#_Locrian
$A:VIIm7(&5) =    "      .x...o.."  B_Locrian 
 $A:IIIm7(&5)   =  "  .+..-o.."  E_Alt.Dor.
 $A:#IVm7(&5)   =  "   ++...o.+"  F#_Alt.Dor.
 $A:VIIm7(&5)   =  "      .+...o.."  B_Alt.Dor.
$A:VII7        =  "      ....+..."  B_Altered 
 m0000006 _-1______0______1______2______*______4______5______6______7
$A:END

$A:Default_2oct.Scale
 C_Major key 
 m0000006 _-1______0______1______2______*______4______5______6______7
$A:I  =           "...x......x...."  C_Ionian
$A:I6 =           "...x......x...."  C_Ionian
$A:IM7 =          "...x......x...."  C_Ionian
$A:IM7+11 =       "...+......+...."  C_Lydian
$A:IIm7 =         " .....x......x."  D_Dorian
$A:IIIm7 =        "  .x...o..x...o"  E_Phrygian
$A:IIIm9 =        "  .+...x..+...x.."  E_Dorian
$A:IVM7 =         "   ..............."  F_Lydian
$A:VIm7 =         "     .....x......x.."  A_Aeolian
$A:VIIm7(&5) =    "      .x...o..x...o.."  B_Locrian
$A:VIIm9(&5) =    "      .+...o..+...o.."  B_Alt-Dor-Loc-9th
$A:&IIM7 =        " --..--.--..--.-"  D&_Lydian
$A:&IIIM7 =       "  -...-..-...-..-"  E&_Lydian
$A:&VIM7 =        "     --..-..--..-..-"  A&_Lydian 
$A:&VIIM7 =       "      -......-......-"  B&_Lydian
$A:&IIIm7 =       "  -.---.--.---.--"  E&_Dorian
$A:IVm7 =         "   ..--.x-..--.x-."  F_Dorian
$A:V7 =           "    ...x......x....."  G_Mixo-Lydian
$A:V7   =         "    .-.x.-..-.x-..."  G_Hmp5D
$A:V7   =         "    .--+ -..--+ -..-"  G_Alterd-Dominant-7th
$A:V7   =         "    ...+......+...."  G_Lydian-Dominant-7th
$A:V7   =         "    .--+....--+ ...-"  G_Combination-of-Diminished
$A:V7   =         "    ...+ -....+ -..."  G_Whole-Tone
$A:&II7 =         " --..-----..----"  D&_Lydian7th
$A:&III7 =        "  -...-.--...-.--"  E&_Lydian7th
$A:IV7 =          "   ......-......-."  F_Lydian7th
$A:&V7 =          "    ---.------.----"  G&_Lydian7th
$A:&VI7 =         "     --..-.---..-.--"  A&_Lydian7th
$A:&VII7 =        "      -.....--.....--"  B&_Lydian7th/dim
$A:#IVdim =       "   ++....-++....-+"  F#_Dinished
$A:IIIm7(&5) =    "  .x..-o..x..-o.."  E_Locrian
$A:#IVm7(&5) =    "   +x...o.+x...o.+"  F#_Locrian
$A:VIIm7(&5) =    "      .x...o..x...o.."  B_Locrian
 $A:IIIm7(&5)   =  "  .+..-o..+..-o.."  E_Alt.Dor.
 $A:#IVm7(&5)   =  "   ++...o.++...o.+"  F#_Alt.Dor.
 $A:VIIm7(&5)   =  "      .+...o..+...o.."  B_Alt.Dor.
$A:END

 ++++++++++++++++++++++
 $M: Mec data
 Temperament/Multi Channel

                                          100 Cent : 4092 p.v

       Equal    Pure(Mersenne)        Eq-Pure      P.V(Mersenne)
 1  C      0                 0              0             0.000
 2       100          70.67214      -29.32786         -1201.269
 3  D    200         203.90986        3.90986           160.148
 4       300         274.58243     -25.41757          -1041.104
 5  E    400         386.31369      -13.68631          -560.591
 6  F    500           498.045         -1.955           -80.077
 7       600         568.71745      -31.28255         -1281.333
 8  G    700         701.95509        1.95509            80.080
 9       800         772.62754      -27.37246         -1121.176
 10 A    900         884.35867      -15.64133          -640.669
 11     1000         996.09021       -3.90979          -160.145
 12 B   1100        1088.26887      -11.73113          -480.507
 13 C   1200              1200              0             0.000

       Equal        Pure(Q-50)        Eq-Pure          P.V(Q-50)
 1  C      0                 0              0             0.000
 2       100         111.73119       11.73119           480.510
 3  D    200         203.90986        3.90986           160.148
 4       300         315.64127       15.64127           640.666
 5  E    400         386.31369      -13.68631          -560.591
 6  F    500           498.045         -1.955           -80.077
 7       600         590.22371       -9.77629          -400.437
 8  G    700         701.95509        1.95509            80.080
 9       800         813.68643       13.68643           560.596
 10 A    900         884.35867      -15.64133          -640.669
 11     1000        1017.59637       17.59637           720.747
 12 B   1100        1088.26887      -11.73113          -480.507
 13 C   1200              1200              0             0.000

        Equal      Pythagorean       Eq-Pytha   P.V(Pythagorean)
 1  C      0                 0              0             0.000
 2       100         113.68491       13.68491           560.534
 3  D    200         203.90986        3.90986           160.148
 4       300         294.13501       -5.86499          -240.230
 5  E    400         407.82001        7.82001           320.308
 6  F    500           498.045         -1.955           -80.077
 7       600         611.73002       11.73002           480.462
 8  G    700         701.95509        1.95509            80.080
 9       800         815.64017       15.64017           640.621
 10 A    900         905.86514        5.86514           240.236
 11     1000         996.09021       -3.90979          -160.145
 12 B   1100        1109.77513        9.77513           400.389
 13 C   1200              1200              0             0.000

        Equal     Werckmeister       Eq-Werck  P.V(Werckmeister)
 1  C      0                 0              0             0.000
 2       100          96.08988       -3.91012          -160.159
 3  D    200         203.90986        3.90986           160.148
 4       300         300.00002          2E-05             0.001
 5  E    400        396.089992      -3.910008          -160.154
 6  F    500         503.91001        3.91001           160.154
 7       600               600              0             0.000
 8  G    700         701.95509        1.95509            80.080
 9       800         792.18013       -7.81987          -320.302
 10 A    900         900.00013        0.00013             0.005
 11     1000        1001.95522        1.95522            80.086
 12 B   1100        1098.04511       -1.95489           -80.072
 13 C   1200              1200              0             0.000

$M:Pure_Mersenne Pure_M
$M:Cycle = 12
$M:Start = Root
           Sclp  Chan  Pitch.V.  Mod 
$M:SCP =  "   1     1       0      0"
$M:SCP =  "   2     2   -1201      0"
$M:SCP =  "   3     3     160      0"
$M:SCP =  "   4     4   -1041      0"
$M:SCP =  "   5     5    -560      0"
$M:SCP =  "   6     6     -80      0"
$M:SCP =  "   7     7   -1281      0"
$M:SCP =  "   8     8      80      0"
$M:SCP =  "   9     9   -1121      0"
$M:SCP =  "  10    11    -640      0"
$M:SCP =  "  11    12    -160      0"
$M:SCP =  "  12    13    -481      0"
$M:END

$M:Pure_Mersenne_1-8ch Pure_M_1-8ch 
$M:Cycle = 12
$M:Start = Root
           Sclp  Chan  Pitch.V.  Mod
$M:SCP =  "   1     1       0      0"
$M:SCP =  "   2     1   -1201      0"
$M:SCP =  "   3     2     160      0"
$M:SCP =  "   4     2   -1041      0"
$M:SCP =  "   5     3    -560      0"
$M:SCP =  "   6     4     -80      0"
$M:SCP =  "   7     5   -1281      0"
$M:SCP =  "   8     5      80      0"
$M:SCP =  "   9     6   -1121      0"
$M:SCP =  "  10     6    -640      0"
$M:SCP =  "  11     7    -160      0"
$M:SCP =  "  12     8    -481      0"
$M:END

$M:Pure_Mersenne_9-16ch Pure_M_9-16ch
$M:Cycle = 12
$M:Start = Root
           Sclp  Chan  Pitch.V.  Mod
$M:SCP =  "   1     9       0      0"
$M:SCP =  "   2     9   -1201      0"
$M:SCP =  "   3    10     160      0"
$M:SCP =  "   4    10   -1041      0"
$M:SCP =  "   5    11    -560      0"
$M:SCP =  "   6    12     -80      0"
$M:SCP =  "   7    13   -1281      0"
$M:SCP =  "   8    13      80      0"
$M:SCP =  "   9    14   -1121      0"
$M:SCP =  "  10    14    -640      0"
$M:SCP =  "  11    15    -160      0"
$M:SCP =  "  12    16    -481      0"
$M:END


$M:Pure_Q50 Pure_Q50 
$M:Cycle = 12
$M:Start = Root
           Sclp  Chan  Pitch.V.  Mod
$M:SCP =  "   1     1       0      0"
$M:SCP =  "   2     2     480      0"
$M:SCP =  "   3     3     160      0"
$M:SCP =  "   4     4     640      0"
$M:SCP =  "   5     5    -560      0"
$M:SCP =  "   6     6     -80      0"
$M:SCP =  "   7     7    -400      0"
$M:SCP =  "   8     8      80      0"
$M:SCP =  "   9     9     560      0"
$M:SCP =  "  10    11    -640      0"
$M:SCP =  "  11    12     720      0"
$M:SCP =  "  12    13    -481      0"
$M:END

$M:Pure_Q50_1-8ch Pure_Q50_1-8ch
$M:Cycle = 12
$M:Start = Root
           Sclp  Chan  Pitch.V.  Mod
$M:SCP =  "   1     1       0      0"
$M:SCP =  "   2     1     480      0"
$M:SCP =  "   3     2     160      0"
$M:SCP =  "   4     2     640      0"
$M:SCP =  "   5     3    -560      0"
$M:SCP =  "   6     4     -80      0"
$M:SCP =  "   7     5    -400      0"
$M:SCP =  "   8     5      80      0"
$M:SCP =  "   9     6     560      0"
$M:SCP =  "  10     6    -640      0"
$M:SCP =  "  11     7     720      0"
$M:SCP =  "  12     8    -481      0"
$M:END

$M:Pure_Q50_9-16ch Pure_Q50_9-16ch
$M:Cycle = 12
$M:Start = Root
           Sclp  Chan  Pitch.V.  Mod
$M:SCP =  "   1     9       0      0"
$M:SCP =  "   2     9     480      0"
$M:SCP =  "   3    10     160      0"
$M:SCP =  "   4    10     640      0"
$M:SCP =  "   5    11    -560      0"
$M:SCP =  "   6    12     -80      0"
$M:SCP =  "   7    13    -400      0"
$M:SCP =  "   8    13      80      0"
$M:SCP =  "   9    14     560      0"
$M:SCP =  "  10    14    -640      0"
$M:SCP =  "  11    15     720      0"
$M:SCP =  "  12    16    -481      0"
$M:END
 
$M:Pythagorean
$M:Cycle = 12
$M:Start = Root
           Sclp  Chan  Pitch.V.  Mod
$M:SCP =  "   1     1       0      0"
$M:SCP =  "   2     2     560      0"
$M:SCP =  "   3     3     160      0"
$M:SCP =  "   4     4    -240      0"
$M:SCP =  "   5     5     320      0"
$M:SCP =  "   6     6     -80      0"
$M:SCP =  "   7     7     480      0"
$M:SCP =  "   8     8      80      0"
$M:SCP =  "   9     9     640      0"
$M:SCP =  "  10    11     240      0"
$M:SCP =  "  11    12    -160      0"
$M:SCP =  "  12    13     400      0"
$M:END

$M:Werckmeister
$M:Cycle = 12
$M:Start = Root
           Sclp  Chan  Pitch.V.  Mod
$M:SCP =  "   1     1       0      0"
$M:SCP =  "   2     2    -160      0"
$M:SCP =  "   3     3     160      0"
$M:SCP =  "   4     4       0      0"
$M:SCP =  "   5     5    -160      0"
$M:SCP =  "   6     6     160      0"
$M:SCP =  "   7     7       0      0"
$M:SCP =  "   8     8      80      0"
$M:SCP =  "   9     9    -320      0"
$M:SCP =  "  10    11       0      0"
$M:SCP =  "  11    12      80      0"
$M:SCP =  "  12    13     -80      0"
$M:END

      Just  Aravia   Pure       Wel_Temper    Pythagoras
 key  Cent    Cent                 Cent          Cent
 C       0      -6      1       0.00    0.00        0
 D&                                                90
 C#      8      45   16/15     90.23   -9.77      114
 D       4      -2    9/8     192.18   -7.82      204
 E&                                               294
 D#     16     -12    6/5     294.14   -5.86      318
 E     -14     -51    5/4     384.36  -15.64      408
 F      -2      -8    4/3     498.05   -1.95      498
 G&                                               588
 F#    -10      43   45/32    588.27  -11.73      612
 G       2      -4    3/2     696.09   -3.91      702
 A&                                               792
 G#     14      47    8/5     792.18   -7.82      816
 A     -16       0    5/3     888.27  -11.73      906
 B&                                               996
 A#     14     -10   16/9     996.09   -3.91     1020
 B     -12     -49   15/8    1086.09  -13.91     1110
 C       0      -6      2    1200.00    0.00     1200

  Oct. = 1200 Cent
  Half = 100 Cent,  P.V = 4096
  P.V. = Cent * 40.96

$M:Just_Intonation
$M:Cycle = 12
$M:Start = Relative
           Sclp  Chan  Pitch.V.  Mod
$M:SCP =  "   1     1       0      0"
$M:SCP =  "   2     2     328      0"
$M:SCP =  "   3     3     164      0"
$M:SCP =  "   4     4     655      0"
$M:SCP =  "   5     5    -573      0"
$M:SCP =  "   6     6     -82      0"
$M:SCP =  "   7     7    -410      0"
$M:SCP =  "   8     8      82      0"
$M:SCP =  "   9     9     573      0"
$M:SCP =  "  10    11    -655      0"
$M:SCP =  "  11    12     573      0"
$M:SCP =  "  12    13    -492      0"
$M:END 

$M:Just_Intonation_1-8ch Just_1-8ch Just_8ch
$M:Cycle = 12
$M:Start = Relative
           Sclp  Chan  Pitch.V.  Mod
$M:SCP =  "   1     1       0      0"
$M:SCP =  "   2     1     328      0"
$M:SCP =  "   3     2     164      0"
$M:SCP =  "   4     2     655      0"
$M:SCP =  "   5     3    -573      0"
$M:SCP =  "   6     4     -82      0"
$M:SCP =  "   7     5    -410      0"
$M:SCP =  "   8     5      82      0"
$M:SCP =  "   9     6     573      0"
$M:SCP =  "  10     6    -655      0"
$M:SCP =  "  11     7     573      0"
$M:SCP =  "  12     8    -492      0"
$M:END

$M:Just_Intonation_9-16ch Just_9-16ch
$M:Cycle = 12
$M:Start = Relative
           Sclp  Chan  Pitch.V.  Mod
$M:SCP =  "   1     9       0      0"
$M:SCP =  "   2     9     328      0"
$M:SCP =  "   3    10     164      0"
$M:SCP =  "   4    10     655      0"
$M:SCP =  "   5    11    -573      0"
$M:SCP =  "   6    12     -82      0"
$M:SCP =  "   7    13    -410      0"
$M:SCP =  "   8    13      82      0"
$M:SCP =  "   9    14     573      0"
$M:SCP =  "  10    14    -655      0"
$M:SCP =  "  11    15     573      0"
$M:SCP =  "  12    16    -492      0"
$M:END

$M:Pure_Temperament Pure
$M:Cycle = 12 
$M:Start = Root     
           Sclp  Chan  Pitch.V.  Mod 
$M:SCP =  "   1     1       0      0"
$M:SCP =  "   2     2     469      0"
$M:SCP =  "   3     3     156      0"
$M:SCP =  "   4     4     625      0"
$M:SCP =  "   5     5    -575      0"
$M:SCP =  "   6     6     -82      0"
$M:SCP =  "   7     7    -411      0"
$M:SCP =  "   8     8      78      0"
$M:SCP =  "   9     9     547      0"
$M:SCP =  "  10    11    -657      0"
$M:SCP =  "  11    12    -164      0"
$M:SCP =  "  12    13    -492      0"
$M:END 

$M:Pure_Temperament_1-8ch Pure_1-8ch Pure_8ch
$M:Cycle = 12
$M:Start = Root
           Sclp  Chan  Pitch.V.  Mod
$M:SCP =  "   1     1       0      0"
$M:SCP =  "   2     1     469      0"
$M:SCP =  "   3     2     156      0"
$M:SCP =  "   4     2     625      0"
$M:SCP =  "   5     3    -575      0"
$M:SCP =  "   6     4     -82      0"
$M:SCP =  "   7     5    -411      0"
$M:SCP =  "   8     5      78      0"
$M:SCP =  "   9     6     547      0"
$M:SCP =  "  10     6    -657      0"
$M:SCP =  "  11     7    -164      0"
$M:SCP =  "  12     8    -492      0"
$M:END

$M:Pure_Temperament_9-16ch Pure_9-16ch
$M:Cycle = 12
$M:Start = Root
           Sclp  Chan  Pitch.V.  Mod
$M:SCP =  "   1     9       0      0"
$M:SCP =  "   2     9     469      0"
$M:SCP =  "   3    10     156      0"
$M:SCP =  "   4    10     625      0"
$M:SCP =  "   5    11    -575      0"
$M:SCP =  "   6    12     -82      0"
$M:SCP =  "   7    13    -411      0"
$M:SCP =  "   8    13      78      0"
$M:SCP =  "   9    14     547      0"
$M:SCP =  "  10    14    -657      0"
$M:SCP =  "  11    15    -164      0"
$M:SCP =  "  12    16    -492      0"
$M:END

$M:Aravia_temperament
$M:Cycle = 12
$M:Start = Root 
           Sclp  Chan  Pitch.V.  Mod
$M:SCP =  "   1     1    -256      0"
$M:SCP =  "   2     2    1843      0"
$M:SCP =  "   3     3     -82      0"
$M:SCP =  "   4     4    -492      0"
$M:SCP =  "   5     5   -2089      0"
$M:SCP =  "   6     6    -328      0"
$M:SCP =  "   7     7    1761      0"
$M:SCP =  "   8     8    -164      0"
$M:SCP =  "   9     9    1925      0"
$M:SCP =  "  10    11       0      0"
$M:SCP =  "  11    12    -410      0"
$M:SCP =  "  12    13   -2007      0"
$M:END 

$M:Pure_Temperament_C  
$M:Cycle = 12    
$M:Start = 0     
           Sclp  Chan  Pitch.V.  Mod
$M:SCP =  "   1     1       0      0"
$M:SCP =  "   2     2     469      0"
$M:SCP =  "   3     3     156      0"
$M:SCP =  "   4     4     625      0"
$M:SCP =  "   5     5    -575      0" 
$M:SCP =  "   6     6     -82      0"
$M:SCP =  "   7     7    -411      0"
$M:SCP =  "   8     8      78      0"
$M:SCP =  "   9     9     547      0"
$M:SCP =  "  10    11    -657      0"
$M:SCP =  "  11    12    -164      0"
$M:SCP =  "  12    13    -492      0"
$M:END

$M:Pure_Temperament_C# Pure_Temperament_D&
$M:Cycle = 12
$M:Start = 1
           Sclp  Chan  Pitch.V.  Mod
$M:SCP =  "   1     1       0      0"
$M:SCP =  "   2     2     469      0"
$M:SCP =  "   3     3     156      0"
$M:SCP =  "   4     4     625      0"
$M:SCP =  "   5     5    -575      0"
$M:SCP =  "   6     6     -82      0"
$M:SCP =  "   7     7    -411      0"
$M:SCP =  "   8     8      78      0"
$M:SCP =  "   9     9     547      0"
$M:SCP =  "  10    11    -657      0"
$M:SCP =  "  11    12    -164      0"
$M:SCP =  "  12    13    -492      0"
$M:END

$M:Pure_Temperament_D
$M:Cycle = 12
$M:Start = 2
           Sclp  Chan  Pitch.V.  Mod
$M:SCP =  "   1     1       0      0"
$M:SCP =  "   2     2     469      0"
$M:SCP =  "   3     3     156      0"
$M:SCP =  "   4     4     625      0"
$M:SCP =  "   5     5    -575      0"
$M:SCP =  "   6     6     -82      0"
$M:SCP =  "   7     7    -411      0"
$M:SCP =  "   8     8      78      0"
$M:SCP =  "   9     9     547      0"
$M:SCP =  "  10    11    -657      0"
$M:SCP =  "  11    12    -164      0"
$M:SCP =  "  12    13    -492      0"
$M:END

$M:Pure_Temperament_D# Pure_Temperament_E&
$M:Cycle = 12
$M:Start = 3
           Sclp  Chan  Pitch.V.  Mod
$M:SCP =  "   1     1       0      0"
$M:SCP =  "   2     2     469      0"
$M:SCP =  "   3     3     156      0"
$M:SCP =  "   4     4     625      0"
$M:SCP =  "   5     5    -575      0"
$M:SCP =  "   6     6     -82      0"
$M:SCP =  "   7     7    -411      0"
$M:SCP =  "   8     8      78      0"
$M:SCP =  "   9     9     547      0"
$M:SCP =  "  10    11    -657      0"
$M:SCP =  "  11    12    -164      0"
$M:SCP =  "  12    13    -492      0"
$M:END

$M:Pure_Temperament_E
$M:Cycle = 12
$M:Start = 4
           Sclp  Chan  Pitch.V.  Mod
$M:SCP =  "   1     1       0      0"
$M:SCP =  "   2     2     469      0"
$M:SCP =  "   3     3     156      0"
$M:SCP =  "   4     4     625      0"
$M:SCP =  "   5     5    -575      0"
$M:SCP =  "   6     6     -82      0"
$M:SCP =  "   7     7    -411      0"
$M:SCP =  "   8     8      78      0"
$M:SCP =  "   9     9     547      0"
$M:SCP =  "  10    11    -657      0"
$M:SCP =  "  11    12    -164      0"
$M:SCP =  "  12    13    -492      0"
$M:END

$M:Pure_Temperament_E# Pure_Temperament_F
$M:Cycle = 12
$M:Start = 5
           Sclp  Chan  Pitch.V.  Mod
$M:SCP =  "   1     1       0      0"
$M:SCP =  "   2     2     469      0"
$M:SCP =  "   3     3     156      0"
$M:SCP =  "   4     4     625      0"
$M:SCP =  "   5     5    -575      0"
$M:SCP =  "   6     6     -82      0"
$M:SCP =  "   7     7    -411      0"
$M:SCP =  "   8     8      78      0"
$M:SCP =  "   9     9     547      0"
$M:SCP =  "  10    11    -657      0"
$M:SCP =  "  11    12    -164      0"
$M:SCP =  "  12    13    -492      0"
$M:END

$M:Pure_Temperament_F# Pure_Temperament_G&
$M:Cycle = 12
$M:Start = 6
           Sclp  Chan  Pitch.V.  Mod
$M:SCP =  "   1     1       0      0"
$M:SCP =  "   2     2     469      0"
$M:SCP =  "   3     3     156      0"
$M:SCP =  "   4     4     625      0"
$M:SCP =  "   5     5    -575      0"
$M:SCP =  "   6     6     -82      0"
$M:SCP =  "   7     7    -411      0"
$M:SCP =  "   8     8      78      0"
$M:SCP =  "   9     9     547      0"
$M:SCP =  "  10    11    -657      0"
$M:SCP =  "  11    12    -164      0"
$M:SCP =  "  12    13    -492      0"
$M:END

$M:Pure_Temperament_G
$M:Cycle = 12
$M:Start = 7
           Sclp  Chan  Pitch.V.  Mod
$M:SCP =  "   1     1       0      0"
$M:SCP =  "   2     2     469      0"
$M:SCP =  "   3     3     156      0"
$M:SCP =  "   4     4     625      0"
$M:SCP =  "   5     5    -575      0"
$M:SCP =  "   6     6     -82      0"
$M:SCP =  "   7     7    -411      0"
$M:SCP =  "   8     8      78      0"
$M:SCP =  "   9     9     547      0"
$M:SCP =  "  10    11    -657      0"
$M:SCP =  "  11    12    -164      0"
$M:SCP =  "  12    13    -492      0"

$M:Pure_Temperament_G# Pure_Temperament_A&
$M:Cycle = 12
$M:Start = 8
           Sclp  Chan  Pitch.V.  Mod
$M:SCP =  "   1     1       0      0"
$M:SCP =  "   2     2     469      0"
$M:SCP =  "   3     3     156      0"
$M:SCP =  "   4     4     625      0"
$M:SCP =  "   5     5    -575      0"
$M:SCP =  "   6     6     -82      0"
$M:SCP =  "   7     7    -411      0"
$M:SCP =  "   8     8      78      0"
$M:SCP =  "   9     9     547      0"
$M:SCP =  "  10    11    -657      0"
$M:SCP =  "  11    12    -164      0"
$M:SCP =  "  12    13    -492      0"

$M:Pure_Temperament_A
$M:Cycle = 12
$M:Start = 9
           Sclp  Chan  Pitch.V.  Mod
$M:SCP =  "   1     1       0      0"
$M:SCP =  "   2     2     469      0"
$M:SCP =  "   3     3     156      0"
$M:SCP =  "   4     4     625      0"
$M:SCP =  "   5     5    -575      0"
$M:SCP =  "   6     6     -82      0"
$M:SCP =  "   7     7    -411      0"
$M:SCP =  "   8     8      78      0"
$M:SCP =  "   9     9     547      0"
$M:SCP =  "  10    11    -657      0"
$M:SCP =  "  11    12    -164      0"
$M:SCP =  "  12    13    -492      0"

$M:Pure_Temperament_A# Pure_Temperament_B&
$M:Cycle = 12
$M:Start = 10
           Sclp  Chan  Pitch.V.  Mod
$M:SCP =  "   1     1       0      0"
$M:SCP =  "   2     2     469      0"
$M:SCP =  "   3     3     156      0"
$M:SCP =  "   4     4     625      0"
$M:SCP =  "   5     5    -575      0"
$M:SCP =  "   6     6     -82      0"
$M:SCP =  "   7     7    -411      0"
$M:SCP =  "   8     8      78      0"
$M:SCP =  "   9     9     547      0"
$M:SCP =  "  10    11    -657      0"
$M:SCP =  "  11    12    -164      0"
$M:SCP =  "  12    13    -492      0"

$M:Pure_Temperament_B
$M:Cycle = 12
$M:Start = 11
           Sclp  Chan  Pitch.V.  Mod
$M:SCP =  "   1     1       0      0"
$M:SCP =  "   2     2     469      0"
$M:SCP =  "   3     3     156      0"
$M:SCP =  "   4     4     625      0"
$M:SCP =  "   5     5    -575      0"
$M:SCP =  "   6     6     -82      0"
$M:SCP =  "   7     7    -411      0"
$M:SCP =  "   8     8      78      0"
$M:SCP =  "   9     9     547      0"
$M:SCP =  "  10    11    -657      0"
$M:SCP =  "  11    12    -164      0"
$M:SCP =  "  12    13    -492      0"


$M:multi_Channel
$M:Cycle = 0
$M:Start = 0
           Sclp  Chan  Pitch.V.  Mod
$M:SCP =  "   1     1       0      0"
$M:SCP =  "   2     2       0      0"
$M:SCP =  "   3     3       0      0"
$M:SCP =  "   4     4       0      0"
$M:SCP =  "   5     5       0      0"
$M:SCP =  "   6     6       0      0"
$M:SCP =  "   7     7       0      0"
$M:SCP =  "   8     8       0      0"
$M:SCP =  "   9     9       0      0"
$M:SCP =  "  10    10       0      0"
$M:SCP =  "  11    11       0      0"
$M:SCP =  "  12    12       0      0"
$M:SCP =  "  13    13       0      0"
$M:SCP =  "  14    14       0      0"
$M:SCP =  "  15    15       0      0"
$M:SCP =  "  16    16       0      0"
           Sclp  Chan  Pitch.V.  Mod
$M:SCP =  "  17     1       0      0"
$M:SCP =  "  18     2       0      0"
$M:SCP =  "  19     3       0      0"
$M:SCP =  "  20     4       0      0"
$M:SCP =  "  21     5       0      0"
$M:SCP =  "  22     6       0      0"
$M:SCP =  "  23     7       0      0"
$M:SCP =  "  24     8       0      0"
$M:SCP =  "  25     9       0      0"
$M:SCP =  "  26    10       0      0"
$M:SCP =  "  27    11       0      0"
$M:SCP =  "  28    12       0      0"
$M:SCP =  "  29    13       0      0"
$M:SCP =  "  30    14       0      0"
$M:SCP =  "  31    15       0      0"
$M:SCP =  "  32    16       0      0"
           Sclp  Chan  Pitch.V.  Mod
$M:SCP =  "  33     1       0      0"
$M:SCP =  "  34     2       0      0"
$M:SCP =  "  35     3       0      0"
$M:SCP =  "  36     4       0      0"
$M:SCP =  "  37     5       0      0"
$M:SCP =  "  38     6       0      0" 
$M:SCP =  "  39     7       0      0"
$M:SCP =  "  40     8       0      0"
$M:SCP =  "  41     9       0      0"
$M:SCP =  "  42    10       0      0"
$M:SCP =  "  43    11       0      0"
$M:SCP =  "  44    12       0      0"
$M:SCP =  "  45    13       0      0"
$M:SCP =  "  46    14       0      0"
$M:SCP =  "  47    15       0      0"
$M:SCP =  "  48    16       0      0"
           Sclp  Chan  Pitch.V.  Mod
$M:SCP =  "  49     1       0      0"
$M:SCP =  "  50     3       0      0"
$M:SCP =  "  51     4       0      0"
$M:SCP =  "  52     5       0      0"
$M:SCP =  "  53     6       0      0"
$M:SCP =  "  54     7       0      0" 
$M:SCP =  "  55     8       0      0"
$M:SCP =  "  56     9       0      0"
$M:SCP =  "  57    10       0      0"
$M:SCP =  "  58    11       0      0"
$M:SCP =  "  59    12       0      0"
$M:SCP =  "  60    13       0      0"
$M:SCP =  "  61    14       0      0"
$M:SCP =  "  62    15       0      0"
$M:SCP =  "  63    16       0      0"
$M:SCP =  "  64    17       0      0"
           Sclp  Chan  Pitch.V.  Mod
$M:SCP =  "  65     1       0      0"
$M:SCP =  "  66     2       0      0"
$M:SCP =  "  67     3       0      0"
$M:SCP =  "  68     4       0      0"
$M:SCP =  "  69     5       0      0"
$M:SCP =  "  70     6       0      0" 
$M:SCP =  "  71     7       0      0"
$M:SCP =  "  72     8       0      0"
$M:SCP =  "  73     9       0      0"
$M:SCP =  "  74    10       0      0"
$M:SCP =  "  75    11       0      0"
$M:SCP =  "  76    12       0      0"
$M:SCP =  "  77    13       0      0"
$M:SCP =  "  78    14       0      0"
$M:SCP =  "  79    15       0      0"
$M:SCP =  "  80    16       0      0"
           Sclp  Chan  Pitch.V.  Mod
$M:SCP =  "  81     1       0      0"
$M:SCP =  "  82     2       0      0"
$M:SCP =  "  83     3       0      0"
$M:SCP =  "  84     4       0      0"
$M:SCP =  "  85     5       0      0"
$M:SCP =  "  86     6       0      0"
$M:SCP =  "  87     7       0      0"
$M:SCP =  "  88     8       0      0"
$M:SCP =  "  89     9       0      0"
$M:SCP =  "  90    10       0      0"
$M:SCP =  "  91    11       0      0"
$M:SCP =  "  92    12       0      0"
$M:SCP =  "  93    13       0      0"
$M:SCP =  "  94    14       0      0"
$M:SCP =  "  95    15       0      0"
$M:SCP =  "  96    16       0      0"
           Sclp  Chan  Pitch.V.  Mod
$M:SCP  = "  97     1       0      0"
$M:SCP  = "  98     2       0      0"
$M:SCP  = "  99     3       0      0"
$M:SCP  = " 100     4       0      0"
$M:SCP  = " 101     5       0      0"
$M:SCP  = " 102     6       0      0"
$M:SCP  = " 103     7       0      0"
$M:SCP  = " 104     8       0      0"
$M:SCP  = " 105     9       0      0"
$M:SCP  = " 106    10       0      0"
$M:SCP  = " 107    11       0      0"
$M:SCP  = " 108    12       0      0"
$M:SCP  = " 109    13       0      0"
$M:SCP  = " 110    14       0      0"
$M:SCP  = " 111    15       0      0"
$M:SCP  = " 112    16       0      0"
           Sclp  Chan  Pitch.V.  Mod
$M:SCP  = " 113     1       0      0"
$M:SCP  = " 114     2       0      0"
$M:SCP  = " 115     3       0      0"
$M:SCP  = " 116     4       0      0"
$M:SCP  = " 117     5       0      0"
$M:SCP  = " 118     6       0      0"
$M:SCP  = " 119     7       0      0"
$M:SCP  = " 120     8       0      0"
$M:SCP  = " 121     9       0      0"
$M:SCP  = " 122    10       0      0"
$M:SCP  = " 123    11       0      0"
$M:SCP  = " 124    12       0      0"
$M:SCP  = " 125    13       0      0"
$M:SCP  = " 126    14       0      0"
$M:SCP  = " 127    15       0      0"
$M:SCP  = " 128    16       0      0"
$M:END

 C_Major
$1:C_Major C_dur
$&I   = B c&
$I    = C
$#I   = C#
$&II  = D&
$II   = D
$#II  = D#
$&III = E&
$III  = E
$#III = F e#
$&IV  = E f&
$IV   = F
$#IV  = F#
$&V   = G&
$V    = G
$#V   = G#
$&VI  = A&
$VI   = A
$#VI  = A#
$&VII = B&
$VII  = B
$#VII = C b#
$1:END

 # G_Major F#
$1:G_Major G_dur
$&I   = G&
$I    = G
$#I   = G#
$&II  = A&
$II   = A
$#II  = A#
$&III = B&
$III  = B
$#III = C b#
$&IV  = B c&
$IV   = C
$#IV  = C#
$&V   = D&
$V    = D
$#V   = D#
$&VI  = E&
$VI   = E
$#VI  = F e#
$&VII = F
$VII  = F#
$#VII = G f*
$1:END

 ## D_Major F#,C#
$1:D_Major D_dur
$&I   = D&
$I    = D
$#I   = D#
$&II  = E&
$II   = E
$#II  = F e#
$&III = F
$III  = F#
$#III = G f*
$&IV  = G&
$IV   = G
$#IV  = G#
$&V   = A&
$V    = A
$#V   = A#
$&VI  = B&
$VI   = B
$#VI  = C b#
$&VII = C
$VII  = C#
$#VII = D c*
$1:END

 ### A_Major F#,C#,G#
$1:A_Major A_dur
$&I   = A&
$I    = A
$#I   = A#
$&II  = B&
$II   = B
$#II  = C b#
$&III = C
$III  = C#
$#III = D c*
$&IV  = D&
$IV   = D
$#IV  = D#
$&V   = E&
$V    = E
$#V   = F e#
$&VI  = F
$VI   = F#
$#VI  = G f*
$&VII = G
$VII  = G#
$#VII = A g*
$1:END

 #### E_Major F#,C#,G#,D#
$1:E_Major E_dur
$&I   = E&
$I    = E
$#I   = F e#
$&II  = F
$II   = F#
$#II  = G f*
$&III = G
$III  = G#
$#III = A g*
$&IV  = A&
$IV   = A
$#IV  = A#
$&V   = B&
$V    = B
$#V   = C b#
$&VI  = C
$VI   = C#
$#VI  = D c*
$&VII = D
$VII  = D#
$#VII = E d*
$1:END

 ##### B_Major F#,C#,G#,D#,A#
$1:B_Major H_dur H_major
$&I   = B&
$I    = B
$#I   = C b#
$&II  = C
$II   = C#
$#II  = D c*
$&III = D
$III  = D#
$#III = E d*
$&IV  = E&
$IV   = E
$#IV  = F e#
$&V   = F
$V    = F#
$#V   = G f*
$&VI  = G
$VI   = G#
$#VI  = A g*
$&VII = A
$VII  = A#
$#VII = B a*
$1:END

 ###### F#_Major F#,C#,G#,D#,A#,E#
$1:F#_Major Fis_dur
$&I   = F
$I    = F#
$#I   = G f*
$&II  = G
$II   = G#
$#II  = A g*
$&III = A
$III  = A#
$#III = B a*
$&IV  = B&
$IV   = B
$#IV  = C b#
$&V   = C
$V    = C#
$i#V  = D c*
$&VI  = D
$VI   = D#
$#VI  = E d*
$&VII = E
$VII  = F e#
$#VII = F# e*
$1:END

 ####### C#_Major F#,C#,G#,D#,A#,E#,B#
$1:C#_Major Cis_dur
$&I   = C
$I    = C#
$#I   = D c*
$&II  = D
$II   = D#
$#II  = E d*
$&III = E
$III  = F e#
$#III = F# e*
$&IV  = F
$IV   = F#
$#IV  = G f*
$&V   = G
$V    = G#
$#V   = A g*
$&VI  = A
$VI   = A#
$#VI  = B a*
$&VII = B
$VII  = C b#
$#VII = C# b*
$1:END

 & F_Major B&
$1:F_Major F_dur
$&I   = E f&
$I    = F
$#I   = F#
$&II  = G&
$II   = G
$#II  = G#
$&III = A&
$III  = A
$#III = A#
$&IV  = A b@
$IV   = B&
$#IV  = B
$&V   = B c&
$V    = C
$#V   = C#
$&VI  = D&
$VI   = D
$#VI  = D#
$&VII = E&
$VII  = E
$#VII = F e#
$1:END

 && B&_Major B&,E&
$1:B&_Major B_dur
$&I   = A b@
$I    = B&
$#I   = B
$&II  = B c&
$II   = C
$#II  = C#
$&III = D&
$III  = D
$#III = D#
$&IV  = D e@
$IV   = E&
$#IV  = E
$&V   = E f&
$V    = F
$#V   = F#
$&VI  = G&
$VI   = G
$#VI  = G#
$&VII = A&
$VII  = A
$#VII = A#
$1:END

 &&& E&_Major B&,E&,A&
$1:E&_Major Es_dur
$&I   = D e@
$I    = E&
$#I   = E
$&II  = E f&
$II   = F
$#II  = F#
$&III = G&
$III  = G
$#III = G#
$&IV  = G a@
$IV   = A&
$#IV  = A
$&V   = A b@
$V    = B&
$#V   = B
$&VI  = B c&
$VI   = C
$#VI  = C#
$&VII = D&
$VII  = D
$#VII = D#
$1:END

 &&&& A&_Major B&,E&,A&,D&
$1:A&_Major As_dur
$&I   = G a@
$I    = A&
$#I   = A
$&II  = A b@
$II   = B&
$#II  = B
$&III = B c&
$III  = C
$#III = C#
$&IV  = C d@
$IV   = D&
$#IV  = D
$&V   = D e@
$V    = E&
$#V   = E
$&VI  = E f&
$VI   = F
$#VI  = F#
$&VII = G&
$VII  = G
$#VII = G#
$1:END

 &&&&& D&_Major B&,E&,A&,D&,G&
$1:D&_Major Des_dur
$&I   = C d@
$I    = D&
$#I   = D
$&II  = D e@
$II   = E&
$#II  = E
$&III = E f&
$III  = F
$#III = F#
$&IV  = F g@
$IV   = G& 
$#IV  = G
$&V   = G a@
$V    = A&
$#V   = A
$&VI  = A b@
$VI   = B&
$#VI  = B
$&VII = B c&
$VII  = C
$#VII = C#
$1:END

 &&&&&& G&_Major B&,E&,A&,D&,G&,C&
$1:G&_Major Ges_dur
$&I   = F g@  
$I    = G&  
$#I   = G
$&II  = G a@
$II   = A&
$#II  = A
$&III = A b@
$III  = B&
$#III = B
$&IV  = B& c@
$IV   = B c&
$#IV  = C
$&V   = C d@
$V    = D&
$#V   = D
$&VI  = D e@ 
$VI   = E&
$#VI  = E
$&VII = E f&
$VII  = F
$#VII = F#
$1:END:w

 &&&&&&& C&_Major B&,E&,A&,D&,G&,C&,F&
$1:C&_Major Ces_dur
$&I   = B& c@
$I    = B c&
$#I   = C
$&II  = C d@ 
$II   = D&
$#II  = D
$&III = D e@
$III  = E&
$#III = E
$&IV  = E& f@
$IV   = E f&
$#IV  = F
$&V   = F g@
$V    = G&
$#V   = G
$&VI  = G a@
$VI   = A&
$#VI  = A
$&VII = A b@
$VII  = B&
$#VII = B
$1:END


 ------------
 Avilable note, Dynamic expand Sample
 *+p0x     +:Nomal  -:Reverse  0:Note No.  x:patterns
*+p1a r = "4 4" n = "0 r"
!DD-25 [#IVm7(&5)..VII7__VIIm7(&5)..III7__IIIm7..VI7__  ]
$2:DD-25
$2:#IVm7(&5) = "#IVm7(&5) $#IVm7(&5) $4:m7(&5) $3:m7(&5) T -> VII7"
$2:VII7 = "VII7 $VII7 $4:7 $3:7 SD-> VIIm7(&5)"
$2:VIIm7(&5) = "VIIm7(&5) $VIIm7(&5) $4:m7(&5) $3:m7(&5) -> III7"
$2:III7 = "III7 $III7 $4:7 $3:7 -> IIIm7"
$2:IIIm7 = "IIIm7 $IIIm7 $4:m7 $3:m7 -> VI7"
$2:VI7 = "VI7 $VI7 $4:7 $3:7 -> VIm7"
$2:VIm7 = "VIm7 $VIm7 $4:m7 $3:m7 -> II7"
$2:II7 = "II7 $II7 $4:7 $3:7 -> IIm7"
$2:IIm7 = "IIm7 $IIm7 $4:m7 $3:m7 -> V7"
$2:V7 = "V7 $V7 $4:7 $3:7 -> Vm7"
$2:Vm7 = "Vm7 $Vm7 $4:m7 $3:m7 -> I7"
$2:I7 = "I7 $I7 $4:7 $3:7 T -> IV"
$2:IV = "IV $IV $4:M $3:M SD -> I"
$2:I = "I $I $4:M $3:M SD -> #IVm7(&5)"
$2:END

$A:DD-25-Scale
 m0000006 _-1______0______1______2______*______4______5______6______7
$A:#IVm7(&5) =    "   +x...o.+x...o.+   "  F#_Locrian 
$A:VII7      =    "      ..+.+....+.+..."  B_Harmonic-minor-P5th-Below
$A:VIIm7(&5) =    "      .x...o..x...o.."  B_Locrian  
$A:III7  =        "  ..+......+...      "  E_Harmonic-minor-P5th-Down
$A:IIIm7 =        "  .x...o..x...o      "  E_Phrygian
$A:VI7  =         "     ..+......+..... "  A_Mixolydian-&6th
$A:VIm7 =         "     .....x......x.. "  A_Aeolian
$A:II7  =         " ..+......++...      "  D_Mixolydian-Lydian-Dominant
$A:IIm7 =         " .....x......x.      "  D_Dorian
$A:V7 =           "    ...x......x..... "  G_Mixo-Lydian 
 A:V7   =         "    .-.x.-..-.x-...  "  G_Hmp5D
$A:Vm7 =          "    .-.x.-..-.x-.... "  G_Harmonic-Minor-P5th-Down?
$A:I7 =           "...x..-....x..-.     "  C_Mix-Lydian
$A:IV  =          "   ...............   "  F_Lydian
$A:I  =           "...x......x....      "  C_Ionian
 m0000006 _-1______0______1______2______*______4______5______6______7
$A:END

$A:DD-25-Scale-Chord
 m0000006 _-1______0______1______2______*______4______5______6______7
$A:#IVm7(&5) =    "          >x...o5+x5.5o.+   "  F#_Locrian
$A:VII7      =    "      5.>.+....>.+.55.+.+..."  B_Hmp5D
$A:VIIm7(&5) =    "      5x...o..x5.5o5.x...o.."  B_Locrian
$A:III7  =        "         5.+...55.>...      "  E_Hmp5D
$A:IIIm7 =        "         5x...o5.x5.5o      "  E_Phrygian
$A:VI7  =         "     5.+......>...55.+......"  A_Mix-&6th
$A:VIm7 =         "     5....x...5.5x5.....x..."  A_Aeolian
$A:II7  =         "        5.+...5..++...      "  D_Mix-L-Dominant
$A:IIm7 =         "        5....x5..5.5x.      "  D_Dorian
$A:V7 =           "    5..x.....5x..55..x..... "  G_Mixo-Lydian
$A:Vm7 =          "    5........<.5...5....... "  G_?
$A:I7 =           "       5..x..<5.5.x..-.     "  C_Mix-Lydian
$A:IV  =          "   5........5.5..5.......   "  F_Lydian
$A:I  =           "       ...x......x....      "  C_Ionian
 m0000006 _-1______0______1______2______*______4______5______6______7
$A:END
 
*+p25 n = "1 2 3 1" r = "4 4 4 4"
$A:DD-25-Scale-Chord-Arp
 m0000006 _-1______0______1______2______*______4______5______6______7
$A:#IVm7(&5) =    "          >x...o5+x5.5o.+   "  F#_Locrian +p25
$A:VII7      =    "      5.>.+....>.+.55.+.+..."  B_Hmp5D  +p25
$A:VIIm7(&5) =    "      5x...o..x5.5o5.x...o.."  B_Locrian +p25
$A:III7  =        "         5.+...55.>...      "  E_Hmp5D  +p25
$A:IIIm7 =        "         5x...o5.x5.5o      "  E_Phrygian +p25
$A:VI7  =         "     5.+......>...55.+......"  A_Mix-&6th +p25
$A:VIm7 =         "     5....x...5.5x5.....x..."  A_Aeolian +p25
$A:II7  =         "        5.+...5..++...      "  D_Mix-L-Dominant +p25
$A:IIm7 =         "        5....x5..5.5x.      "  D_Dorian +p25
$A:V7 =           "    5..x.....5x..55..x..... "  G_Mixo-Lydian +p25
$A:Vm7 =          "    5........<.5...5....... "  G_? +p25
$A:I7 =           "       5..x..<5.5.x..-.     "  C_Mix-Lydian +p25
$A:IV  =          "   5........5.5..5.......   "  F_Lydian +p25
$A:I  =           ".......5..x...5.5x5...      "  C_Ionian +p25  
 m0000006 _-1______0______1______2______*______4______5______6______7
$A:END

*+dd1 n = "2 1 2 0" r= "4 4 4 4"
*+dd2 n = "2 1 2 0" r= "4 4 4 4"
*+dd3 n = "2 1 2 0" r= "4 4 4 4"
*+dd4 n = "2 1 2 0" r= "4 4 4 4"
*+dd5 n = "2 1 2 0" r= "4 4 4 4"
*+dd6 n = "2 1 2 0" r= "4 4 4 4"
*+dd7 n = "2 1 2 0" r= "4 4 4 4"
*+dd8 n = "2 1 2 0" r= "4 4 4 4"
*+dd9 n = "2 1 2 0" r= "4 4 4 4"
*+dda n = "2 1 2 0" r= "4 4 4 4"
*+ddb n = "2 1 2 0" r= "4 4 4 4"
*+ddc n = "2 1 2 0" r= "4 4 4 4"
*+ddd n = "2 1 2 0" r= "4 4 4 4"
*+dde n = "2 1 2 0" r= "4 4 4 4"
*+ddf n = "2 1 2 0" r= "4 4 4 4"
$A:DD-25-Scale-Note
 m0000006 _-1______0______1______2______*______4______5______6______7
$A:#IVm7(&5) =    "   +x...o.>x55.o.+   "  F#_Locrian  +dd1
$A:VII7      =    "      ..+.>.55.+.+..."  B_Harmonic-minor-P5th-Below +dd2
$A:VIIm7(&5) =    "      .x.5.o55x...o.."  B_Locrian +dd3
$A:III7  =        "  ..+....5.+55.      "  E_Harmonic-minor-P5th-Down +dd4
$A:IIIm7 =        "  .x...o.5x55.o      "  E_Phrygian +dd5
$A:VI7  =         "     ..+.5.55.+..... "  A_Mixolydian-&6th +dd6
$A:VIm7 =         "     ....5x55....x.. "  A_Aeolian +dd7
$A:II7  =         " ..+.....5+>5..      "  D_Mixolydian-Lydian-Dominant  +dd8
$A:IIm7 =         " .....x..5.55x.      "  D_Dorian  +dd9
$A:V7 =           "    ...x.6.66.x..... "  G_Mixo-Lydian  +dda
 A:V7   =         "    .-.x.-..-.x-...  "  G_Hmp5D  +ddb
$A:Vm7 =          "    .-.x.<.5<.x-.... "  G_Harmonic-Minor-P5th-Down? +ddc
$A:I7 =           "...x..-..5.x55-.     "  C_Mix-Lydian  +ddd
$A:IV  =          "   .......5.55....   "  F_Lydian  +dde
$A:I  =           "...x.....5x55..      "  C_Ionian  +ddf
 m0000006 _-1______0______1______2______*______4______5______6______7
$A:END

   Chord_Name_Voicing

$2:Voicing+I_IV_V7_I
$2:I = "I $I $4:M $3:M -> IV"
$2:IV = "IV $IV $4:M $3:M -> V7"
$2:V7 = "V7 $V7 $4:7 $3:7  -> I~1"
$2:I~1 = "I~1 $I~1 $4:M $3:M -> I"
$2:END

$N:C_Major+I_IV_V7_I
             _-1______0______1______2______*______4______5______6______7
$N:C        = "                     .      . . .                         "      
$N:F        = "                 .          .  . .                        "      
$N:G7       = "                  .          . .. .                       "      
$N:C~1      = "                     .      . . .                         "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$N:D&_Major+I_IV_V7_I
 (&&&&&)     _-1______0______1______2______*______4______5______6______7
$N:D&       = "                      .      . . .                        "      
$N:G&       = "                  .          .  . .                       "      
$N:A&7      = "                   .          . .. .                      "      
$N:D&~1     = "                      .      . . .                        "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$N:D_Major+I_IV_V7_I
 (##)        _-1______0______1______2______*______4______5______6______7
$N:D        = "                      .      . . .                        "      
$N:G        = "                  .          .  . .                       "      
$N:A7       = "                   .        . . ..                        "      
$N:D~1      = "                      .      . . .                        "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$N:E&_Major+I_IV_V7_I
 (&&&)       _-1______0______1______2______*______4______5______6______7
$N:E&       = "                       .   .  . .                         "      
$N:A&       = "                   .        . .  .                        "      
$N:B&7      = "                    .      . . . .                        "      
$N:E&~1     = "                       .   .  . .                         "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$N:E_Major+I_IV_V7_I
 (####)      _-1______0______1______2______*______4______5______6______7
$N:E        = "                       .   .  . .                         "      
$N:A        = "                   .        . .  .                        "      
$N:B7       = "                    .      . . . .                        "      
$N:E~1      = "                       .   .  . .                         "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$N:F_Major+I_IV_V7_I
 (&)         _-1______0______1______2______*______4______5______6______7
$N:F        = "                        .   .  . .                        "      
$N:B&       = "                    .        . .  .                       "      
$N:C7       = "                     .      . . . .                       "      
$N:F~1      = "                        .   .  . .                        "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$N:G&_Major+I_IV_V7_I
 (&&&&&&)    _-1______0______1______2______*______4______5______6______7
$N:G&       = "                  .        . .  .                         "      
$N:B        = "                     .      . . .                         "      
$N:D&7      = "                      .   . .. .                          "      
$N:G&~1     = "                  .        . .  .                         "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$N:G_Major+I_IV_V7_I
 (#)         _-1______0______1______2______*______4______5______6______7
$N:G        = "                  .        . .  .                         "      
$N:C        = "                     .      . . .                         "      
$N:D7       = "                      .   . .. .                          "      
$N:G~1      = "                  .        . .  .                         "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$N:A&_Major+I_IV_V7_I
 (&&&&)      _-1______0______1______2______*______4______5______6______7
$N:A&       = "                   .        . .  .                        "      
$N:D&       = "                      .      . . .                        "      
$N:E&7      = "                       .   . .. .                         "      
$N:A&~1     = "                   .        . .  .                        "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$N:A_Major+I_IV_V7_I
 (###)       _-1______0______1______2______*______4______5______6______7
$N:A        = "                   .      . . .                           "      
$N:D        = "                      .   .  . .                          "      
$N:E7       = "                       .   . .. .                         "      
$N:A~1      = "                   .        . .  .                        "      
$N:A~1      = "                   .      . . .                           "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$N:B&_Major+I_IV_V7_I
 (&&)        _-1______0______1______2______*______4______5______6______7
$N:B&       = "                    .      . . .                          "      
$N:E&       = "                .          .  . .                         "      
$N:F7       = "                 .        . . ..                          "      
$N:B&~1     = "                    .      . . .                          "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$N:B_Major+I_IV_V7_I
 (#####)     _-1______0______1______2______*______4______5______6______7
$N:B        = "                    .      . . .                          "      
$N:E        = "                .          .  . .                         "      
$N:F#7      = "                 .          . .. .                        "      
$N:B~1      = "                    .        . .  .                       "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$2:Voicing+I_IV_IVm_I
$2:I = "I $I $4:M $3:M -> IV"
$2:IV = "IV $IV $4:M $3:M -> IVm"
$2:IVm = "IVm $IVm $4:m $3:m  -> I~1"
$2:I~1 = "I~1 $I~1 $4:M $3:M -> I"
$2:END

$N:C_Major+I_IV_IVm_I
 ()          _-1______0______1______2______*______4______5______6______7
$N:C        = "                     .      . . .                         "      
$N:F        = "                 .          .  . .                        "      
$N:Fm       = "                 .          .  . -                        "      
$N:C~1      = "                     .      . . .                         "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$N:D&_Major+I_IV_IVm_I
 (&&&&&)     _-1______0______1______2______*______4______5______6______7
$N:D&       = "                      .   .  . .                          "      
$N:G&       = "                  .        . .  .                         "      
$N:G&m      = "                  .        - .  .                         "      
$N:D&~1     = "                      .   .  . .                          "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$N:D_Major+I_IV_IVm_I
 (##)        _-1______0______1______2______*______4______5______6______7
$N:D        = "                      .        . .  .                     "      
$N:G        = "                  .             . . .                     "      
$N:Gm       = "                  .             . - .                     "      
$N:D~1      = "                      .        . .  .                     "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$N:E&_Major+I_IV_IVm_I
 (&&&)       _-1______0______1______2______*______4______5______6______7
$N:E&       = "                       . . .  .                           "      
$N:A&       = "                   .      . . .                           "      
$N:A&m      = "                   .      . - .                           "      
$N:E&~1     = "                .        . .  .                           "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$N:E_Major+I_IV_IVm_I
 (####)      _-1______0______1______2______*______4______5______6______7
$N:E        = "                       .      . . .                       "      
$N:A        = "                   .          .  . .                      "      
$N:Am       = "                   .          .  . -                      "      
$N:E~1      = "                .             . . .                       "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$N:F_Major+I_IV_IVm_I
 (&)         _-1______0______1______2______*______4______5______6______7
$N:F        = "                 .        . .  .                          "      
$N:B&       = "                    .      . . .                          "      
$N:B&m      = "                    .      . - .                          "      
$N:F~1      = "                 .        . .  .                          "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$N:G&_Major+I_IV_IVm_I
 (&)         _-1______0______1______2______*______4______5______6______7
$N:G&       = "                  .          .  . .                       "      
$N:B        = "                     .        . .  .                      "      
$N:Bm       = "                     .        - .  .                      "      
$N:G&~1     = "                  .          .  . .                       "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$N:G_Major+I_IV_IVm_I
 (#)         _-1______0______1______2______*______4______5______6______7
$N:G        = "                  .             . . .                     "      
$N:C        = "                     .          .  . .                    "      
$N:Cm       = "                     .          .  . -                    "      
$N:G~1      = "                  .             . . .                     "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$N:A&_Major+I_IV_IVm_I
 (&&&&)      _-1______0______1______2______*______4______5______6______7
$N:A&       = "                   .      . . .                           "      
$N:D&       = "                      .   .  . .                          "      
$N:D&m      = "                      .   .  . -                          "      
$N:A&~1     = "                   .      . . .                           "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$N:A_Major+I_IV_IVm_I
 (###)       _-1______0______1______2______*______4______5______6______7
$N:A        = "                   .        . .  .                        "      
$N:D        = "                      .      . . .                        "      
$N:Dm       = "                      .      . - .                        "      
$N:A~1      = "                   .        . .  .                        "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$N:B&_Major+I_IV_IVm_I
 (&&)        _-1______0______1______2______*______4______5______6______7
$N:B&       = "                    .        . .  .                       "      
$N:E&       = "                .             . . .                       "      
$N:E&m      = "                .             . - .                       "      
$N:B&~1     = "                    .        . .  .                       "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$N:B_Major+I_IV_IVm_I
 (#####)     _-1______0______1______2______*______4______5______6______7
$N:B        = "                    .        . .  .                       "      
$N:E        = "                .             . . .                       "      
$N:Em       = "                .             . - .                       "      
$N:B~1      = "                    .        . .  .                       "      
             _-1______0______1______2______*______4______5______6______7
$N:END


$2:Voicing+I_VIm_IIm7-V7_I
$2:I    = "I $I $4:M $3:M -> VIm"
$2:VIm  = "VIm $VIm $4:m $3:m  -> IIm7"
$2:IIm7 = "IIm7 $IIm7 $4:m7 $3:m7  -> V7"
$2:V7   = "V7 $V7 $4:7 $3:7  -> I~1"
$2:I~1  = "I~1 $I~1 $4:M $3:M -> I"
$2:END

$N:C_Major+I_VIm_IIm7-V7_I
 ()          _-1______0______1______2______*______4______5______6______7
$N:C        = "                     .      . . .                         "      
$N:Am       = "                   .        . .  .                        "      
$N:Dm7      = "                      .     .. . .                        "      
$N:G7       = "                  .          . .. .                       "      
$N:C~1      = "                     .        . .  .                      "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$N:D&_Major+I_VIm_IIm7-V7_I
 (&&&&&)     _-1______0______1______2______*______4______5______6______7
$N:D&       = "                      .        . .  .                     "      
$N:B&m      = "                    .          .  . .                     "      
$N:E&m7     = "                       .      . . . .                     "      
$N:A&7      = "                   .          . .. .                      "      
$N:D&~1     = "                      .        . .  .                     "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$N:D_Major+I_VIm_IIm7-V7_I
 (##)        _-1______0______1______2______*______4______5______6______7
$N:D        = "                      .   .  . .                          "      
$N:Bm       = "                    .      . . .                          "      
$N:Em7      = "                       .   . .. .                         "      
$N:A7       = "                   .      . . . .                         "      
$N:D~1      = "                      .   .  . .                          "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$N:E&_Major+I_VIm_IIm7-V7_I
 (&&&)       _-1______0______1______2______*______4______5______6______7
$N:E&       = "                       .      . . .                       "      
$N:Cm       = "                     .        . .  .                      "      
$N:Fm7      = "                 .            .. . .                      "      
$N:B&7      = "                    .        . . ..                       "      
$N:E&~1     = "                       .      . . .                       "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$N:E_Major+I_VIm_IIm7-V7_I
 (####)      _-1______0______1______2______*______4______5______6______7
$N:E        = "                       .        . .  .                    "      
$N:C#m      = "                     .          .  . .                    "      
$N:F#m7     = "                        .      . . . .                    "      
$N:B7       = "                    .          . .. .                     "      
$N:E~1      = "                       .        . .  .                    "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$N:F_Major+I_VIm_IIm7-V7_I
 (&)         _-1______0______1______2______*______4______5______6______7
$N:F        = "                        .   .  . .                        "      
$N:Dm       = "                      .      . . .                        "      
$N:Gm7      = "                         .   . .. .                       "      
$N:C7       = "                     .      . . . .                       "      
$N:F~1      = "                        .   .  . .                        "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$N:G&_Major+I_VIm_IIm7-V7_I
 (&&&&&&)    _-1______0______1______2______*______4______5______6______7
$N:G&       = "                  .             . . .                     "      
$N:E&m      = "                .               . .  .                    "      
$N:A&m7     = "                   .            .. . .                    "      
$N:D&7      = "               .               . . ..                     "      
$N:G&~1     = "                  .             . . .                     "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$N:G_Major+I_VIm_IIm7-V7_I
 (#)         _-1______0______1______2______*______4______5______6______7
$N:G        = "                  .          .  . .                       "      
$N:Em       = "                .             . . .                       "      
$N:Am7      = "                   .          . .. .                      "      
$N:D7       = "               .             . . . .                      "      
$N:G~1      = "                  .          .  . .                       "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$N:A&_Major+I_VIm_IIm7-V7_I
 (&&&&)      _-1______0______1______2______*______4______5______6______7
$N:A&       = "                   .          .  . .                      "      
$N:Fm       = "                 .             . . .                      "      
$N:B&m7     = "                    .          . .. .                     "      
$N:E&7      = "                .               . . ..                    "      
$N:A&~1     = "                   .             . . .                    "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$N:A_Major+I_VIm_IIm7-V7_I
 (###)       _-1______0______1______2______*______4______5______6______7
$N:A        = "                   .             . . .                    "      
$N:F#m      = "                 .               . .  .                   "      
$N:Bm7      = "                    .            .. . .                   "      
$N:E7       = "                .               . . ..                    "      
$N:A~1      = "                   .             . . .                    "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$N:B&_Major+I_VIm_IIm7-V7_I
 (&&)        _-1______0______1______2______*______4______5______6______7
$N:B&       = "                    .          .  . .                     "      
$N:Gm       = "                  .             . . .                     "      
$N:Cm7      = "                     .          . .. .                    "      
$N:F7       = "                 .             . . . .                    "      
$N:B&~1     = "                    .          .  . .                     "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$N:B_Major+I_VIm_IIm7-V7_I
 (#####)     _-1______0______1______2______*______4______5______6______7
$N:B        = "                    .        . .  .                       "      
$N:G#m      = "                  .          .  . .                       "      
$N:C#m7     = "                     .      . . . .                       "      
$N:F#7      = "                 .          . .. .                        "      
$N:B~1      = "                    .        . .  .                       "      
             _-1______0______1______2______*______4______5______6______7
$N:END


$2:Voicing+I_IIIm_IV_I
$2:I    = "I $I $4:M $3:M -> IIIm"
$2:IIIm  = "IIIm $IIIm $4:m $3:m  -> IV"
$2:IV   = "IV $IV $4:M $3:M  -> I~1"
$2:I~1  = "I~1 $I~1 $4:M $3:M -> I"
$2:END

$N:C_Major+I_IIIm_IV_I
 ()          _-1______0______1______2______*______4______5______6______7
$N:C        = "                     .        . .  .                      "      
$N:Em       = "                .             . . .                       "      
$N:F        = "                 .          .  . .                        "      
$N:C~1      = "                     .      . . .                         "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$N:D&_Major+I_IIIm_IV_I
 (&&&&&)     _-1______0______1______2______*______4______5______6______7
$N:D&       = "                      .      . . .                        "      
$N:Fm       = "                 .          .  . .                        "      
$N:G&       = "                  .          .  . .                       "      
$N:D&~1     = "                      .      . . .                        "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$N:D_Major+I_IIIm_IV_I
 (##)        _-1______0______1______2______*______4______5______6______7
$N:D        = "                      .   .  . .                          "      
$N:F#m      = "                 .        . .  .                          "      
$N:G        = "                  .        . .  .                         "      
$N:D~1      = "                      .   .  . .                          "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$N:E&_Major+I_IIIm_IV_I
 (&&&)       _-1______0______1______2______*______4______5______6______7
$N:E&       = "                       .   .  . .                         "      
$N:Gm       = "                  .        . .  .                         "      
$N:A&       = "                   .        . .  .                        "      
$N:E&~1     = "                       .   .  . .                         "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$N:E_Major+I_IIIm_IV_I
 (####)      _-1______0______1______2______*______4______5______6______7
$N:E        = "                .               . .  .                    "      
$N:G#m      = "                  .             . . .                     "      
$N:A        = "                   .          .  . .                      "      
$N:E~1      = "                .             . . .                       "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$N:F_Major+I_IIIm_IV_I
 (&)         _-1______0______1______2______*______4______5______6______7
$N:F        = "                 .             . . .                      "      
$N:Am       = "                   .          .  . .                      "      
$N:B&       = "                    .          .  . .                     "      
$N:F~1      = "                 .             . . .                      "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$N:G&_Major+I_IIIm_IV_I
 (&&&&&&)    _-1______0______1______2______*______4______5______6______7
$N:G&       = "                  .          .  . .                       "      
$N:B&m      = "                    .        . .  .                       "      
$N:B        = "                     .        . .  .                      "      
$N:G&~1     = "                  .          .  . .                       "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$N:G_Major+I_IIIm_IV_I
 (#)         _-1______0______1______2______*______4______5______6______7
$N:G        = "                  .        . .  .                         "      
$N:Bm       = "                    .      . . .                          "      
$N:C        = "                     .      . . .                         "      
$N:G~1      = "                  .        . .  .                         "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$N:A&_Major+I_IIIm_IV_I
 (&&&&)      _-1______0______1______2______*______4______5______6______7
$N:A&       = "                   .        . .  .                        "      
$N:Cm       = "                     .      . . .                         "      
$N:D&       = "                      .      . . .                        "      
$N:A&~1     = "                   .        . .  .                        "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$N:A_Major+I_IIIm_IV_I
 (###)       _-1______0______1______2______*______4______5______6______7
$N:A        = "                   .          .  . .                      "      
$N:C#m      = "                     .        . .  .                      "      
$N:D        = "                      .        . .  .                     "      
$N:A~1      = "                   .          .  . .                      "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$N:B&_Major+I_IIIm_IV_I
 (&&)        _-1______0______1______2______*______4______5______6______7
$N:B&       = "                    .        . .  .                       "      
$N:Dm       = "                      .      . . .                        "      
$N:E&       = "                       .      . . .                       "      
$N:B&~1     = "                    .        . .  .                       "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$N:B_Major+I_IIIm_IV_I
 (#####)     _-1______0______1______2______*______4______5______6______7
$N:B        = "                    .          .  . .                     "      
$N:D#m      = "                      .        . .  .                     "      
$N:E        = "                       .        . .  .                    "      
$N:B~1      = "                    .          .  . .                     "      
             _-1______0______1______2______*______4______5______6______7
$N:END

 ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
 Guitar_Chord_Voicing
$N:C_Major+Guitar_Chord_Voicing
             _-1______0______1______2______*______4______5______6______7
$N:C        = "                            . . .                         "      
$N:C6       = "                            . . ..                        "      
$N:CM7      = "                            . . . .                       "      
$N:C6(9)    = "                            . . ..  .                     "      
$N:CM9      = "                            . . . . .                     "      
$N:Csus4    = "                            .  ..                         "      
$N:Cm       = "                            . - .                         "      
$N:Cm6      = "                            . - ..                        "      
$N:Cm7      = "                            . - . -                       "      
$N:CmM7     = "                            . - . .                       "      
$N:Cm7(&5)  = "                            . - - -                       "      
$N:Cm6(9)   = "                            . - ..  .                     "      
$N:Cm69     = "                            . - ..  .                     "      
             _-1______0______1______2______*______4______5______6______7
$2:END

$N:C_Major+Default
             _-1______0______1______2______*______4______5______6______7
$N:C        = "                     .      . . .                         "      
$N:Em       = "                    .         . . .                       "      
$N:F        = "                 .          .  . .                        "      
$N:Fm       = "                 .          .  . -                        "      
$N:Am       = "                   .        . .  .                        "      
$N:Dm7      = "                     .      .. . .                        "      
$N:G        = "                  .          .  . .                       "      
$N:G7       = "                  .          . .. .                       "      
$N:G7       = "                  .          . .. .                       "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$N:D&_Major+Guitar_Chord_Voicing
$2:END

$N:+Original
             _-1______0______1______2______*______4______5______6______7
$N:C        = "                     .             . . .                  "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$N:Original_Pattern
             _-1______0______1______2______*______4______5______6______7
$N:C        = "                     .             . . .                  "      
             _-1______0______1______2______*______4______5______6______7
$N:END

$0:END