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

header {
    lesson_id = "csound-intonation-m6-30cent"
        module = idbyname
        help = "idbyname-intonation"
        title = _("Is the interval flat, in tune or sharp? %s cent wrong") % 30
        lesson_heading = _("Just interval: %s") % _("minor sixth") + " (8:5)"
        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 + 1 345.952851
 """)
}

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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