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

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

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

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

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

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

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

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

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

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

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

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

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

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

Подскажите, кто нибудь в железе пробывал воспроизвести звук ато не получается, вернее звук слышен с какой то высокой частотой и ни чего не разберешь, генератор внутренний, фузы выставляю заводские.
$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

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

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

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

Radan все равно не получается, я и так и сяк в Протеусе все ОК но в железе ??? Прошиваю программой Uniprof, фузы выставляю из программы ParaPROG :
Low_0 = CKSEL0|U
Low_1 = CKSEL1|P
Low_2 = CKSEL2|P
Low_3 = CKSEL3|P
Low_4 = SUT0|P
Low_5 = SUT1|U
Low_6 = BODEN|U
Low_7 = BODLEVEL|U
High_0 = BOOTRST|U
High_1 = BOOTSZ0|P
High_2 = BOOTSZ1|P
High_3 = EESAVE|U
High_4 = CKOPT|U
High_5 = SPIEN|P
High_6 = WDTON|U
High_7 = RSTDISBL|U

[lock-bits]
Lock_0 = LB1|U
Lock_1 = LB2|U
Lock_2 = BLB01|U
Lock_3 = BLB02|U
Lock_4 = BLB11|U
Lock_5 = BLB12|U

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

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

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