اطلاعیه

Collapse
No announcement yet.

استفاده از DS1820 در محیط صنعتی

Collapse
X
Collapse
 
  • صفحه of 5
  • فیلتر
  • زمان
  • Show
Clear All
new posts
قبلی 1 2 3 4 5 template بعدی
    #31
    پاسخ : استفاده از DS1820 در محیط صنعتی

    با چه کامپایلری کار می کنید؟
    زندگی را تو بساز ،
    نه بدان ساز که سازند و پذیری بی حرف ،
    زندگی یعنی جنگ ، تو بجنگ ،
    زندگی یعنی عشق ، تو بدان عشق بورز.

    دیدگاه

      #32
      پاسخ : استفاده از DS1820 در محیط صنعتی

      نوشته اصلی توسط microware
      با چه کامپایلری کار می کنید؟
      بسکام
      یا به اندازه آرزوهایت تلاش میکنی یا به اندازه تلاشت ارزو میکنی

      دیدگاه

        #33
        پاسخ : استفاده از DS1820 در محیط صنعتی

        من با بسکام این سنسور رو نبستم ولی برنامه شما رو تغییر دادم
        تست کنید:
        کد:
        $regfile = "m8def.dat"
$crystal = 8000000
Config Lcdpin = Pin , Rs = Pinc.0 , E = Pinc.1 , Db4 = Pinc.2 , Db5 = Pinc.3 , Db6 = Pinc.4 , Db7 = Pinc.5
Config Lcd = 16 * 2
Cursor Off
Config 1wire = Portb.2

 '--------------------------------dim-------------------------------------------

Dim A1 As Byte : Dim Sens1(8) As Byte , Sens2(8) As Byte , Sens3(8) As Byte
Dim T As Single
Dim Th As Byte , Tl As Byte , S_no As Byte
Dim A As Byte , A2 As Byte
Dim W As Byte , Q As Byte , T2 As Byte , T1 As Byte ,
Dim H As Byte , M As Byte , F As Byte , L As Byte , K As Byte , G As Byte

Dim Temp1 As Integer , Temp2 As Integer , Temp3 As Integer , Temp1s As String * 5 , Temp2s As String * 5 , Btemp As Integer , Buft1 As Integer , Buft2 As Integer , Buft3 As Integer
Dim Temp3s As String * 5

Dim Dsid1(8) As Byte
Dim Dsid2(8) As Byte
Dim Dsid3(8) As Byte
Dim Dsid4(8) As Byte

Dim I1 As Integer , Ss As String * 6
Dim I2 As Integer
Dim I3 As Integer
Dim I4 As Integer

Dim B As Byte
Dim Num As Byte



Do

  Num = 1wirecount()

  Dsid1(1) = 0
  Dsid2(1) = 0
  Dsid3(1) = 0

  Dsid1(1) = 1wsearchfirst()
  Dsid2(1) = 1wsearchnext()
  Dsid3(1) = 1wsearchnext()

  1wreset
  If Err = 1 Then B = 0
  1wwrite &H55
  1wverify Dsid1(1)
  1wwrite &HBE
  I1 = 1wread(2)
  Waitms 250
'---------------------------------
 1wreset
 If Err = 1 Then W = 0
 1wwrite &H55
 1wverify Dsid2(1)
 1wwrite &HBE
 I2 = 1wread(2)
 Waitms 150

'---------------------------------
  1wreset
  If Err = 1 Then T = 0
  1wwrite &H55
  1wverify Dsid3(1)
  1wwrite &HBE
  I3 = 1wread(2)
  Waitms 150
'---------------------------------
  1wreset
  1wwrite &HCC
  1wwrite &H44
Waitms 600

'=====================================================

If Num > 0 Then
  I1 = I1 * 10
  I1 = I1 / 16
  Ss = Str(i1)
  Ss = Format(ss , " 0.0")
  Locate 1 , 1
  Lcd "I1:" ; Ss
End If
    '===================================================

If Num > 1 Then
 I2 = I2 * 10
 I2 = I2 / 16
 Ss = Str(i2)
 Ss = Format(ss , " 0.0")
 Locate 2 , 1
 Lcd "I2:" ; Ss
End If

'=====================================================
If Num > 2 Then
 I3 = I3 * 10
 I3 = I3 / 16
 Ss = Str(i3)
 Ss = Format(ss , " 0.0")
 Locate 1 , 9
 Lcd "I3:" ; Ss
End If



Loop
        زندگی را تو بساز ،
        نه بدان ساز که سازند و پذیری بی حرف ،
        زندگی یعنی جنگ ، تو بجنگ ،
        زندگی یعنی عشق ، تو بدان عشق بورز.

        دیدگاه

          #34
          پاسخ : استفاده از DS1820 در محیط صنعتی

          سلام
          واقعا ممنونم .اون چیزی که میخاستم شد .دستت طلا :applause:
          اضافه شده در تاریخ :
          سلام
          من الان با 1 مشکل روبرو شدم :

          1=به عنوان مثال اگر 5 تا سنسور روی خط باشه .من چیکار کنم که سنسورها پشت سرهم خوانده بشه
          یعنی اینکه سنسور اولی ،1 باشه سنسور دومی 2 باشه و الی اخر . ولی الان 4 تا سنسور گذاشتم پشت سرهم . ترتیبشون یکی نیست یعنی اینجوریه ::



          یا به اندازه آرزوهایت تلاش میکنی یا به اندازه تلاشت ارزو میکنی

          دیدگاه

            #35
            پاسخ : استفاده از DS1820 در محیط صنعتی

            این مشکل به این دلیله که شما سنسور ها رو به ترتیب شماره rom code داری می خونی
            راه حل هایی که من میشناسم اینا هستن:
            1- رام کد سنسور ها رو در جایی به همون ترتیبی که میخواید ذخیره کنید و به همون ترتیب اونها رو صدا بزنید که یه کوچولو کار پیچیده ایه
            2- هر سنسور رو به یه پایه ی جداگانه از میکرو وصل کنید
            3- ساده ترین روش: ترتیب سنسور ها رو با توجه به ترتیبی که میشناسه انتخاب کن که همیشه ثابته. عیب این روش اینه اگه یه سنسور بسوزه و یکی دیگه به جاش بزاری معلوم نیست جدیده رو چندمین سنسور بشناسه!

            از دوستان دیگه هم درخواست می کنم نظرشون رو بدن که بهترین راه حل رو انتخاب کنید.
            زندگی را تو بساز ،
            نه بدان ساز که سازند و پذیری بی حرف ،
            زندگی یعنی جنگ ، تو بجنگ ،
            زندگی یعنی عشق ، تو بدان عشق بورز.

            دیدگاه

              #36
              پاسخ : استفاده از DS1820 در محیط صنعتی

              دوستان نمیدونم این نکته تو این تاپیک گفته شده یا نه ولی اگه مسافت ما زیاد باشه باید به جای مقاومت 4.7k از مقاومت 1.2k استفاده بشه
              خداوند بی نهایت است اما به قدر نیاز تو فرود می آید ، به قدر آرزوی تو گسترده می شود و به قدر ایمان تو کارگشاست.
              [hr]
              • تشکرها 1

              دیدگاه

                #37
                پاسخ : استفاده از DS1820 در محیط صنعتی

                نوشته اصلی توسط 4850
                دوستان نمیدونم این نکته تو این تاپیک گفته شده یا نه ولی اگه مسافت ما زیاد باشه باید به جای مقاومت 4.7k از مقاومت 1.2k استفاده بشه
                نه نگفته بودید.چون مقاومت خط افزایش می باید باید مقاومت پول اپ هم کم بشه ؟؟

                بیشترین بردی که بچه ها از DS18B20 جواب گرفتند چقدر هست ؟؟
                یا به اندازه آرزوهایت تلاش میکنی یا به اندازه تلاشت ارزو میکنی

                دیدگاه

                  #38
                  پاسخ : استفاده از DS1820 در محیط صنعتی

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

                  بیشترین بردی که بچه ها از DS18B20 جواب گرفتند چقدر هست ؟؟
                  7 متر داره مثل ساعت کار میکنه 4 ساله

                  دیدگاه

                    #39
                    پاسخ : استفاده از DS1820 در محیط صنعتی

                    من این نکته رو تو یه سایت دیگه خوندم و کسی که این نکته رو گفته بود تا 30 متر از این سنسور جواب گرفته بود
                    میگردم آدرسشو پیدا کردم براتون می زارم :nerd:
                    خداوند بی نهایت است اما به قدر نیاز تو فرود می آید ، به قدر آرزوی تو گسترده می شود و به قدر ایمان تو کارگشاست.
                    [hr]

                    دیدگاه

                      #40
                      پاسخ : استفاده از DS1820 در محیط صنعتی

                      نوشته اصلی توسط arvinfx
                      7 متر داره مثل ساعت کار میکنه 4 ساله
                      سلام
                      خودم که تا 25 متر بدون هیچ مشکلی جواب گرفتم .خاستم ببینم کسی هست که بیشتر از این جواب گرفته باشه ؟
                      یا به اندازه آرزوهایت تلاش میکنی یا به اندازه تلاشت ارزو میکنی

                      دیدگاه

                        #41
                        پاسخ : استفاده از DS1820 در محیط صنعتی

                        با افزایش تعداد سنسورها طول سیم شدیدا کاهش پیدا میکنه . برای افزایش طول سیم مدار زیر را اضافه کنید
                        مقاومتی پول پی که به میکرو وصل میشه رو حداقل 3.52کیلو بزارین
                        دو ترانزیستور مثل bc640 رو امیتر و بیسشونو به هم وصل کنین و کلکتورشونو به صفر تغذیه (gnd)
                        یه بیس امیترو به میکرو و یه بیس امیترو به سنسور بزنین
                        پایه سنسور رو با مقاومت یک کیلو پول پ کنین
                        اگه استفاده صنعتی با طول سیم زیاد میکنین تغذیه سنسور و پول پشو رو جدا کنین
                        برای هر سنسور یه خازن 100 نانو تانتال بزارین
                        با این تمهیدات بنده در طول سیم به محدودیتی بر نخوردم
                        از نظر نویز پذیری به مشکلی برنخوردم . یجا دستگاه نصب کردیم میدیدم در هنگام لخت کردن کابلها ، برق میگیرمان . دستگاه را روشن کردیم کار میکرد . دستم خورد به بدنه فلزی داخل دستگاه برق گرفتم .
                        نگاه کردم نول دستگاه متصل نشده بود . ارت نه ، نول . یعنی تو ورودی ترانس تغذیه فقط فاز رفته بود .
                        بخاطر القا شدید اینورترها ترانس داشت برق تولید میکرد . منظورم اینه که اینقدر نویز شدید بود که ترانس داشت برق مورد نیاز برد میکرو رو تامین میکرد اما برای کار ما مشکلی ایجاد نکرد.
                        www.Askdin.com
                        www.BEKco.ir

                        دیدگاه

                          #42
                          پاسخ : استفاده از DS1820 در محیط صنعتی

                          نوشته اصلی توسط بنده خدا
                          با افزایش تعداد سنسورها طول سیم شدیدا کاهش پیدا میکنه . برای افزایش طول سیم مدار زیر را اضافه کنید
                          مقاومتی که به میکرو وصل میشه رو حداقل 3.52کیلو بزارین
                          دو ترانزیستور مثل bc640 رو امیتر و بیسشونو به هم وصل کنین و کلکتورشونو به صفر تغذیه (gnd)
                          یه بیس امیترو به میکرو و یه بیس امیترو به سنسور بزنین
                          پایه سنسور رو با مقاومت یک کیلو پول پ کنین
                          اگه استفاده صنعتی با طول سیم زیاد میکنین تغذیه سنسور و پول پشو رو جدا کنین
                          برای هر سنسور یه خازن 100 نانو تانتال بزارین
                          با این تمهیدات بنده در طول سیم به محدودیتی بر نخوردم
                          از نظر نویز پذیری به مشکلی برنخوردم . یجا دستگاه نصب کردیم میدیدم در هنگام لخت کردن کابلها ، برق میگیرمان . دستگاه را روشن کردیم کار میکرد . دستم خورد به بدنه فلزی داخل دستگاه برق گرفتم .
                          نگاه کردم نول دستگاه متصل نشده بود . ارت نه ، نول . یعنی تو ورودی ترانس تغذیه فقط فاز رفته بود .
                          بخاطر القا شدید اینورترها ترانس داشت برق تولید میکرد . منظورم اینه که اینقدر نویز شدید بود که ترانس داشت برق مورد نیاز برد میکرو رو تامین میکرد اما برای کار ما مشکلی ایجاد نکرد.
                          اقا از بابت اطلاعاتی که دادید ممنونم .در مورد این نکته که فرمودید " افزایش تعداد سنسورها طول سیم شدیدا کاهش پیدا میکنه " منظورتون چند تا سنسور روی یک خط هست ؟؟

                          ضمنا نظری در این مورد ندارید :

                          نوشته اصلی توسط اقای دکتر

                          من الان با 1 مشکل روبرو شدم :

                          1=به عنوان مثال اگر 5 تا سنسور روی خط باشه .من چیکار کنم که سنسورها پشت سرهم خوانده بشه
                          یعنی اینکه سنسور اولی ،1 باشه سنسور دومی 2 باشه و الی اخر . ولی الان 4 تا سنسور گذاشتم پشت سرهم . ترتیبشون یکی نیست یعنی اینجوریه ::



                          یا به اندازه آرزوهایت تلاش میکنی یا به اندازه تلاشت ارزو میکنی

                          دیدگاه

                            #43
                            پاسخ : استفاده از DS1820 در محیط صنعتی

                            سلام
                            مدار پیشنهادی شما برای افزایش طول این مدار هست ؟؟
                            یا به اندازه آرزوهایت تلاش میکنی یا به اندازه تلاشت ارزو میکنی

                            دیدگاه

                              #44
                              پاسخ : استفاده از DS1820 در محیط صنعتی

                              مقاومت میکرو را پول پ بزارین
                              www.Askdin.com
                              www.BEKco.ir

                              دیدگاه

                                #45
                                پاسخ : استفاده از DS1820 در محیط صنعتی


                                من هر چی این مدار رو تحلیل کردم دیدم نویز هم تقویت میشه ؛ میشه در موردش یه توضیح بدید که چه جوری نویز رو زیر یک منطقی نگه میداره؟

                                دیدگاه

                                قبلی 1 2 3 4 5 template بعدی
                                لطفا صبر کنید...
                                X