اطلاعیه

Collapse
No announcement yet.

مشکل با ساعت

Collapse
X
Collapse
 
  • صفحه of 1
  • فیلتر
  • زمان
  • Show
Clear All
new posts
قبلی template بعدی
    #1

    مشکل با ساعت

    دوستان من این برنامه رو نوشتم ولی متاسفانه تایمر دقیق نیست مشکلش کجاست
    $regfile = "m8def.dat"
    $crystal = 1000000
    Config Lcd = 16 * 2
    Config Lcdpin = Pin , Rs = Portd.1 , E = Portd.2 , Db4 = Portd.4 , Db5 = Portd.5 , Db6 = Portd.6 , Db7 = Portd.7
    ''''''''&# 039;'''''''&#03 9;'''''
    Dim H As Byte , M As Byte , S As Byte
    ''''''''&# 039;'''''''&#03 9;'''''
    Config Portd = Output
    ''''''''&# 039;'''''''&#03 9;''''''
    Enable Interrupts
    Config Timer1 = Timer , Prescale = 1024 , Clear Timer = 1
    Enable Timer1
    Start Timer1
    Enable Ovf1
    Timer1 = 64535
    On Ovf1 Main
    ''''''''&# 039;'''''''&#03 9;'''''
    M = 0 : H = 0 : S = 0
    ''''''''&# 039;'''''''&#03 9;'''''
    Initlcd
    Cursor Off
    Do

    Loop
    End
    ''''''''&# 039;'''''''&#03 9;''''
    Main:
    Incr S
    If S = 60 Then
    S = 0
    Incr M
    If M = 60 Then
    M = 0
    Incr H
    If H = 24 Then
    H = 0
    Goto Main
    End If
    End If
    End If
    Home

    If S = 5 Then Locate 1 , 14 : Lcd ""
    If M < 10 Then : Locate 1 , 15 : Lcd "0" ; M ; ":"
    Elseif M < 60 Then : Locate 1 , 15 : Lcd M ; ":"
    Else : M = 0 : Locate 1 , 15 : Lcd "00" ; ":"
    End If
    If H < 10 Then : Locate 1 , 12 : Lcd "0" ; H ; ":"
    Elseif H < 24 Then : Locate 1 , 12 : Lcd H ; ":"
    Else : H = 0 : Locate 1 , 12 : Lcd "00" ; ":"
    End If
    If Pinb.3 = 1 Then
    Incr M
    If Pinb.4 = 1 Then
    Incr H
    End If
    End If
    Timer1 = 64535
    ''''''''&# 039;'''''''&#03 9;'''''''' '''''

    Return
    ''''''''&# 039;'''''
    برچسب ها: با, ساعت, مشکل
    #2
    پاسخ : مشکل با ساعت

    سلام
    زمانش که تقریبا درسته
    اگه از فیوز بیتاتم مطمئنی مقدار تایمر رو که توی زیر برنامه در آخر عدد بهش دادی بذار اولین خط زیر برنامت. بعد از main
    مردم شهری که همه در آن می لنگند/ به کسی که راه راست میرود می خندند

    دیدگاه

      #3
      پاسخ : مشکل با ساعت

      prescale=1024 هست پس هر پالس میشه 1024 میکرو ثانیه تعداد شمارش رو هم گذاشتین 1000 پس میشه 1024 میلی ثانیه که اندکی از یک ثانیه بیشتر میشه (24 میلی ثانیه بیشتر) اگر بجای 1000 بزارید 976 دقتش بهتر میشه.
      مهم نیست چه مدرکى دارید
      مهم این است که چه درکى دارید . . .

      دیدگاه

        #4
        پاسخ : مشکل با ساعت

        سلام داداش این برنامرو برا چی میخوایی ؟
        خوده میکرو که هم پیکربندی برا برنامه ساعت داره
        خواستن توانستن است !

        دیدگاه

          #5
          پاسخ : مشکل با ساعت

          نوشته اصلی توسط bstar2
          سلام داداش این برنامرو برا چی میخوایی ؟
          خوده میکرو که هم پیکربندی برا برنامه ساعت داره
          از پاسخ تمامی دوستان کمال تشکر دارم .
          راستش من تو این مبحث تازه کارم
          میشه راجع به این پیکربندی توضیح بدید ...

          دیدگاه

            #6
            پاسخ : مشکل با ساعت

            کد:
            Config Date = Mdy , Separator = /              ' ANSI-Format

Config Clock = Soft                     

'The format is MM/DD/YY

Date$ = "11/11/00"

Time$ = "02:20:00"

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

'clear the LCD display

Cls

 

Do

Home                           'cursor home

Lcd Date$ ; " " ; Time$                 'show the date and time

Loop

End
            اینم یه مثال ساده با بسکام البته برای راه اندازیش یه کریستال ساعت 32kh میخوایی که وصل کنی به میکرو
            خواستن توانستن است !

            دیدگاه

              #7
              پاسخ : مشکل با ساعت

              نوشته اصلی توسط bstar2
              کد:
              Config Date = Mdy , Separator = /              ' ANSI-Format

Config Clock = Soft                     

'The format is MM/DD/YY

Date$ = "11/11/00"

Time$ = "02:20:00"

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

'clear the LCD display

Cls

 

Do

Home                           'cursor home

Lcd Date$ ; " " ; Time$                 'show the date and time

Loop

End
              اینم یه مثال ساده با بسکام البته برای راه اندازیش یه کریستال ساعت 32kh میخوایی که وصل کنی به میکرو
              ممنون دوست گرامی
              اینو بستم کریستال رو هم به پایه 9 و 10 مگا 8 متصل کردم ولی کار نکرد
              البته من تاریخ رو حذف کردم ....
              ایراد از کجا میتونه باشه

              دیدگاه

                #8
                پاسخ : مشکل با ساعت

                نوشته اصلی توسط bstar2
                البته برای راه اندازیش یه کریستال ساعت 32kh میخوایی که وصل کنی به میکرو
                پس کریستال ساعت و به کجا وصل کردی ؟
                خواستن توانستن است !

                دیدگاه

                  #9
                  پاسخ : مشکل با ساعت

                  نوشته اصلی توسط bstar2
                  پس کریستال ساعت و به کجا وصل کردی ؟
                  کریستال ساعت رو به پایه 9 و 10 ای سی متصل کردم دیگه

                  دیدگاه

                    #10
                    پاسخ : مشکل با ساعت

                    ببخشد من دقیق مطالعه نکردم
                    خوب شما توی برنامه ای که تغییر دادین نوع میکرو و میزان کریستالو تعریف کردین ؟
                    ایا lcd چیز دیگری رو نمایش میده ؟
                    خواستن توانستن است !

                    دیدگاه

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