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

header {
    lesson_id = "5098fb96-c362-45b9-bbb3-703db149a079"
        module = idbyname
        help = "idbyname-intonation"
        title = _("Is the fifth flat, in tune or sharp? %s") % "(0.99)"
        filldir = vertic
        fillnum = 4
}

question {
 name = _i("intonation|flat")
 set=0
 cmdline("./bin/csound-play-harmonic-interval.sh 220.000000 326.700000")
}

question {
 name = _i("intonation|in tune")
 set=0
 cmdline("./bin/csound-play-harmonic-interval.sh 220.000000 330.000000")
}

question {
 name = _i("intonation|sharp")
 set=0
 cmdline("./bin/csound-play-harmonic-interval.sh 220.000000 333.333333")
}

question {
 name = _i("intonation|flat")
 set=1
 cmdline("./bin/csound-play-harmonic-interval.sh 247.500000 367.537500")
}

question {
 name = _i("intonation|in tune")
 set=1
 cmdline("./bin/csound-play-harmonic-interval.sh 247.500000 371.250000")
}

question {
 name = _i("intonation|sharp")
 set=1
 cmdline("./bin/csound-play-harmonic-interval.sh 247.500000 375.000000")
}

question {
 name = _i("intonation|flat")
 set=2
 cmdline("./bin/csound-play-harmonic-interval.sh 293.333333 435.600000")
}

question {
 name = _i("intonation|in tune")
 set=2
 cmdline("./bin/csound-play-harmonic-interval.sh 293.333333 440.000000")
}

question {
 name = _i("intonation|sharp")
 set=2
 cmdline("./bin/csound-play-harmonic-interval.sh 293.333333 444.444444")
}

question {
 name = _i("intonation|flat")
 set=3
 cmdline("./bin/csound-play-harmonic-interval.sh 330.000000 490.050000")
}

question {
 name = _i("intonation|in tune")
 set=3
 cmdline("./bin/csound-play-harmonic-interval.sh 330.000000 495.000000")
}

question {
 name = _i("intonation|sharp")
 set=3
 cmdline("./bin/csound-play-harmonic-interval.sh 330.000000 500.000000")
}

question {
 name = _i("intonation|flat")
 set=4
 cmdline("./bin/csound-play-harmonic-interval.sh 366.666667 544.500000")
}

question {
 name = _i("intonation|in tune")
 set=4
 cmdline("./bin/csound-play-harmonic-interval.sh 366.666667 550.000000")
}

question {
 name = _i("intonation|sharp")
 set=4
 cmdline("./bin/csound-play-harmonic-interval.sh 366.666667 555.555556")
}

question {
 name = _i("intonation|flat")
 set=5
 cmdline("./bin/csound-play-harmonic-interval.sh 412.500000 612.562500")
}

question {
 name = _i("intonation|in tune")
 set=5
 cmdline("./bin/csound-play-harmonic-interval.sh 412.500000 618.750000")
}

question {
 name = _i("intonation|sharp")
 set=5
 cmdline("./bin/csound-play-harmonic-interval.sh 412.500000 625.000000")
}

question {
 name = _i("intonation|flat")
 set=6
 cmdline("./bin/csound-play-harmonic-interval.sh 440.000000 653.400000")
}

question {
 name = _i("intonation|in tune")
 set=6
 cmdline("./bin/csound-play-harmonic-interval.sh 440.000000 660.000000")
}

question {
 name = _i("intonation|sharp")
 set=6
 cmdline("./bin/csound-play-harmonic-interval.sh 440.000000 666.666667")
}
