Регистрация | Вход

[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
  • Страница 1 из 1
  • 1
Модератор форума: brown, ivan_fd  
Ключи iButton
Romario4840 Дата: Сб, 15.08.2009, 23:13  |                                                                                                                Сообщение # 1
Группа: Проверенные
Ранг:  Начал соображать
Сообщений: 23
Репутация: 0   ±
Замечания:   ±
На сайте с 26.06.2009

Статус: Offline

Кто нибудь работал с ключами iButton?
Не догоняю как происходит считывание в МК код ключа.
Если можно пример.

За ранее благодарен.

ЯНДЕКС Дата: 15.08.2009
DAlexV Дата: Вс, 16.08.2009, 10:15  |                                                                                                                Сообщение # 2
Группа: Проверенные
Ранг:  Разобрался
Сообщений: 657
Репутация: 27   ±
Замечания:   ±
На сайте с 13.05.2008

Статус: Offline

http://www.elin.ru/1-Wire/?topic=components3#DS1990A
Про 1 Wire

Пример поиска устройств подключеныых к 1 Wire (Серийные номера, семейства) на SwordFish Basic

Code


// if device and clock are omitted, then the compiler defaults to  
// 18F452 @ 20MHz - they are just used here for clarity...
device = 18F452
clock = 20

// import modules...
include "ow.bas"
include "convert.bas"
include "usart.bas"

// on find event handler...
event OnFind()
    dim Index as byte
    USART.Write("FAMILY $", HexToStr(SearchFamily,2))
    USART.Write(" ($",HexToStr(SearchID(7),2),")")
    USART.Write(" ($")
    Index = 6
    repeat
       USART.Write(HexToStr(SearchID(Index),2))
       dec(Index)
    until Index = 0
    USART.Write(")",13,10)
end event
   
// working variables...
dim DeviceCount as byte    

// program start...
SetBaudrate(br115200)
SetPin(PORTC.0)
DeviceCount = Search(owSearchROM, OnFind)
USART.Write(DecToStr(DeviceCount), " device(s) found", 13, 10)

Как же в папке примеров (\samples) есть примеры работы с датчиком температуры DS18B20 и ключей DS2405

Рабочая версия Рыбы есть в каталоге файлов


Будьте оригинальны-не повторяйте чужих ошибок ! Рыба сдохла. Теперь STM32(TS)+C#(VS).Старею :)
Romario4840 Дата: Пн, 17.08.2009, 10:31  |                                                                                                                Сообщение # 3
Группа: Проверенные
Ранг:  Начал соображать
Сообщений: 23
Репутация: 0   ±
Замечания:   ±
На сайте с 26.06.2009

Статус: Offline

А есть ли у кого нибудь пример на PBPro?
demanik Дата: Пн, 17.08.2009, 11:04  |                                                                                                                Сообщение # 4
Группа: Проверенные
Ранг:  Помогаю всем
Сообщений: 448
Репутация: 10   ±
Замечания:   ±
На сайте с 11.12.2007

Статус: Offline

Quote (Romario4840)
пример на PBPro?

Ловите.
Прикрепления: DS.rar (361.4 Kb)


Попробуй всё и вся... может быть пол...

  • Страница 1 из 1
  • 1
Поиск: