]> git.cworth.org Git - scherzo/blobdiff - scherzo.c
Automatically change key whenever user plays a major scale.
[scherzo] / scherzo.c
index 696e816e7e3f4ede87856be7dd294c754b4b23c2..665795977fcf4e2d5c9d397fe3b1579cab9af3ba 100644 (file)
--- a/scherzo.c
+++ b/scherzo.c
@@ -94,12 +94,6 @@ scherzo_press_pedal (scherzo_t *scherzo);
 static void
 scherzo_release_pedal (scherzo_t *scherzo);
 
-static void
-_judge_pitch (scherzo_t *scherzo, pitch_t pitch);
-
-static void
-_score_challenge (scherzo_t *scherzo);
-
 static void
 pitch_group_remove_pitches (pitch_group_t *group);
 
@@ -289,8 +283,6 @@ on_key_press_event (GtkWidget *widget,
        pitch = scherzo_key_spell_pitch (&scherzo->key, pitch);
 
        scherzo_press_note (scherzo, pitch);
-       _judge_pitch (scherzo, pitch);
-       gtk_widget_queue_draw (scherzo->window);
 
        return TRUE;
     }
@@ -400,8 +392,6 @@ on_key_release_event (unused (GtkWidget *widget),
        pitch = scherzo_key_spell_pitch (&scherzo->key, pitch);
 
        scherzo_release_note (scherzo, pitch);
-       _score_challenge (scherzo);
-       gtk_widget_queue_draw (scherzo->window);
 
        return TRUE;
     }
@@ -913,20 +903,6 @@ pitch_group_remove_pitches (pitch_group_t *group)
 
 static void
 scherzo_update_notes_and_chord (scherzo_t *scherzo)
-{
-    if (scherzo->notes_pressed.num_pitches == 0 &&
-       scherzo->notes_pedaled.num_pitches == 0)
-    {
-       score_remove_notes (scherzo->score);
-
-       score_remove_chords (scherzo->score);
-
-       gtk_widget_queue_draw (scherzo->window);
-    }
-}
-
-static void
-scherzo_press_note (scherzo_t *scherzo, pitch_t pitch)
 {
     void *local = talloc_new (NULL);
     pitch_group_t *chord;
@@ -935,16 +911,6 @@ scherzo_press_note (scherzo_t *scherzo, pitch_t pitch)
     pitch_t *root;
     int i;
 
-    /* Do nothing if this note is already pressed. */
-    for (i = 0; i < scherzo->notes_pressed.num_pitches; i++)
-       if (scherzo->notes_pressed.pitches[i] == pitch)
-           return;
-
-    pitch_group_add_pitch (&scherzo->notes_pressed, pitch);
-
-    if (scherzo->pedal_pressed)
-       pitch_group_add_pitch (&scherzo->notes_pedaled, pitch);
-
     /* Remove all notes/chords from score, then add current notes. */
     score_remove_notes (scherzo->score);
     score_remove_chords (scherzo->score);
@@ -960,7 +926,17 @@ scherzo_press_note (scherzo_t *scherzo, pitch_t pitch)
        /* Don't print root pitch for octaves and inversions,
         * (since a pitch name alone looks like a major triad) */
        if (signature->num_degrees < 3) {
+           /* In fact, don't print anything for octaves and
+            * inversions for now. It leads to a bit of flashing when
+            * playing chords.
+            *
+            * FIXME: What I'd like to have here is a small timeout,
+            * such that names only appear once an interval has been
+            * held for at least 100 ms or so. With that, it would be
+            * nice to display the interval names once again.
+            *
            chord_name = talloc_strdup (local, signature->name);
+           */
        } else {
            _spell_chord_by_signature (&scherzo->notes_pressed,
                                       signature, *root);
@@ -990,26 +966,82 @@ scherzo_press_note (scherzo_t *scherzo, pitch_t pitch)
                        SCORE_DURATION_WHOLE);
     }
 
+    gtk_widget_queue_draw (scherzo->window);
+
     talloc_free (local);
 }
 
+static void
+scherzo_set_key (scherzo_t *scherzo, pitch_t pitch)
+{
+    scherzo_key_init (&scherzo->key, pitch);
+    score_set_key (scherzo->score, pitch);
+}
+
+static bool
+pitches_are_diatonic_scale (pitch_t *pitches, int num_pitches)
+{
+    int diatonic_half_steps[7] = {
+       0, 2, 4, 5, 7, 9, 11
+    };
+    int half_steps;
+    pitch_t root;
+    int i;
+
+    if (num_pitches < 7)
+       return 0;
+
+    root = pitches[0];
+
+    for (i = 0; i < 7; i++) {
+       half_steps = pitch_from_root_in_half_steps (pitches[i], root);
+       if (half_steps != diatonic_half_steps[i])
+           return false;
+    }
+
+    return true;
+}
+
+static void
+scherzo_press_note (scherzo_t *scherzo, pitch_t pitch)
+{
+    int i;
+
+#define NUM_RECENT_PITCHES 7
+    static pitch_t recent_pitches[NUM_RECENT_PITCHES];
+
+    memmove (recent_pitches, recent_pitches + 1,
+            (NUM_RECENT_PITCHES - 1) * sizeof (pitch_t));
+    recent_pitches[NUM_RECENT_PITCHES - 1] = pitch;
+
+    if (pitches_are_diatonic_scale (recent_pitches, NUM_RECENT_PITCHES))
+       scherzo_set_key (scherzo, recent_pitches[0]);
+
+    /* Do nothing if this note is already pressed. */
+    for (i = 0; i < scherzo->notes_pressed.num_pitches; i++)
+       if (scherzo->notes_pressed.pitches[i] == pitch)
+           return;
+
+    pitch_group_add_pitch (&scherzo->notes_pressed, pitch);
+
+    if (scherzo->pedal_pressed)
+       pitch_group_add_pitch (&scherzo->notes_pedaled, pitch);
+
+    scherzo_update_notes_and_chord (scherzo);
+}
+
 static void
 scherzo_release_note (scherzo_t *scherzo, pitch_t pitch)
 {
     pitch_group_remove_pitch_enharmonic (&scherzo->notes_pressed, pitch);
 
-    if (scherzo->notes_pressed.num_pitches == 0)
-       scherzo_update_notes_and_chord (scherzo);
+    scherzo_update_notes_and_chord (scherzo);
 }
 
-static pitch_t
+static void
 scherzo_press_note_midi (scherzo_t *scherzo, unsigned char midi_note)
 {
-    pitch_t pitch = pitch_from_midi (midi_note);
-
-    scherzo_press_note (scherzo, pitch);
-
-    return pitch;
+    scherzo_press_note (scherzo, pitch_from_midi (midi_note));
 }
 
 static void
@@ -1050,6 +1082,7 @@ scherzo_release_pedal (scherzo_t *scherzo)
     scherzo_update_notes_and_chord (scherzo);
 }
 
+#if 0
 static void
 _select_challenge (scherzo_t *scherzo)
 {
@@ -1158,6 +1191,7 @@ _score_challenge (scherzo_t *scherzo)
 
     _select_challenge (scherzo);
 }
+#endif
 
 static int
 on_midi_input (unused (GIOChannel *channel),
@@ -1168,8 +1202,6 @@ on_midi_input (unused (GIOChannel *channel),
     scherzo_t *scherzo = user_data;
     ssize_t remaining;
     snd_seq_event_t event;
-    pitch_t pitch;
-    int need_redraw = FALSE;
 
     remaining = read (scherzo->midi_fd, buf, MIDI_BUF_SIZE);
 
@@ -1188,14 +1220,10 @@ on_midi_input (unused (GIOChannel *channel),
            /* Incomplete event. Nothing to do. */
            break;
        case SND_SEQ_EVENT_NOTEON:
-           pitch = scherzo_press_note_midi (scherzo, event.data.note.note);
-           _judge_pitch (scherzo, pitch);
-           need_redraw = TRUE;
+           scherzo_press_note_midi (scherzo, event.data.note.note);
            break;
        case SND_SEQ_EVENT_NOTEOFF:
            scherzo_release_note_midi (scherzo, event.data.note.note);
-           _score_challenge (scherzo);
-           need_redraw = TRUE;
            break;
        case SND_SEQ_EVENT_CLOCK:
            /* Ignore for now as my piano sends a constant stream of these. */
@@ -1223,9 +1251,6 @@ on_midi_input (unused (GIOChannel *channel),
        }
     }
 
-    if (need_redraw)
-       gtk_widget_queue_draw (scherzo->window);
-
     /* Return TRUE to continue to get called in the future. */
     return TRUE;
 }
@@ -1262,8 +1287,7 @@ main (int argc, char *argv[])
     scherzo.pedal_pressed = 0;
 
     /* Default to key of C Major, naturally. */
-    scherzo_key_init (&scherzo.key, PITCH_CLASS_LITERAL (C, NATURAL));
-    score_set_key (scherzo.score, scherzo.key.pitch);
+    scherzo_set_key (&scherzo, PITCH_CLASS_LITERAL (C, NATURAL));
 
     mnemon_init (&scherzo.mnemon);
     /* XXX: Should create a default file if one cannot be loaded. */