اطلاعیه

Collapse
No announcement yet.

مشکل در ساعت رو lcd

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

    مشکل در ساعت رو lcd

    سلام
    من با ۱۳۰۷ مگا۳۲ ساعت ساختم . وقتی با کلیدهای تنظیم ساعت رو تنظیم میکنم ابتدا یه مدت خیلی کوتاه حدود میلی ثانیه یه عدد دیگه نشون میده بعد درست میشه مشکل کجاست مرسی
    برچسب ها: lcd, در, رو, ساعت, مشکل
    #2
    پاسخ : مشکل در ساعت رو lcd

    نوشته اصلی توسط javad m
    سلام
    من با ۱۳۰۷ مگا۳۲ ساعت ساختم . وقتی با کلیدهای تنظیم ساعت رو تنظیم میکنم ابتدا یه مدت خیلی کوتاه حدود میلی ثانیه یه عدد دیگه نشون میده بعد درست میشه مشکل کجاست مرسی
    اگه برنامه تون بیسیک هست بزاریدش تا کمک کنم
    لطفا اگه امکانش هست بخش های برنامه رو مشخص کنید مثلا بخش تنظیم معلوم باشه
    من نمىآ‌توانم فرضیه «بىآ‌اخلاقى انسان» را بپذیرم، و من اخلاق را منحصرا امرى انسانى و متعلق به انسان مىآ‌دانم که هیچ نوع قدرت مافوق انسانى در پشت آن وجود ندارد
    آلبرت اینشتین
    منبع: http://fa.wikiquote.org

    دیدگاه

      #3
      پاسخ : مشکل در ساعت رو lcd

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

      Do

      I2cstart
      I2cwbyte Ds1307w
      I2cwbyte 0
      I2cstart
      I2cwbyte Ds1307r
      I2crbyte Seco , Ack
      I2crbyte Mine , Ack
      I2crbyte Hour , Nack
      I2cstop
      Seco = Makedec(seco) : Mine = Makedec(mine) : Hour = Makedec(hour)
      If Seco > 59 Then Seco = 0
      If Mine > 59 Then Mine = 0
      If Hour > 23 Then
      Hour = 0
      Gosub Seco
      End If

      Lcdat 8 , 60 , Hour ; ":" ; Mine ; ":" ; Seco ; " "
      ادامه برنامه.....
      loop
      Case 17:
      Lcdat 2 , 37 , "hou>>"

      Incr Hour
      If Hour > 23 Then Hour = 0
      Hour = Makebcd(hour)
      I2cstart
      I2cwbyte Ds1307w
      I2cwbyte 2
      I2cwbyte Hour
      I2cstop
      Lcdat 8 , 60 , Hour ; ":" ; Mine ; ":" ; Seco ; " "
      Case 18:
      Lcdat 2 , 37 , "min>>"
      Incr Mine
      If Mine > 59 Then Mine = 0
      Mine = Makebcd(mine)
      I2cstart
      I2cwbyte Ds1307w
      I2cwbyte 1
      I2cwbyte Mine
      I2cstop
      Lcdat 8 , 60 , Hour ; ":" ; Mine ; ":" ; Seco ; " "

      دیدگاه

        #4
        پاسخ : مشکل در ساعت رو lcd

        Do

        I2cstart
        I2cwbyte Ds1307w
        I2cwbyte 0
        I2cstart
        I2cwbyte Ds1307r
        I2crbyte Seco , Ack
        I2crbyte Mine , Ack
        I2crbyte Hour , Nack
        I2cstop
        Seco = Makedec(seco) : Mine = Makedec(mine) : Hour = Makedec(hour)
        If Seco > 59 Then Seco = 0
        If Mine > 59 Then Mine = 0
        If Hour > 23 Then
        Hour = 0
        Gosub Seco
        End If
        قسمتی که قرمز کردم اصلا لازم نیست چون شما مقادیر رو دارید می خونید و هنوز وارد بخش تنظیم نشدید

        بقیه برنامه هم مفهوم نیست لطفا فایل bas (برنامه کامل) رو پلود کنید تا معلوم بشه چیکار کردین

        ضمنا شما گفتین که مدار با کیپد بسته شده منظورتون کیپد 4*4
        هست؟
        من نمىآ‌توانم فرضیه «بىآ‌اخلاقى انسان» را بپذیرم، و من اخلاق را منحصرا امرى انسانى و متعلق به انسان مىآ‌دانم که هیچ نوع قدرت مافوق انسانى در پشت آن وجود ندارد
        آلبرت اینشتین
        منبع: http://fa.wikiquote.org

        دیدگاه

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