Dmitry Kovalev / Mbed 2 deprecated LG2

fork

Dependencies:   mbed

Fork of LG by igor Apu

SPI.c@157:1069c80f4944, 2016-05-10 (annotated)

Committer:
Kovalev_D
Date:
Tue May 10 14:11:25 2016 +0000
Revision:
157:1069c80f4944
Parent:
155:94e7ac5fea58
Child:
158:0c8342e1837a
1

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 153:7086895c6ee3 6 int ttt = 0;
Kovalev_D 153:7086895c6ee3 7
Kovalev_D 99:3d8f206ceac2 8 unsigned int Count_AMP, ADD_AMP, Cur_Amp;
Kovalev_D 99:3d8f206ceac2 9 int Znak_Amp;
Kovalev_D 109:ee0cff33ad3b 10 int AD_Regul = 0;
Kovalev_D 141:c6de20b9b483 11 int temp9;
Kovalev_D 148:7ce8c1fd00f7 12 int AD_MAX=0;
Kovalev_D 150:29c9f7671bac 13 int k=0,l=0;
Kovalev_D 152:cff1321ab25e 14 int flagmod=0;
Kovalev_D 86:398da56ef751 15 unsigned int Temp_ADC_2;
Kovalev_D 86:398da56ef751 16 unsigned int Temp_ADC_3;
Kovalev_D 86:398da56ef751 17 unsigned int Temp_ADC_4;
Kovalev_D 86:398da56ef751 18 unsigned int Temp_ADC_5;
Kovalev_D 147:1aed74f19a8f 19 unsigned int TempA;
igor_v 31:c783288001b5 20
Kovalev_D 95:dd51e577e114 21 unsigned int Buff_ADC_1 [32];
Kovalev_D 95:dd51e577e114 22 unsigned int Buff_ADC_2 [32];
Kovalev_D 95:dd51e577e114 23 unsigned int Buff_ADC_3 [32];
Kovalev_D 95:dd51e577e114 24 unsigned int Buff_ADC_4 [32];
igor_v 51:81f47b817071 25
igor_v 31:c783288001b5 26 unsigned int Buff_ADC_5 [256];
igor_v 31:c783288001b5 27 unsigned int Buff_AMP [256];
Kovalev_D 96:1c8536458119 28 unsigned int Buff_AMP64P [256];
igor_v 31:c783288001b5 29 unsigned int SinPLC[64]= {1023, 1016, 1006, 993, 976, 954, 904, 874, 841, 806, 768, 728,
igor_v 31:c783288001b5 30 687, 645, 601, 557, 500, 379, 337, 296, 256, 219, 183, 150,
igor_v 31:c783288001b5 31 120, 93, 69, 48, 31, 18, 8, 0, 8, 18, 31, 48,
igor_v 31:c783288001b5 32 69, 93, 120, 150, 183, 219, 256, 296, 337, 379, 468, 512, 557,
igor_v 31:c783288001b5 33 601, 645, 687, 728, 768, 806, 841, 874, 904, 954, 976, 993, 1006,
igor_v 31:c783288001b5 34 1016, 1023
igor_v 31:c783288001b5 35 };
Kovalev_D 86:398da56ef751 36
igor_v 110:6406b7ac0442 37
igor_v 110:6406b7ac0442 38
Kovalev_D 147:1aed74f19a8f 39 void ADS_Acum(void)
Kovalev_D 147:1aed74f19a8f 40 {
Kovalev_D 157:1069c80f4944 41 // можно апихнкть в функцию
Kovalev_D 157:1069c80f4944 42 Spi.ADC_NewData = 0;
Kovalev_D 157:1069c80f4944 43 Gyro.Termo = Spi.ADC1;
Kovalev_D 157:1069c80f4944 44 Gyro.In1 = Spi.ADC2;
Kovalev_D 157:1069c80f4944 45 Gyro.In2 = Spi.ADC3;
Kovalev_D 157:1069c80f4944 46 Gyro.DeltaT = Spi.ADC4;
Kovalev_D 157:1069c80f4944 47 TempA = (0x7fff - Spi.ADC5) << 1; // перевернем знак и умножим на два (было 32000...0 стало 0 ...64000)
igor_v 110:6406b7ac0442 48
Kovalev_D 157:1069c80f4944 49 Gyro.ADF_Accum += TempA;
Kovalev_D 157:1069c80f4944 50 Gyro.ADS_Accum += TempA;
Kovalev_D 157:1069c80f4944 51 Gyro.ADF_Count ++;
Kovalev_D 157:1069c80f4944 52 Gyro.ADS_Count ++;
Kovalev_D 147:1aed74f19a8f 53
Kovalev_D 157:1069c80f4944 54 if (Gyro.ADF_Count > 15) { // если прошло 16 тактов виброподвеса
Kovalev_D 157:1069c80f4944 55 Gyro.AD_Fast = Gyro.ADF_Accum << 12; //обновляем данные и приводим в один масштаб
Kovalev_D 157:1069c80f4944 56 Gyro.ADF_Count = 0;//
Kovalev_D 157:1069c80f4944 57 Gyro.ADF_Accum = 0;
Kovalev_D 157:1069c80f4944 58 Gyro.ADF_NewData = 1;
Kovalev_D 157:1069c80f4944 59 }
Kovalev_D 157:1069c80f4944 60 if (Gyro.ADS_Count > 255) { // если прошло 256 тактов виброподвеса
Kovalev_D 157:1069c80f4944 61 Gyro.AD_Slow = Gyro.ADS_Accum << 8; //обновляем данные и приводим в один масштаб
Kovalev_D 157:1069c80f4944 62 Gyro.ADS_Count = 0;
Kovalev_D 157:1069c80f4944 63 Gyro.ADS_Accum = 0;
Kovalev_D 157:1069c80f4944 64 Gyro.ADS_NewData = 1;
Kovalev_D 157:1069c80f4944 65 }
Kovalev_D 147:1aed74f19a8f 66 }
igor_v 110:6406b7ac0442 67
igor_v 114:5cc38a53d8a7 68 void SPI_Exchange(void) // новая функция чтения, в нецй не должно быть ничего лишнего
Kovalev_D 157:1069c80f4944 69 {
Kovalev_D 157:1069c80f4944 70 unsigned int DummySPI;
Kovalev_D 157:1069c80f4944 71 Spi.ADC5_Accum += LPC_SSP0->DR; // Чтение АЦП
igor_v 110:6406b7ac0442 72 Spi.ADC4_Accum += LPC_SSP0->DR;
igor_v 110:6406b7ac0442 73 Spi.ADC3_Accum += LPC_SSP0->DR;
igor_v 110:6406b7ac0442 74 Spi.ADC2_Accum += LPC_SSP0->DR;
igor_v 110:6406b7ac0442 75 Spi.ADC1_Accum += LPC_SSP0->DR;
Kovalev_D 157:1069c80f4944 76 while (LPC_SSP0->SR & RX_SSP_notEMPT) {
Kovalev_D 157:1069c80f4944 77 DummySPI = LPC_SSP0->DR; //если буфер SPI не пуст.//очистить буфер.
Kovalev_D 157:1069c80f4944 78 }
Kovalev_D 157:1069c80f4944 79
Kovalev_D 157:1069c80f4944 80
Kovalev_D 112:4a96133a1311 81 DAC_OutPut();
Kovalev_D 157:1069c80f4944 82
Kovalev_D 157:1069c80f4944 83 if (CountV31 == 0) { // просто фильтруем по 32 точкам.
Kovalev_D 157:1069c80f4944 84 // выставояем бит, что есть новы данные
Kovalev_D 157:1069c80f4944 85 Spi.ADC1 = Spi.ADC1_Accum >> 5; // подгоотавливаем данные (в той эе сетке) те ADC1 0..65535
Kovalev_D 157:1069c80f4944 86 Spi.ADC2 = Spi.ADC2_Accum >> 5;
Kovalev_D 157:1069c80f4944 87 Spi.ADC3 = Spi.ADC3_Accum >> 5;
Kovalev_D 157:1069c80f4944 88 Spi.ADC4 = Spi.ADC4_Accum >> 5;
Kovalev_D 157:1069c80f4944 89 Spi.ADC5 = Spi.ADC5_Accum >> 5;
Kovalev_D 157:1069c80f4944 90 Spi.ADC1_Accum = 0; // сбрасывкем аккамулятор
Kovalev_D 157:1069c80f4944 91 Spi.ADC2_Accum = 0;
Kovalev_D 157:1069c80f4944 92 Spi.ADC3_Accum = 0;
Kovalev_D 157:1069c80f4944 93 Spi.ADC4_Accum = 0;
Kovalev_D 157:1069c80f4944 94 Spi.ADC5_Accum = 0;
Kovalev_D 157:1069c80f4944 95 Spi.ADC_NewData = 1;
Kovalev_D 157:1069c80f4944 96 }
Kovalev_D 128:1e4675a36c93 97
Kovalev_D 113:8be429494918 98
Kovalev_D 112:4a96133a1311 99 }
Kovalev_D 113:8be429494918 100
Kovalev_D 141:c6de20b9b483 101
Kovalev_D 141:c6de20b9b483 102
Kovalev_D 141:c6de20b9b483 103
Kovalev_D 141:c6de20b9b483 104
Kovalev_D 157:1069c80f4944 105 /*
Kovalev_D 157:1069c80f4944 106 if ( Gyro.PLC_Delta > ( 100 * 65536)) k=256;
Kovalev_D 157:1069c80f4944 107 else if ( Gyro.PLC_Delta < (-100 * 65536)) k=256;
Kovalev_D 157:1069c80f4944 108
Kovalev_D 157:1069c80f4944 109 else if ( Gyro.PLC_Delta > ( 55 * 65536)) k=64;
Kovalev_D 157:1069c80f4944 110 else if ( Gyro.PLC_Delta < (-55 * 65536)) k=64;
Kovalev_D 157:1069c80f4944 111
Kovalev_D 157:1069c80f4944 112 else if ( Gyro.PLC_Delta > ( 40 * 65536)) k=30;
Kovalev_D 157:1069c80f4944 113 else if ( Gyro.PLC_Delta < (-40 * 65536)) k=30;
Kovalev_D 141:c6de20b9b483 114
Kovalev_D 157:1069c80f4944 115 else if ( Gyro.PLC_Delta > ( 25 * 65536)) k=20;
Kovalev_D 157:1069c80f4944 116 else if ( Gyro.PLC_Delta < (-25 * 65536)) k=20;
Kovalev_D 157:1069c80f4944 117
Kovalev_D 157:1069c80f4944 118 else if ( Gyro.PLC_Delta > ( 15*65536)) k=16;
Kovalev_D 157:1069c80f4944 119 else if ( Gyro.PLC_Delta < (-15*65536)) k=16;
Kovalev_D 157:1069c80f4944 120
Kovalev_D 157:1069c80f4944 121 else if ( Gyro.PLC_Delta > ( 5*65536)) k=12;
Kovalev_D 157:1069c80f4944 122 else if ( Gyro.PLC_Delta < (-5*65536)) k=12;
Kovalev_D 157:1069c80f4944 123
Kovalev_D 157:1069c80f4944 124 else if ( Gyro.PLC_Delta > ( 2*65536)) k=6;
Kovalev_D 157:1069c80f4944 125 else if ( Gyro.PLC_Delta < (-2*65536)) k=6;
Kovalev_D 157:1069c80f4944 126 */
Kovalev_D 144:083c667ba848 127
Kovalev_D 144:083c667ba848 128
Kovalev_D 144:083c667ba848 129
Kovalev_D 144:083c667ba848 130
Kovalev_D 144:083c667ba848 131
Kovalev_D 144:083c667ba848 132
Kovalev_D 155:94e7ac5fea58 133 void PlcRegul(void) //Программа расчет напряжения для модулятора//выполняется 1.25 микросек.
Kovalev_D 144:083c667ba848 134 {
Kovalev_D 155:94e7ac5fea58 135
Kovalev_D 157:1069c80f4944 136 int PLC_In;
Kovalev_D 157:1069c80f4944 137 int tempDac;
Kovalev_D 153:7086895c6ee3 138
Kovalev_D 151:d565ce4d58c8 139
Kovalev_D 157:1069c80f4944 140 // PLC_In = Gyro.AD_Fast;
Kovalev_D 157:1069c80f4944 141 //или+,или-(знак)
Kovalev_D 153:7086895c6ee3 142
Kovalev_D 157:1069c80f4944 143 PLC_In = Gyro.AD_Slow; //выбираем даные для фильтрации
Kovalev_D 157:1069c80f4944 144 Gyro.PLC_Delta = PLC_In - Gyro.PLC_Old; // узнаем приращение
Kovalev_D 157:1069c80f4944 145 Gyro.PLC_DeltaADD = Gyro.PLC_Delta * Gyro.PLC_ADC_DOld; //приращение с учетом знака (и количества) прошлого приращения
Kovalev_D 157:1069c80f4944 146 Gyro.PLC_Old = PLC_In; // запоминание значения
Kovalev_D 157:1069c80f4944 147
Kovalev_D 157:1069c80f4944 148 Gyro.PlC_MaxD=(unsigned int)(AD_MAX-Gyro.AD_Slow); //ищем разницу между желаемой и действительной амплитудами. **
Kovalev_D 157:1069c80f4944 149 /*
Kovalev_D 157:1069c80f4944 150 //////////////////////////////////////////////////////////////////////////////////////////////////
Kovalev_D 157:1069c80f4944 151 //////////////////////////////////смотрим все моды/////////////////////////////////////////////////
Kovalev_D 157:1069c80f4944 152 ///////////////////////////////////////////////////////////////////////////////////////////////////
Kovalev_D 157:1069c80f4944 153 if( (Gyro.PLC_Lern<1011)&&(Gyro.PLC_Error2Mode != 0))//пробигаем по нескольким значениям цап(60*0х3с=0хВВ8) для определения максимальной амплитуды.
Kovalev_D 157:1069c80f4944 154 {
Kovalev_D 157:1069c80f4944 155 //if(AD_MAX < Gyro.AD_Slow) {AD_MAX = Gyro.AD_Slow;}
Kovalev_D 157:1069c80f4944 156 ttt=1;
Kovalev_D 157:1069c80f4944 157 Gyro.PLC_Lern++;
Kovalev_D 157:1069c80f4944 158 Spi.DAC_B += 0x3c;
Kovalev_D 157:1069c80f4944 159 if(AD_MAX < Gyro.AD_Slow) AD_MAX = Gyro.AD_Slow;
Kovalev_D 157:1069c80f4944 160 sprintf((Time),"%d %d %d \r\n", Spi.DAC_B, Gyro.AD_Slow, AD_MAX);
Kovalev_D 157:1069c80f4944 161 WriteCon(Time);
Kovalev_D 157:1069c80f4944 162 }
Kovalev_D 153:7086895c6ee3 163
Kovalev_D 157:1069c80f4944 164 ///////////////////////////////////////////////////////////////////////////////////////////////////
Kovalev_D 157:1069c80f4944 165 ///////////////////////////////////////////////////////////////////////////////////////////////////
Kovalev_D 157:1069c80f4944 166
Kovalev_D 157:1069c80f4944 167 */
Kovalev_D 157:1069c80f4944 168 // 3600 (размер моды порядка 3000)
Kovalev_D 157:1069c80f4944 169 if((Gyro.PLC_Lern < 60) && (Gyro.PLC_Error2Mode != 0)) { //пробигаем по нескольким значениям цап(60*0х3с=0хВВ8) для определения максимальной амплитуды.
Kovalev_D 157:1069c80f4944 170 Gyro.PLC_Lern++; //инкрементируем счетчик поиска максимальной амплитуды
Kovalev_D 157:1069c80f4944 171 if(AD_MAX < Gyro.AD_Slow) AD_MAX = Gyro.AD_Slow; //если максимальная амплитуда меньше текущей записываем новую максимальную амплитуду. *
Kovalev_D 157:1069c80f4944 172 Spi.DAC_B += 0x3c; //добовляем в значение цапа 60
Kovalev_D 157:1069c80f4944 173 } //работает только первые ~30-40 секунд (37 сек).
Kovalev_D 153:7086895c6ee3 174
Kovalev_D 153:7086895c6ee3 175
Kovalev_D 153:7086895c6ee3 176
Kovalev_D 157:1069c80f4944 177 if(AD_MAX < Gyro.AD_Slow) { AD_MAX = Gyro.AD_Slow; l=0; }//обновление максимального значения амплитуды обнуление счетчика малого понижения амплитуды. *
Kovalev_D 157:1069c80f4944 178 else l++; //инкрементируем счетчик малого понижения желаемой амплитуды (максимальной замеченной)
Kovalev_D 157:1069c80f4944 179
Kovalev_D 157:1069c80f4944 180 //ели небыло обновления максимальной амплитуды инкрементируем счетчика малого понижения амплитуды.
Kovalev_D 157:1069c80f4944 181 if((l>50)&&(Gyro.PLC_Lern>59)) { AD_MAX -= 3107200; l=0; } //если счетчик малого понижения амплитуды больше 100(аммплитуда не обновлялась 100 раз).
Kovalev_D 157:1069c80f4944 182
Kovalev_D 157:1069c80f4944 183 if(Gyro.RgConA&0x2) { // если контур регулирования замкнут
Kovalev_D 157:1069c80f4944 184 /* else if ( Gyro.PLC_Delta > (3500 * 65536)) {Spi.DAC_B += 2500; Gyro.PLC_Error2Mode = 5; Gyro.PLC_ADC_DOld = 0;} // проверка на двух модовость
Kovalev_D 157:1069c80f4944 185 else if ( Gyro.PLC_Delta < (-3500 * 65536)) {Spi.DAC_B += 2500; Gyro.PLC_Error2Mode = 5; Gyro.PLC_ADC_DOld = 0;} // проверка на двух модовость*/
Kovalev_D 157:1069c80f4944 186 if ( Gyro.PLC_Error2Mode > 0) { Gyro.PLC_Error2Mode --; Gyro.PLC_ADC_DOld = 0;} // если ошибка(нахожление в двух модовом)
Kovalev_D 157:1069c80f4944 187 else if ( Gyro.PLC_DeltaADD > 0) { Gyro.PLC_ADC_DOld = 1;}
Kovalev_D 157:1069c80f4944 188 else if ( Gyro.PLC_DeltaADD < 0) { Gyro.PLC_ADC_DOld = -1;}
Kovalev_D 157:1069c80f4944 189 else { Gyro.PLC_ADC_DOld = 1;}
Kovalev_D 157:1069c80f4944 190 }
Kovalev_D 157:1069c80f4944 191 else {Gyro.PLC_Error2Mode = 1; Gyro.PLC_DeltaADD = 0;}
Kovalev_D 157:1069c80f4944 192
Kovalev_D 157:1069c80f4944 193 if(Gyro.PlC_MaxD>(50<<18)) { // 3 режим регулирования
Kovalev_D 157:1069c80f4944 194 tempDac=(unsigned int)(Gyro.PlC_MaxD>>18);
Kovalev_D 157:1069c80f4944 195 if(tempDac>1500) tempDac=1500; //ограничение на регулирование если очень большая разница амплитуд
Kovalev_D 157:1069c80f4944 196 Spi.DAC_B += Gyro.PLC_ADC_DOld * tempDac; //новое значение в цап (±1 * значение регулировки)
Kovalev_D 157:1069c80f4944 197 tempDac = Gyro.PLC_ADC_DOld * tempDac; //используется только для выдачи
Kovalev_D 157:1069c80f4944 198 flagmod=3;
Kovalev_D 157:1069c80f4944 199 }
Kovalev_D 157:1069c80f4944 200 else if(Gyro.PlC_MaxD>(12<<18)) { // 2 режим регулирования
Kovalev_D 157:1069c80f4944 201 tempDac=(unsigned int)(Gyro.PlC_MaxD>>18);
Kovalev_D 157:1069c80f4944 202 Spi.DAC_B += Gyro.PLC_ADC_DOld * (tempDac);
Kovalev_D 157:1069c80f4944 203 tempDac = Gyro.PLC_ADC_DOld * (tempDac); //используется только для выдачи
Kovalev_D 157:1069c80f4944 204 flagmod=2;
Kovalev_D 157:1069c80f4944 205 }
Kovalev_D 157:1069c80f4944 206 else if(Gyro.PlC_MaxD<(2<<18)) { //режим если дельта равна 0;
Kovalev_D 157:1069c80f4944 207 tempDac=2;
Kovalev_D 157:1069c80f4944 208 Spi.DAC_B += Gyro.PLC_ADC_DOld * tempDac;
Kovalev_D 157:1069c80f4944 209 flagmod=1;
Kovalev_D 157:1069c80f4944 210 }
Kovalev_D 157:1069c80f4944 211 else {
Kovalev_D 157:1069c80f4944 212 tempDac=(unsigned int)(Gyro.PlC_MaxD>>19); // 1 режим регулирования
Kovalev_D 157:1069c80f4944 213 Spi.DAC_B += Gyro.PLC_ADC_DOld *tempDac;
Kovalev_D 157:1069c80f4944 214 tempDac = Gyro.PLC_ADC_DOld * tempDac;
Kovalev_D 157:1069c80f4944 215 flagmod=1;
Kovalev_D 157:1069c80f4944 216 }
Kovalev_D 152:cff1321ab25e 217
Kovalev_D 153:7086895c6ee3 218
Kovalev_D 157:1069c80f4944 219 if(flagmod==3) {k++; //если максимальный режим регулирования //инкрементируем счетчик большого понижения амплитуды
Kovalev_D 157:1069c80f4944 220 if(k>100){k=0;AD_MAX -= 13107200;} //если счетчик бльше 50 //обнуляем счетчик //уменьшаем максимальную амплитуду.
Kovalev_D 157:1069c80f4944 221 }
Kovalev_D 157:1069c80f4944 222 else k=0; //если это не серия максимальных регулировок обнуляем счетчик.
Kovalev_D 157:1069c80f4944 223
Kovalev_D 157:1069c80f4944 224
Kovalev_D 157:1069c80f4944 225
Kovalev_D 157:1069c80f4944 226 if ( Spi.DAC_B < 1000 ) {Spi.DAC_B = 32000; Gyro.PLC_Error2Mode = 5; Gyro.PLC_DeltaADD = 0;} //проверка на переваливание за границу.
Kovalev_D 157:1069c80f4944 227 else if ( Spi.DAC_B > 63000 ) {Spi.DAC_B = 32000; Gyro.PLC_Error2Mode = 5; Gyro.PLC_DeltaADD = 0;}
Kovalev_D 157:1069c80f4944 228
Kovalev_D 153:7086895c6ee3 229
Kovalev_D 157:1069c80f4944 230
Kovalev_D 157:1069c80f4944 231 ///////////////////////
Kovalev_D 157:1069c80f4944 232 //////////лог//////////
Kovalev_D 157:1069c80f4944 233 ///////////////////////
Kovalev_D 157:1069c80f4944 234 if(Gyro.LogPLC==1) {
Kovalev_D 157:1069c80f4944 235 //sprintf((Time),"%d %d %d %d\r\n",Gyro.PLC_Lern, Spi.DAC_B, Gyro.AD_Slow, Gyro.AD_Slow>>18 );//выдаем в терминал для постройки граффика регулировки периметра.
Kovalev_D 151:d565ce4d58c8 236 //WriteCon(Time);
Kovalev_D 157:1069c80f4944 237 sprintf((Time),"%d %d %d %d %d %d %d %d\r\n", Spi.DAC_B, temp9, Gyro.PlC_MaxD>>18, tempDac, flagmod, AD_MAX, Gyro.AD_Slow, k);//выдаем в терминал для постройки граффика регулировки периметра.
Kovalev_D 141:c6de20b9b483 238 WriteCon(Time);
Kovalev_D 157:1069c80f4944 239 }
Kovalev_D 157:1069c80f4944 240 }
Kovalev_D 141:c6de20b9b483 241
Kovalev_D 141:c6de20b9b483 242
Kovalev_D 141:c6de20b9b483 243
Kovalev_D 141:c6de20b9b483 244
Kovalev_D 141:c6de20b9b483 245 /*
Kovalev_D 157:1069c80f4944 246
Kovalev_D 116:66f1f0ff2dab 247 void PlcRegul(void) //Программа расчет напряжения для модулятора
Kovalev_D 116:66f1f0ff2dab 248 {
Kovalev_D 116:66f1f0ff2dab 249 int PLC_In;
Kovalev_D 116:66f1f0ff2dab 250
igor_v 127:6a7472d67804 251
igor_v 127:6a7472d67804 252 PLC_In = Gyro.AD_Slow; //выбираем даные для фильтрации
Kovalev_D 116:66f1f0ff2dab 253 // PLC_In = Gyro.AD_Fast;
Kovalev_D 128:1e4675a36c93 254 //или+,или-(знак)
Kovalev_D 128:1e4675a36c93 255 Gyro.PLC_Delta = PLC_In - Gyro.PLC_Old; // узнаем приращение
Kovalev_D 128:1e4675a36c93 256 // (знак) * (то на что инкрементировали цап)
Kovalev_D 128:1e4675a36c93 257 Gyro.PLC_DeltaADD = Gyro.PLC_Delta * Gyro.PLC_ADC_DOld; //приращение с учетом знака (и количества) прошлого приращения
Kovalev_D 128:1e4675a36c93 258 Gyro.PLC_Old = PLC_In; // запоминание значения
igor_v 127:6a7472d67804 259
Kovalev_D 128:1e4675a36c93 260 if(Gyro.RgConA&0x2) // если включон контур регулирования
Kovalev_D 157:1069c80f4944 261 {
Kovalev_D 140:1fbf117fc120 262 if (Gyro.PLC_Error2Mode > 0) {Gyro.PLC_Error2Mode --; Gyro.PLC_ADC_DOld = 0; } // если ошибка(нахожление в двух модовом)
Kovalev_D 128:1e4675a36c93 263 else if ( Gyro.PLC_Delta > (3000 * 65536)) {Spi.DAC_B += 2500; Gyro.PLC_Error2Mode = 5; Gyro.PLC_ADC_DOld = 0;} // проверка на двух модовость
Kovalev_D 128:1e4675a36c93 264 else if ( Gyro.PLC_Delta < (-3000 * 65536)) {Spi.DAC_B += 2500; Gyro.PLC_Error2Mode = 5; Gyro.PLC_ADC_DOld = 0;}
Kovalev_D 157:1069c80f4944 265
Kovalev_D 157:1069c80f4944 266 else if (Gyro.PLC_DeltaADD > 0)
igor_v 127:6a7472d67804 267 {
Kovalev_D 157:1069c80f4944 268
Kovalev_D 128:1e4675a36c93 269 // Gyro.PLC_ADC_DOld = (Gyro.PLC_DeltaADD /6553600 )+1;
Kovalev_D 128:1e4675a36c93 270 Gyro.PLC_ADC_DOld = 1;
igor_v 127:6a7472d67804 271 }
Kovalev_D 157:1069c80f4944 272 else if (Gyro.PLC_DeltaADD < 0)
igor_v 127:6a7472d67804 273 {
igor_v 127:6a7472d67804 274
Kovalev_D 128:1e4675a36c93 275 // Gyro.PLC_ADC_DOld = (Gyro.PLC_DeltaADD /6553600 )-1;
Kovalev_D 128:1e4675a36c93 276 Gyro.PLC_ADC_DOld = -1;
igor_v 127:6a7472d67804 277 }
igor_v 127:6a7472d67804 278 else
igor_v 127:6a7472d67804 279 {
Kovalev_D 128:1e4675a36c93 280 Gyro.PLC_ADC_DOld = 1;
igor_v 127:6a7472d67804 281 }
igor_v 127:6a7472d67804 282 }
Kovalev_D 157:1069c80f4944 283 else
igor_v 127:6a7472d67804 284 {
Kovalev_D 128:1e4675a36c93 285 Gyro.PLC_Error2Mode = 1; Gyro.PLC_DeltaADD = 0;
igor_v 127:6a7472d67804 286 }
Kovalev_D 157:1069c80f4944 287
Kovalev_D 157:1069c80f4944 288
Kovalev_D 141:c6de20b9b483 289 Spi.DAC_B += Gyro.PLC_ADC_DOld * 16;
Kovalev_D 157:1069c80f4944 290
Kovalev_D 157:1069c80f4944 291
Kovalev_D 128:1e4675a36c93 292 if ( Spi.DAC_B < 1000 ) {Spi.DAC_B = 32000; Gyro.PLC_Error2Mode = 5; Gyro.PLC_DeltaADD = 0;}
Kovalev_D 128:1e4675a36c93 293 if ( Spi.DAC_B > 63000 ) {Spi.DAC_B = 32000; Gyro.PLC_Error2Mode = 5; Gyro.PLC_DeltaADD = 0;}
Kovalev_D 157:1069c80f4944 294
Kovalev_D 141:c6de20b9b483 295 if(Gyro.LogPLC==1)
Kovalev_D 141:c6de20b9b483 296 {
Kovalev_D 157:1069c80f4944 297 sprintf((Time),"%d %d %d %d %d %d\r\n", Spi.DAC_B, temp9,flagmod, AD_MAX, Gyro.AD_Slow, k);//выдаем в терминал для постройки граффика регулировки периметра.
Kovalev_D 157:1069c80f4944 298 WriteCon(Time);
Kovalev_D 141:c6de20b9b483 299 }
Kovalev_D 157:1069c80f4944 300
Kovalev_D 128:1e4675a36c93 301 }
Kovalev_D 116:66f1f0ff2dab 302
Kovalev_D 116:66f1f0ff2dab 303
Kovalev_D 141:c6de20b9b483 304 */
Kovalev_D 157:1069c80f4944 305 void PlcRegul_old(void) // на всякий случай
Kovalev_D 112:4a96133a1311 306 {
Kovalev_D 157:1069c80f4944 307 int Delta;
Kovalev_D 157:1069c80f4944 308
Kovalev_D 157:1069c80f4944 309 ADD_AMP+=Spi.ADC5;
Kovalev_D 157:1069c80f4944 310 Count_AMP++;
Kovalev_D 157:1069c80f4944 311 if(Count_AMP>=(32*32+8)) {
Kovalev_D 157:1069c80f4944 312 Delta = ADD_AMP - Cur_Amp;
Kovalev_D 157:1069c80f4944 313
Kovalev_D 157:1069c80f4944 314 if(Gyro.RgConA&0x2) {
Kovalev_D 157:1069c80f4944 315 if (Znak_Amp > 1) {
Kovalev_D 157:1069c80f4944 316 Znak_Amp --;
Kovalev_D 157:1069c80f4944 317 } else if ( Delta > 30000000 ) {
Kovalev_D 157:1069c80f4944 318 AD_Regul += 5000000;
Kovalev_D 157:1069c80f4944 319 Znak_Amp = 5;
Kovalev_D 157:1069c80f4944 320 } else if ( Delta < (-3000000)) {
Kovalev_D 157:1069c80f4944 321 AD_Regul += 5000000;
Kovalev_D 157:1069c80f4944 322 Znak_Amp = 5;
Kovalev_D 157:1069c80f4944 323 } else if ((Delta * Znak_Amp) > 0) {
Kovalev_D 157:1069c80f4944 324 Znak_Amp = 1;
Kovalev_D 157:1069c80f4944 325 AD_Regul -= (Delta * Znak_Amp * 10);
Kovalev_D 157:1069c80f4944 326 } else {
Kovalev_D 157:1069c80f4944 327 Znak_Amp = -1;
Kovalev_D 157:1069c80f4944 328 AD_Regul -= (Delta * Znak_Amp * 10);
Kovalev_D 157:1069c80f4944 329 }
Kovalev_D 157:1069c80f4944 330
Kovalev_D 157:1069c80f4944 331 Spi.DAC_B = (AD_Regul + 0x1fffffff)/65536;
Kovalev_D 157:1069c80f4944 332 }
Kovalev_D 157:1069c80f4944 333 Cur_Amp=ADD_AMP;
Kovalev_D 157:1069c80f4944 334 Count_AMP=0;
Kovalev_D 157:1069c80f4944 335 ADD_AMP=0;
Kovalev_D 157:1069c80f4944 336 }
Kovalev_D 157:1069c80f4944 337
igor_v 110:6406b7ac0442 338 }
igor_v 110:6406b7ac0442 339
igor_v 110:6406b7ac0442 340
Kovalev_D 116:66f1f0ff2dab 341
Kovalev_D 116:66f1f0ff2dab 342
Kovalev_D 112:4a96133a1311 343 void DAC_OutPut(void)//выдача в цапы
igor_v 0:8ad47e2b6f00 344 {
Kovalev_D 157:1069c80f4944 345 LPC_SSP0->DR=0x5555;
igor_v 31:c783288001b5 346 LPC_SSP0->DR=0x5555;
igor_v 31:c783288001b5 347 LPC_SSP0->DR=0x5555;
igor_v 0:8ad47e2b6f00 348
igor_v 110:6406b7ac0442 349 if (CountV31 & 1) { //если нечетный такт то
igor_v 31:c783288001b5 350 LPC_SSP0->DR = WRITE_DAC0; //e.команда для ЦАП_0 передавать.
igor_v 31:c783288001b5 351 LPC_SSP0->DR = (Spi.DAC_A); //e. передача 12 бит
Kovalev_D 157:1069c80f4944 352 } else { //если такт четный.
Kovalev_D 157:1069c80f4944 353 LPC_SSP0->DR = WRITE_DAC1 ; //e.команда для ЦАП_1 передавать.
Kovalev_D 157:1069c80f4944 354
Kovalev_D 157:1069c80f4944 355 switch( Gyro.StrayPLC_flag) {
Kovalev_D 157:1069c80f4944 356
Kovalev_D 157:1069c80f4944 357 case 0://режим без воздействия
Kovalev_D 157:1069c80f4944 358 LPC_SSP0->DR = (Spi.DAC_B);
Kovalev_D 157:1069c80f4944 359 temp9=Spi.DAC_B;
Kovalev_D 157:1069c80f4944 360 break;
Kovalev_D 157:1069c80f4944 361
Kovalev_D 157:1069c80f4944 362 case 1://малое воздействие +
Kovalev_D 157:1069c80f4944 363 temp9=Spi.DAC_B + Gyro.StrayPLC_Pls;
Kovalev_D 157:1069c80f4944 364 LPC_SSP0->DR = temp9;
Kovalev_D 157:1069c80f4944 365 break;
Kovalev_D 157:1069c80f4944 366
Kovalev_D 157:1069c80f4944 367 case 3://малое воздействие -
Kovalev_D 157:1069c80f4944 368 temp9=Spi.DAC_B + Gyro.StrayPLC_Mns;
Kovalev_D 157:1069c80f4944 369 LPC_SSP0->DR = temp9;
Kovalev_D 157:1069c80f4944 370 break;
Kovalev_D 157:1069c80f4944 371
Kovalev_D 157:1069c80f4944 372 case 2://большое воздействие +
Kovalev_D 157:1069c80f4944 373 temp9=Spi.DAC_B + Gyro.StrayPLC_2Mode;
Kovalev_D 157:1069c80f4944 374 LPC_SSP0->DR = temp9;//вгоняем в многомодовый режим
Kovalev_D 157:1069c80f4944 375 break;
Kovalev_D 157:1069c80f4944 376
Kovalev_D 157:1069c80f4944 377 }
Kovalev_D 157:1069c80f4944 378 // LPC_SSP0->DR = Spi.DAC_B; //e. передача 12 бит
Kovalev_D 157:1069c80f4944 379
igor_v 31:c783288001b5 380 }
Kovalev_D 112:4a96133a1311 381 }
Kovalev_D 112:4a96133a1311 382
Kovalev_D 112:4a96133a1311 383
Kovalev_D 113:8be429494918 384
Kovalev_D 113:8be429494918 385
Kovalev_D 113:8be429494918 386
Kovalev_D 113:8be429494918 387
Kovalev_D 113:8be429494918 388
Kovalev_D 113:8be429494918 389
Kovalev_D 113:8be429494918 390
Kovalev_D 113:8be429494918 391
Kovalev_D 113:8be429494918 392
Kovalev_D 113:8be429494918 393
Kovalev_D 113:8be429494918 394
Kovalev_D 113:8be429494918 395
Kovalev_D 113:8be429494918 396
Kovalev_D 113:8be429494918 397
Kovalev_D 113:8be429494918 398
Kovalev_D 113:8be429494918 399
Kovalev_D 113:8be429494918 400
Kovalev_D 113:8be429494918 401
Kovalev_D 113:8be429494918 402
Kovalev_D 113:8be429494918 403
Kovalev_D 113:8be429494918 404
Kovalev_D 113:8be429494918 405
Kovalev_D 113:8be429494918 406
Kovalev_D 113:8be429494918 407
Kovalev_D 113:8be429494918 408
Kovalev_D 113:8be429494918 409
Kovalev_D 113:8be429494918 410
Kovalev_D 113:8be429494918 411
Kovalev_D 113:8be429494918 412 /*
Kovalev_D 112:4a96133a1311 413 void SPI_Exchange(void)
Kovalev_D 112:4a96133a1311 414 {
Kovalev_D 112:4a96133a1311 415 unsigned int DummySPI;
Kovalev_D 157:1069c80f4944 416
Kovalev_D 112:4a96133a1311 417
Kovalev_D 112:4a96133a1311 418 Spi.ADC5 = LPC_SSP0->DR;
Kovalev_D 112:4a96133a1311 419 Spi.ADC4 = LPC_SSP0->DR;
Kovalev_D 112:4a96133a1311 420 Spi.ADC3 = LPC_SSP0->DR;
Kovalev_D 112:4a96133a1311 421 Spi.ADC2 = LPC_SSP0->DR;
Kovalev_D 112:4a96133a1311 422 Spi.ADC1 = LPC_SSP0->DR;
Kovalev_D 112:4a96133a1311 423
Kovalev_D 112:4a96133a1311 424 Input.ArrayIn[2]= Spi.ADC5;
Kovalev_D 157:1069c80f4944 425
Kovalev_D 112:4a96133a1311 426 DAC_OutPut();
igor_v 0:8ad47e2b6f00 427
Kovalev_D 99:3d8f206ceac2 428 // LPC_DAC->CR = (((SinPLC[CountV64]*35/5)+24300));// модулятор
Kovalev_D 112:4a96133a1311 429
Kovalev_D 89:a0d344db227e 430 while (LPC_SSP0->SR & RX_SSP_notEMPT) //если буфер SPI не пуст.
Kovalev_D 89:a0d344db227e 431 DummySPI = LPC_SSP0->DR; //очистить буфер.
igor_v 31:c783288001b5 432
Kovalev_D 112:4a96133a1311 433 //заполнение буферов еденичных значений АЦП.
Kovalev_D 157:1069c80f4944 434 Buff_ADC_1 [CountV31] = Spi.ADC1;
Kovalev_D 112:4a96133a1311 435 Buff_ADC_2 [CountV31] = Spi.ADC2;
Kovalev_D 112:4a96133a1311 436 Buff_ADC_3 [CountV31] = Spi.ADC3;
Kovalev_D 112:4a96133a1311 437 Buff_ADC_4 [CountV31] = Spi.ADC4;
Kovalev_D 95:dd51e577e114 438 Buff_ADC_5 [CountV255] = Spi.ADC5; // ампл ацп.
igor_v 110:6406b7ac0442 439
Kovalev_D 157:1069c80f4944 440
igor_v 110:6406b7ac0442 441 Temp_AMP64P += Buff_ADC_5[CountV255];
Kovalev_D 96:1c8536458119 442 Temp_AMP64P -= Buff_ADC_5[(CountV255-64) & 0xff]; // заполнение буфера накопленых приращений за 8 тактов
Kovalev_D 96:1c8536458119 443 Buff_AMP64P[CountV255] = (unsigned int) (Temp_AMP64P);
Kovalev_D 96:1c8536458119 444
igor_v 31:c783288001b5 445
Kovalev_D 47:d902ef6f7564 446 Temp_ADC_2 += Buff_ADC_2[CountV31];
Kovalev_D 47:d902ef6f7564 447 Temp_ADC_2 -= Buff_ADC_2[(CountV31-32) & 0xff];
igor_v 31:c783288001b5 448
Kovalev_D 47:d902ef6f7564 449 Temp_ADC_3 += Buff_ADC_3[CountV31];
Kovalev_D 95:dd51e577e114 450 Temp_ADC_3 -= Buff_ADC_3[(CountV31-32) & 0xff];
igor_v 31:c783288001b5 451
Kovalev_D 47:d902ef6f7564 452 Temp_ADC_4 += Buff_ADC_4[CountV31];
Kovalev_D 47:d902ef6f7564 453 Temp_ADC_4 -= Buff_ADC_4[(CountV31-32) & 0xff];
igor_v 31:c783288001b5 454
igor_v 31:c783288001b5 455 Temp_ADC_5 += Buff_ADC_1[CountV255];
igor_v 31:c783288001b5 456 Temp_ADC_5 -= Buff_ADC_1[(CountV255-32) & 0xff];
Kovalev_D 112:4a96133a1311 457 Spi.PLC_NewData=1;
Kovalev_D 113:8be429494918 458 }*/