Ura

Dependencies:   CMSIS_DSP_401 mbed

Committer:
Sergeev
Date:
Tue Nov 25 17:04:32 2014 +0000
Revision:
7:a4cff60f035b
Parent:
6:0de27f5ec409
Child:
8:027ed43684af
? ???

Who changed what in which revision?

UserRevisionLine numberNew contents of line
Sergeev 0:b712470aea1d 1 #include "mbed.h"
Sergeev 1:9b1df0b2507d 2 #include <ctype.h>
Sergeev 0:b712470aea1d 3 #include "arm_math.h"
Sergeev 1:9b1df0b2507d 4 #include "arm_const_structs.h"
Sergeev 7:a4cff60f035b 5 #include "stm32f4xx_hal.h"
Sergeev 7:a4cff60f035b 6 #include <stdio.h>
Sergeev 7:a4cff60f035b 7
Sergeev 7:a4cff60f035b 8
Sergeev 7:a4cff60f035b 9 /* SPI handler declaration */
Sergeev 7:a4cff60f035b 10 SPI_HandleTypeDef SpiHandle;
Sergeev 7:a4cff60f035b 11
Sergeev 1:9b1df0b2507d 12
Sergeev 1:9b1df0b2507d 13 void arm_cfft_f32(
Sergeev 1:9b1df0b2507d 14 const arm_cfft_instance_f32 * S,
Sergeev 1:9b1df0b2507d 15 float32_t * p1,
Sergeev 1:9b1df0b2507d 16 uint8_t ifftFlag,
Sergeev 1:9b1df0b2507d 17 uint8_t bitReverseFlag);
Sergeev 0:b712470aea1d 18
Sergeev 5:173ae8477ae1 19 Serial pc(USBTX, USBRX);//:D ПРИВЕТ!!!!
Sergeev 1:9b1df0b2507d 20
Sergeev 1:9b1df0b2507d 21 AnalogIn left(A2);
Sergeev 1:9b1df0b2507d 22 AnalogIn right(A3);
Sergeev 5:173ae8477ae1 23 AnalogIn center(A3);
Sergeev 7:a4cff60f035b 24
Sergeev 7:a4cff60f035b 25 int flag = 0;
Sergeev 1:9b1df0b2507d 26
Sergeev 1:9b1df0b2507d 27 int SAMPLE_RATE_HZ = 40000; // Sample rate of the audio in hertz.
Sergeev 6:0de27f5ec409 28 const int FFT_SIZE = 16; // Size of the FFT.
Sergeev 1:9b1df0b2507d 29
Sergeev 6:0de27f5ec409 30 const static arm_cfft_instance_f32 *S1;
Sergeev 6:0de27f5ec409 31 const static arm_cfft_instance_f32 *S2;
Sergeev 6:0de27f5ec409 32 const static arm_cfft_instance_f32 *S3;
Sergeev 3:1f56b8f439a1 33 //static arm_cfft_radix2_instance_f32 *S;
Sergeev 1:9b1df0b2507d 34 Ticker samplingTimer;
Sergeev 1:9b1df0b2507d 35 float samples[FFT_SIZE*2];
Sergeev 5:173ae8477ae1 36 float samples2[FFT_SIZE*2];
Sergeev 5:173ae8477ae1 37 float samples3[FFT_SIZE*2];
Sergeev 5:173ae8477ae1 38
Sergeev 1:9b1df0b2507d 39 float magnitudes[FFT_SIZE];
Sergeev 5:173ae8477ae1 40 float magnitudes2[FFT_SIZE];
Sergeev 5:173ae8477ae1 41 float magnitudes3[FFT_SIZE];
Sergeev 1:9b1df0b2507d 42 int sampleCounter = 0;
Sergeev 5:173ae8477ae1 43
Sergeev 1:9b1df0b2507d 44
Sergeev 1:9b1df0b2507d 45 void samplingCallback()
Sergeev 3:1f56b8f439a1 46 {
Sergeev 1:9b1df0b2507d 47 // Read from the ADC and store the sample data
Sergeev 3:1f56b8f439a1 48 samples[sampleCounter] = 1000*left.read();
Sergeev 5:173ae8477ae1 49 samples2[sampleCounter] = 1000*left.read();
Sergeev 5:173ae8477ae1 50 samples3[sampleCounter] = 1000*left.read();
Sergeev 1:9b1df0b2507d 51 // Complex FFT functions require a coefficient for the imaginary part of the input.
Sergeev 1:9b1df0b2507d 52 // Since we only have real data, set this coefficient to zero.
Sergeev 1:9b1df0b2507d 53 samples[sampleCounter+1] = 0.0;
Sergeev 5:173ae8477ae1 54 samples2[sampleCounter+1] = 0.0;
Sergeev 5:173ae8477ae1 55 samples3[sampleCounter+1] = 0.0;
Sergeev 1:9b1df0b2507d 56 // Update sample buffer position and stop after the buffer is filled
Sergeev 3:1f56b8f439a1 57
Sergeev 1:9b1df0b2507d 58 sampleCounter += 2;
Sergeev 2:707eb5bc5dfc 59
Sergeev 1:9b1df0b2507d 60 if (sampleCounter >= FFT_SIZE*2) {
Sergeev 1:9b1df0b2507d 61 samplingTimer.detach();
Sergeev 1:9b1df0b2507d 62 }
Sergeev 1:9b1df0b2507d 63 }
Sergeev 1:9b1df0b2507d 64
Sergeev 1:9b1df0b2507d 65 void samplingBegin()
Sergeev 1:9b1df0b2507d 66 {
Sergeev 1:9b1df0b2507d 67 // Reset sample buffer position and start callback at necessary rate.
Sergeev 1:9b1df0b2507d 68 sampleCounter = 0;
Sergeev 3:1f56b8f439a1 69 samplingTimer.attach_us(&samplingCallback, (float)(1000000/SAMPLE_RATE_HZ));
Sergeev 1:9b1df0b2507d 70 }
Sergeev 1:9b1df0b2507d 71
Sergeev 1:9b1df0b2507d 72 bool samplingIsDone()
Sergeev 1:9b1df0b2507d 73 {
Sergeev 1:9b1df0b2507d 74 return sampleCounter >= FFT_SIZE*2;
Sergeev 0:b712470aea1d 75 }
Sergeev 1:9b1df0b2507d 76
Sergeev 1:9b1df0b2507d 77 int main()
Sergeev 0:b712470aea1d 78 {
Sergeev 7:a4cff60f035b 79
Sergeev 7:a4cff60f035b 80 static uint32_t cnt1=0;
Sergeev 7:a4cff60f035b 81
Sergeev 1:9b1df0b2507d 82 // Init arm_ccft_32
Sergeev 1:9b1df0b2507d 83 switch (FFT_SIZE)
Sergeev 1:9b1df0b2507d 84 {
Sergeev 1:9b1df0b2507d 85 case 16:
Sergeev 6:0de27f5ec409 86 S1 = & arm_cfft_sR_f32_len16;
Sergeev 6:0de27f5ec409 87 S2 = & arm_cfft_sR_f32_len16;
Sergeev 6:0de27f5ec409 88 S3 = & arm_cfft_sR_f32_len16;
Sergeev 1:9b1df0b2507d 89 break;
Sergeev 1:9b1df0b2507d 90 case 32:
Sergeev 6:0de27f5ec409 91 S1 = & arm_cfft_sR_f32_len32;
Sergeev 6:0de27f5ec409 92 S2 = & arm_cfft_sR_f32_len32;
Sergeev 6:0de27f5ec409 93 S3 = & arm_cfft_sR_f32_len32;
Sergeev 1:9b1df0b2507d 94 break;
Sergeev 1:9b1df0b2507d 95 case 64:
Sergeev 6:0de27f5ec409 96 S1 = & arm_cfft_sR_f32_len64;
Sergeev 6:0de27f5ec409 97 S2 = & arm_cfft_sR_f32_len64;
Sergeev 6:0de27f5ec409 98 S3 = & arm_cfft_sR_f32_len64;
Sergeev 1:9b1df0b2507d 99 break;
Sergeev 1:9b1df0b2507d 100 case 128:
Sergeev 6:0de27f5ec409 101 S1 = & arm_cfft_sR_f32_len128;
Sergeev 6:0de27f5ec409 102 S2 = & arm_cfft_sR_f32_len128;
Sergeev 6:0de27f5ec409 103 S3 = & arm_cfft_sR_f32_len128;
Sergeev 1:9b1df0b2507d 104 break;
Sergeev 1:9b1df0b2507d 105 case 256:
Sergeev 6:0de27f5ec409 106 S1 = & arm_cfft_sR_f32_len256;
Sergeev 6:0de27f5ec409 107 S2 = & arm_cfft_sR_f32_len256;
Sergeev 6:0de27f5ec409 108 S3 = & arm_cfft_sR_f32_len256;
Sergeev 1:9b1df0b2507d 109 break;
Sergeev 1:9b1df0b2507d 110 case 512:
Sergeev 6:0de27f5ec409 111 S1 = & arm_cfft_sR_f32_len512;
Sergeev 6:0de27f5ec409 112 S2 = & arm_cfft_sR_f32_len512;
Sergeev 6:0de27f5ec409 113 S3 = & arm_cfft_sR_f32_len512;
Sergeev 1:9b1df0b2507d 114 break;
Sergeev 1:9b1df0b2507d 115 case 1024:
Sergeev 6:0de27f5ec409 116 S1 = & arm_cfft_sR_f32_len1024;
Sergeev 6:0de27f5ec409 117 S2 = & arm_cfft_sR_f32_len1024;
Sergeev 6:0de27f5ec409 118 S3 = & arm_cfft_sR_f32_len1024;
Sergeev 1:9b1df0b2507d 119 break;
Sergeev 1:9b1df0b2507d 120 case 2048:
Sergeev 6:0de27f5ec409 121 S1 = & arm_cfft_sR_f32_len2048;
Sergeev 6:0de27f5ec409 122 S2 = & arm_cfft_sR_f32_len2048;
Sergeev 6:0de27f5ec409 123 S3 = & arm_cfft_sR_f32_len2048;
Sergeev 1:9b1df0b2507d 124 break;
Sergeev 1:9b1df0b2507d 125 case 4096:
Sergeev 6:0de27f5ec409 126 S1 = & arm_cfft_sR_f32_len4096;
Sergeev 6:0de27f5ec409 127 S2 = & arm_cfft_sR_f32_len4096;
Sergeev 6:0de27f5ec409 128 S3 = & arm_cfft_sR_f32_len4096;
Sergeev 1:9b1df0b2507d 129 break;
Sergeev 1:9b1df0b2507d 130 }
Sergeev 1:9b1df0b2507d 131 float maxValue = 0.0f;
Sergeev 5:173ae8477ae1 132 float maxValue2 = 0.0f;
Sergeev 5:173ae8477ae1 133 float maxValue3 = 0.0f;
Sergeev 5:173ae8477ae1 134
Sergeev 1:9b1df0b2507d 135 unsigned int testIndex = 0;
Sergeev 5:173ae8477ae1 136 unsigned int testIndex2 = 0;
Sergeev 5:173ae8477ae1 137 unsigned int testIndex3 = 0;
Sergeev 1:9b1df0b2507d 138
Sergeev 1:9b1df0b2507d 139 // Begin sampling audio
Sergeev 1:9b1df0b2507d 140 samplingBegin();
Sergeev 1:9b1df0b2507d 141
Sergeev 1:9b1df0b2507d 142 while(1)
Sergeev 7:a4cff60f035b 143
Sergeev 7:a4cff60f035b 144
Sergeev 7:a4cff60f035b 145
Sergeev 1:9b1df0b2507d 146 // Calculate FFT if a full sample is available.
Sergeev 1:9b1df0b2507d 147 if (samplingIsDone())
Sergeev 3:1f56b8f439a1 148 {
Sergeev 1:9b1df0b2507d 149 // Run FFT on sample data.
Sergeev 6:0de27f5ec409 150 arm_cfft_f32(S1, samples, 0, 1);
Sergeev 6:0de27f5ec409 151 arm_cfft_f32(S2, samples2, 0, 1);
Sergeev 6:0de27f5ec409 152 arm_cfft_f32(S3, samples3, 0, 1);
Sergeev 7:a4cff60f035b 153 samples[0]=0;
Sergeev 7:a4cff60f035b 154 samples2[0]=0;
Sergeev 7:a4cff60f035b 155 samples3[0]=0;
Sergeev 7:a4cff60f035b 156
Sergeev 1:9b1df0b2507d 157 arm_cmplx_mag_f32(samples, magnitudes, FFT_SIZE);
Sergeev 5:173ae8477ae1 158 arm_cmplx_mag_f32(samples2, magnitudes2, FFT_SIZE);
Sergeev 5:173ae8477ae1 159 arm_cmplx_mag_f32(samples3, magnitudes3, FFT_SIZE);
Sergeev 5:173ae8477ae1 160
Sergeev 1:9b1df0b2507d 161 arm_max_f32(magnitudes, FFT_SIZE, &maxValue, &testIndex);
Sergeev 5:173ae8477ae1 162 arm_max_f32(magnitudes2, FFT_SIZE, &maxValue2, &testIndex2);
Sergeev 5:173ae8477ae1 163 arm_max_f32(magnitudes3, FFT_SIZE, &maxValue3, &testIndex3);
Sergeev 7:a4cff60f035b 164
Sergeev 7:a4cff60f035b 165 {
Sergeev 7:a4cff60f035b 166 if (HAL_GetTick() > (cnt1 + 1000))
Sergeev 7:a4cff60f035b 167 {
Sergeev 7:a4cff60f035b 168 cnt1=HAL_GetTick();
Sergeev 7:a4cff60f035b 169 if (flag==0){
Sergeev 7:a4cff60f035b 170 pc.printf(" MAX value at magnitudes 1[%d] : %+8.2f\r\n", testIndex, maxValue);//Я НЯШКА А АНЯ ВЛАСЮК КОЗА:DDDDDDDDDDDDD
Sergeev 7:a4cff60f035b 171 pc.printf(" MAX value at magnitudes 2[%d] : %+8.2f\r\n", testIndex2, maxValue2);
Sergeev 7:a4cff60f035b 172 pc.printf(" MAX value at magnitudes 3[%d] : %+8.2f\r\n", testIndex2, maxValue3);
Sergeev 7:a4cff60f035b 173 flag++;
Sergeev 7:a4cff60f035b 174 }
Sergeev 7:a4cff60f035b 175 else if (flag==1){
Sergeev 7:a4cff60f035b 176
Sergeev 7:a4cff60f035b 177 flag++;
Sergeev 7:a4cff60f035b 178 }
Sergeev 7:a4cff60f035b 179 else if (flag==2){
Sergeev 7:a4cff60f035b 180
Sergeev 7:a4cff60f035b 181 flag=0;
Sergeev 7:a4cff60f035b 182 }
Sergeev 7:a4cff60f035b 183 }
Sergeev 7:a4cff60f035b 184
Sergeev 5:173ae8477ae1 185
Sergeev 5:173ae8477ae1 186 double delta_t = 0;
Sergeev 5:173ae8477ae1 187 if ((testIndex < testIndex2) and (testIndex < testIndex3) and (testIndex2 < testIndex3))
Sergeev 5:173ae8477ae1 188 delta_t = (testIndex3 - testIndex)*0.000025;
Sergeev 5:173ae8477ae1 189 else if ((testIndex < testIndex2)and(testIndex < testIndex3)and(testIndex2 > testIndex3))
Sergeev 5:173ae8477ae1 190 delta_t = (testIndex2 - testIndex)*0.000025;
Sergeev 5:173ae8477ae1 191 else if ((testIndex2 < testIndex3)and(testIndex2 < testIndex)and(testIndex < testIndex3))
Sergeev 5:173ae8477ae1 192 delta_t = (testIndex3 - testIndex2)*0.000025;
Sergeev 5:173ae8477ae1 193 else if ((testIndex2 < testIndex3)and(testIndex2 < testIndex)and(testIndex > testIndex3))
Sergeev 5:173ae8477ae1 194 delta_t = (testIndex - testIndex3)*0.000025;
Sergeev 5:173ae8477ae1 195 else if (testIndex2 < testIndex)
Sergeev 5:173ae8477ae1 196 delta_t = (testIndex - testIndex3)*0.000025;
Sergeev 5:173ae8477ae1 197 else
Sergeev 5:173ae8477ae1 198 delta_t = (testIndex - testIndex2)*0.000025;
Sergeev 5:173ae8477ae1 199 double fi = asin(330*delta_t/0.33);
Sergeev 7:a4cff60f035b 200
Sergeev 5:173ae8477ae1 201
Sergeev 7:a4cff60f035b 202 if (HAL_GetTick() > (cnt1 + 1000))
Sergeev 7:a4cff60f035b 203 {
Sergeev 7:a4cff60f035b 204 cnt1=HAL_GetTick();
Sergeev 7:a4cff60f035b 205 if (flag==0){
Sergeev 7:a4cff60f035b 206 pc.printf(" MAX value at magnitudes 1[%d] : %+8.2f\r\n", testIndex, maxValue);//Я НЯШКА А АНЯ ВЛАСЮК КОЗА:DDDDDDDDDDDDD
Sergeev 7:a4cff60f035b 207 pc.printf(" MAX value at magnitudes 2[%d] : %+8.2f\r\n", testIndex2, maxValue2);
Sergeev 7:a4cff60f035b 208 pc.printf(" MAX value at magnitudes 3[%d] : %+8.2f\r\n", testIndex2, maxValue3);
Sergeev 7:a4cff60f035b 209 pc.printf(" Angle is : %+8.2f\r\n", fi);
Sergeev 7:a4cff60f035b 210 flag++;
Sergeev 7:a4cff60f035b 211 }
Sergeev 7:a4cff60f035b 212 else if (flag==1){
Sergeev 7:a4cff60f035b 213
Sergeev 7:a4cff60f035b 214 flag++;
Sergeev 7:a4cff60f035b 215 }
Sergeev 7:a4cff60f035b 216 else if (flag==2){
Sergeev 7:a4cff60f035b 217
Sergeev 7:a4cff60f035b 218 flag=0;
Sergeev 7:a4cff60f035b 219 }
Sergeev 7:a4cff60f035b 220 }
Sergeev 7:a4cff60f035b 221
Sergeev 7:a4cff60f035b 222
Sergeev 1:9b1df0b2507d 223 samplingBegin();
Sergeev 1:9b1df0b2507d 224 }
Sergeev 1:9b1df0b2507d 225 }
Sergeev 6:0de27f5ec409 226 }