ورود به حساب ثبت نام جدید فراموشی کلمه عبور
برای ورود به حساب کاربری خود، نام کاربری و کلمه عبورتان را در زیر وارد کرده و روی «ورود به سایت» کلیک کنید.





اگر فرم ورود برای شما نمایش داده نمیشود، اینجا را کلیک کنید.









اگر فرم ثبت نام برای شما نمایش داده نمی‌شود، اینجا را کلیک کنید.









اگر فرم بازیابی کلمه عبور برای شما نمایش داده نمی‌شود، اینجا را کلیک کنید.






جهت تبلیغ در وب سایت ECA کلیک کنید.

کاربران برچسب زده شده

نمایش نتایج: از 1 به 1 از 1
  1. #1
    2019/02/18
    9
    1

    Post نمایش ساعت و تاریخ در LCD به وسیله AVR

    با سلام
    من برنامه زیر رو نوشتم
    $regfile = "m16def.dat"
    $crystal = 1000000


    Config Lcdpin = Pin , Db4 = Pind.0 , Db5 = Pind.1 , Db6 = Pind.2 , _
    Db7 = Pind.3 , Rs = Pind.4 , E = Pind.5
    Config Lcd = 16 * 2


    Dim Saat As Byte
    Dim Dagigeh As Byte
    Dim Saniyeh As Byte
    Dim Ruz As Byte
    Dim Mah As Byte
    Dim Sal As Integer




    Saat = 0
    Dagigeh = 0
    Saniyeh = 0
    Ruz = 1
    Mah = 1
    Sal = 1398


    Main:


    Saniyeh = Saniyeh + 1
    If Saniyeh = 60 Then
    Saniyeh = 0
    Dagigeh = Dagigeh + 1
    End If
    If Dagigeh = 60 Then
    Dagigeh = 0
    Saat = Saat + 1
    End If
    If Saat = 24 Then
    Saat = 0
    Ruz = Ruz + 1
    End If
    If Mah = 1 Then Goto Mohasebeh1
    If Mah = 2 Then Goto Mohasebeh1
    If Mah = 3 Then Goto Mohasebeh1
    If Mah = 4 Then Goto Mohasebeh1
    If Mah = 5 Then Goto Mohasebeh1
    If Mah = 6 Then Goto Mohasebeh1
    If Mah = 7 Then Goto Mohasebeh2
    If Mah = 8 Then Goto Mohasebeh2
    If Mah = 9 Then Goto Mohasebeh2
    If Mah = 10 Then Goto Mohasebeh2
    If Mah = 11 Then Goto Mohasebeh2
    If Mah = 12 Then Goto Mohasebeh3




    Mohasebeh1:
    If Ruz = 32 Then
    Ruz = 1
    Mah = Mah + 1
    End If
    Goto Namayesh


    Mohasebeh2:
    If Ruz = 31 Then
    Ruz = 1
    Mah = Mah + 1
    End If
    Goto Namayesh


    Mohasebeh3:
    If Ruz = 30 Then
    Ruz = 1
    Mah = 1
    Sal = Sal + 1
    End If
    Goto Namayesh


    Namayesh:
    Locate 1 , 2
    Lcd Saat
    Locate 1 , 5
    Lcd ":"
    Locate 1 , 7
    Lcd Dagigeh
    Locate 1 , 10
    Lcd ":"
    Locate 1 , 12
    Lcd Saniyeh
    Locate 2 , 1
    Lcd Sal
    Locate 2 , 5
    Lcd "/"
    Locate 2 , 7
    Lcd Mah
    Locate 2 , 10
    Lcd "/"
    Locate 2 , 12
    Lcd Ruz
    Waitms 1000
    Cls
    Goto Main


    End 'end program

    مهمان عزیز شما حق دیدن لینک ها را ندارید

    عضویت


    مهمان عزیز شما حق دیدن لینک ها را ندارید

    عضویت



    این فایل با فرمت .bas هست که برای اجرا شدنش بباید نرم افزار bascom رو نصب کنید

    مهمان عزیز شما حق دیدن لینک ها را ندارید

    عضویت

    مهمان عزیز شما حق دیدن لینک ها را ندارید

    عضویت



    و این عکس هم مربوط به شبیه ساز پروتوس هست
    ویرایش توسط حسین ساغبکلو : 2019/04/19 در ساعت 18:24
نمایش نتایج: از 1 به 1 از 1

موضوعات مشابه

  1. پاسخ: 0
    آخرين نوشته: 2017/07/03, 10:42
  2. نمایش تاریخ و ساعت جاری در اکسل
    توسط akhani در انجمن Labview
    پاسخ: 10
    آخرين نوشته: 2015/09/20, 07:56
  3. |مشکل با DS1307| نمایش ساعت و تاریخ به صورت 165:165:165
    توسط masoud9 در انجمن میکروکنترلرهای AVR
    پاسخ: 45
    آخرين نوشته: 2015/01/26, 11:34
  4. پاسخ: 18
    آخرين نوشته: 2012/04/29, 17:01
  5. نمایش تاریخ شمسی به همراه ساعت در ال سی دی های گرافیکی
    توسط pani_rezaii در انجمن میکروکنترلرهای AVR
    پاسخ: 2
    آخرين نوشته: 2009/05/22, 18:16

کلمات کلیدی این موضوع

علاقه مندي ها (Bookmarks)

علاقه مندي ها (Bookmarks)

مجوز های ارسال و ویرایش

  • شما نمیتوانید موضوع جدیدی ارسال کنید
  • شما امکان ارسال پاسخ را ندارید
  • شما نمیتوانید فایل پیوست کنید.
  • شما نمیتوانید پست های خود را ویرایش کنید
  •