با سلام .
من یک کلید فشاری ( که سر دیگه اون به زمین وصله ) رو به پایه PD2 مگا 8 وصل کردم و میخوام وقتی فشار میدم چند تا چیز رو روشن کنه و وقتی اونو ول میکنم چند تا چیز رو خاموش کنه . یکی از چیزهایی که روشن میشه یک موتور 42v / 3A هست که اونو با ماسفت و PWM راه میندازم . با برنامه ی زیر همه چیز خوب کار میکنه اما بعد از فشار دادن کلید و نگه داشتن به مدت چند ثانیه یهو همه خاموش میشه ( انگار که اونو ول کردم ) در صورتی که من هنوز کلید رو ول نکردم .
[glow=red,2,300]لطفا منو راهنمایی کنید . [/glow]
من یک کلید فشاری ( که سر دیگه اون به زمین وصله ) رو به پایه PD2 مگا 8 وصل کردم و میخوام وقتی فشار میدم چند تا چیز رو روشن کنه و وقتی اونو ول میکنم چند تا چیز رو خاموش کنه . یکی از چیزهایی که روشن میشه یک موتور 42v / 3A هست که اونو با ماسفت و PWM راه میندازم . با برنامه ی زیر همه چیز خوب کار میکنه اما بعد از فشار دادن کلید و نگه داشتن به مدت چند ثانیه یهو همه خاموش میشه ( انگار که اونو ول کردم ) در صورتی که من هنوز کلید رو ول نکردم .
[glow=red,2,300]لطفا منو راهنمایی کنید . [/glow]
$regfile = "m8def.dat"
$crystal = 8000000
Config Portb = Output
Config Debounce = 50
Do
Debounce Pind.2 , 0 , M0 , Sub
Loop
End
M0:
Set Portb.1 : Waitms 50
Set Portb.2 : Waitms 50
Start Timer0 : Start Timer1
Bitwait Pind.2 , Set
Stop Timer0 : Stop Timer1 : Set Portb.3 : Waitms 150 : Reset Portb.3
Reset Portb.2 : Waitms 50
Reset Portb.1
Return
$crystal = 8000000
Config Portb = Output
Config Debounce = 50
Do
Debounce Pind.2 , 0 , M0 , Sub
Loop
End
M0:
Set Portb.1 : Waitms 50
Set Portb.2 : Waitms 50
Start Timer0 : Start Timer1
Bitwait Pind.2 , Set
Stop Timer0 : Stop Timer1 : Set Portb.3 : Waitms 150 : Reset Portb.3
Reset Portb.2 : Waitms 50
Reset Portb.1
Return
دیدگاه