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

[Gordon Shumway]

Без вопросов.
Шапка:
...
Dim A As Byte
-----------------
Config Port B = Input 'порт В обозначаем как входной по 8 входам, код от 0 до 255
В программе:
A = Port B 'переменной А присваивается значение, равное двоичному на входе порта В
If A = 0 then....
Elseif A=1 then...
-----------------------
Elseif A=255 then...
End if
.........

Кажется понял ! Спасибо !

[aleksandr-zh]

user2007, опять обманываете!
вместо PORTx при чтении используется PINx

Без вопросов.
Шапка:
...
Dim A As Byte
-----------------
Config Port B = Input 'порт В обозначаем как входной по 8 входам, код от 0 до 255
В программе:
A = Port B 'переменной А присваивается значение, равное двоичному на входе порта В
If A = 0 then....
Elseif A=1 then...
-----------------------
Elseif A=255 then...
End if
.........

[user2007]

Читайте внимательнее инструкции - уже 7 лет так делаю.

[user2007]

Ошибся, поправил. А что, нельзя? Почитайте, как radan познакомился с Марком Альбертсом(в плане ошибок, чтобы понятнее). Очень познавательно.
Config Port B = Input
A = Pinb. ' здесь А - это байт
или
A = Pinb.0 ' здесь А - это бит

[Gordon Shumway]

Ошибся, поправил. А что, нельзя? Почитайте, как radan'а познакомили с Марком Альбертсом. Очень познавательно.
Config Port B = Input
A = Pinb.

В споре рождается истина ! (с) не помню кто.

Спасибо ответившим, буду ваять девайс !

[aleksandr-zh]

ошибаться - возможно, но не можно.

утверждать свою правоту (даже зная о собственной ошибке) - НЕТ.
Читаем описания от ATMEL AVR: запись в порт = PORTx, чтение регистра порта = PINx
Если порт сконфигурирован на чтение, то попытка чтения из регистра порта покажет мусор = состояние резисторов pull-up
Тоже самое и Марк говорит в инструкции, которую и надо вначале пролистать новичку...

а то, что Вы Radan сюда приплели - это я читал, и знаю. Но какое это имеет отношение к вопросу

для user2007
что за дурная привычка по несколько раз ТАК изменять свои старые сообщения, что они полностью изменяюст свой смысл?!
следы глупости заметаете?...

[Мурик]

Читайте внимательнее инструкции - уже 7 лет так делаю.

Всмысле, 7 лет делаете ошибки в коде?
Читать нужно из PinX, а не из PortX!

Почитайте, как radan познакомился с Марком

При чем тут радан?

[rodg]

Всем здравствуйте!!! Ребята, решил переправить исходник с программой из-за использования другого кварца, и не могу скомпилировать из-за отсутствия файла определения используемых регистров на at89c2051.dat кто чем может помогите... Я не спец в программировании, пока учусь, так что сильно не пинайте...

[aleksandr-zh]

Всем здравствуйте!!! Ребята, решил переправить исходник с программой из-за использования другого кварца, и не могу скомпилировать из-за отсутствия файла определения используемых регистров на at89c2051.dat кто чем может помогите... Я не спец в программировании, пока учусь, так что сильно не пинайте...

там еще придется схемотехнику переделывать (возможно) и с инициализацией регистров повоевать - этот МК из семейства х51: у него иная схемотехника внутри

[rodg]

придется схемотехнику переделывать (возможно) и с инициализацией регистров повоевать - этот МК из семейства х51: у него иная схемотехника внутри

Исходник под этот контролер и писался, я из-за того что кварц другой использую и мелкие ошибочки переправил... так что там по поводу 89с2051.dat??? Да, кстати исходник написан на Bascon-51...

[aleksandr-zh]

что-то я вас, уважаемый, не понимаю
51 - это одно, а АВР - другое
как в описании к BASCOM-AVR можетбыть библиотека другого продукта к другим МК?

[rodg]

что-то я вас, уважаемый, не понимаю
51 - это одно, а АВР - другое
как в описании к BASCOM-AVR можетбыть библиотека другого продукта к другим МК?

Вот скриншот исходника и розширение файла ".bas"
Что мне теперь делать???

[aleksandr-zh]

да причем тут это?!
У Вас исходник под другой компилятор, но этой же фирмы
вы никак не откомпилируете проект под МК серии 51 компилятором для другой серии - АВР
!

[rodg]

да причем тут это?!
У Вас исходник под другой компилятор, но этой же фирмы
вы никак не откомпилируете проект под МК серии 51 компилятором для другой серии - АВР
!

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

[rodg]

огромное спасибо за наводочку

aleksandr-zh

я его, камишек, победил, уже прошил - всё работает...

[edm2007]

Дабы не превращать форум в хрен знает что, вопрос по теме такой, как красиво реализовать такой алгоритм:

1. кратковременно нажимаем кнопку - увеличиваем переменную на единицу.
2. если кнопка удерживается - увеличиваем переменную с частотой... ну например 0,5 Гц
3. если кнопка удерживается уже долго (3 сек, например), увеличиваем переменную еще быстрее...

[Igor_67]

В Баск-е не пробовал, на СИ получалось, кстати, есть неплохой курс по си-авр на datagor.ru, только зарегистрироваться надо.
А вообще представляется все так: в обработчике прерывания инкремент переменной (например button) потом проверка там же на совпадение с таймером и т . д.

[edm2007]

В Баск-е не пробовал, на СИ получалось, кстати, есть неплохой курс по си-авр на datagor.ru, только зарегистрироваться надо.

А мне без разницы, хоть СИ, хоть АСМ. Буду благодарен в любом случае.

[Igor_67]

смотри выше... или нужен конкретный код???

[edm2007]

смотри выше... или нужен конкретный код???

Угу, спасибо. И по сайту брожу уже, и над реализацией думаю... Если по внешнему прерыванию так это только по низкому уровню... Да конечно посмотрел бы код.