Собери свою радиосхему!
Суббота, 25.11.2017, 12:32 Приветствую Вас Гость

cxema21.ucoz.ru

Главная | Регистрация | Вход | RSS

Как реализовать RGB подсветку на avr? - Форум

[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
Страница 1 из 11
Модератор форума: Advanced 
Форум » Микроконтроллеры » Микроконтроллеры AVR » Как реализовать RGB подсветку на avr?
Как реализовать RGB подсветку на avr?
Artur21Дата: Четверг, 22.01.2015, 11:39 | Сообщение # 1
Сержант
Группа: Проверенные
Сообщений: 24
Репутация: 1
Статус: Offline
Добрый день! Ткните плиз в нужном направлении?", как правильно реализовать подсветку на rgb светодиоде? Т.е. Как плавно зажигать каждый из светодиодов? Я понимаю что шимом, но как?
 
Адвансед6476Дата: Четверг, 22.01.2015, 17:09 | Сообщение # 2
Сержант
Группа: Администраторы
Сообщений: 35
Репутация: 0
Статус: Offline
надеюсь на BASCOM?

В основном цикле программы пишем изменение переменных яркости 3 цветов:

Код
Do

For R = 0 To 255
Waitms 10
Next R

For B = 255 To 0 Step -1
Waitms 10
Next B

For G = 0 To 255
Waitms 10
Next G

Loop
 
Artur21Дата: Четверг, 22.01.2015, 17:14 | Сообщение # 3
Сержант
Группа: Проверенные
Сообщений: 24
Репутация: 1
Статус: Offline
Да, на BASCOM AVR...,а можно полный код ? Если имеется, как пример
 
Адвансед6476Дата: Четверг, 22.01.2015, 17:16 | Сообщение # 4
Сержант
Группа: Администраторы
Сообщений: 35
Репутация: 0
Статус: Offline
код рабочий, проверено

Код
$regfile = "2313def.dat"
$crystal = 4000000

Config Portb = Output

Config Timer0 = Timer , Prescale = 1
Enable Interrupts
Enable Timer0
On Timer0 Timer0isr
Start Timer0

Dim Pwm As Byte , A As Byte
Pwm = 0

Do

For A = 0 To 255
Waitms 10
Next A

For A = 255 To 0 Step -1
Waitms 10
Next A

Loop

Timer0isr:
Incr Pwm

If Pwm > A Then Portb = 1

If Pwm = 255 Then
Pwm = 0
Portb.0 = 0
End If
Return
 
Адвансед6476Дата: Четверг, 22.01.2015, 17:17 | Сообщение # 5
Сержант
Группа: Администраторы
Сообщений: 35
Репутация: 0
Статус: Offline
Step -1 - это шаг в цикле со значением -1. Т.е. в данном примере будет считать так: 255, 254, 253 ... 3, 2, 1, 0. 

Prescale = 1 - это делитель для таймера. Выбирается из стандартного ряда - 1, 64, 256 

On Timer0 Timer0isr - при срабатывании таймера перейти на Timer0isr
 
Artur21Дата: Четверг, 22.01.2015, 17:26 | Сообщение # 6
Сержант
Группа: Проверенные
Сообщений: 24
Репутация: 1
Статус: Offline
Большое спасиьо!
 
Форум » Микроконтроллеры » Микроконтроллеры AVR » Как реализовать RGB подсветку на avr?
Страница 1 из 11
Поиск:

Форма входа
Поиск
Наш опрос
В чем мерится напряжение?
Всего ответов: 91
Статистика

Не  получится по этой схеме столько выжать

Добрый день, подскажите пожалуйста, что нужно изменить в это...

Сыровато очень. Нельзя вот так вот просто взять и назвать ме...

Рейтинг@Mail.ru