-
Notifications
You must be signed in to change notification settings - Fork 2
/
m84_HARMONICS.ino
142 lines (121 loc) · 4.15 KB
/
m84_HARMONICS.ino
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
// --------------------------------------------------------------------------
// This file is part of the NOZORI firmware.
//
// NOZORI firmware is free software: you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation, either version 3 of the License, or
// (at your option) any later version.
//
// NOZORI firmware is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with NOZORI firmware. If not, see <http://www.gnu.org/licenses/>.
// --------------------------------------------------------------------------
// sinus oscillator with a diferents harmonics (additiv synthesys)
// Pot 1 : FQ
// Pot 2 : Mod Fq (or fine if nothing is connected on the modulation)
// Pot 3 : FQ H1 (relative from 0 ~ +1 Oct)
// Pot 4 : GAIN H1
// Pot 5 : FQ H2 (relative from 0 ~ +2 Oct)
// Pot 6 : GAIN H2
// Pot 7 : FQ H3 (relative from 0 ~ +2 Oct)
// Pot 8 : GAIN H3
// IN 1 : 1V/Oct
// IN 2 : MOD FQ
// Selecteur3 : FQ range
// OUT 1 : OUT
// OUT 2 : OUT (without fundamental)
//uint32_t VCO_H1_phase, VCO_H2_phase, VCO_H3_phase;
inline void VCO_Harmo_init_() {
VCO1_phase = 0;
VCO_H1_phase = 0;
VCO_H2_phase = 0;
VCO_H3_phase = 0;
}
inline void VCO_Harmo_loop_() {
int32_t tmpS, macro_tmp;
filter16_nozori_84
test_connect_loop_84();
// Fq principale
macro_fq_in_tlg
macro_1VOct_IN1
macro_FqMod_fine_IN2(pot2);
freq_save = freq;
if (IN1_connect < 60) led2(audio_inL >> 23); else set_led2(0);
if (IN2_connect < 60) led4(audio_inR >> 23); else set_led4(0);
}
inline void VCO_Harmo_audio_() {
uint32_t tmp, tmp2;
int32_t tmpS;
int32_t outS, outS2;
uint32_t out, out2;
int32_t freq;
freq = freq_save;
// Oscillateur principal
macro_fq2increment
VCO1_phase += increment1<<3;
tmpS = fast_sin(VCO1_phase)^0x80000000;
outS = tmpS>>2;
outS2 = 0;
// Harmonique 1
freq = freq_save;
tmpS = min(4086<<4, CV_filter16_out[index_filter_pot3]);
tmpS = (tmpS * 2048)/2043;
freq += tmpS * (48<<2);
freq = _min(0xFA00000, freq); /*20KHz max*/
freq = _max(0, freq);
freq_MSB = freq >> 18; /* keep the 1st 10 bits */
freq_LSB = freq & 0x3FFFF; /* other 18 bits */
increment1 = table_CV2increment[freq_MSB];
increment2 = table_CV2increment[freq_MSB+1];
increment2 -= increment1;
increment1 += ((increment2>>8)*(freq_LSB>>2))>>8;
VCO_H1_phase += increment1<<3;
tmpS = fast_sin(VCO_H1_phase)^0x80000000;
tmpS >>= 17;
tmpS *= CV_filter16_out[index_filter_pot4];
outS2 += tmpS>>1;
// Harmonique 2
freq = freq_save;
tmpS = min(4086<<4, CV_filter16_out[index_filter_pot5]);
tmpS = (tmpS * 2048)/2043;
freq += tmpS *(48<<3);
freq = _min(0xFA00000, freq); /*20KHz max*/
freq = _max(0, freq);
freq_MSB = freq >> 18; /* keep the 1st 10 bits */
freq_LSB = freq & 0x3FFFF; /* other 18 bits */
increment1 = table_CV2increment[freq_MSB];
increment2 = table_CV2increment[freq_MSB+1];
increment2 -= increment1;
increment1 += ((increment2>>8)*(freq_LSB>>2))>>8;
VCO_H2_phase += increment1<<3;
tmpS = fast_sin(VCO_H2_phase)^0x80000000;
tmpS >>= 17;
tmpS *= CV_filter16_out[index_filter_pot6];
outS2 += tmpS>>1;
// Harmonique 3
freq = freq_save;
tmpS = min(4086<<4, CV_filter16_out[index_filter_pot7]);
tmpS = (tmpS * 2048)/2043;
freq += tmpS *(48<<3);
freq = _min(0xFA00000, freq); /*20KHz max*/
freq = _max(0, freq);
freq_MSB = freq >> 18; /* keep the 1st 10 bits */
freq_LSB = freq & 0x3FFFF; /* other 18 bits */
increment1 = table_CV2increment[freq_MSB];
increment2 = table_CV2increment[freq_MSB+1];
increment2 -= increment1;
increment1 += ((increment2>>8)*(freq_LSB>>2))>>8;
VCO_H3_phase += increment1<<3;
tmpS = fast_sin(VCO_H3_phase)^0x80000000;
tmpS >>= 17;
tmpS *= CV_filter16_out[index_filter_pot8];
outS2 += tmpS>>1;
outS += outS2;
out = outS ^0x80000000;
out2 = outS2 ^0x80000000;
macro_out_stereo
}