Changeset 370:925790633b2a in roaraudio for libroardsp/midi.c

Timestamp:

08/03/08 14:49:05 (16 years ago)

Author:

phi

Branch:

default

Phase:

public

Message:

added some BASIC PLAY like functions

File:

• libroardsp/midi.c (modified) (1 diff)

libroardsp/midi.c

@@ -117 +117 @@
 }
 
+
+int roar_midi_play_note  (struct roar_stream * stream, struct roar_note_octave * note, float len) {
+ return -1;
+}
+
+int roar_midi_basic_init (struct roar_midi_basic_state * state) {
+ if (!state)
+  return -1;
+
+ state->len.mul = 1;
+ state->len.div = 60;
+
+ state->note.note   = ROAR_MIDI_NOTE_NONE;
+ state->note.octave = 0;
+
+ return 0;
+}
+
+int roar_midi_basic_play (struct roar_stream * stream, struct roar_midi_basic_state * state, char * notes) {
+ struct roar_midi_basic_state is;
+ char   cn[ROAR_MIDI_MAX_NOTENAME_LEN+1] = {0};
+ int i;
+ int have = 0;
+ struct roar_note_octave * n;
+
+ if ( !notes )
+  return -1;
+
+ if ( state == NULL ) {
+  state = &is;
+  roar_midi_basic_init(state);
+ }
+
+ n = &(state->note);
+
+ for (; *notes != 0; notes++) {
+  if ( *notes == '>' ) {
+   n->octave++;
+  } else if ( *notes == '<' ) {
+   n->octave--;
+  } else if ( *notes != ' ' ) {
+   have++;
+  }
+
+  if (have) {
+   roar_midi_play_note(stream, n, 60 * state->len.mul / state->len.div);
+   have = 0;
+  }
+ }
+
+ return 0;
+}
+
 //ll