Dmitry Kovalev / Mbed 2 deprecated LG2

fork

Dependencies:   mbed

Fork of LG by igor Apu

SPI.c@188:4c523cc373cc, 2016-08-19 (annotated)

Committer:
Kovalev_D
Date:
Fri Aug 19 14:02:02 2016 +0000
Revision:
188:4c523cc373cc
Parent:
179:2b4e6bc277df
Child:
189:8a16378724c4
hhh

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