Подскажите как организовать счет импульсов за определенное время.Смысл такои......Допустим на INT0 пускаи считает до бесконечности сколько сможет а на INT1 считает количество импульсов за 1 секунду, записывает в переменную R,сбрасывается на 0 и считает заново.Я что-то недопонимаю, так как только начал работать с контроллерами.Подправте код

' ***************************************************************************
' *
' * Title : int0.bas
' * Program code : BASCOM AVR
' ***************************************************************************
$regfile = "m8def.dat" ' use the Mega8

$crystal = 4000000
Config Lcd = 20 * 4
Config Lcdpin = Pin , Db4 = Portb.1 , Db5 = Portb.2 , Db6 = Portb.3 , Db7 = Portb.4 , E = Portb.5 , Rs = Portb.6

Enable Interrupts
Enable Int0
Enable Int1
Config Int1 = Rising
Config Int0 = Rising
On Int0 Label33
On Int1 Label33
Dim Counter As Long
Dim N As Long
Counter = 0



Do
N = 100 * Counter
Locate 1 , 1
Lcd "Int0: " ; N

Loop

End



Label33:
Incr Counter
Return

Сообщение отредактировал JimBaton - Jan 4 2008, 23:56