Мультиаквариумная протока (практика)

.....................................
// протока ( stream ), можно хранить в RAM RTC
volatile unsigned char strMODE = 0;
volatile unsigned int strCLOCK = 0;
.....................................
//
// *************************************************************************************
// ***** STREAM_MACRO_FUNCTION *****
//
// Специализированная макрофункция, предназначенная для реализации мультиаквариумной протоки на основе ГА и термосервоприводов
// Автономная макрофункция использующая от 3 до 5 реле и от 1 до 4 датчиков + датчик ГА (при необходимости)
// Датчики аквариумов можно запараллелить (монтажное ИЛИ) на один вход и блокировать (response) реле IN!
// Тем самым будет работать продувка при переполнении, но наполняться по новой не будет ни один из аквариумов, пока уровень воды не придет в норму.
//
// также следит за временем (пропуски часов) и дней недели (пропуски дней)
//
// strMODE - текущее состояние протоки
// старший бит (b7) указывает был ли сброс контроллера в процессе работы или нет ( 0 - сброс ), тем самым включая режим "ПРОДУВКА"
// биты b5 и b4 указывают на текущий аквариум
// три младших бита (b2, b1, b0) рабочий цикл на один аквариум
// 000 - закрыть AQUA_ALL; & OUTPUT (задержка для переключения вентиля)
// 001 - открыть INPUT (задержка для переключения вентиля)
// 010 - задержка для наполнения ГА
// 011 - закрыть INPUT (задержка для переключения вентиля)
// 100 - открыть AQUA_X (задержка для переключения вентиля)
// 101 - задержка для перекачки из ГА в аквариум
// 110 - открыть OUTPUT (задержка для переключения вентиля)
// 111 - задержка для слива из аквариума в канализацию
// биты b6 и b3 игнорируются, всегда 0
//
// strCLOCK - счетчик времени (задержек) переключений вентилей и наполнения/слива воды
//
// Если протока работает с 1 аквариумом, то вентиль подачи воды в аквариум подключается к RELAY_STREAM_AQA,
// RELAY_STREAM_AQA в свою очередь, всегда подключено к фазе (L) через NC (НЗ) контакт RELAY_STREAM_IN (защита от одновременного открытия!)
// Если протока обслуживает 2 аквариума, то дополнительно используется RELAY_STREAM_12, его можно подключить последовательно с RELAY_STREAM_AQA
// тем самым собрав мультиплексор на два канала ( NC -> 1 aqa, NO -> 2 aqa ).
// Если протока обслуживает 3 или 4 аквариума, то добавляется еще RELAY_STREAM_34, вентили подключаются к RELAY_STREAM_34 со стороны нуля (N).
// Т.о. общая схема выглядит так:
// L(~220V) -> RELAY_STREAM_IN - NC -> RELAY_STREAM_AQA - NC -> 1 AQA -> RELAY_STREAM_34 - NC -> N(~220V)
// .. - NO -> INPUT .. - NC -> 3 AQA -> .. - NO
// .. - NO -> 2 AQA -> .. - NC
// .. - NO -> 4 AQA -> .. - NO
// RELAY_STREAM_OUT - независимый вентиль!
//
void STREAM_MACRO_FUNCTION( unsigned char aHours, unsigned char aDayOfWeek )
{ // кол-во аквариумов на протоке ( 0 в младшей тетраде - протока отключена )
unsigned char strSetCount = EEPROM_MajorityRead( STREAM_SET_COUNT );
// если не нуль и не 0xFF, то макрофункция активна ( младшая тетрада: номер, старшая: настройки )
// блокируем реле для работы (выше приоритет!)
// если в младшей тетраде 0, то хоть протока и НЕ будет работать, но три базовых реле будут блокированы и ВЫКЛЮЧЕНЫ!
// можно использовать как принудительное выключение протоки для профилактики и т.п.
switch ( strSetCount & 0x0F ) {
case 0: { setRELAY_Off( RELAY_STREAM_IN );
setRELAY_Off( RELAY_STREAM_AQA );
setRELAY_Off( RELAY_STREAM_OUT );
SharedSMF |= SHARED_STREAM; return; } // протока блокирована (базовые реле), и выключена
case 1: { SharedSMF |= SHARED_STREAM; break; }
case 2: { SharedSMF |= SHARED_STREAM_TWO; break; }
case 3:
case 4: { SharedSMF |= SHARED_STREAM_FOUR; break; }
default: { SharedSMF &= ~ SHARED_STREAM_FOUR; return; } // протока отключена, сбрасываем блокировку и ни чего не делаем.
} // switch
// проверяем нужно ли что-то делать в текущем дне недели ТОЛЬКО для МОДЕ 1 !!!
// в aDayOfWeek дни недели хранятся аналогично, т.е. выставляется ОДИН из битов с 0 по 6!
if ( ( aDayOfWeek & EEPROM_MajorityRead( STREAM_DAYS_OF_WEEK ) ) == 0 ) return; // если нет такого дня, то ни чего не делаем
// Нормальный режим
if ( strMODE & 0x80 )
{
switch ( strMODE & 0x07 ) {
// исходное, закрыть все аквариумы и слив в канализацию, ждем закрытия вентилей
case 0: { if ( strCLOCK == 0 )
{
setRELAY_Off( RELAY_STREAM_AQA ); // all aqa!
setRELAY_Off( RELAY_STREAM_OUT );
strCLOCK = EEPROM_MajorityRead( STREAM_SWITCHING_TIME ) * 2; // до ~ 8,5 минут
}
else
{
strCLOCK --;
if ( strCLOCK == 0 ) // если досчитали до конца
{ // проверяем пропуски часов! в режиме продувки, проверки нет, она обязательна!
// также проверяется только текущий час и только при новом запуске цикла ( mode 0 -> mode 1 ),
// т.е. даже если час стоит в пропуске, цикл будет завершен!
// 24 часа -> STREAM_SKIP_HOURS_A, STREAM_SKIP_HOURS_B, STREAM_SKIP_HOURS_C
// бит сброшен (0) - час НЕ активен! allways mode 0
if ( aHours { // 0..7, если час активен (1), то следующий режим
if ( ( aHours & 0x07 ) & EEPROM_MajorityRead( STREAM_SKIP_HOURS_A ) ) strMODE = ( strMODE + 1 ) & 0xB7;
}
else if ( aHours { // 8..15, если час активен (1), то следующий режим
if ( ( aHours & 0x07 ) & EEPROM_MajorityRead( STREAM_SKIP_HOURS_B ) ) strMODE = ( strMODE + 1 ) & 0xB7;
}
else
{ // 16..23, если час активен (1), то следующий режим
if ( ( aHours & 0x07 ) & EEPROM_MajorityRead( STREAM_SKIP_HOURS_C ) ) strMODE = ( strMODE + 1 ) & 0xB7;
}
}
}
break; }
// открываем вентиль ХВС для наполнения ГА, ждем открытия вентиля
case 1: { if ( strCLOCK == 0 )
{
setRELAY_On( RELAY_STREAM_IN );
strCLOCK = EEPROM_MajorityRead( STREAM_SWITCHING_TIME ) * 2; // до ~ 8,5 минут
}
else
{
strCLOCK --;
if ( strCLOCK == 0 ) strMODE = ( strMODE + 1 ) & 0xB7; // если досчитали до конца, то следующий режим
}
break; }
// ждем наполнения ГА
case 2: { if ( strCLOCK == 0 )
{ // ни чего не делаем, просто ждем
strCLOCK = EEPROM_MajorityRead( STREAM_INPUT_TIME ) * 8; // до ~ 34 минут
}
else
{
strCLOCK --;
if ( strCLOCK == 0 ) strMODE = ( strMODE + 1 ) & 0xB7; // если досчитали до конца, то следующий режим
}
break; }
// ГА наполнен, закрываем вентиль на входе, ждем закрытия вентиля, проверяем (если активен датчик) уровень наполнения ГА
case 3: { if ( strCLOCK == 0 )
{
setRELAY_Off( RELAY_STREAM_IN );
strCLOCK = EEPROM_MajorityRead( STREAM_SWITCHING_TIME ) * 2; // до ~ 8,5 минут
// датчик ГА НЕ реализован!
}
else
{
strCLOCK --;
if ( strCLOCK == 0 ) strMODE = ( strMODE + 1 ) & 0xB7; // если досчитали до конца, то следующий режим
}
break; }
// открываем вентиль в аквариум (определяем в какой), ждем открытия вентиля
case 4: { if ( strCLOCK == 0 )
{ // сколько аквариумов?
switch ( strSetCount & 0x0F ) {
// два аквариума
case 2: { if ( strMODE & 0x10 ) setRELAY_On( RELAY_STREAM_12 ); // №2
else setRELAY_Off( RELAY_STREAM_12 ); // №1
break; }
// три аквариума
case 3: { switch ( strMODE & 0x30 ) {
case 0: { setRELAY_Off( RELAY_STREAM_12 );
setRELAY_Off( RELAY_STREAM_34 ); // №1
break; }
case 1: { setRELAY_On( RELAY_STREAM_12 );
setRELAY_Off( RELAY_STREAM_34 ); // №2
break; }
case 2: { setRELAY_Off( RELAY_STREAM_12 );
setRELAY_On( RELAY_STREAM_34 ); // №3
break; }
case 3: { strMODE &= 0xCF; // сбросили на первый аквариум!
setRELAY_Off( RELAY_STREAM_12 );
setRELAY_Off( RELAY_STREAM_34 ); // №1
break; }
default: ; } // switch
break; }
// четыре аквариума
case 4: { switch ( strMODE & 0x30 ) {
case 0: { setRELAY_Off( RELAY_STREAM_12 );
setRELAY_Off( RELAY_STREAM_34 ); // №1
break; }
case 1: { setRELAY_On( RELAY_STREAM_12 );
setRELAY_Off( RELAY_STREAM_34 ); // №2
break; }
case 2: { setRELAY_Off( RELAY_STREAM_12 );
setRELAY_On( RELAY_STREAM_34 ); // №3
break; }
case 3: { setRELAY_On( RELAY_STREAM_12 );
setRELAY_On( RELAY_STREAM_34 ); // №4
break; }
default: ; } // switch
break; }
default: ; // для одного аквариума в протоке достаточно RELAY_STREAM_AQA
} // switch
setRELAY_On( RELAY_STREAM_AQA ); // окрыли основной вентиль подачи в аквариумы
strCLOCK = EEPROM_MajorityRead( STREAM_SWITCHING_TIME ) * 2; // до ~ 8,5 минут
}
else
{
strCLOCK --;
if ( strCLOCK == 0 ) strMODE = ( strMODE + 1 ) & 0xB7; // если досчитали до конца, то следующий режим
}
break; }
// ждем пока вода перетекает из ГА в аквариум, следим за датчиком в аквариуме (если активен) !
case 5: { if ( strCLOCK == 0 )
{ // ни чего не делаем, просто ждем
strCLOCK = EEPROM_MajorityRead( STREAM_AQUA_TIME ) * 8; // до ~ 34 минут
}
else
{ // датчик уровня см. EVENTS MAP (реализация конечного автомата)
strCLOCK --;
if ( strCLOCK == 0 ) strMODE = ( strMODE + 1 ) & 0xB7; // если досчитали до конца, то следующий режим
}
break; }
// открываем вентиль слива в канализацию, ждем открытия вентиля (ждать не обязательно, но пускай будет как везде)
case 6: { if ( strCLOCK == 0 )
{
setRELAY_On( RELAY_STREAM_OUT );
strCLOCK = EEPROM_MajorityRead( STREAM_SWITCHING_TIME ) * 2; // до ~ 8,5 минут
}
else
{
strCLOCK --;
if ( strCLOCK == 0 ) strMODE = ( strMODE + 1 ) & 0xB7; // если досчитали до конца, то следующий режим
}
break; }
// ждем слива излишка из аквариума в канализацию
case 7: { if ( strCLOCK == 0 )
{ // ни чего не делаем, просто ждем
strCLOCK = EEPROM_MajorityRead( STREAM_OUTPUT_TIME ) * 16; // до ~ 68 минут
}
else
{
strCLOCK --;
if ( strCLOCK == 0 ) strMODE = ( strMODE + 0x11 ) & 0xB7; // цикл по новый и следующий аквариум!
}
break; }
default: ;
} // switch НОРМАЛЬНЫЙ РЕЖИМ
} // work end
else
// *** ПРОДУВКА ***
{
switch ( strMODE & 0x07 ) {
// исходное, закрыть все аквариумы и открыть слив в канализацию
case 0: { if ( strCLOCK == 0 )
{
setRELAY_Off( RELAY_STREAM_IN );
setRELAY_Off( RELAY_STREAM_AQA ); // all aqa!
setRELAY_On( RELAY_STREAM_OUT ); // открыли на постоянку!
strCLOCK = EEPROM_MajorityRead( STREAM_SWITCHING_TIME ) * 2; // до ~ 8,5 минут
}
else
{
strCLOCK --;
if ( strCLOCK == 0 ) strMODE = ( strMODE + 4 ) & 0xB7; // если досчитали до конца, то следующий режим
}
break; }
// открываем вентиль в аквариум (определяем в какой), ждем открытия вентиля
case 4: { if ( strCLOCK == 0 )
{ // сколько аквариумов?
switch ( strSetCount & 0x0F ) {
// два аквариума
case 2: { if ( strMODE & 0x10 ) setRELAY_On( RELAY_STREAM_12 ); // №2
else setRELAY_Off( RELAY_STREAM_12 ); // №1
break; }
// три аквариума
case 3: { switch ( strMODE & 0x30 ) {
case 0: { setRELAY_Off( RELAY_STREAM_12 );
setRELAY_Off( RELAY_STREAM_34 ); // №1
break; }
case 1: { setRELAY_On( RELAY_STREAM_12 );
setRELAY_Off( RELAY_STREAM_34 ); // №2
break; }
case 2: { setRELAY_Off( RELAY_STREAM_12 );
setRELAY_On( RELAY_STREAM_34 ); // №3
break; }
case 3: { strMODE &= 0xCF; // сбросили на первый аквариум!
setRELAY_Off( RELAY_STREAM_12 );
setRELAY_Off( RELAY_STREAM_34 ); // №1
break; }
default: ; } // switch
break; }
// четыре аквариума
case 4: { switch ( strMODE & 0x30 ) {
case 0: { setRELAY_Off( RELAY_STREAM_12 );
setRELAY_Off( RELAY_STREAM_34 ); // №1
break; }
case 1: { setRELAY_On( RELAY_STREAM_12 );
setRELAY_Off( RELAY_STREAM_34 ); // №2
break; }
case 2: { setRELAY_Off( RELAY_STREAM_12 );
setRELAY_On( RELAY_STREAM_34 ); // №3
break; }
case 3: { setRELAY_On( RELAY_STREAM_12 );
setRELAY_On( RELAY_STREAM_34 ); // №4
break; }
default: ; } // switch
break; }
default: ; // для одного аквариума в протоке достаточно RELAY_STREAM_AQA
} // switch
setRELAY_On( RELAY_STREAM_AQA ); // окрыли основной вентиль подачи в аквариумы
strCLOCK = EEPROM_MajorityRead( STREAM_SWITCHING_TIME ) * 2; // до ~ 8,5 минут
}
else
{
strCLOCK --;
if ( strCLOCK == 0 ) strMODE = ( strMODE + 3 ) & 0xB7; // если досчитали до конца, то следующий режим
}
break; }
// ждем слива излишка из аквариума в канализацию
case 7: { if ( strCLOCK == 0 )
{ // ни чего не делаем, просто ждем
strCLOCK = EEPROM_MajorityRead( STREAM_OUTPUT_TIME ) * 16; // до ~ 68 минут
}
else
{ // за датчиками не следим, но стоит подумать об этом!
strCLOCK --;
if ( strCLOCK == 0 )
// сколько аквариумов?
switch ( strSetCount & 0x0F ) {
case 1: { // один аквариум - один цикл
strMODE = 0x80; // ПРОДУВКА окончена, в рабочий режим
break; }
// два аквариума
case 2: { // это был второй аквариум?
if ( strMODE & 0x10 ) strMODE = 0x80; // ПРОДУВКА окончена, в рабочий режим
else strMODE = ( strMODE + 0x11 ) & 0xB7; // цикл по новый и следующий аквариум!
break; }
// три аквариума
case 3: { // третий?
if ( ( strMODE & 0x30 ) == 0x20 ) strMODE = 0x80; // ПРОДУВКА окончена, в рабочий режим
else strMODE = ( strMODE + 0x11 ) & 0xB7; // цикл по новый и следующий аквариум!
break; }
// четыре аквариума
default: { // четвертый?
if ( ( strMODE & 0x30 ) == 0x30 ) strMODE = 0x80; // ПРОДУВКА окончена, в рабочий режим
else strMODE = ( strMODE + 0x11 ) & 0xB7; // цикл по новый и следующий аквариум!
break; }
} // switch
} // else
break; }
default: strMODE & 0; // если сбой, все с начала.
} // switch ПРОДУВКА
} // ПРОДУВКА end
}