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

[aleksandr-zh]

в "обычных" - анод и катод перепутаны.
В RGB - Цвета отличаются.

[rojnov]

Насчет простой программки для проверки - я уже как-то делал такое. Завтра сделаю еще раз, отпишусь.

[rojnov]

Добрый вечер. Вчера я писал насчет дохлых ATtiny2313 в корпусе SO20. Сегодня проверил их еще раз. Сначала залил в новый МК прошивку проверки портов - каждый порт на 0,5 сек зажигает светодиод. В архиве видеофайл, чтобы было понятнее. Затем то же самое проделал с дохлыми МК. Всего их 7 штук. В архиве фотка одного из них. Вот что получилось в итоге:
1. Горят все, кроме одного (фото).
2. Горят все не мигая.
3. Горят 7 диодов, остальные еле светятся.
4. Горят 6 диодов, не мигая.
5. Ярко горят 4 диода, остальные еле светятся.
6. Ярко горят 4 диода. остальные еле светятся.
7. Почти все диоды горят ярко.
Что интересно, обычно после прошивки, пока программатор еще в порту USB, программа сразу начинает работать, получая питание от порта. А в данном случае диоды загорались только при подключении внешнего питания.
Вот такая история. Вопрос прежний - поддаются ли такие МК оживлению. И почему во время программирования все читается, удаляется, записывается, но в итоге ничего не работает.
К сожалению, видяшка не влазит по объёму, поэтому прицепляю только фото. Не охота возиться с переконвертированием из за ерунды.

Вложения

МК.rar

(166.88 KiB) Скачиваний: 20

[veso74]

А чем LED управляете? Полным кодом и hex.

[rojnov]

В МК заливаю hex.

Добавлено after 2 minutes 7 seconds:
Добавил код в Баскоме.

Добавлено after 2 minutes 39 seconds:
Что-то не добавилось. Пробую архивом.

Вложения

Новая папка.rar

(1.44 KiB) Скачиваний: 21

[veso74]

С ваш hex в Proteus мигает только PD4 (pin_8). Остальные пины: либо LOW, либо HIGH.

Быстро написал тест все пинах. Arduino -> ATTinyCore, hex ниже:

Вложения

blink_all.zip

(1.24 KiB) Скачиваний: 22

Последний раз редактировалось veso74 Вс янв 07, 2024 04:34:53, всего редактировалось 2 раз(а).

[Novice user]

Что за камень такой-$regfile = "2313def.dat",если для аттини2313 $Regfile="attiny2313a.dat"

[rojnov]

Привет. Ужал видео до невозможности, чтобы вошло по объёму. На видео снял, как работает проверка портов на новом ATtiny2313. Этим же кодом проверял все свои дохлые МК. Код я выложил вчера.
Не могу добавить видео работы исправного МК. Не знаю, какой формат видео разрешен.

[Novice user]

С вашим кодом выше и в протеусе ничего не мигает,и не будет работать-ваша прошивка для AT90s2313,а вот если поставить для аттини2313 ($Regfile="attiny2313a.dat") то в протеусе все работает замечательно

[rojnov]

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

[сокол]

Всем доброго дня! Есть исходник Кто разбирается BASKOM помогите пожалуйста поменять пороги. 1этап подача тока 50 сек или до достижение до 14,4 2 этап подача тока 10 сек или до достижение до 14,7
Надо так:первый этап подача тока 1 мин или до достижение 14,6в. 2этап подача тока 30 сек или до достижение до 15,3в Исходник в архиве. Нужен НЕХ файл.

Вложения

attiny13 Авто 14.4-14.7.rar

(607 байт) Скачиваний: 16

[aleksandr-zh]

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


Добавлено after 5 minutes 8 seconds:
Кстати! кто применяет Баском - не качайте с пираток новые версии (новые, скорее всего, выше 2083): Автор встроил какую-то гадость русским
Проверка не то по IP, не то по наличию русской раскладки в Винде!
Плюс проверка по сети модификации файлов и если что не так- какие-то кары
Цитирую автора - Марка: "Они это обнаружат, но будет поздно"

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

тут еще сказали, что в другом софте такие же бяки:
"Не только Марк, но и разработчик EmBitz (IDE для STM32) тоже винит во всем Россию. Доступ к сайту закрыл для наших IP. В среде программирования проверяет язык системы и если русский, добавляет ошибки в код! На форуме кота это осуждалось.
Если не ошибаюсь он из Нидерландов как и Марк"

Знаю, так как с 2010 года лицензия Баскома, иногда лично переписывались с автором, пока ему окончательно не промыло мозги их пропагандой
Написал какой-то бред на главной странице, если коротко: "вы русский и уже из-за этого во всём в мире виноваты", потом что-то про бомбы Путина у него дома...
Ныне я забанен у него на форуме и удалён.

AVI-crak писал(а):

Спасибо за прокси.
2.5 запустился в виртуалке, теперь новая фишка - порча файлов проекта, причём максимально подло. Эта зараза находит два одинаковых типа переменных, и меняет их местами. Закрыл проект - рандомно получил головную боль.
1.11 по прежнему остаётся стабильной версией, это когда у автора ещё флягу не сорвало.

Добавлено after 56 minutes 46 seconds:

сокол писал(а):

Надо так:.

ваше задание не совпадает с кодом
Оно работает не так, как вы описали выше.

[koms48]

Лично у меня WAIT переменная не канает. Только WAIT константа (0,1,2 и далее)

[Microtech]

Проверил Wait и Waitms переменной. Работает. Когда объявил переменную single или double, компилятор дал ошибку. integer съел. Снёс недавно появившийся Bascom 2086, оставил 2083. Судя по описанию, там ничего нового и интересного мне не добавили.

[aleksandr-zh]

сокол писал(а):

Всем доброго дня!

Как я вами связаться? дайте точный алгоритм.
просто то, что Вы писали, не совпадает с кодом.

Ребята, расписал код, убрал "магические цифры"

Код:

$regfile = "attiny13.dat"               ' BASCOM 2.0.8.6
$crystal = 9600000

$hwstack = 8
$swstack = 8
$framesize = 8

Out_1 Alias Portb.0 : Config Out_1 = Output
Out_2 Alias Portb.1 : Config Out_2 = Output
Out_3 Alias Portb.4 : Config Out_3 = Output

Config Pinb.3 = Input : Vhod Alias Pinb.3

Config Adc = Single , Prescaler = Auto , Reference = Avcc
Start Adc

Dim U , Ubotton As Word
Dim Utop1 , Utop2 As Word


Dim Index , Cntr As Word
Dim Pauza_tmp2 , Pauza_t As Byte

Const Vr_10sec = 333                    ' * 30 ms  Задержка 10 сек
Const Vr_40sec = 1333                   ' * 30 ms  Задержка 40 сек

Pauza_t = 15                            ' mS
Pauza_tmp2 = 10                         ' Sec

Utop1 = 722                             ' 14.4   '1000 квантов = 19,947 подмаргивает/при 19,960 горит
Utop2 = 711                             ' 14.2
Ubotton = 591                           ' 11.8

Cntr = Vr_40sec


Do

  If Vhod = 0 Then                      ' В зависимости от состояния Входа выполняется разный этап.
    For Index = 0 To Vr_10sec
      Out_1 = 1
      Waitms Pauza_t
      If Getadc(1) > Utop2 Or Vhod = 1 Then Exit For
      Out_1 = 0
      Waitms Pauza_t
    Next

    Wait 5

    For Index = 0 To Vr_10sec
      Out_2 = 1
      Waitms Pauza_t
      If Getadc(1) < Ubotton Or Vhod = 1 Then Exit For
      Out_2 = 0
      Waitms Pauza_t
    Next

    Wait 5

  Else

    For Index = 0 To Cntr
      Out_1 = 1
      Waitms Pauza_t
      If Getadc(1) > Utop1 Or Vhod = 0 Then
        If Index < 10 And Utop1 = 737 Then Out_3 = 1
        Cntr = Vr_10sec
        Index = Vr_10sec
        Utop1 = 737
        Pauza_tmp2 = 5
      End If
      Out_1 = 0
      Waitms Pauza_t
    Next

    Wait Pauza_tmp2
  End If

Loop

Последний раз редактировалось aleksandr-zh Вс мар 10, 2024 16:20:49, всего редактировалось 1 раз.

[сокол]

Напишите мне ЛС я вам дам почту

[aleksandr-zh]

koms48 писал(а):

Лично у меня WAIT переменная не канает. Только WAIT константа (0,1,2 и далее)

причина в очень старой версии компилятора, давно добавлено (говорю, как пользующийся Баскомом больше 15 лет)

Добавлено after 1 minute 44 seconds:

Microtech писал(а):

Снёс недавно появившийся Bascom 2086, оставил 2083. Судя по описанию, там ничего нового и интересного мне не добавили.

Автор сделал упор на MegaAVR и иже с ними.
Из приятных плюшек: добавил по моей просьбе форматирование текста нажатием "горячих кнопок" и по мелочи поправлен перевод на русский (я делал когда-то)

[forter]

aleksandr-zh!
При всех трудностях лицензирования Баском, у Вас все-таки последняя его версия, судя по приложенному Вами листингу!
И как, код не портится?

[aleksandr-zh]

не могу проверить
вроде всё работает. Но, повторюсь: у меня оф. лицензия уже 15й год
Я попросил в теме Em::blocks IDE (EmBitz) спецов посмотреть код.
Знаю, что компилятор написан на Дельфи (вроде так говорил Марк).