mehdi parsafar
24-09-2008, 16:40
سلام
من یه برنامه نوشتم واسه avr mega8 که با یک کلید led هم روشن شه و هم خاموش
لطفا بگین که این برنامه درسته یا نه
و در عمل کار میکنه یا نه
$regfile = "M8def.dat"
$crystal = 8000000
Config Portb.0 = Output
Config Pind.3 = Input
Config Pind.3 = Input
Config Debounce = 30
Do
Debounce Pind.3 , 1 , Roshan , Sub
Debounce Pind.3 , 1 , Khamosh , Sub
Loop
End
Roshan:
Set Portb.0
Return
Khamosh:
Reset Portb.0
Return
من یه برنامه نوشتم واسه avr mega8 که با یک کلید led هم روشن شه و هم خاموش
لطفا بگین که این برنامه درسته یا نه
و در عمل کار میکنه یا نه
$regfile = "M8def.dat"
$crystal = 8000000
Config Portb.0 = Output
Config Pind.3 = Input
Config Pind.3 = Input
Config Debounce = 30
Do
Debounce Pind.3 , 1 , Roshan , Sub
Debounce Pind.3 , 1 , Khamosh , Sub
Loop
End
Roshan:
Set Portb.0
Return
Khamosh:
Reset Portb.0
Return