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

header {
    lesson_id = "csound-intonation-harmonic-maj3-30cent"
        module = idbyname
        help = "idbyname-intonation"
        title = _("Is the interval flat, in tune or sharp? %s cent wrong") % 30
        lesson_heading = _("Just interval: %s") % _("major third") + " (5:4)"
        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 270.275665
 """)
}

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 275.000000
 """)
}

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 279.806915
 """)
}

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 286.347092
 """)
}

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 291.352351
 """)
}

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 296.445100
 """)
}

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 303.374176
 """)
}

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 308.677063
 """)
}

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 314.072643
 """)
}

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 321.413743
 """)
}

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 327.031957
 """)
}

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 332.748375
 """)
}

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 340.525999
 """)
}

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 346.478289
 """)
}

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 352.534623
 """)
}

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 360.774729
 """)
}

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 367.080960
 """)
}

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 373.497422
 """)
}

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 382.227510
 """)
}

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 388.908730
 """)
}

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 395.706735
 """)
}

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 404.955941
 """)
}

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 412.034446
 """)
}

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 419.236681
 """)
}

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 429.035874
 """)
}

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 436.535289
 """)
}

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 444.165792
 """)
}

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 454.547675
 """)
}

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 462.493028
 """)
}

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 470.577264
 """)
}

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 481.576486
 """)
}

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 489.994295
 """)
}

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 498.559244
 """)
}

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 510.212514
 """)
}

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 519.130872
 """)
}

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 528.205120
 """)
}
