Программка:
$regfile = "2313def.dat"
$crystal = 4000000
$lib "mcsbyte.lbx"
Config Lcd = 16 * 2
Config Lcdpin = Pin , Db4 = Portb.1 , Db5 = Portb.2 , Db6 = Portb.3 , Db7 = Portb.4 , E = Portb.5 , Rs = Portb.6
Config Portd = Input
Config Portb = Output
Config Rc5 = Pind.2
Config Int0 = Low Level
On Int0 Ind
Enable Int0
Enable Interrupts
Dim Address As Byte , Command As Byte
Cls
Do
Loop
Ind:
Disable Int0
Getrc5(address , Command)
Cls
Lcd Command
Wait 1
Enable Int0
Return
End
При проверке синтаксиса выдает ошибку на 12 строку "Unknown interrupt souce" [COUNT <>3]
Почему? Bascom 1.11.8.7 взят из http://kazus.ru/forum/topics/8406.html
Отредактировано OTVERTKIN (2007-10-16 10:56:59)