Ещё онда лампа настроения на Arduino

HWman
HWman аватар
Offline
Зарегистрирован: 26.02.2013

Собственно выглядит вот так:

http://youtu.be/y72eTvOTfWE

Код взял отсюда, в целом выглядит неплохо.

На видео конечно не Arduino а Stellaris Launchpad (который междупрочим сейчас по 8 долларов продают), у меня просто нету RGB светодиода.

Единственое замечание - мало красного, постоянно то малиновый то фиолетовый, чтобы просто красный ещё невидел.
Есть идея сделать подсветку для аквариума из RGB светодиодной ленты и АТмеги8.

Знаю под меги есть поректы которые больше продуманы, но я делал пот Stellaris, отличное начало.

PS такие параметры как  int color,i,value,time=100; и  delay(3000); я сразу поправил под себя.

maksim
Offline
Зарегистрирован: 12.02.2012

Попросите администрацию еще и название темы исправить.

Клапауций
Offline
Зарегистрирован: 10.02.2013

HWman пишет:

Есть идея сделать подсветку для аквариума из RGB светодиодной ленты и АТмеги8.

Если не желаете сломать обитателям аквариума вегетативные циклы, то не рекомендую - нужно искать правильные люминисцентные трубки с правильным спектром на сайтах продавцов аквариумного оборудования.

HWman
HWman аватар
Offline
Зарегистрирован: 26.02.2013

Клапауций пишет:

Если не желаете сломать обитателям аквариума вегетативные циклы, то не рекомендую - нужно искать правильные люминисцентные трубки с правильным спектром на сайтах продавцов аквариумного оборудования.

Незнал.

msng
Offline
Зарегистрирован: 07.06.2012

а чем плохи диоды для аквариума? читал в форумах многие делают светодиодную подсветку для аквариумов (в т.ч. и морских), белыми+синими+красными+УФ диодами

дома аквариум подсвечиваю диодами (белый+синий+красный),  напрямую без ШИМ, просто по времени дунька зажигает, есть задумка добавить шим и УФ диодов, на ночь сделать синюю луну. только у меня подсветка не лентами, а трехватными диодами.

Клапауций
Offline
Зарегистрирован: 10.02.2013

msng пишет:
а чем плохи диоды для аквариума? читал в форумах многие делают светодиодную подсветку для аквариумов (в т.ч. и морских), белыми+синими+красными+УФ диодами

Если у вас пластмассовые растения и срок жизни рыб не более трёх месяцев, то можно чем угодно подсвечивать.

Морские аквариумы - отдельная тема, растения отсутсвуют, рыбы нереститься не будут никогда, многим видам полипов свет вообще не нужен.

msng пишет:
дома аквариум подсвечиваю диодами (белый+синий+красный),  напрямую без ШИМ, просто по времени дунька зажигает, есть задумка добавить шим и УФ диодов, на ночь сделать синюю луну. только у меня подсветка не лентами, а трехватными диодами.

не знаю - для человеческого глаза вырвиглазный диапазон этих диодов, а уж для тропических растений, тем более.

для тепличного хозяйства диоды применяются?, если "да", то оттуда нужно и прыгать, но по сравнению с люминисцентными трубками цены будут космическими.

msng
Offline
Зарегистрирован: 07.06.2012

в моем случае подсветка работает более года, рыбы живы (ттт) нерестятся (мальков правда не вывожу, другие съедают), растения растут отлично, минусов пока не вижу.

Клапауций
Offline
Зарегистрирован: 10.02.2013

msng пишет:

в моем случае подсветка работает более года, рыбы живы (ттт) нерестятся (мальков правда не вывожу, другие съедают), растения растут отлично, минусов пока не вижу.

значит, не всё так плохо с этими светодиодами, как я думал.

посмотрел тепличные светильники - ужос, ужос, но всё растёт

осталось человеческие зрительные рецепторы переделать под зрительный диапазон чужих.

msng
Offline
Зарегистрирован: 07.06.2012

растениям надо красный и синий спектр. да я тоже на подобные глядел, первыя мысль была как при таком цвете (свете) может что-то расти)))) ан нет растет однако))

Клапауций
Offline
Зарегистрирован: 10.02.2013

msng пишет:

растениям надо красный и синий спектр. да я тоже на подобные глядел, первыя мысль была как при таком цвете (свете) может что-то расти)))) ан нет растет однако))

да уж - в Германии вообще запретили лампочки накаливания продавать, лет через двести человечество  необратимо разделится на морлоков и элоев, кто работает в помещении и при дневном свете.

HWman
HWman аватар
Offline
Зарегистрирован: 26.02.2013

Я вот посмотрел ещё проекты, люди добавляют ультрафиолетовый светодиод, хм... для чего, ведь глаз неспособен, ладно почти не способен увидеть его свечение. 

Клапауций
Offline
Зарегистрирован: 10.02.2013

HWman пишет:

Я вот посмотрел ещё проекты, люди добавляют ультрафиолетовый светодиод, хм... для чего, ведь глаз неспособен, ладно почти не способен увидеть его свечение. 

Могу предположить, что рыбы и моллюски должны флюоресцировать при облучении ультрафиолетом.

Клапауций
Offline
Зарегистрирован: 10.02.2013

Вот - нарыл тебе лампу хорошего немецкого бренда, продавца сам найдёшь.

Tetra - крутой немецкий производитель аквариумного оборудования, помню ещё из советского детства их корма и фильтры.

HWman
HWman аватар
Offline
Зарегистрирован: 26.02.2013

Купить неинтересно.

toc
Offline
Зарегистрирован: 09.02.2013

HWman пишет:
Stellaris Launchpad (который междупрочим сейчас по 8 долларов продают)

где?

HWman
HWman аватар
Offline
Зарегистрирован: 26.02.2013
HWman
HWman аватар
Offline
Зарегистрирован: 26.02.2013

Открыл для себя randomSeed(seed) ну и первым делом добавил в скетч:



// Arduino mood light code
// Miguel Sanchez 

int r=0;                            
int g=0;                           
int b=0;

void rgb(int r, int g, int b) {
  analogWrite(RED_LED,r);
  analogWrite(GREEN_LED,g);
  analogWrite(BLUE_LED,b);  
}

void setup() 
{ 
} 

void loop() 
{ 
  randomSeed(analogRead(0)); // не псевдо
  int color,i,value,time=(100);  // how long does it take each step
  color=random(1,4);    // which color to dim now 
  value=random(0,256);  // new value of that color
  switch(color) {
  case 1: 
    if(r>value) for(i=r;i>value;i--) {
      rgb(i,g,b); 
      delay(time); 
    }
    else for(i=r;i<value;i++) {
      rgb(i,g,b); 
      delay(time); 
    }
    r=value;
    break;
  case 2: 
    if(g>value) for(i=g;i>value;i--) {
      rgb(r,i,b); 
      delay(time); 
    }
    else for(i=g;i<value;i++) {
      rgb(r,i,b); 
      delay(time); 
    }
    g=value;
    break;
  case 3: 
    if(b>value) for(i=b;i>value;i--) {
      rgb(r,g,i); 
      delay(time); 
    }
    else for(i=b;i<value;i++) {
      rgb(r,g,i); 
      delay(time); 
    }
    b=value;
    break;
  } 
  delay(random(750,3500));   // some time before next change
}

Теперь при нажатии на кнопку ресет не один и тот же цвет.

Probelzaelo
Offline
Зарегистрирован: 15.04.2011

Клапауций пишет:

посмотрел тепличные светильники - ужос, ужос, но всё растёт

Тут все просто, растения зеленые, потому что свет именно этой части спектра отражается хлорофиллом, а значит не участвует в фотосинтезе - бесполезен растению. Отсюда вывод, зачем тратить лишнюю энергию на то, чтобы светить полным спектром? Даже в случае с не слабо эффективным диодным освещением почти 30% лампочек лишними не бывают. Обычно кроме красных и синих туда еще до кучи добавляют немного ультрафиолетового излучения и растительность не обижается.  Это же можно сказать и про люминесцентные, так называемые "Фитолампы". Под которыми зелень выглядит почти черной )) вернее серой.

 

HWman
HWman аватар
Offline
Зарегистрирован: 26.02.2013

Интересно, а можно ли данный код перенести на тини13 + 1 вывод будет программно генерить ШИМ.

Probelzaelo
Offline
Зарегистрирован: 15.04.2011

HWman пишет:
Интересно, а можно ли данный код перенести на тини13 + 1 вывод будет программно генерить ШИМ.

Если хекса получится не велика(а она по идее и не должна быть велика) и во флеши у тиньки поместится, то почему бы и нет. Только сборку хексы, разумеется, нужно будет делать под тиню. А если не поместится, тогда возможно придется и кое что из библиотек слегка купировать...

HWman
HWman аватар
Offline
Зарегистрирован: 26.02.2013

Не влазит даже тот код что в 16-м посте:

"Размер скетча в двоичном коде: 1 496 байт (из 1 024 байт максимум)"
Нужно будет поиграться с оптимизацией...