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

pavel123

Спасибо за подсказку.
Однако результат прежний - на экране -0
Вот быстренько схемку в протеусе набрасал.
Народ, просю-сю-сю, подскажите, где ошибка??? :cry:

Посмотрел в примерах в протеусе к АВР, там есть для ds18. На Си пример работает.

Shuriks

Так ... По схемотехнике все правильно :-)

По программе тоже ... по-крайней мере , что касается ... 1Wire . За преобразование не отвечаю ..

Но есть но ... Мой проект тоже не заработал в Протеусе . Я долго искал ответы в интернете , пока не наткнулся на сайте http://bascomavr.3bb.ru/ на инфу о том, что код для работы с 1Wire скомпилированный Bascom'ом и Протеус не очень дружат ... Я все это повторил в железе .. Все работает , как часы - Поверьте

pavel123

Shuriks писал(а):пока не наткнулся на сайте на инфу о том, что код для работы с 1Wire скомпилированный Bascom'ом и Протеус не очень дружат ...

Спасибо, я тоже видел эти сообщения на http://bascomavr.3bb.ru/, но все же надеялся, а вдруг, что то есть обходное.
Еще раз, спасибо

Сегодня 23/06/2009 Вытащил из сети протеус 7,5. Надеялся на чудо, Но - чудес не бывает. ds18 так и не заработал. Грустно. :cry:

Зато - добавилось много обьектов АВР. расширен список меги и тини

i8080

pavel123 писал(а):
Shuriks писал(а):пока не наткнулся на сайте на инфу о том, что код для работы с 1Wire скомпилированный Bascom'ом и Протеус не очень дружат ...

Спасибо, я тоже видел эти сообщения на http://bascomavr.3bb.ru/, но все же надеялся, а вдруг, что то есть обходное.
Еще раз, спасибо

Сегодня 23/06/2009 Вытащил из сети протеус 7,5. Надеялся на чудо, Но - чудес не бывает. ds18 так и не заработал. Грустно.
Зато - добавилось много обьектов АВР. расширен список меги и тини

Все дело в таймингах если их покрутить в свойствах то все начинает работать.
Вот архив с рабочим проэктом Протеуса и Bascom'а.

pavel123

Спасибо за подсказку, но что то я туплю :oops:

Где и че подкрутить? И в свойствах чего?

i8080

pavel123 писал(а):Спасибо за подсказку, но что то я туплю
Где и че подкрутить? И в свойствах чего?

Вот скрин нужные параметры в выпадающей менюшке.

pavel123

К концу дня у меня что то с головой не так.

На меге16 протеус все нормально показывает.
Все тоже самое, но на меге8 - и все, тупик. Метод научного тыка не катит.

i8080

Вот архив с рабочим проэктом на мега8 в Протеусе 7.2 SP2.

omike

еще литературка!
http://bascomavr.3bb.ru/click.php?http: ... &Itemid=54

ikarab

Русская дока по BASCOM находится на сайте о программировании в BASCOM который так и называется - http://bascom-avr.narod.ru

pavel123

i8080 писал(а):Вот архив с рабочим проэктом на мега8 в Протеусе 7.2 SP2.

Спасибо огромное, разобрался. :))

Теперь голова по другому поводу морочится, поделитесь, пожалуйста таблеточкой... к bascom 1.11.9.1

Radan

ikarab писал(а):Русская дока по BASCOM находится на сайте о программировании в BASCOM который так и называется - http://bascom-avr.narod.ru

Русская дока никогда там и не находилась. Все ссылки ведут на другой сайт, а ссылки давно уже битые. Наиболее полная информация о Баскоме на русском языке смотрите на http://bascom.at.ua/

vpashko

Подскажите, кто нибудь в железе пробывал воспроизвести звук ато не получается, вернее звук слышен с какой то высокой частотой и ни чего не разберешь, генератор внутренний, фузы выставляю заводские.
$regfile = "m8def.dat"
$crystal = 8000000
Config Portb.0 = Output
Speaker Alias Portb.0
'=========================
Do
'Europe :: Final Countdown
Sound Speaker , 124 , 675 'H2(1/16)
Sound Speaker , 110 , 758 'A2(1/16)
Sound Speaker , 248 , 675 'H2(1/8)
Waitms 125 'P(1/16)
Sound Speaker , 165 , 1011 'E2(1/8)
Waitms 250 'P(1/8)
Waitms 125 'P(1/16)
Sound Speaker , 131 , 637 'C3(1/16)
Sound Speaker , 124 , 675 'H2(1/16)
Sound Speaker , 131 , 637 'C3(1/16)
Waitms 125 'P(1/16)
Sound Speaker , 124 , 675 'H2(1/16)
Waitms 125 'P(1/16)
Sound Speaker , 220 , 758 'A2(1/8)
Waitms 125 'P(1/16)
Waitms 250 'P(1/8)
Sound Speaker , 131 , 637 'C3(1/16)
Sound Speaker , 124 , 675 'H2(1/16)
Sound Speaker , 262 , 637 'C3(1/8)
Waitms 125 'P(1/16)
Sound Speaker , 165 , 1011 'E2(1/8)
Waitms 250 'P(1/8)
Waitms 125 'P(1/16)
Sound Speaker , 110 , 758 'A2(1/16)
Sound Speaker , 98 , 850 'G2(1/16)
Sound Speaker , 110 , 758 'A2(1/16)
Waitms 125 'P(1/16)
Sound Speaker , 98 , 850 'G2(1/16)
Waitms 125 'P(1/16)
Sound Speaker , 92 , 901 'Fis2(1/16)
Waitms 125 'P(1/16)
Sound Speaker , 110 , 758 'A2(1/16)
Waitms 125 'P(1/16)
Sound Speaker , 196 , 850 'G2(1/8)
Loop

Radan

Заводские фьюзы - 1 МГЦ. В программе - 8. Или фьюзы перешить в 8, или в программе установить - 1.

vpashko

Radan cпасибо за подсказку, а кварц обязательно ставить?

Radan

Зачем кварц для этой пиликалки?, тем более что фьюзы выставлены на внутренний генератор :shock:

vpashko

Igor_67

Вопрос к знатокам васика.
Хочу написать программу управления ЖК индикатором. Плата готовая от кассового аппарата, собрана на двух мс КР1820ВГ1. Нашел, как ими управлять. Надо, чтобы 40 бит данных передавались последовательно с одной ноги порта, каждый бит тактируется частотой, передаваемой на другую ногу порта. Как здесь лучше сделать? Прерывание по таймеру использовать или готовую конструкцию "pulseout PORTD , 1, 10" взять? Если можно поподробнее...
И еще, эти 40 бит данных где хранить? они же меняться будут...
Спасибо!

Gryphon

Здравствуйте! Интересует работа с USB в BASCOM-AVR.

Секретный кот

Igor_67 писал(а):Надо, чтобы 40 бит данных передавались последовательно с одной ноги порта, каждый бит тактируется частотой, передаваемой на другую ногу порта. Как здесь лучше сделать?

Воспользоваться встроенной поддержкой TWI (I2C)?