Код всех блоков открыт, "меню над блоком->исходный код блока"kalobyte писал(а):поддерживаю вопросYS писал(а):Выложили бы его, общественность бы посмотрела, насколько этот кодогенератор эффективен.
и какой круг задач призван решать этот софт? реализация конечных автоматов?
Данный код не полный, я в конфигурации использовал уставку 50 для мигания всей линейки.a5021 писал(а):Это весь код (CodeVisionAVR) для данного примера:
Схему алгоритма было бы чертить дольше.Спойлер
Код: Выделить всё
#include <tiny13a.h> void main(void) { DDRB = 0x1F; ADMUX = (1<<ADLAR); ADCSRA = (1<<ADEN) | (1<<ADATE) | (1<<ADPS2); while (1) { ADCSRA|=(1<<ADSC); while ((ADCSRA & (1<<ADIF)) == 0); ADCSRA |= (1<<ADIF); if (ADCH > 50) PORTB.4 = 1; else PORTB.4 = 0; if (ADCH > 100) PORTB.3 = 1; else PORTB.3 = 0; if (ADCH > 150) PORTB.2 = 1; else PORTB.2 = 0; if (ADCH > 200) PORTB.1 = 1; else PORTB.1 = 0; if (ADCH > 250) PORTB.0 = 1; else PORTB.0 = 0; } }
Вы полагаете, что я буду специально ставить этот софт и руками перерисовывать картинки, чтобы посмотреть на исходник? Увы нет, оно мне не настолько интересно. Хотя если бы вы сами выложили сгенерированный исходник, я бы поглядел. Замечу, меня (и моих коллег) интересуют исходники не блоков, а финальный исходник, сгенерированный из картинки.Код всех блоков открыт, "меню над блоком->исходный код блока"
Смотря какой ЯП.kalobyte писал(а):почему никто из вас не задается вопросом, сколько времени было убито на изучение языка программирования и регистров контроллера
Код: Выделить всё
$regfile = "m8def.dat" ' Контроллер ATmega8
$crystal = 4000000 ' Тактовый генератор 4 МГц.
Config Portb = &H1F
Config Adc = Single , Prescaler = Auto , Reference = Internal
Dim Var As Word
Do
Var = Getadc(0) ' Чтение из нулевого канала АЦП.
If Var > 50 Then Portb.4 = 1 : Else : Portb.4 = 0
If Var > 100 Then Portb.3 = 1 : Else : Portb.3 = 0
If Var > 150 Then Portb.2 = 1 : Else : Portb.2 = 0
If Var > 200 Then Portb.1 = 1 : Else : Portb.1 = 0
If Var > 250 Then Portb.0 = 1 : Else : Portb.0 = 0
Loop
ну так и его синтаксис надо тоже учить, все эти ключевые слова и держать в памятиМурик писал(а):Скажем тот же BASCOM-AVR. довольно простой ЯП и не требует знания ассемблера и регистров МК.
