BASCOM AVR в вопросах и ответах

[raf65]

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

[bagira]

bagira писал(а):

Доброго времени суток мастерам!
Впервые подключаю Arduino Mega 2560. Заливаю по ICSP китайским USB-программатором, прямо из БаскомАВР.
Пробный тест: светодиодик L не моргает (просто потушен), а вместо логических уровней 0/1, на выводах 2,4-2,5 Вольт.
Вот кусочек текста:
$regfile = "m2560def.dat"
$crystal = 16000000
$hwstack = 40
$swstack = 16
$framesize = 32
Config Porth = Output
Config Portb = Output
Portb.7 = 1
Do
Porth = &B11110000
Wait 1
Porth = &B00001111
Wait 1
Portb.7 = 1
Wait 1
Portb.7 = 0
Wait 1
Loop
End
До этого пробовал МЕГУ 328 - всё происходило нормально (и шилось и моргало и уровни были 0/5В).
Буфер чтения и записи на первый взгляд совпадают, ошибок не выдаёт. В эмуляторе Баскома - работает правильно.
Напряжение питания не "просажено", внешних нагрузок от платы не питаю. Все порты свободные (просто тест на пустой плате).
В чём косяк? Ткните мордой...

Разобрался!
Дело было в установке фьюзов...
Дело в том, что поставка кристалла осуществляется в конфигурации:
Fusebit High M -> 1: Reset vector is $ 0000 Тоесть, при подаче питания, сбросе, рестарте после прошивки, старт будет произведён с адреса лежащего в нулевой ячейке...
Производитель ардуины (как конечного устройства) снабжает свой прибор ПО, которое оговаривает загрузку кода через USB, а это подразумевает наличие внутри кристалла некой примитивной операционной системы в виде начального загрузчика. Поэтому производитель ставит этот фьюз в положение:
Fusebit High M -> 0: Reset vector is bootloader Тоесть при рестарте начальное управление получит загрузчик, и только он потом отдаст "бразды правления" самой программе.
А так как я прошиваю кристалл программой напрямую (через ICSP ), то у меня нет загрузчика, и начинаться программа должна с нулевого вектора.
То есть этот фьюз должен быть установлен в положение: Fusebit High M -> 1: Reset vector is $ 0000.

[Dnepr_1186]

raf65 писал(а):

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

Таймер в режиме захвата. На всякий случай привожу весь код. Мало ли что-то в нем может влиять на точность измерения.

[akl]

Получается, что частота тактирования выше и составляет грубо 115/112*8'000'000=8'214'285 и соответственно

Код: Выделить всё

Const Tt = 0.000007791

Код: Выделить всё

  Period = Timcount * Tt                                    ' определяем период
 F11 = 1 / Period                                           ' считаем частоту

По мне, гораздо быстрее сразу считать частоту

Код: Выделить всё

 F11 = crystal/64/Timcount     ' считаем частоту

Лучше, всё равно, поставить кварц.

[Dnepr_1186]

Попробовал скорректировать Tt. Частота подгоняется но на больших значениях начинает выбегать вперед на пару герц. Я так понимаю в программе косяков нет? И дело скорее всего в тактировании генератора?

[jast321]

Удалил.

[OLEGKARAS]

Подскажите как записать считанный из ds18b20 серийный номер в память МК и потом считать из памяти?

[ev3658]

Долго решался, примерно несколько лет и всё-же я это сделал:

Спойлер

[raf65]

а я ещё в 2012 его купил за 89

[ev3658]

Там комиссию взяли, через PayPal 2,69 евро, а если через банк, то банк берёт 15 евро.
Вообщем я счастлив и моя совесть чиста )))

[max50]

OLEGKARAS писал(а):

как записать считанный из ds18b20 серийный номер в память МК

На соседнем форуме есть.
Нужно войти под своим аккаунтом.

[OLEGKARAS]

max50 писал(а):

[uquote="OLEGKARAS",url="/forum/viewtopic.php?p=3233010#p3233010"]как записать считанный из ds18b20 серийный номер в память МК

На соседнем форуме есть.
Нужно войти под своим аккаунтом.[/uquote]

Спасибо за пример .
Как правильно записать такое условие ?
If (Menu >= 21 And Menu <= 29 Or Menu >= 210 And Menu <= 290) Or Menu = 0 Then

[kip96]

select case Menu
case 21 to 29: gosub a1
case 210 to 290: gosub a1
case 0: gosub a1
end select

[OLEGKARAS]

Спасибо.
В баском есть кнопка отменить , где можно увеличить количество отмен ?

[goldskif]

А у мну вот такой вопрос. Делаю часы на ds1307 & attiny2313. Как в баскомавре можно реализовать код с двумя кнопками Mode & Set. Жмешь моде - кнопкой сет устанавливаешь часы. Жмешь опять кнопку моде - устанавливаешь минуты. Ну и так далее день, месяц, год.
Обычный кусок кода у меня есть, где одной нопкой часы, а второй минуты устанавливаются.

[edm2007]

Как вариант - ТАК. Вариант очень простой, но работающий как часы. Хоть и писался очень давно. Код прокомментирован очень подробно, потому проблем возникнуть не должно. В добавок ко всему, проект протеус тоже приложен. В этих часах кнопка "MODE" в рабочем режиме переводит часы в режим отображения даты (пока удерживается), кнопка "SET" переводит в режим настроек, где уже "MODE" меняет по очереди параметры.

[kip96]

goldskif писал(а):

двумя кнопками Mode & Set.

http://bascomavr.3bb.ru/viewtopic.php?id=329 Здесь посмотрите.

[goldskif]

edm2007 писал(а):

Как вариант - ТАК. Вариант очень простой, но работающий как часы. Хоть и писался очень давно. Код прокомментирован очень подробно, потому проблем возникнуть не должно. В добавок ко всему, проект протеус тоже приложен. В этих часах кнопка "MODE" в рабочем режиме переводит часы в режим отображения даты (пока удерживается), кнопка "SET" переводит в режим настроек, где уже "MODE" меняет по очереди параметры.

Респект и уважуха! Я вас всех тут люблю! То, что надо, тоько адаптирую под газоразряд.
Всю ночь кодил. Вот докодился..
А как покороче сделать проверку на количество дней месяца при вводе? Те примеры, что видел, больше килобайта жрут. Пока останоовился на тупом варианте на кнопке.

Код: Выделить всё

If _month = 1 AND _day > 31 Then _day = 1
If _month = 2 AND _day > 29 Then _day = 1
If _month = 3 AND _day > 30 Then _day = 1
If _month = 4 AND _day > 30 Then _day = 1
If _month = 5 AND _day > 31 Then _day = 1

И так на каждый месяц всего 12 строк

Можно это как-нибудь оптимизировать? А то не влезает уже чуть.

[max50]

Тут посмотрите.

[Novice user]

так не проще?
if _day > 28 and _month = 2 then _day = 1
if _day > 30 then
if _month = 4 or _month = 6 or _month = 9 or _month = 11 then _day = 1
end if
if _day > 31 then _day = 1