۱۴-دى-۱۳۸۸, ۰۰:۴۸:۴۲
سلام
من یک مدار دارم که 6کلید به پورت dمتصل است.وبه همین پورت led ها(6عدد)وسگمن هم متصل است.
من میخوام با فشردن هر کلید با تاخیر میلی ثانیه یکی از led ها روشن شده وعدد روی سگمنت افزایش یابدو...
یعنی 6 کار را میخواهم انجام دهم ولی هر چی برنامه مینویسم اصلا خروجی شدن را نمیفهمد وفقط نمایشگری که به ان کلید متصل است کمرنگ روشن می شود.من برنامه زیر رانوشته ام اما نیدانم کی خروجی کنم چون هیچ حالتی جواب نداد
Lable4:
Ddrd = &B10000001
Portd = &H00
If Pind.1 = 0 Then
Bte1 = 2
End If
If Pind.2 = 0 Then
Bte1 = 6
End If
If Pind.3 = 0 Then
Bte1 = 7
End If
If Pind.4 = 0 Then
Bte1 = 3
End If
If Pind.5 = 0 Then
Bte1 = 1
End If
If Pind.6 = 0 Then
Bte1 = 0
End If
If Fbit20 = 1 Then
If Bte1 <> 5 Then
Bte1 = 8
End If
Else
If Fbit15 = 1 Then
If Bte1 <> 0 Then
Bte1 = 8
End If
End If
End If
If Fbit28 = 1 Then
If Bte1 <> 4 Then
Bte1 = 8
End If
End If
If Bte1 = Bte2 Then
If Fbit2 = 1 Then
If Bte4 > Constant27 Then
Ddrd = &HFF
On Bte1 Goto Lable16 , Lable17 , Fbit3k , Lable18 , Lable19 , Lable20 , Up , Down , Exit_lable4
[align=left]
من یک مدار دارم که 6کلید به پورت dمتصل است.وبه همین پورت led ها(6عدد)وسگمن هم متصل است.
من میخوام با فشردن هر کلید با تاخیر میلی ثانیه یکی از led ها روشن شده وعدد روی سگمنت افزایش یابدو...
یعنی 6 کار را میخواهم انجام دهم ولی هر چی برنامه مینویسم اصلا خروجی شدن را نمیفهمد وفقط نمایشگری که به ان کلید متصل است کمرنگ روشن می شود.من برنامه زیر رانوشته ام اما نیدانم کی خروجی کنم چون هیچ حالتی جواب نداد
Lable4:
Ddrd = &B10000001
Portd = &H00
If Pind.1 = 0 Then
Bte1 = 2
End If
If Pind.2 = 0 Then
Bte1 = 6
End If
If Pind.3 = 0 Then
Bte1 = 7
End If
If Pind.4 = 0 Then
Bte1 = 3
End If
If Pind.5 = 0 Then
Bte1 = 1
End If
If Pind.6 = 0 Then
Bte1 = 0
End If
If Fbit20 = 1 Then
If Bte1 <> 5 Then
Bte1 = 8
End If
Else
If Fbit15 = 1 Then
If Bte1 <> 0 Then
Bte1 = 8
End If
End If
End If
If Fbit28 = 1 Then
If Bte1 <> 4 Then
Bte1 = 8
End If
End If
If Bte1 = Bte2 Then
If Fbit2 = 1 Then
If Bte4 > Constant27 Then
Ddrd = &HFF
On Bte1 Goto Lable16 , Lable17 , Fbit3k , Lable18 , Lable19 , Lable20 , Up , Down , Exit_lable4
[align=left]