fork

Dependencies:   mbed

Fork of LG by igor Apu

Committer:
Kovalev_D
Date:
Mon Apr 11 11:04:34 2016 +0000
Revision:
128:1e4675a36c93
Parent:
127:6a7472d67804
Child:
140:1fbf117fc120
123

Who changed what in which revision?

UserRevisionLine numberNew contents of line
igor_v 0:8ad47e2b6f00 1 #include "Global.h"
igor_v 0:8ad47e2b6f00 2 struct SPI Spi;
Kovalev_D 112:4a96133a1311 3 //unsigned int Temp_AMP;
Kovalev_D 96:1c8536458119 4 unsigned int Temp_AMP64P;
igor_v 31:c783288001b5 5
Kovalev_D 99:3d8f206ceac2 6 unsigned int Count_AMP, ADD_AMP, Cur_Amp;
Kovalev_D 99:3d8f206ceac2 7 int Znak_Amp;
Kovalev_D 109:ee0cff33ad3b 8 int AD_Regul = 0;
Kovalev_D 109:ee0cff33ad3b 9
Kovalev_D 109:ee0cff33ad3b 10
Kovalev_D 99:3d8f206ceac2 11
Kovalev_D 86:398da56ef751 12 unsigned int Temp_ADC_2;
Kovalev_D 86:398da56ef751 13 unsigned int Temp_ADC_3;
Kovalev_D 86:398da56ef751 14 unsigned int Temp_ADC_4;
Kovalev_D 86:398da56ef751 15 unsigned int Temp_ADC_5;
igor_v 31:c783288001b5 16
igor_v 31:c783288001b5 17
Kovalev_D 95:dd51e577e114 18 unsigned int Buff_ADC_1 [32];
Kovalev_D 95:dd51e577e114 19 unsigned int Buff_ADC_2 [32];
Kovalev_D 95:dd51e577e114 20 unsigned int Buff_ADC_3 [32];
Kovalev_D 95:dd51e577e114 21 unsigned int Buff_ADC_4 [32];
igor_v 51:81f47b817071 22
igor_v 31:c783288001b5 23 unsigned int Buff_ADC_5 [256];
igor_v 31:c783288001b5 24 unsigned int Buff_AMP [256];
Kovalev_D 96:1c8536458119 25 unsigned int Buff_AMP64P [256];
igor_v 31:c783288001b5 26 unsigned int SinPLC[64]= {1023, 1016, 1006, 993, 976, 954, 904, 874, 841, 806, 768, 728,
igor_v 31:c783288001b5 27 687, 645, 601, 557, 500, 379, 337, 296, 256, 219, 183, 150,
igor_v 31:c783288001b5 28 120, 93, 69, 48, 31, 18, 8, 0, 8, 18, 31, 48,
igor_v 31:c783288001b5 29 69, 93, 120, 150, 183, 219, 256, 296, 337, 379, 468, 512, 557,
igor_v 31:c783288001b5 30 601, 645, 687, 728, 768, 806, 841, 874, 904, 954, 976, 993, 1006,
igor_v 31:c783288001b5 31 1016, 1023
igor_v 31:c783288001b5 32 };
Kovalev_D 86:398da56ef751 33
igor_v 110:6406b7ac0442 34
igor_v 110:6406b7ac0442 35
igor_v 110:6406b7ac0442 36
igor_v 110:6406b7ac0442 37
igor_v 114:5cc38a53d8a7 38 void SPI_Exchange(void) // новая функция чтения, в нецй не должно быть ничего лишнего
igor_v 110:6406b7ac0442 39 {
igor_v 110:6406b7ac0442 40 unsigned int DummySPI;
igor_v 110:6406b7ac0442 41 Spi.ADC5_Accum += LPC_SSP0->DR; // Чтение АЦП
igor_v 110:6406b7ac0442 42 Spi.ADC4_Accum += LPC_SSP0->DR;
igor_v 110:6406b7ac0442 43 Spi.ADC3_Accum += LPC_SSP0->DR;
igor_v 110:6406b7ac0442 44 Spi.ADC2_Accum += LPC_SSP0->DR;
igor_v 110:6406b7ac0442 45 Spi.ADC1_Accum += LPC_SSP0->DR;
igor_v 110:6406b7ac0442 46 while (LPC_SSP0->SR & RX_SSP_notEMPT) {DummySPI = LPC_SSP0->DR;} //если буфер SPI не пуст.//очистить буфер.
Kovalev_D 112:4a96133a1311 47
Kovalev_D 112:4a96133a1311 48
Kovalev_D 112:4a96133a1311 49 DAC_OutPut();
Kovalev_D 112:4a96133a1311 50
igor_v 110:6406b7ac0442 51 if (CountV31 == 0) // просто фильтруем по 32 точкам.
igor_v 110:6406b7ac0442 52 {
Kovalev_D 112:4a96133a1311 53 // выставояем бит, что есть новы данные
igor_v 110:6406b7ac0442 54 Spi.ADC1 = Spi.ADC1_Accum >> 5; // подгоотавливаем данные (в той эе сетке) те ADC1 0..65535
igor_v 110:6406b7ac0442 55 Spi.ADC2 = Spi.ADC2_Accum >> 5;
igor_v 110:6406b7ac0442 56 Spi.ADC3 = Spi.ADC3_Accum >> 5;
igor_v 110:6406b7ac0442 57 Spi.ADC4 = Spi.ADC4_Accum >> 5;
igor_v 110:6406b7ac0442 58 Spi.ADC5 = Spi.ADC5_Accum >> 5;
Kovalev_D 112:4a96133a1311 59 Spi.ADC1_Accum = 0; // сбрасывкем аккамулятор
Kovalev_D 112:4a96133a1311 60 Spi.ADC2_Accum = 0;
Kovalev_D 112:4a96133a1311 61 Spi.ADC3_Accum = 0;
Kovalev_D 112:4a96133a1311 62 Spi.ADC4_Accum = 0;
Kovalev_D 112:4a96133a1311 63 Spi.ADC5_Accum = 0;
Kovalev_D 125:9400e64d0636 64 Spi.ADC_NewData = 1;
igor_v 110:6406b7ac0442 65 }
Kovalev_D 128:1e4675a36c93 66
Kovalev_D 113:8be429494918 67
Kovalev_D 112:4a96133a1311 68 }
Kovalev_D 113:8be429494918 69
Kovalev_D 116:66f1f0ff2dab 70 void PlcRegul(void) //Программа расчет напряжения для модулятора
Kovalev_D 116:66f1f0ff2dab 71 {
Kovalev_D 116:66f1f0ff2dab 72 int PLC_In;
Kovalev_D 116:66f1f0ff2dab 73
igor_v 127:6a7472d67804 74
igor_v 127:6a7472d67804 75 PLC_In = Gyro.AD_Slow; //выбираем даные для фильтрации
Kovalev_D 116:66f1f0ff2dab 76 // PLC_In = Gyro.AD_Fast;
Kovalev_D 128:1e4675a36c93 77 //или+,или-(знак)
Kovalev_D 128:1e4675a36c93 78 Gyro.PLC_Delta = PLC_In - Gyro.PLC_Old; // узнаем приращение
Kovalev_D 128:1e4675a36c93 79 // (знак) * (то на что инкрементировали цап)
Kovalev_D 128:1e4675a36c93 80 Gyro.PLC_DeltaADD = Gyro.PLC_Delta * Gyro.PLC_ADC_DOld; //приращение с учетом знака (и количества) прошлого приращения
Kovalev_D 128:1e4675a36c93 81 Gyro.PLC_Old = PLC_In; // запоминание значения
igor_v 127:6a7472d67804 82
Kovalev_D 128:1e4675a36c93 83 if(Gyro.RgConA&0x2) // если включон контур регулирования
igor_v 127:6a7472d67804 84 {
Kovalev_D 128:1e4675a36c93 85 if (Gyro.PLC_Error2Mode > 0) {Gyro.PLC_Error2Mode --; Gyro.PLC_ADC_DOld = 0; } // если ошибка(нахожление в двух модовом)
Kovalev_D 128:1e4675a36c93 86 else if ( Gyro.PLC_Delta > (3000 * 65536)) {Spi.DAC_B += 2500; Gyro.PLC_Error2Mode = 5; Gyro.PLC_ADC_DOld = 0;} // проверка на двух модовость
Kovalev_D 128:1e4675a36c93 87 else if ( Gyro.PLC_Delta < (-3000 * 65536)) {Spi.DAC_B += 2500; Gyro.PLC_Error2Mode = 5; Gyro.PLC_ADC_DOld = 0;}
Kovalev_D 128:1e4675a36c93 88
igor_v 127:6a7472d67804 89 else if (Gyro.PLC_DeltaADD > 0)
igor_v 127:6a7472d67804 90 {
Kovalev_D 128:1e4675a36c93 91
Kovalev_D 128:1e4675a36c93 92 // Gyro.PLC_ADC_DOld = (Gyro.PLC_DeltaADD /6553600 )+1;
Kovalev_D 128:1e4675a36c93 93 Gyro.PLC_ADC_DOld = 1;
igor_v 127:6a7472d67804 94 }
igor_v 127:6a7472d67804 95 else if (Gyro.PLC_DeltaADD < 0)
igor_v 127:6a7472d67804 96 {
igor_v 127:6a7472d67804 97
Kovalev_D 128:1e4675a36c93 98 // Gyro.PLC_ADC_DOld = (Gyro.PLC_DeltaADD /6553600 )-1;
Kovalev_D 128:1e4675a36c93 99 Gyro.PLC_ADC_DOld = -1;
igor_v 127:6a7472d67804 100 }
igor_v 127:6a7472d67804 101 else
igor_v 127:6a7472d67804 102 {
Kovalev_D 128:1e4675a36c93 103 Gyro.PLC_ADC_DOld = 1;
igor_v 127:6a7472d67804 104 }
igor_v 127:6a7472d67804 105 }
igor_v 127:6a7472d67804 106 else
igor_v 127:6a7472d67804 107 {
Kovalev_D 128:1e4675a36c93 108 Gyro.PLC_Error2Mode = 1; Gyro.PLC_DeltaADD = 0;
igor_v 127:6a7472d67804 109 }
Kovalev_D 128:1e4675a36c93 110
Kovalev_D 128:1e4675a36c93 111 Spi.DAC_B += Gyro.PLC_ADC_DOld * 16;
Kovalev_D 128:1e4675a36c93 112 if ( Spi.DAC_B < 1000 ) {Spi.DAC_B = 32000; Gyro.PLC_Error2Mode = 5; Gyro.PLC_DeltaADD = 0;}
Kovalev_D 128:1e4675a36c93 113 if ( Spi.DAC_B > 63000 ) {Spi.DAC_B = 32000; Gyro.PLC_Error2Mode = 5; Gyro.PLC_DeltaADD = 0;}
igor_v 127:6a7472d67804 114
Kovalev_D 128:1e4675a36c93 115 }
Kovalev_D 116:66f1f0ff2dab 116
Kovalev_D 116:66f1f0ff2dab 117
Kovalev_D 116:66f1f0ff2dab 118
Kovalev_D 116:66f1f0ff2dab 119
Kovalev_D 116:66f1f0ff2dab 120 void PlcRegul_old(void) // на всяни й случай
Kovalev_D 112:4a96133a1311 121 {
Kovalev_D 112:4a96133a1311 122 int Delta;
Kovalev_D 112:4a96133a1311 123
Kovalev_D 112:4a96133a1311 124 ADD_AMP+=Spi.ADC5;
Kovalev_D 112:4a96133a1311 125 Count_AMP++;
Kovalev_D 112:4a96133a1311 126 if(Count_AMP>=(32*32+8))
Kovalev_D 112:4a96133a1311 127 {
Kovalev_D 112:4a96133a1311 128 Delta = ADD_AMP - Cur_Amp;
Kovalev_D 112:4a96133a1311 129
Kovalev_D 112:4a96133a1311 130 if(Gyro.RgConA&0x2)
Kovalev_D 112:4a96133a1311 131 {
Kovalev_D 112:4a96133a1311 132 if (Znak_Amp > 1) {Znak_Amp --;}
Kovalev_D 112:4a96133a1311 133 else if ( Delta > 30000000 ) {AD_Regul += 5000000; Znak_Amp = 5;}
Kovalev_D 112:4a96133a1311 134 else if ( Delta < (-3000000)) {AD_Regul += 5000000; Znak_Amp = 5;}
Kovalev_D 112:4a96133a1311 135 else if ((Delta * Znak_Amp) > 0)
Kovalev_D 112:4a96133a1311 136 {
Kovalev_D 112:4a96133a1311 137 Znak_Amp = 1;
Kovalev_D 112:4a96133a1311 138 AD_Regul -= (Delta * Znak_Amp * 10);
Kovalev_D 112:4a96133a1311 139 }
Kovalev_D 112:4a96133a1311 140 else
Kovalev_D 112:4a96133a1311 141 {
Kovalev_D 112:4a96133a1311 142 Znak_Amp = -1;
Kovalev_D 112:4a96133a1311 143 AD_Regul -= (Delta * Znak_Amp * 10);
Kovalev_D 112:4a96133a1311 144 }
Kovalev_D 112:4a96133a1311 145
Kovalev_D 112:4a96133a1311 146 Spi.DAC_B = (AD_Regul + 0x1fffffff)/65536;
Kovalev_D 112:4a96133a1311 147 }
Kovalev_D 112:4a96133a1311 148 Cur_Amp=ADD_AMP; Count_AMP=0; ADD_AMP=0;
Kovalev_D 112:4a96133a1311 149 }
Kovalev_D 112:4a96133a1311 150
igor_v 110:6406b7ac0442 151 }
igor_v 110:6406b7ac0442 152
igor_v 110:6406b7ac0442 153
Kovalev_D 116:66f1f0ff2dab 154
Kovalev_D 116:66f1f0ff2dab 155
Kovalev_D 112:4a96133a1311 156 void DAC_OutPut(void)//выдача в цапы
igor_v 0:8ad47e2b6f00 157 {
Kovalev_D 112:4a96133a1311 158 LPC_SSP0->DR=0x5555;
igor_v 31:c783288001b5 159 LPC_SSP0->DR=0x5555;
igor_v 31:c783288001b5 160 LPC_SSP0->DR=0x5555;
igor_v 0:8ad47e2b6f00 161
igor_v 110:6406b7ac0442 162 if (CountV31 & 1) { //если нечетный такт то
igor_v 31:c783288001b5 163 LPC_SSP0->DR = WRITE_DAC0; //e.команда для ЦАП_0 передавать.
igor_v 31:c783288001b5 164 LPC_SSP0->DR = (Spi.DAC_A); //e. передача 12 бит
igor_v 31:c783288001b5 165 } else { //если такт четный.
igor_v 31:c783288001b5 166 LPC_SSP0->DR = WRITE_DAC1 ; //e.команда для ЦАП_1 передавать.
igor_v 31:c783288001b5 167 LPC_SSP0->DR = (Spi.DAC_B); //e. передача 12 бит
igor_v 31:c783288001b5 168 }
Kovalev_D 112:4a96133a1311 169 }
Kovalev_D 112:4a96133a1311 170
Kovalev_D 112:4a96133a1311 171
Kovalev_D 113:8be429494918 172
Kovalev_D 113:8be429494918 173
Kovalev_D 113:8be429494918 174
Kovalev_D 113:8be429494918 175
Kovalev_D 113:8be429494918 176
Kovalev_D 113:8be429494918 177
Kovalev_D 113:8be429494918 178
Kovalev_D 113:8be429494918 179
Kovalev_D 113:8be429494918 180
Kovalev_D 113:8be429494918 181
Kovalev_D 113:8be429494918 182
Kovalev_D 113:8be429494918 183
Kovalev_D 113:8be429494918 184
Kovalev_D 113:8be429494918 185
Kovalev_D 113:8be429494918 186
Kovalev_D 113:8be429494918 187
Kovalev_D 113:8be429494918 188
Kovalev_D 113:8be429494918 189
Kovalev_D 113:8be429494918 190
Kovalev_D 113:8be429494918 191
Kovalev_D 113:8be429494918 192
Kovalev_D 113:8be429494918 193
Kovalev_D 113:8be429494918 194
Kovalev_D 113:8be429494918 195
Kovalev_D 113:8be429494918 196
Kovalev_D 113:8be429494918 197
Kovalev_D 113:8be429494918 198
Kovalev_D 113:8be429494918 199
Kovalev_D 113:8be429494918 200 /*
Kovalev_D 112:4a96133a1311 201 void SPI_Exchange(void)
Kovalev_D 112:4a96133a1311 202 {
Kovalev_D 112:4a96133a1311 203 unsigned int DummySPI;
Kovalev_D 112:4a96133a1311 204
Kovalev_D 112:4a96133a1311 205
Kovalev_D 112:4a96133a1311 206 Spi.ADC5 = LPC_SSP0->DR;
Kovalev_D 112:4a96133a1311 207 Spi.ADC4 = LPC_SSP0->DR;
Kovalev_D 112:4a96133a1311 208 Spi.ADC3 = LPC_SSP0->DR;
Kovalev_D 112:4a96133a1311 209 Spi.ADC2 = LPC_SSP0->DR;
Kovalev_D 112:4a96133a1311 210 Spi.ADC1 = LPC_SSP0->DR;
Kovalev_D 112:4a96133a1311 211
Kovalev_D 112:4a96133a1311 212 Input.ArrayIn[2]= Spi.ADC5;
Kovalev_D 112:4a96133a1311 213
Kovalev_D 112:4a96133a1311 214 DAC_OutPut();
igor_v 0:8ad47e2b6f00 215
Kovalev_D 99:3d8f206ceac2 216 // LPC_DAC->CR = (((SinPLC[CountV64]*35/5)+24300));// модулятор
Kovalev_D 112:4a96133a1311 217
Kovalev_D 89:a0d344db227e 218 while (LPC_SSP0->SR & RX_SSP_notEMPT) //если буфер SPI не пуст.
Kovalev_D 89:a0d344db227e 219 DummySPI = LPC_SSP0->DR; //очистить буфер.
igor_v 31:c783288001b5 220
Kovalev_D 112:4a96133a1311 221 //заполнение буферов еденичных значений АЦП.
Kovalev_D 112:4a96133a1311 222 Buff_ADC_1 [CountV31] = Spi.ADC1;
Kovalev_D 112:4a96133a1311 223 Buff_ADC_2 [CountV31] = Spi.ADC2;
Kovalev_D 112:4a96133a1311 224 Buff_ADC_3 [CountV31] = Spi.ADC3;
Kovalev_D 112:4a96133a1311 225 Buff_ADC_4 [CountV31] = Spi.ADC4;
Kovalev_D 95:dd51e577e114 226 Buff_ADC_5 [CountV255] = Spi.ADC5; // ампл ацп.
igor_v 110:6406b7ac0442 227
Kovalev_D 112:4a96133a1311 228
igor_v 110:6406b7ac0442 229 Temp_AMP64P += Buff_ADC_5[CountV255];
Kovalev_D 96:1c8536458119 230 Temp_AMP64P -= Buff_ADC_5[(CountV255-64) & 0xff]; // заполнение буфера накопленых приращений за 8 тактов
Kovalev_D 96:1c8536458119 231 Buff_AMP64P[CountV255] = (unsigned int) (Temp_AMP64P);
Kovalev_D 96:1c8536458119 232
igor_v 31:c783288001b5 233
Kovalev_D 47:d902ef6f7564 234 Temp_ADC_2 += Buff_ADC_2[CountV31];
Kovalev_D 47:d902ef6f7564 235 Temp_ADC_2 -= Buff_ADC_2[(CountV31-32) & 0xff];
igor_v 31:c783288001b5 236
Kovalev_D 47:d902ef6f7564 237 Temp_ADC_3 += Buff_ADC_3[CountV31];
Kovalev_D 95:dd51e577e114 238 Temp_ADC_3 -= Buff_ADC_3[(CountV31-32) & 0xff];
igor_v 31:c783288001b5 239
Kovalev_D 47:d902ef6f7564 240 Temp_ADC_4 += Buff_ADC_4[CountV31];
Kovalev_D 47:d902ef6f7564 241 Temp_ADC_4 -= Buff_ADC_4[(CountV31-32) & 0xff];
igor_v 31:c783288001b5 242
igor_v 31:c783288001b5 243 Temp_ADC_5 += Buff_ADC_1[CountV255];
igor_v 31:c783288001b5 244 Temp_ADC_5 -= Buff_ADC_1[(CountV255-32) & 0xff];
Kovalev_D 112:4a96133a1311 245 Spi.PLC_NewData=1;
Kovalev_D 113:8be429494918 246 }*/