{SAMPLE FILE FOR MICROABC}

name:_22_ET_
{} size:22         {read about enharmonics below}
range:-21 44
scl:1
alias: 2       {3} {on enharmonic notes, see below}
replaceabc:4

{--------------------------------------------------}

{22-ET :: 22 EQUAL DIVISIONS OF OCTAVE}

{p.c.} {interval} {E22 notation} {abcm2ps replacement notation}
  0:          1/1     C    .      =C
  1:         54.545   C/   Db     ^1/22C  _3/22D
  2:        109.091   C#p  Db/    ^2/22C  _2/22D
  3:        163.636   C#   Dp     ^3/22C  _1/22D
  4:        218.182   D    .      =D
  5:        272.727   D/   Eb     ^1/22D  _3/22E
  6:        327.273   D#p  Eb/    ^2/22D  _2/22E
  7:        381.818   D#   Ep     ^3/22D  _1/22E
  8:        436.364   E    .      =E
  9:        490.909   F    .      =F
 10:        545.455   F/   Gb     ^1/22F  _3/22G
 11:        600.000   F#p  Gb/    ^2/22F  _2/22G
 12:        654.545   F#   Gp     ^3/22F  _1/22G
 13:        709.091   G    .      =G
 14:        763.636   G/   Ab     ^1/22G  _3/22A
 15:        818.182   G#p  Ab/    ^2/22G  _2/22A
 16:        872.727   G#   Ap     ^3/22G  _1/22A
 17:        927.273   A    .      =A
 18:        981.818   A/   Bb     ^1/22A  _3/22B
 19:       1036.364   A#p  Bb/    ^2/22A  _2/22B
 20:       1090.909   A#   Bp     ^3/22A  ^1/22B
 21:       1145.455   B    .      =B

{ ENHARMONIC NOTES -- `size:' must be increased/disabled to use them }
  1:         54.545   Db     ^1/22C  _3/22D
  2:        109.091   Db/    ^2/22C  _2/22D
  3:        163.636   Dp     .       _1/22D
  5:        272.727   Eb     ^1/22D  _3/22E
  6:        327.273   Eb/    ^2/22D  _2/22E
  7:        381.818   Ep     .       _1/22E
 10:        545.455   Gb     ^1/22F  _3/22G
 11:        600.000   Gb/    ^2/22F  _2/22G
 12:        654.545   Gp     .       _1/22G
 14:        763.636   Ab     ^1/22G  _3/22A
 15:        818.182   Ab/    ^2/22G  _2/22A
 16:        872.727   Ap     .       _1/22A
 18:        981.818   Bb     ^1/22A  _3/22B
 19:       1036.364   Bb/    ^2/22A  _2/22B
 20:       1090.909   Bp     .       ^1/22B

{--------------------------------------------------}

{ abcm2ps new accidentals for p #p  / b/ }
{ (abcpp cannot deal with the char `\', so `p' is used instead) }

dumbacc:1 {output macros for accidentals}

{ MACROS FOR ACCIDENTALS }
defacc: p  _1/22
defacc: /  ^1/22
defacc: #p ^2/22
defacc: b/ _2/22
defacc: #  ^3/22
defacc: b  _3/22

{ USE SAGITTAL ACCIDENTALS - FILE `microtonal.fmt' MUST BE REACHABLE }
echo:%%format ../../microtonal.fmt
echo:%%postscript /sh21{r72-1u}!
echo:%%postscript /ft21{r72-1d}!
echo:%%postscript /sh277{r72-5u}!
echo:%%postscript /ft277{r72-5d}!
echo:%%postscript /sh533{r72-6u}!
echo:%%postscript /ft533{r72-6d}!

{ CODE BELOW IS AN ALTERNATIVE E22 NOTATION }
{ echo:%%postscript /upcomma{ M -2 -5.9 RM
{ echo:%%postscript           4 6 RL 0 6.5 RL -4 -10.5 RL closepath fill}!
{ echo:%%postscript /dncomma{gsave T 1 -1 scale 0 0 upcomma grestore}!
{ echo:%%postscript /sh21{upcomma}!
{ echo:%%postscript /ft21{dncomma}!
{ echo:%%postscript /sh277{gsave T 1 0 sh0 -5 0 dncomma grestore}!
{ echo:%%postscript /ft277{gsave T 1 0 ft0 -5 0 upcomma grestore}!
{ echo:%%postscript /sh533{sh0}!
{ echo:%%postscript /ft533{ft0}!

{--------------------------------------------------}




