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;
446 ISR(TIMER1_COMPA_vect)
448 #if defined(B5_AUDIO) && !defined(C6_AUDIO)
453 if (polyphony_rate > 0) {
455 voice_place %= voices;
456 if (place++ > (frequencies[voice_place] / polyphony_rate / CPU_PRESCALER)) {
457 voice_place = (voice_place + 1) % voices;
462 #ifdef VIBRATO_ENABLE
463 if (vibrato_strength > 0) {
464 freq = vibrato(frequencies[voice_place]);
466 freq = frequencies[voice_place];
469 freq = frequencies[voice_place];
473 if (frequency != 0 && frequency < frequencies[voices - 1] && frequency < frequencies[voices - 1] * pow(2, -440/frequencies[voices - 1]/12/2)) {
474 frequency = frequency * pow(2, 440/frequency/12/2);
475 } else if (frequency != 0 && frequency > frequencies[voices - 1] && frequency > frequencies[voices - 1] * pow(2, 440/frequencies[voices - 1]/12/2)) {
476 frequency = frequency * pow(2, -440/frequency/12/2);
478 frequency = frequencies[voices - 1];
481 frequency = frequencies[voices - 1];
484 #ifdef VIBRATO_ENABLE
485 if (vibrato_strength > 0) {
486 freq = vibrato(frequency);
495 if (envelope_index < 65535) {
499 freq = voice_envelope(freq);
501 if (freq < 30.517578125) {
505 TIMER_1_PERIOD = (uint16_t)(((float)F_CPU) / (freq * CPU_PRESCALER));
506 TIMER_1_DUTY_CYCLE = (uint16_t)((((float)F_CPU) / (freq * CPU_PRESCALER)) * note_timbre);
511 if (note_frequency > 0) {
512 #ifdef VIBRATO_ENABLE
513 if (vibrato_strength > 0) {
514 freq = vibrato(note_frequency);
516 freq = note_frequency;
519 freq = note_frequency;
522 if (envelope_index < 65535) {
525 freq = voice_envelope(freq);
527 TIMER_1_PERIOD = (uint16_t)(((float)F_CPU) / (freq * CPU_PRESCALER));
528 TIMER_1_DUTY_CYCLE = (uint16_t)((((float)F_CPU) / (freq * CPU_PRESCALER)) * note_timbre);
531 TIMER_1_DUTY_CYCLE = 0;
535 bool end_of_note = false;
536 if (TIMER_1_PERIOD > 0) {
537 end_of_note = (note_position >= (note_length / TIMER_1_PERIOD * 0xFFFF));
539 end_of_note = (note_position >= (note_length * 0x7FF));
544 if (current_note >= notes_count) {
548 DISABLE_AUDIO_COUNTER_1_ISR;
549 DISABLE_AUDIO_COUNTER_1_OUTPUT;
550 playing_notes = false;
554 if (!note_resting && (notes_rest > 0)) {
557 note_length = notes_rest;
560 note_resting = false;
562 note_frequency = (*notes_pointer)[current_note][0];
563 note_length = ((*notes_pointer)[current_note][1] / 4) * (((float)note_tempo) / 100);
570 if (!audio_config.enable) {
571 playing_notes = false;
572 playing_note = false;
578 void play_note(float freq, int vol) {
580 dprintf("audio play note freq=%d vol=%d", (int)freq, vol);
582 if (!audio_initialized) {
586 if (audio_config.enable && voices < 8) {
588 DISABLE_AUDIO_COUNTER_3_ISR;
591 DISABLE_AUDIO_COUNTER_1_ISR;
594 // Cancel notes if notes are playing
603 frequencies[voices] = freq;
604 volumes[voices] = vol;
609 ENABLE_AUDIO_COUNTER_3_ISR;
610 ENABLE_AUDIO_COUNTER_3_OUTPUT;
615 ENABLE_AUDIO_COUNTER_1_ISR;
616 ENABLE_AUDIO_COUNTER_1_OUTPUT;
619 ENABLE_AUDIO_COUNTER_1_ISR;
620 ENABLE_AUDIO_COUNTER_1_OUTPUT;
627 void play_notes(float (*np)[][2], uint16_t n_count, bool n_repeat, float n_rest)
630 if (!audio_initialized) {
634 if (audio_config.enable) {
637 DISABLE_AUDIO_COUNTER_3_ISR;
640 DISABLE_AUDIO_COUNTER_1_ISR;
643 // Cancel note if a note is playing
647 playing_notes = true;
650 notes_count = n_count;
651 notes_repeat = n_repeat;
657 note_frequency = (*notes_pointer)[current_note][0];
658 note_length = ((*notes_pointer)[current_note][1] / 4) * (((float)note_tempo) / 100);
663 ENABLE_AUDIO_COUNTER_3_ISR;
664 ENABLE_AUDIO_COUNTER_3_OUTPUT;
668 ENABLE_AUDIO_COUNTER_1_ISR;
669 ENABLE_AUDIO_COUNTER_1_OUTPUT;
676 bool is_playing_notes(void) {
677 return playing_notes;
680 bool is_audio_on(void) {
681 return (audio_config.enable != 0);
684 void audio_toggle(void) {
685 audio_config.enable ^= 1;
686 eeconfig_update_audio(audio_config.raw);
687 if (audio_config.enable)
691 void audio_on(void) {
692 audio_config.enable = 1;
693 eeconfig_update_audio(audio_config.raw);
697 void audio_off(void) {
698 audio_config.enable = 0;
699 eeconfig_update_audio(audio_config.raw);
702 #ifdef VIBRATO_ENABLE
704 // Vibrato rate functions
706 void set_vibrato_rate(float rate) {
710 void increase_vibrato_rate(float change) {
711 vibrato_rate *= change;
714 void decrease_vibrato_rate(float change) {
715 vibrato_rate /= change;
718 #ifdef VIBRATO_STRENGTH_ENABLE
720 void set_vibrato_strength(float strength) {
721 vibrato_strength = strength;
724 void increase_vibrato_strength(float change) {
725 vibrato_strength *= change;
728 void decrease_vibrato_strength(float change) {
729 vibrato_strength /= change;
732 #endif /* VIBRATO_STRENGTH_ENABLE */
734 #endif /* VIBRATO_ENABLE */
736 // Polyphony functions
738 void set_polyphony_rate(float rate) {
739 polyphony_rate = rate;
742 void enable_polyphony() {
746 void disable_polyphony() {
750 void increase_polyphony_rate(float change) {
751 polyphony_rate *= change;
754 void decrease_polyphony_rate(float change) {
755 polyphony_rate /= change;
760 void set_timbre(float timbre) {
761 note_timbre = timbre;
766 void set_tempo(uint8_t tempo) {
770 void decrease_tempo(uint8_t tempo_change) {
771 note_tempo += tempo_change;
774 void increase_tempo(uint8_t tempo_change) {
775 if (note_tempo - tempo_change < 10) {
778 note_tempo -= tempo_change;