Многоканальный Dimmer, работающий в фоновом режиме

[kang2k]

Сообщение от Admin

Да нет все верно, это симистор


Только в одну сторону

Оптопару проверил. При подключении через резистор 300ом к 5в, открывается нормально...
Тут посидел, посчитал, а не великоваты ли резисторы на 43K ? Может просто тока не хватает открыться ?

[Admin]

Упс, извиняюсь я на другую оптопару смотрел.
PC814 должна звониться в обе стороны

[kang2k]

В общем действительно оказалась "кривая" оптопара... Почему то, при 5в открывается, а на 220в не хочет.... Поменял, с теми же резисторами по ~42.6K все отлично работает...
Спасибо админу....

[Dmti]

Всем здравствуйте. Выкладываю так для разнообразия когда то писал для меги8 отлаживал на ардуино 2560 нужно было использовать минимум процессорного времени. Скетч был написан чисто только для отладки. Может каму будет интересно.

#include <avr/io.h>
#include <avr/interrupt.h>

//**************************************** ******************************
#define synh PD0 //ВХОД синхро импульс перехода через 0 прерывание INT0
#define tir PB7 //ВЫХОД импульс упровление симистором 13 со светодиодом
volatile unsigned int tcntValue;//время после которого срабатывает таймер
volatile unsigned int tcnt, pause;//время через которое закроется тиристор
int min = 23; int max = 1024; int Pressure = 3;
//**************************************** ******************************
ISR(INT0_vect) // Функция обработки прерывания INT0
{
// настраиваем делитель таймера
TCCR1A = Pressure;
//выставляем начальное значение таймера
OCR1A = tcntValue;//Через сколько тиков включить
OCR1B = tcnt; //через сколько выключить
TCNT1 = 0; //обновляем счет тиков
}

//**************************************** ******************************
//Тайме первый цикл включает второй выключает тиристор
ISR (TIMER1_COMPA_vect)
{
PORTB |= ( 1 << tir); //включаем тиристор
}
ISR (TIMER1_COMPB_vect)
{
PORTB &=~ ( 1 << tir); //выключаем тиристор
OCR1A = OCR1B = 0;// и останавливаем таймер
}

//**************************************** ******************************
void setup() {
pinMode(3, OUTPUT);
analogWrite(3,10);
tcntValue = 10;
pause = 5;
tcnt = tcntValue + pause;
//---------------------------//настраиваем порты для управлением симистора
DDRB = ( 1 << tir ); //настраиваем tir на выход
PORTB &= ~( 1 << tir ); //гасим светодиод
DDRD &= ~_BV(synh); //вход детектора нуля INT0
PORTD |= _BV(synh); //с подтягивающим резистором для питания транзистора оптрона

//---------------------------//Запрещаем прерывание глобально
cli();
//---------------------------//настраиваем внешнее прерывание
EIMSK &= ~ (1 << INT0); //Запретить прерывание
EICRA &= ~ (1 << ISC00) | (1 << ISC01); //Обнуляем биты ISC00 и ISC01 в регистре EICRA
EICRA |= 2; //и включаем сработку по фронту
EIMSK |= (1 << INT0); //разрешаем внешнее прерывание 0

//---------------------------//настраиваем прерывание на таймер
TCCR1B = Pressure; //настраиваем делитель на 8 (1тик=0.5мкс 20мс=400тиков)
SREG |= (1<<7); // Глобальное разрешение прерываний.
TIMSK1 |= (1<<OCIE1A) | (1<<OCIE1B); //включаем компаратор А и В

//---------------------------//Разрешаем прерывание глобально
sei();
Serial.begin(9600);
}

//**************************************** ******************************
void loop() {
tcntValue = analogRead(A0);
if(tcntValue > max) tcntValue = max;
if(tcntValue < min) tcntValue = min;
tcnt = tcntValue + pause;
Serial.print(tcntValue);
Serial.print(" == ");
Serial.println(tcnt);
}

[Admin]

Сообщение от Dmti

Всем здравствуйте. Выкладываю так для разнообразия когда то писал для меги8 отлаживал на ардуино 2560 нужно было использовать минимум процессорного времени. Скетч был написан чисто только для отладки. Может каму будет интересно.

Спасибо! Часто спрашивают для Меги

[Zangez]

Добрый вечер.

Скопировал скетч , при компиляции ругается :

In file included from sketch_nov09a.ino:1:
C:\Users\Home\Documents\Arduino\librarie s\CyberLib/CyberLib.h:1: error: stray '\357' in program
C:\Users\Home\Documents\Arduino\librarie s\CyberLib/CyberLib.h:1: error: stray '\273' in program
C:\Users\Home\Documents\Arduino\librarie s\CyberLib/CyberLib.h:1: error: stray '\277' in program

Не могу понять в чем дело. Подскажите куда копать ?

273 #define D22_In DDRA &=B11111110 // PA 0 D22
277 #define D26_In DDRA &=B11101111 // PA 4 D26
357 #define D46_Out DDRL |=B00001000 // PL 3 D46


пробовал закомментировать, не помогло.

[Admin]

Еще бы понять какая у Вас ардуина?

[Zangez]

Сообщение от Admin

Еще бы понять какая у Вас ардуина?

Звиняюсь, Ардуино Nano v.3

Ранее работал на win-Xp , все было исправно, но ноутбук приказал долго жить, перешел на win7-64bit.

[Admin]

А библиотека CybrLib добавлена?

[VasiaV]

Попробовал программу Dmti не работает моргает лампочка беспорядочно почему не пойму. Раз моргает значит прерывание срабатывает и тиристор открывается и закрывается а плавно не регулирует. Программировать только начал а тут и записи не совсем понятные. Dmti помоги почему плавно не регулирует