# Solfege - ear training for GNOME
# Copyright (C) 2004, 2005 Tom Cato Amundsen
# License is GPL, see file COPYING

header {
    lesson_id = "csound-intonation-harmonic-M2-20cent"
        module = idbyname
        help = "idbyname-intonation"
        title = _("Is the interval flat, in tune or sharp? %s cent wrong") % 20
        lesson_heading = _("Just interval: %s") % _("major second") + " (9:8)"
        filldir = vertic
}

question {
 name = _i("intonation|flat")
 set=0
 csound(load("share/sinus.orc"), """    f1 0 4096 10 1 
   i1 0 1 220.000000    i1 0 1 244.657220
 """)
}

question {
 name = _i("intonation|in tune")
 set=0
 csound(load("share/sinus.orc"), """    f1 0 4096 10 1 
   i1 0 1 220.000000    i1 0 1 247.500000
 """)
}

question {
 name = _i("intonation|sharp")
 set=0
 csound(load("share/sinus.orc"), """    f1 0 4096 10 1 
   i1 0 1 220.000000    i1 0 1 250.375811
 """)
}

question {
 name = _i("intonation|flat")
 set=1
 csound(load("share/sinus.orc"), """    f1 0 4096 10 1 
   i1 0 1 233.081881    i1 0 1 259.205295
 """)
}

question {
 name = _i("intonation|in tune")
 set=1
 csound(load("share/sinus.orc"), """    f1 0 4096 10 1 
   i1 0 1 233.081881    i1 0 1 262.217116
 """)
}

question {
 name = _i("intonation|sharp")
 set=1
 csound(load("share/sinus.orc"), """    f1 0 4096 10 1 
   i1 0 1 233.081881    i1 0 1 265.263932
 """)
}

question {
 name = _i("intonation|flat")
 set=2
 csound(load("share/sinus.orc"), """    f1 0 4096 10 1 
   i1 0 1 246.941651    i1 0 1 274.618444
 """)
}

question {
 name = _i("intonation|in tune")
 set=2
 csound(load("share/sinus.orc"), """    f1 0 4096 10 1 
   i1 0 1 246.941651    i1 0 1 277.809357
 """)
}

question {
 name = _i("intonation|sharp")
 set=2
 csound(load("share/sinus.orc"), """    f1 0 4096 10 1 
   i1 0 1 246.941651    i1 0 1 281.037346
 """)
}

question {
 name = _i("intonation|flat")
 set=3
 csound(load("share/sinus.orc"), """    f1 0 4096 10 1 
   i1 0 1 261.625565    i1 0 1 290.948107
 """)
}

question {
 name = _i("intonation|in tune")
 set=3
 csound(load("share/sinus.orc"), """    f1 0 4096 10 1 
   i1 0 1 261.625565    i1 0 1 294.328761
 """)
}

question {
 name = _i("intonation|sharp")
 set=3
 csound(load("share/sinus.orc"), """    f1 0 4096 10 1 
   i1 0 1 261.625565    i1 0 1 297.748696
 """)
}

question {
 name = _i("intonation|flat")
 set=4
 csound(load("share/sinus.orc"), """    f1 0 4096 10 1 
   i1 0 1 277.182631    i1 0 1 308.248782
 """)
}

question {
 name = _i("intonation|in tune")
 set=4
 csound(load("share/sinus.orc"), """    f1 0 4096 10 1 
   i1 0 1 277.182631    i1 0 1 311.830460
 """)
}

question {
 name = _i("intonation|sharp")
 set=4
 csound(load("share/sinus.orc"), """    f1 0 4096 10 1 
   i1 0 1 277.182631    i1 0 1 315.453755
 """)
}

question {
 name = _i("intonation|flat")
 set=5
 csound(load("share/sinus.orc"), """    f1 0 4096 10 1 
   i1 0 1 293.664768    i1 0 1 326.578208
 """)
}

question {
 name = _i("intonation|in tune")
 set=5
 csound(load("share/sinus.orc"), """    f1 0 4096 10 1 
   i1 0 1 293.664768    i1 0 1 330.372864
 """)
}

question {
 name = _i("intonation|sharp")
 set=5
 csound(load("share/sinus.orc"), """    f1 0 4096 10 1 
   i1 0 1 293.664768    i1 0 1 334.211612
 """)
}

question {
 name = _i("intonation|flat")
 set=6
 csound(load("share/sinus.orc"), """    f1 0 4096 10 1 
   i1 0 1 311.126984    i1 0 1 345.997559
 """)
}

question {
 name = _i("intonation|in tune")
 set=6
 csound(load("share/sinus.orc"), """    f1 0 4096 10 1 
   i1 0 1 311.126984    i1 0 1 350.017857
 """)
}

question {
 name = _i("intonation|sharp")
 set=6
 csound(load("share/sinus.orc"), """    f1 0 4096 10 1 
   i1 0 1 311.126984    i1 0 1 354.084868
 """)
}

question {
 name = _i("intonation|flat")
 set=7
 csound(load("share/sinus.orc"), """    f1 0 4096 10 1 
   i1 0 1 329.627557    i1 0 1 366.571644
 """)
}

question {
 name = _i("intonation|in tune")
 set=7
 csound(load("share/sinus.orc"), """    f1 0 4096 10 1 
   i1 0 1 329.627557    i1 0 1 370.831002
 """)
}

question {
 name = _i("intonation|sharp")
 set=7
 csound(load("share/sinus.orc"), """    f1 0 4096 10 1 
   i1 0 1 329.627557    i1 0 1 375.139850
 """)
}

question {
 name = _i("intonation|flat")
 set=8
 csound(load("share/sinus.orc"), """    f1 0 4096 10 1 
   i1 0 1 349.228231    i1 0 1 388.369128
 """)
}

question {
 name = _i("intonation|in tune")
 set=8
 csound(load("share/sinus.orc"), """    f1 0 4096 10 1 
   i1 0 1 349.228231    i1 0 1 392.881760
 """)
}

question {
 name = _i("intonation|sharp")
 set=8
 csound(load("share/sinus.orc"), """    f1 0 4096 10 1 
   i1 0 1 349.228231    i1 0 1 397.446827
 """)
}

question {
 name = _i("intonation|flat")
 set=9
 csound(load("share/sinus.orc"), """    f1 0 4096 10 1 
   i1 0 1 369.994423    i1 0 1 411.462759
 """)
}

question {
 name = _i("intonation|in tune")
 set=9
 csound(load("share/sinus.orc"), """    f1 0 4096 10 1 
   i1 0 1 369.994423    i1 0 1 416.243726
 """)
}

question {
 name = _i("intonation|sharp")
 set=9
 csound(load("share/sinus.orc"), """    f1 0 4096 10 1 
   i1 0 1 369.994423    i1 0 1 421.080245
 """)
}

question {
 name = _i("intonation|flat")
 set=10
 csound(load("share/sinus.orc"), """    f1 0 4096 10 1 
   i1 0 1 391.995436    i1 0 1 435.929607
 """)
}

question {
 name = _i("intonation|in tune")
 set=10
 csound(load("share/sinus.orc"), """    f1 0 4096 10 1 
   i1 0 1 391.995436    i1 0 1 440.994865
 """)
}

question {
 name = _i("intonation|sharp")
 set=10
 csound(load("share/sinus.orc"), """    f1 0 4096 10 1 
   i1 0 1 391.995436    i1 0 1 446.118979
 """)
}

question {
 name = _i("intonation|flat")
 set=11
 csound(load("share/sinus.orc"), """    f1 0 4096 10 1 
   i1 0 1 415.304698    i1 0 1 461.851331
 """)
}

question {
 name = _i("intonation|in tune")
 set=11
 csound(load("share/sinus.orc"), """    f1 0 4096 10 1 
   i1 0 1 415.304698    i1 0 1 467.217785
 """)
}

question {
 name = _i("intonation|sharp")
 set=11
 csound(load("share/sinus.orc"), """    f1 0 4096 10 1 
   i1 0 1 415.304698    i1 0 1 472.646594
 """)
}
