اطلاعیه

Collapse
No announcement yet.

پروژه دما سنج دیجیتال حرفه ای

Collapse
X
 
  • فیلتر
  • زمان
  • Show
Clear All
new posts

    پروژه دما سنج دیجیتال حرفه ای

    سلام دوستان.خسته نباشید.
    یک مداره ساده میخواستم بسازم به زبان سی.
    متاسفانه زبان سی رو یاد ندارم
    ممنون میشه اگه کمکم کنید.

    یک دماسنج میخوام بسازم که دما رو روی سون سگمنت 2 رقمی آند مشترک نشون بده.
    نمیخوام با ایسی های واسط درایوش کنم.میخوام مستقیم با مقاومت به میکرو وصلش کنم.
    در ضمن میخوام هر یک درجه ای که دما بالا یا پایین میره یک بوق ساده و کم صدا بزنه.بوق رو خود میکرو تولید کنه{بازر نباشه}
    اگه به زبان سی باشه خیلی خوبه.چون خودمم یاد میگیرم.

    من اینا رو دارم.
    7سگمنت 2 رقمی آند مشترک.
    یک اسپیکر کوچولو شبیه بازر.
    Atmega8L
    LM35
    ابتدا و شروع هرکاری سخت ترین مرحله آن کار است. برای مثال به عقابها نگاه کن ، حتی اونها هم در ابتدای پرواز ، زیاد بال و پر می زنند، اما هنگامی که اوج می گیرند ، دیگر حتی نیازی به پر زدن هم ندارند ...

    کافیست اولین قدمها را بدون ترس و با پشتکارِ بالا برداری مطمئن باش بزودی به اوج خواهی رسید و روزهای سخت همیشه نخواهند ماند ...

    #2
    پاسخ : کمک: دما سنج با سون سگمنت

    کسی نیست برنامه شو داشته باشه ؟ :cry2:
    ابتدا و شروع هرکاری سخت ترین مرحله آن کار است. برای مثال به عقابها نگاه کن ، حتی اونها هم در ابتدای پرواز ، زیاد بال و پر می زنند، اما هنگامی که اوج می گیرند ، دیگر حتی نیازی به پر زدن هم ندارند ...

    کافیست اولین قدمها را بدون ترس و با پشتکارِ بالا برداری مطمئن باش بزودی به اوج خواهی رسید و روزهای سخت همیشه نخواهند ماند ...

    دیدگاه


      #3
      پاسخ : پروژه دما سنج دیجیتال حرفه ای

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

      کافیست اولین قدمها را بدون ترس و با پشتکارِ بالا برداری مطمئن باش بزودی به اوج خواهی رسید و روزهای سخت همیشه نخواهند ماند ...

      دیدگاه


        #4
        پاسخ : پروژه دما سنج دیجیتال حرفه ای

        سلام،
        اگه برنامه ی بیسیک بدردتون میخوره، ی چیزایی میتونم واستون بفرستم.
        ولی در کل کار پیچیده یی نیست،

        اگه با AVR کار می کنین، (که خودتونم گفتین) همون Atmega 8 ، سنسور و خیلی ساده متصل میکنین ی پورت مبدل A 2 D دار_ میکروتون، با یه سری تقسیم و بررسی دامنه تغییرات ولتاژ خروجی LM35 ، دمای محیط بدست میاد، برا تولید بوق هم ی فرکانس معمولی توی ی پایه ی میکرو تولید میکنین و وصلش می کنین SP، ولی شخصن این بیزرا رو ترجیح میدم.

        موفق باشید....

        دیدگاه


          #5
          پاسخ : پروژه دما سنج دیجیتال حرفه ای

          برای بدست آوردن دما LM35 کافیه مقدار دیجیتال خونده شده رو بر 2 تقسیم کنی

          در ضمن اگه یه سرچی تو انجمن کنی چیزای زیادی دستگیرت میشه چون در رابطه با این موضوع و شبیه ش بسیار بحث شده

          موفق باشی یا علی
          ماکه رفتیم خدمت (فعلا که 14 ماهش گذشت).........چون میگذرد غمی نیست....

          http://tif00s.persiangig.com/image/MLX90614.jpg

          دیدگاه


            #6
            پاسخ : پروژه دما سنج دیجیتال حرفه ای

            سلام دوستان.
            یک سوال داشتم.
            یک برنامه اماده با بیسیک پیدا کردم.
            فقط بگید این کد بوق واسه میکرو Sound Portd.2 , 100 , 50 را کجای برنامه بزارم که اگه دما یک رقم افزایش پیدا کرد دوتا بوق بزنه و اگه یک رقم کاهش پیدا کرد 1 دونه بوق بزنه.
            این برنامه

            کد:
            $regfile = "m8def.dat"
            $crystal = 1000000
            Config Adc = Single , Prescaler = Auto , Reference = Internal
            Config Portb = Output
            Config Portd = Output
            P0 Alias Portd
            Dim A As Word , B As Word , C As Single , D As Word , F As Word , V As Bit
            
            Start Adc
            Wait 1
            
            Do
            A = Getadc(0)
            B = Getadc(1)
            C = A - b
            C = C / 4
            
            If C > 0 Then
            V = 0
            F = C
            
            End If
            
            If C < 0 Then
            V = 1
            C = C * -1
            F = C * 1
            
            End If
            P0 = &B10 : D = F Mod 10 : Gosub Np
            Waitms 20
            P0 = &B01 : D = F / 10 : Gosub Np
            Loop
            
            End
            
            Np:
            
            Portb = Lookup(d , 7seg)
            Portb.7 = V
            Waitms 4
            
            Return
            7seg:
            Data &B1000000 , &B1111001 , &B0100100 , &B0110000 , &B0011001
            Data &B0010010 , &B0000010 , &B1111000 , &B0000000 , &B0010000
            ابتدا و شروع هرکاری سخت ترین مرحله آن کار است. برای مثال به عقابها نگاه کن ، حتی اونها هم در ابتدای پرواز ، زیاد بال و پر می زنند، اما هنگامی که اوج می گیرند ، دیگر حتی نیازی به پر زدن هم ندارند ...

            کافیست اولین قدمها را بدون ترس و با پشتکارِ بالا برداری مطمئن باش بزودی به اوج خواهی رسید و روزهای سخت همیشه نخواهند ماند ...

            دیدگاه

            لطفا صبر کنید...
            X