1 /* Copyright 2016 Jack Humbert
3 * This program is free software: you can redistribute it and/or modify
4 * it under the terms of the GNU General Public License as published by
5 * the Free Software Foundation, either version 2 of the License, or
6 * (at your option) any later version.
8 * This program is distributed in the hope that it will be useful,
9 * but WITHOUT ANY WARRANTY; without even the implied warranty of
10 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
11 * GNU General Public License for more details.
13 * You should have received a copy of the GNU General Public License
14 * along with this program. If not, see <http://www.gnu.org/licenses/>.
19 #include <avr/pgmspace.h>
20 #include <avr/interrupt.h>
28 #define CPU_PRESCALER 8
30 // -----------------------------------------------------------------------------
32 // -----------------------------------------------------------------------------
34 // TIMSK3 - Timer/Counter #3 Interrupt Mask Register
35 // Turn on/off 3A interputs, stopping/enabling the ISR calls
37 #define ENABLE_AUDIO_COUNTER_3_ISR TIMSK3 |= _BV(OCIE3A)
38 #define DISABLE_AUDIO_COUNTER_3_ISR TIMSK3 &= ~_BV(OCIE3A)
42 #define ENABLE_AUDIO_COUNTER_1_ISR TIMSK1 |= _BV(OCIE1A)
43 #define DISABLE_AUDIO_COUNTER_1_ISR TIMSK1 &= ~_BV(OCIE1A)
46 // TCCR3A: Timer/Counter #3 Control Register
47 // Compare Output Mode (COM3An) = 0b00 = Normal port operation, OC3A disconnected from PC6
50 #define ENABLE_AUDIO_COUNTER_3_OUTPUT TCCR3A |= _BV(COM3A1);
51 #define DISABLE_AUDIO_COUNTER_3_OUTPUT TCCR3A &= ~(_BV(COM3A1) | _BV(COM3A0));
55 #define ENABLE_AUDIO_COUNTER_1_OUTPUT TCCR1A |= _BV(COM1A1);
56 #define DISABLE_AUDIO_COUNTER_1_OUTPUT TCCR1A &= ~(_BV(COM1A1) | _BV(COM1A0));
59 // Fast PWM Mode Controls
62 #define TIMER_3_PERIOD ICR3
63 #define TIMER_3_DUTY_CYCLE OCR3A
67 #define TIMER_1_PERIOD ICR1
68 #define TIMER_1_DUTY_CYCLE OCR1A
72 // -----------------------------------------------------------------------------
78 float frequency_alt = 0;
82 float frequencies[8] = {0, 0, 0, 0, 0, 0, 0, 0};
83 int volumes[8] = {0, 0, 0, 0, 0, 0, 0, 0};
89 uint16_t sample_length = 0;
91 bool playing_notes = false;
92 bool playing_note = false;
93 float note_frequency = 0;
94 float note_length = 0;
95 uint8_t note_tempo = TEMPO_DEFAULT;
96 float note_timbre = TIMBRE_DEFAULT;
97 uint16_t note_position = 0;
98 float (* notes_pointer)[][2];
102 bool note_resting = false;
104 uint8_t current_note = 0;
105 uint8_t rest_counter = 0;
107 #ifdef VIBRATO_ENABLE
108 float vibrato_counter = 0;
109 float vibrato_strength = .5;
110 float vibrato_rate = 0.125;
113 float polyphony_rate = 0;
115 static bool audio_initialized = false;
117 audio_config_t audio_config;
119 uint16_t envelope_index = 0;
120 bool glissando = true;
126 if (!eeconfig_is_enabled())
130 audio_config.raw = eeconfig_read_audio();
132 // Set port PC6 (OC3A and /OC4A) as output
138 PORTC &= ~_BV(PORTC6);
145 PORTB &= ~_BV(PORTB5);
149 DISABLE_AUDIO_COUNTER_3_ISR;
153 DISABLE_AUDIO_COUNTER_1_ISR;
156 // TCCR3A / TCCR3B: Timer/Counter #3 Control Registers
157 // Compare Output Mode (COM3An) = 0b00 = Normal port operation, OC3A disconnected from PC6
158 // Waveform Generation Mode (WGM3n) = 0b1110 = Fast PWM Mode 14 (Period = ICR3, Duty Cycle = OCR3A)
159 // Clock Select (CS3n) = 0b010 = Clock / 8
162 TCCR3A = (0 << COM3A1) | (0 << COM3A0) | (1 << WGM31) | (0 << WGM30);
163 TCCR3B = (1 << WGM33) | (1 << WGM32) | (0 << CS32) | (1 << CS31) | (0 << CS30);
167 TCCR1A = (0 << COM1A1) | (0 << COM1A0) | (1 << WGM11) | (0 << WGM10);
168 TCCR1B = (1 << WGM13) | (1 << WGM12) | (0 << CS12) | (1 << CS11) | (0 << CS10);
171 audio_initialized = true;
174 void stop_all_notes()
176 dprintf("audio stop all notes");
178 if (!audio_initialized) {
185 DISABLE_AUDIO_COUNTER_3_ISR;
186 DISABLE_AUDIO_COUNTER_3_OUTPUT;
190 DISABLE_AUDIO_COUNTER_1_ISR;
191 DISABLE_AUDIO_COUNTER_1_OUTPUT;
194 playing_notes = false;
195 playing_note = false;
200 for (uint8_t i = 0; i < 8; i++)
207 void stop_note(float freq)
209 dprintf("audio stop note freq=%d", (int)freq);
212 if (!audio_initialized) {
215 for (int i = 7; i >= 0; i--) {
216 if (frequencies[i] == freq) {
219 for (int j = i; (j < 7); j++) {
220 frequencies[j] = frequencies[j+1];
221 frequencies[j+1] = 0;
222 volumes[j] = volumes[j+1];
231 if (voice_place >= voices) {
236 DISABLE_AUDIO_COUNTER_3_ISR;
237 DISABLE_AUDIO_COUNTER_3_OUTPUT;
240 DISABLE_AUDIO_COUNTER_1_ISR;
241 DISABLE_AUDIO_COUNTER_1_OUTPUT;
246 playing_note = false;
251 #ifdef VIBRATO_ENABLE
253 float mod(float a, int b)
255 float r = fmod(a, b);
256 return r < 0 ? r + b : r;
259 float vibrato(float average_freq) {
260 #ifdef VIBRATO_STRENGTH_ENABLE
261 float vibrated_freq = average_freq * pow(vibrato_lut[(int)vibrato_counter], vibrato_strength);
263 float vibrated_freq = average_freq * vibrato_lut[(int)vibrato_counter];
265 vibrato_counter = mod((vibrato_counter + vibrato_rate * (1.0 + 440.0/average_freq)), VIBRATO_LUT_LENGTH);
266 return vibrated_freq;
272 ISR(TIMER3_COMPA_vect)
282 if (polyphony_rate == 0) {
284 if (frequency_alt != 0 && frequency_alt < frequencies[voices - 2] && frequency_alt < frequencies[voices - 2] * pow(2, -440/frequencies[voices - 2]/12/2)) {
285 frequency_alt = frequency_alt * pow(2, 440/frequency_alt/12/2);
286 } else if (frequency_alt != 0 && frequency_alt > frequencies[voices - 2] && frequency_alt > frequencies[voices - 2] * pow(2, 440/frequencies[voices - 2]/12/2)) {
287 frequency_alt = frequency_alt * pow(2, -440/frequency_alt/12/2);
289 frequency_alt = frequencies[voices - 2];
292 frequency_alt = frequencies[voices - 2];
295 #ifdef VIBRATO_ENABLE
296 if (vibrato_strength > 0) {
297 freq_alt = vibrato(frequency_alt);
299 freq_alt = frequency_alt;
302 freq_alt = frequency_alt;
306 if (envelope_index < 65535) {
310 freq_alt = voice_envelope(freq_alt);
312 if (freq_alt < 30.517578125) {
316 TIMER_1_PERIOD = (uint16_t)(((float)F_CPU) / (freq_alt * CPU_PRESCALER));
317 TIMER_1_DUTY_CYCLE = (uint16_t)((((float)F_CPU) / (freq_alt * CPU_PRESCALER)) * note_timbre);
321 if (polyphony_rate > 0) {
323 voice_place %= voices;
324 if (place++ > (frequencies[voice_place] / polyphony_rate / CPU_PRESCALER)) {
325 voice_place = (voice_place + 1) % voices;
330 #ifdef VIBRATO_ENABLE
331 if (vibrato_strength > 0) {
332 freq = vibrato(frequencies[voice_place]);
334 freq = frequencies[voice_place];
337 freq = frequencies[voice_place];
341 if (frequency != 0 && frequency < frequencies[voices - 1] && frequency < frequencies[voices - 1] * pow(2, -440/frequencies[voices - 1]/12/2)) {
342 frequency = frequency * pow(2, 440/frequency/12/2);
343 } else if (frequency != 0 && frequency > frequencies[voices - 1] && frequency > frequencies[voices - 1] * pow(2, 440/frequencies[voices - 1]/12/2)) {
344 frequency = frequency * pow(2, -440/frequency/12/2);
346 frequency = frequencies[voices - 1];
349 frequency = frequencies[voices - 1];
352 #ifdef VIBRATO_ENABLE
353 if (vibrato_strength > 0) {
354 freq = vibrato(frequency);
363 if (envelope_index < 65535) {
367 freq = voice_envelope(freq);
369 if (freq < 30.517578125) {
373 TIMER_3_PERIOD = (uint16_t)(((float)F_CPU) / (freq * CPU_PRESCALER));
374 TIMER_3_DUTY_CYCLE = (uint16_t)((((float)F_CPU) / (freq * CPU_PRESCALER)) * note_timbre);
379 if (note_frequency > 0) {
380 #ifdef VIBRATO_ENABLE
381 if (vibrato_strength > 0) {
382 freq = vibrato(note_frequency);
384 freq = note_frequency;
387 freq = note_frequency;
390 if (envelope_index < 65535) {
393 freq = voice_envelope(freq);
395 TIMER_3_PERIOD = (uint16_t)(((float)F_CPU) / (freq * CPU_PRESCALER));
396 TIMER_3_DUTY_CYCLE = (uint16_t)((((float)F_CPU) / (freq * CPU_PRESCALER)) * note_timbre);
399 TIMER_3_DUTY_CYCLE = 0;
403 bool end_of_note = false;
404 if (TIMER_3_PERIOD > 0) {
405 end_of_note = (note_position >= (note_length / TIMER_3_PERIOD * 0xFFFF));
407 end_of_note = (note_position >= (note_length * 0x7FF));
412 if (current_note >= notes_count) {
416 DISABLE_AUDIO_COUNTER_3_ISR;
417 DISABLE_AUDIO_COUNTER_3_OUTPUT;
418 playing_notes = false;
422 if (!note_resting && (notes_rest > 0)) {
425 note_length = notes_rest;
428 note_resting = false;
430 note_frequency = (*notes_pointer)[current_note][0];
431 note_length = ((*notes_pointer)[current_note][1] / 4) * (((float)note_tempo) / 100);
438 if (!audio_config.enable) {
439 playing_notes = false;
440 playing_note = false;
445 ISR(TIMER1_COMPA_vect)
447 #if defined(B5_AUDIO) && !defined(C6_AUDIO)
452 if (polyphony_rate > 0) {
454 voice_place %= voices;
455 if (place++ > (frequencies[voice_place] / polyphony_rate / CPU_PRESCALER)) {
456 voice_place = (voice_place + 1) % voices;
461 #ifdef VIBRATO_ENABLE
462 if (vibrato_strength > 0) {
463 freq = vibrato(frequencies[voice_place]);
465 freq = frequencies[voice_place];
468 freq = frequencies[voice_place];
472 if (frequency != 0 && frequency < frequencies[voices - 1] && frequency < frequencies[voices - 1] * pow(2, -440/frequencies[voices - 1]/12/2)) {
473 frequency = frequency * pow(2, 440/frequency/12/2);
474 } else if (frequency != 0 && frequency > frequencies[voices - 1] && frequency > frequencies[voices - 1] * pow(2, 440/frequencies[voices - 1]/12/2)) {
475 frequency = frequency * pow(2, -440/frequency/12/2);
477 frequency = frequencies[voices - 1];
480 frequency = frequencies[voices - 1];
483 #ifdef VIBRATO_ENABLE
484 if (vibrato_strength > 0) {
485 freq = vibrato(frequency);
494 if (envelope_index < 65535) {
498 freq = voice_envelope(freq);
500 if (freq < 30.517578125) {
504 TIMER_1_PERIOD = (uint16_t)(((float)F_CPU) / (freq * CPU_PRESCALER));
505 TIMER_1_DUTY_CYCLE = (uint16_t)((((float)F_CPU) / (freq * CPU_PRESCALER)) * note_timbre);
510 if (note_frequency > 0) {
511 #ifdef VIBRATO_ENABLE
512 if (vibrato_strength > 0) {
513 freq = vibrato(note_frequency);
515 freq = note_frequency;
518 freq = note_frequency;
521 if (envelope_index < 65535) {
524 freq = voice_envelope(freq);
526 TIMER_1_PERIOD = (uint16_t)(((float)F_CPU) / (freq * CPU_PRESCALER));
527 TIMER_1_DUTY_CYCLE = (uint16_t)((((float)F_CPU) / (freq * CPU_PRESCALER)) * note_timbre);
530 TIMER_1_DUTY_CYCLE = 0;
534 bool end_of_note = false;
535 if (TIMER_1_PERIOD > 0) {
536 end_of_note = (note_position >= (note_length / TIMER_1_PERIOD * 0xFFFF));
538 end_of_note = (note_position >= (note_length * 0x7FF));
543 if (current_note >= notes_count) {
547 DISABLE_AUDIO_COUNTER_1_ISR;
548 DISABLE_AUDIO_COUNTER_1_OUTPUT;
549 playing_notes = false;
553 if (!note_resting && (notes_rest > 0)) {
556 note_length = notes_rest;
559 note_resting = false;
561 note_frequency = (*notes_pointer)[current_note][0];
562 note_length = ((*notes_pointer)[current_note][1] / 4) * (((float)note_tempo) / 100);
569 if (!audio_config.enable) {
570 playing_notes = false;
571 playing_note = false;
576 void play_note(float freq, int vol) {
578 dprintf("audio play note freq=%d vol=%d", (int)freq, vol);
580 if (!audio_initialized) {
584 if (audio_config.enable && voices < 8) {
586 DISABLE_AUDIO_COUNTER_3_ISR;
589 DISABLE_AUDIO_COUNTER_1_ISR;
592 // Cancel notes if notes are playing
601 frequencies[voices] = freq;
602 volumes[voices] = vol;
607 ENABLE_AUDIO_COUNTER_3_ISR;
608 ENABLE_AUDIO_COUNTER_3_OUTPUT;
613 ENABLE_AUDIO_COUNTER_1_ISR;
614 ENABLE_AUDIO_COUNTER_1_OUTPUT;
617 ENABLE_AUDIO_COUNTER_1_ISR;
618 ENABLE_AUDIO_COUNTER_1_OUTPUT;
625 void play_notes(float (*np)[][2], uint16_t n_count, bool n_repeat, float n_rest)
628 if (!audio_initialized) {
632 if (audio_config.enable) {
635 DISABLE_AUDIO_COUNTER_3_ISR;
638 DISABLE_AUDIO_COUNTER_1_ISR;
641 // Cancel note if a note is playing
645 playing_notes = true;
648 notes_count = n_count;
649 notes_repeat = n_repeat;
655 note_frequency = (*notes_pointer)[current_note][0];
656 note_length = ((*notes_pointer)[current_note][1] / 4) * (((float)note_tempo) / 100);
661 ENABLE_AUDIO_COUNTER_3_ISR;
662 ENABLE_AUDIO_COUNTER_3_OUTPUT;
666 ENABLE_AUDIO_COUNTER_1_ISR;
667 ENABLE_AUDIO_COUNTER_1_OUTPUT;
674 bool is_playing_notes(void) {
675 return playing_notes;
678 bool is_audio_on(void) {
679 return (audio_config.enable != 0);
682 void audio_toggle(void) {
683 audio_config.enable ^= 1;
684 eeconfig_update_audio(audio_config.raw);
685 if (audio_config.enable)
689 void audio_on(void) {
690 audio_config.enable = 1;
691 eeconfig_update_audio(audio_config.raw);
695 void audio_off(void) {
696 audio_config.enable = 0;
697 eeconfig_update_audio(audio_config.raw);
700 #ifdef VIBRATO_ENABLE
702 // Vibrato rate functions
704 void set_vibrato_rate(float rate) {
708 void increase_vibrato_rate(float change) {
709 vibrato_rate *= change;
712 void decrease_vibrato_rate(float change) {
713 vibrato_rate /= change;
716 #ifdef VIBRATO_STRENGTH_ENABLE
718 void set_vibrato_strength(float strength) {
719 vibrato_strength = strength;
722 void increase_vibrato_strength(float change) {
723 vibrato_strength *= change;
726 void decrease_vibrato_strength(float change) {
727 vibrato_strength /= change;
730 #endif /* VIBRATO_STRENGTH_ENABLE */
732 #endif /* VIBRATO_ENABLE */
734 // Polyphony functions
736 void set_polyphony_rate(float rate) {
737 polyphony_rate = rate;
740 void enable_polyphony() {
744 void disable_polyphony() {
748 void increase_polyphony_rate(float change) {
749 polyphony_rate *= change;
752 void decrease_polyphony_rate(float change) {
753 polyphony_rate /= change;
758 void set_timbre(float timbre) {
759 note_timbre = timbre;
764 void set_tempo(uint8_t tempo) {
768 void decrease_tempo(uint8_t tempo_change) {
769 note_tempo += tempo_change;
772 void increase_tempo(uint8_t tempo_change) {
773 if (note_tempo - tempo_change < 10) {
776 note_tempo -= tempo_change;