cleari()
setSpeed(fast)
val scale = List(60, 62, 64, 65, 67, 69, 71, 72,60, 62, 64, 65, 67, 69, 71, 72,60, 62, 64, 67, 69, 72, 74, 76,60, 62, 64, 67, 69, 72, 74, 76)
for (note <- scale) {
// Play the note for 200 milliseconds
playNote(note, 200)
Thread.sleep(100)
}