ايران ويج

صفحه‌ها: 1 2

سلام
طبق مشورتی که با دوستان داشتیم و بررسی های که انجام دادیم به این نتیجه رسیدیم که از سنسورDHT22 استفاده کنم .چون هم رنجش بین 0تا 100 هست .هم دقتش نسبت به مابقی سنسورها خوبه .هم کالیبره شده هست واز همه مهتر اینکه تا 20 متر رو بدون هیچ مشکلی جواب میده

سنور DHT 11 - DHT22

بنابراین
خاستم دوستانی که این نوع سنسور رو راه اندازی کردند تجربه و دانش خودشون رو در اختیار ما قرار بدند تا ما هم به نتیجه برسیم .

کالبد شکافی شده
[attachment=9513]

[attachment=9514]

[attachment=9515]

DHT22 سنسور

[attachment=9516]
دیتاشیت DHT11

http://upload.tehran98.com/img1/yhytp4kgwoz2d60ove.pdf
دیتاشیت DHT22

http://upload.tehran98.com/img1/1iq174g5...5u2x6f.pdf

من كار نكردم ، اما ديتاشيت ها رو بخوني بايستي كافي باشه ،‌ من خوندم و چيز خاصي نداشت.
فقط به نكاتي كه گفته دقت كن.
مثلا اگر طول سيم كمتر از 20 متر هست ،‌با يه مقاومت 5k بايستي خط رو بالا بكشي.
از 4 پين ،‌1خط VCC و 1 خط DATA و 1 خط Null و يك خط GND هست.
اگر مسافت بيش از 20 شد بايستي مقدار مقاومت pull up رو امتحان كني كه چقدر باشه ( مقدارش بايستي كمتر شه )

پروتكلش هم ساده هست و تايمينگ ها رو كامل در ديتاشيت گفته. اول ميكرو درخواست رو مي فرسته و بعد سنسور و شرايط هم گفته ، آخرش چندتا نكته گفته كه از فلان دما نبايد بيشتر بشه اگر شد بايد چي كار كني تا سنسور بازيابي بشه و ...
ديتا ها رو بيت به بيت مي فرسته و سطح بيت0 و 1 يكي هست ، بايستي عرض رو در نظر گرفت. منطق 1 70 ميكرو ثانيه در سطح 1 هست و منطق 0 فكر كنم 26 ميكرو ثانيه نوشته بود و به اين ترتيب مي شه 0 و 1 بودن رو تشخيص داد.

ظاهرا از بيت هاي با ارزش شروع به فرستادن مي كنه ...

كلياتش اين ها هست.
در حين كار اگر نكته ي خاصي هم داشت ممنون مي شيم كه همينجا بگي ...
قيمتشون؟

(۱۳-خرداد-۱۳۹۲, ۰۹:۳۷:۴۰)r0b0 نوشته است: [ -> ]سلام
رایج ترین سنسور رطوبت سنج که مورد استقبال قرار میگیره نوع خازنی
همون سنسور SH1101 استفاده کنید بهتره
پروژه های زیادی هم باهاش کار شده که به راحتی میتونید با سرچ پیدا کنید.

(۱۵-خرداد-۱۳۹۲, ۱۱:۲۲:۵۱)sharin نوشته است: [ -> ]اگر مسافت بيش از 20 شد بايستي مقدار مقاومت pull up رو امتحان كني كه چقدر باشه ( مقدارش بايستي كمتر شه )

سلام
ممنونم .اگر مسافت بیشتر از 20 متر شد باید مقدار مقاومت pull up کمتر بشه ؟؟ اخه دیتاشیت فقط گفته باید
when the connecting cable is longer than 20 metres, choose a appropriate pull-up resistor as needed

بهرحال باید با ازمون و خطا بدست اورد ./

نقل قول: پروتكلش هم ساده هست و تايمينگ ها رو كامل در ديتاشيت گفته. اول ميكرو درخواست رو مي فرسته و بعد سنسور و شرايط هم گفته ، آخرش چندتا نكته گفته كه از فلان دما نبايد بيشتر بشه اگر شد بايد چي كار كني تا سنسور بازيابي بشه و ...
ديتا ها رو بيت به بيت مي فرسته و سطح بيت0 و 1 يكي هست ، بايستي عرض رو در نظر گرفت. منطق 1 70 ميكرو ثانيه در سطح 1 هست و منطق 0 فكر كنم 26 ميكرو ثانيه نوشته بود و به اين ترتيب مي شه 0 و 1 بودن رو تشخيص داد.

ظاهرا از بيت هاي با ارزش شروع به فرستادن مي كنه

اتفاقا مشکل همین جاست که من چیزی از این پروتکل در نیاوردم

در یکی از سایت های خارجی یه برنامه گرفتم که در اولین فرصت قرارش میدم و در موردش بحث میکنیم ./

قیمت DHT11

اگر اشتباه نکنم 10 روز پیش بچه ها از تهران خریده بود 25 تومن
DHT22 که بهتره از قبلی هست حدودا بین 30 تا 40 هست که قیمتی ازش ندارم

نقل قول: حالا سوالم این که چطور از PT100 که سنسور دما هست داره برای رطوبت استفاده میکنه ؟؟ چه رابطه ای بین دما و رطوبت هست و جالبتر اینکه روکش نخی که کشیده بود روی PT100 رطوبت جذب میکرد

در این سیستم سنسور حرارتی یه نسبتی از آب رو جوش میاره و بخار تولید شده رو به ورودی یه فن میده و تولید رطوبت میکنه
نمونه این کار رو هم تو دستگاه های ویبروشیب بخار میتونید ببینید که توسط المنت مخزن آب رو جوش میاره و بخار رو توسط فن پخش میکنه.

ضمن تشکر از عکسهای کالبد شکافی شده Biggrin

همونطور که میبینین داخلش همون سنسور مقاومتی که گفتم هستش ... اون مدارات اضافی هم بعنوان درایور و تقویت کننده هستش

پس نتیجه میگیریم که با همین سنسورهای مقاومتی و با برنامه نویسی دقیق و کالیبره کردن هم میشه یه رطوبت سنج دقیق ساخت

همچنین اگه امکان داره در مورد اون نخی که گفتین بیشتر تحقیق کنین + عکس دقیق و واضح ازش

سلام دوستان یه برنامه برای DHT22 به زبان بسکام از اینترنت گرفتم که یه مطلبشو متوجه نشدم ضمن اینکه توضیحی هم داده و من نگرفتم دوستانی که با بسکام کار میکنن ممنون میشم در این زمینه توجیه بفرمایند.

در این برنامه اومده از کریستال 16 مگ استفاده کرده که من میخام از 12 مگ استفاده کنم .نویسنده کد اومده const Min_time رو با توجه به کریستال 16 مقدار مربوطه رو 95 گذاشته و یه فرمول هم گذاشته که من متوجه نشدم چطور محاسبه کرده ممنون میشم یه توضیحی بدید .

این در مورد کریستال 16مگ هست من میخام کریستال 12 بذارم بنابراین باید Const Min_time چقدر باشه ؟؟

[align=left]

کد: 
[color=#FF4500]

'  Timings: Bit = 0 ~ 28 µs / Bit = 1 ~ 70 µs

'  Min_time = 28 µs < TCNT0 Value (ticks) < 70 µs  (in ticks)

'  every time > Min_time >>> Bit = 1

'  every time < Min_time >>> Bit = 0

'

'  Min_time ~ 20 (ticks) for 3.6864 MHz

'

' ~ ticks for Bit = 0: 26 µs * $crystal (in MHz) / Prescale

' ~ ticks for Bit = 1: 70 µs * $crystal (in MHz) / Prescale

'[/color]

'######################## DHT-22 Humidity & Temperature Sensor##################

$regfile = "m168def.dat"

$crystal = 16000000

$baud = 115200

$hwstack = 64

$swstack = 64

$framesize = 64

'#####################################

Config Pind.4 = Input

Config Timer0 = Timer , Prescale = 8

'#####################################

Const Min_time = 95                                         'Wert je nach Quarzfrequenz anpassen (siehe ticks)

Dim Count As Byte

Dim Signaltime(43) As Byte

Dim Humidityw As Word

Dim Temperaturew As Word

Dim Humsens_chksum As Byte

Dim Humiditys As String * 16

Dim Temperatures As String * 16

Dim Strstring As String * 14

Dim Ib As Byte

'-------------------------------------------------------------------------------

'Definieren der LCD-Pins inkl. SPI

'

Config Portc.2 = Output

Lcdndc Alias Portc.2

Config Portc.1 = Output

Lcdnce Alias Portc.1

Config Portc.0 = Output

Lcdnre Alias Portc.0

Config Portc.5 = Output

Lcdnbl Alias Portc.5

'Konfiguriern SPI in Soft-Mode

Config Spi = Soft , Dout = Portc.3 , Ss = None , Clock = Portc.4

'Initialise Spi

Spiinit

'-------------------------------------------------------------------------------

'###############################################################################

Declare Sub Read_timings

Declare Sub Humtemp_values

Declare Function Compare_chksum(byval Hsens_humidity As Word , Byval Hsens_temperature As Word , Byval Hsens_chksum As Byte) As Byte

'###############################################################################

' Haupt-Programm

$include "lcdn_init.inc"

'Initialisiern des Nokia-LCD's

Lcdn_reset

Lcdn_init

Lcdn_clear

'Startsequez: Backlight blinkt 3x

'For Ib = 1 To 3

'   Toggle Lcdnbl

'   Waitms 500

'Next Ib

   Set Lcdnbl

   Lcdn_position 0 , 0

   Lcdn_print "Test DHT22 mit"

   Lcdn_position 0 , 1

   Lcdn_print "ATmega168"

Do

  Call Humtemp_values

  If Compare_chksum(humidityw , Temperaturew , Humsens_chksum) = 1 Then

   Humiditys = Str(humidityw)

   Temperatures = Str(temperaturew)

   Strstring = "Humi: " + Format(humiditys , "0.0")

   'Strstring = Humiditys

   Lcdn_position 0 , 3

   Lcdn_print Strstring

   Strstring = "Temp: " + Format(temperatures , "0.0")

   'Strstring = Temperatures

   Lcdn_position 0 , 4

   Lcdn_print Strstring

  Else

  Strstring = "DHT Read-Error"

   Lcdn_position 0 , 5

   Lcdn_print Strstring

  End If

  Wait 3

Loop

End

'###############################################################################

' Read timings

' measure time (in ticks) for signal = high (Start / Stop  TIMER0)

' 1st two measurements do not contain sensor values

Sub Read_timings

   Count = 1

   Config Pind.4 = Output : Portd.4 = 0                     ' request data

   Waitms 20                                                ' wait 20 ms

   Config Pind.4 = Input                                    ' wait for data, receive data

   While Count < 43                                         'collect 42 timings / signals

      Bitwait Pind.4 , Set                                  'signal goes high > start timer

      Start Timer0

      Bitwait Pind.4 , Reset                                'signal goes low  > stop timer

      Stop Timer0

      Signaltime(count) = Tcnt0                             'store number of ticks per signal in Signaltime byte

      Tcnt0 = 0

      Incr Count

  Wend

End Sub

'###############################################################################

'Humidity and temperature values

'  transform timings into bits (40 timings > 40 Bits)

'  every time (in ticks) > Min_time >>> Bit = 1

'  every time (in ticks) < Min_time >>> Bit = 0

'  first word contains humidity

'  second word contains temperature

'  last byte contains checksum

Sub Humtemp_values

   Local X As Byte

   Humidityw = 0

   Temperaturew = 0

   Humsens_chksum = 0

   Call Read_timings

   For Count = 3 To 42                                      ' Erste zwei Bits überspringen

      Select Case Count

         Case 3 To 18

            X = 18 - Count

            If Signaltime(count) > Min_time Then Toggle Humidityw.x

         Case 19 To 34

            X = 34 - Count

            If Signaltime(count) > Min_time Then Toggle Temperaturew.x

         Case 34 To 42

            X = 42 - Count

            If Signaltime(count) > Min_time Then Toggle Humsens_chksum.x

      End Select

  Next

End Sub

'###############################################################################

' Calculate Checksum and compare with trasnmitted value

Function Compare_chksum(byval Hsens_humidity As Word , Byval Hsens_temperature As Word , Byval Hsens_chksum As Byte) As Byte

   Local Chksum As Byte

   Chksum = Low(hsens_humidity ) + High(hsens_humidity )

   Chksum = Chksum + Low(hsens_temperature)

   Chksum = Chksum + High(hsens_temperature)

   If Chksum = Hsens_chksum Then

      Compare_chksum = 1

   Else

      Compare_chksum = 0

   End If

End Function

$include "lcdn_sub.inc"

[/align]

از دوستان کسی نبود که راهنمایی کنه ؟؟

نقل قول: ضمن تشکر از عکسهای کالبد شکافی شده Biggrin
همونطور که میبینین داخلش همون سنسور مقاومتی که گفتم هستش ... اون مدارات اضافی هم بعنوان درایور و تقویت کننده هستش
پس نتیجه میگیریم که با همین سنسورهای مقاومتی و با برنامه نویسی دقیق و کالیبره کردن هم میشه یه رطوبت سنج دقیق ساخت
همچنین اگه امکان داره در مورد اون نخی که گفتین بیشتر تحقیق کنین + عکس دقیق و واضح ازش

سلام
در مورد دستگاه رطوبت سنجی که قبلا اشاره کردم .الان بیشتر توضیح میدم .

دستگاه رطوبت سنج تشکلیل شده از 2 سسنور دماسنج که بر روی یکی از سنسورها یک روکش نخی می باشد.این 2 سنسور رو گذاشتند داخل یه لوله پلیکا که از دو طرف باز هست .فقط یکطرف اونو یه فن کار گذاشته که این فن هوای بیرون که رطوبتی هست رو میکشه و به روکش نخی میزنه و روکش خیس یا نمناک میشه .و طبق یه تناسب خاص رطوبت رو بدست میاره .

حالا چرا بجای سنسور رطوبت از سنسور دماسنح استفاده کرده .برای اینکه چون این دستگاهای رطوبت سنج در رطوبت بالای بین 80-98 % کار میکنید و متاسفانه سنسورهای رطوبت به اشباح میرند و برگشتشون با خداست ولی دماسنج خیلی خیلی کم چنین اتفاقی براش می افته .اینم عکساش انشاله در اینده چند تا عکس با کیفت از سنسور با روکش نخی قرار میدم ./(در ضمن یه جعبه سفید رنگ بالای لوله پلیکا هست که مدار سنسور هاست.)

صفحه‌ها: 1 2

علیدلی

sharin

علیدلی

omid_phoenix

رسول

علیدلی

علیدلی

علیدلی