اطلاعیه

Collapse
No announcement yet.

mt8870 مشکل نهوه خواندن خروجی توسط میکرو

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

    mt8870 مشکل نهوه خواندن خروجی توسط میکرو

    باسلام
    دوستان من مشکلم اینه که چطوری باید خروجی آی سیmt8870 رو که به میکرو دادم بخونم؟
    با چه دستوری من یه سرچی کردم دیدم باید وقتی برنامه متوجه وقفه شد بره برنامه وقفه رو اجرا کنه
    من اینجا گیر میکنم چطوری این عدد باینری که به 4 تا پین مختلف وارد شدن رو بخونم و روی ال سی دی نشون بدم ؟؟؟؟؟ مثلاpin b.0=0-pin b.1=0 -pinb.2=0- pinb3=1( مبتدی هستم)
    حالاچیکار کنم؟؟؟؟
    معلوليت محدوديت نيست

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

    #2
    پاسخ : mt8870 مشکل نهوه خواندن خروجی توسط میکرو

    سلام
    به این صورت
    Config Pinb.0 = Input پایه 15 8870
    Config Pinb.1 = Input پایه 14 8870
    Config Pinb.2 = Input پایه 13 8870
    Config Pinb.3 = Input پایه 12 8870
    Config Pinb.4 = Input پایه 11 8870


    mohammad:
    do
    If Pinb.0 = 1 Then Goto Tabdil

    loop


    Tabdil:
    If Pinb.4 = 1 And Pinb.3 = 0 And Pinb.2 = 0 And Pinb.1 = 0 Then
    Adad = 1
    Return
    End If

    If Pinb.4 = 0 And Pinb.3 = 1 And Pinb.2 = 0 And Pinb.1 = 0 Then
    Adad = 2
    Return
    End If

    If Pinb.4 = 1 And Pinb.3 = 1 And Pinb.2 = 0 And Pinb.1 = 0 Then
    Adad = 3
    Return
    End If

    If Pinb.4 = 0 And Pinb.3 = 0 And Pinb.2 = 1 And Pinb.1 = 0 Then
    Adad = 4
    Return
    End If

    If Pinb.4 = 1 And Pinb.3 = 0 And Pinb.2 = 1 And Pinb.1 = 0 Then
    Adad = 5
    Return
    End If

    If Pinb.4 = 0 And Pinb.3 = 1 And Pinb.2 = 1 And Pinb.1 = 0 Then
    Adad = 6
    Return
    End If

    If Pinb.4 = 1 And Pinb.3 = 1 And Pinb.2 = 1 And Pinb.1 = 0 Then
    Adad = 7
    Return
    End If

    If Pinb.4 = 0 And Pinb.3 = 0 And Pinb.2 = 0 And Pinb.1 = 1 Then
    Adad = 8
    Return
    End If

    If Pinb.4 = 1 And Pinb.3 = 0 And Pinb.2 = 0 And Pinb.1 = 1 Then
    Adad = 9
    Return
    End If

    If Pinb.4 = 0 And Pinb.3 = 1 And Pinb.2 = 0 And Pinb.1 = 1 Then
    Adad = 0
    Return
    End If

    If Pinb.4 = 1 And Pinb.3 = 1 And Pinb.2 = 0 And Pinb.1 = 1 Then
    Adad = 11
    Return
    End If

    If Pinb.4 = 0 And Pinb.3 = 0 And Pinb.2 = 1 And Pinb.1 = 1 Then
    Adad = 12
    Return
    End If
    goto mohammad
    من آن گلبرگ مغرورم که می میرم ز بی آبی ولی با خفت و خواری پی شبنم نمی گردم.

    دیدگاه

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