 |
|
|
|
| Автор |
Сообщение |
V_oron
Новичок
Зарегистрирован: 31.07.2007
Сообщения: 1
|
 Добавлено: 31 Июл 2007, 21:16 Заголовок сообщения: |
 |
|
А анонсированная погрешность у DS1820 в 0.5С - реальная во всем температурном диапазоне? Просто есть например датчики AD22100* от Analog Devices. У них погрешности 0.75-2 градуса. В описании к ним указываются источники погрешностей и прочее. То есть создается впечатление, что точность можно неплохую получить.
В общем, вопрос такой: что лучше брать для датчика "заоконной" температуры? DS18S20, AD22100A, AD22100K или вообще терморезистор? Критерий: как можно точнее и за разумные деньги (ну, бакса 3 максимум).
|
|
| Вернуться к началу |
|
 |
AndryG
Модератор
Зарегистрирован: 24.07.2006
Сообщения: 411
Откуда: Helios-3
|
|
| Вернуться к началу |
|
|
dosikus
Знатный посетитель (>20)
Зарегистрирован: 21.08.2006
Сообщения: 30
|
| Добавлено: 31 Авг 2007, 22:25 Заголовок сообщения: |
|
|
| urry писал(а): | C ком - портами - согласен, но с lpt под хр... Хм...  Я попробовал и больше не хочу . Только!!!! драйвер.
Кстати, все работает. |
А это не пробывал ?
http://pbasic.spb.ru/files/up/Ports.zip
|
|
| Вернуться к началу |
|
|
urry
Живет здесь... (>100)
Зарегистрирован: 23.10.2006
Сообщения: 243
|
| Добавлено: 02 Сен 2007, 10:53 Заголовок сообщения: |
|
|
во-первых, это библиотека под васик, что уже мне изначально не интересно. Во- вторых, еще неизвестно, как оно себя поведет в хп - откомпилированного екзешника на сайте не было, проверить не могу.
На том сайте, где я брал драйвер, существуют библиотеки под вижуал и делфи. Интересно было бы поиграться с двусторонним обменом и прерыванием - но, в любом случае, лпт уже в прошлом. ЮСБ осваивать надо.
_________________
меня не интересует мнение людей. которые разбираются в этом вопросе. Только тех, кто сами что-то сделали (А. Энштейн) |
|
| Вернуться к началу |
|
|
dosikus
Знатный посетитель (>20)
Зарегистрирован: 21.08.2006
Сообщения: 30
|
| Добавлено: 03 Сен 2007, 19:20 Заголовок сообщения: |
|
|
Да нет, длл не только под барсик там пример просто на пуре бэйсике , а это уже чистый асм.
Он хорош тем что можно сразу WINAPI пользовать.
Я выложил потому что вы тут лпт мучали.
Вот откуда она появилась ...
http://www.logix4u.net/inpout32.htm
Здесь примеры на барсике и дельфи
http://tl.rema.44.ru/materials/ports/lpt.html
Вот сама длл + исходники + примеры на барсике , С++
| Описание: |
|
Файлообменник |
| Название файла: |
inpout32_source_and_bins.zip |
| Размер файла: |
65.38 KB |
| Скачено: |
86 раз(а) |
|
|
| Вернуться к началу |
|
|
dosikus
Знатный посетитель (>20)
Зарегистрирован: 21.08.2006
Сообщения: 30
|
| Добавлено: 04 Сен 2007, 16:42 Заголовок сообщения: |
|
|
Пример на ПУРЕ_БЭЙСИКЕ работы с длл
| Код: | port=$378 ; Порт
d_reg=port:s_reg=port+1:c_reg=port+2
inwert.w=0:outwert.w=0
#RandLinks=50:#RandOben=50:#FensterBreite=280:#Fensterhoehe=200:#Titel="LPT ПОРТ"
If OpenWindow(0,#RandLinks,#RandOben,#FensterBreite,#Fensterhoehe,#Titel,#PB_Window_MinimizeGadget)
If OpenLibrary(0, "INPOUT32.DLL")
*out = GetFunction (0,"Out32")
*inp = GetFunction (0,"Inp32")
If *out And *inp
libok=1
Else
CloseLibrary(0)
MessageRequester("IN_OUT","Библиотека INPOUT32.DLL не найдена !",#PB_MessageRequester_Ok)
End
EndIf
Else
MessageRequester("IN_OUT","Библиотека INPOUT32.DLL не найдена !",#PB_MessageRequester_Ok)
End
EndIf
If libok=1
CreateGadgetList(WindowID(0))
Gosub Startbild
EndIf
Repeat
Select WindowEvent()
Case #PB_Event_CloseWindow:CallFunctionFast(*out,d_reg,0):CloseLibrary(0):End
Case #PB_Event_Gadget
Select EventGadget()
Case 1
Gosub lesen
Case 2
Gosub schreiben
EndSelect
EndSelect
Delay(10)
ForEver
Else
End
EndIf
Startbild:
ButtonGadget(1,50,120,60,40,"Прием",#PB_Button_MultiLine)
ButtonGadget(2,160,120,60,40,"Передача",#PB_Button_MultiLine)
StringGadget(4,55,100,50,20,"",#PB_String_Numeric)
StringGadget(3,165,100,50,20,"")
Return
lesen:
inwert = CallFunctionFast(*inp,d_reg) ;Wert lesen von Status-Port
inwert$=Str(inwert) ;in String wandeln
SetGadgetText(4,inwert$) ;ausgeben
Return ;Wert дndert sich mit/ohne Papier
schreiben:
outwert$=GetGadgetText(3) ;Wert aus Gadget lesen
outwert=Val(outwert$) ;in Zahl wandeln
CallFunctionFast(*out,d_reg,outwert) ;senden an Daten-Port
Return |
И уже скомпилированный екзешник
| Описание: |
|
Файлообменник |
| Название файла: |
lpt_port.rar |
| Размер файла: |
8.13 KB |
| Скачено: |
69 раз(а) |
|
|
| Вернуться к началу |
|
|
|
|
Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете голосовать в опросах
Вы не можете добавлять вложения в этом форуме
Вы можете просматривать вложения в этом форуме
|
|
Главная
Форум
Поиск по форуму
Файлообменник
Радиотехнический каталог
Фотогалерея
Ваш профиль
Личные сообщения
Группы
FAQ
Регистрация
Вход
