roboforum.ru

Здравствуйте!
Кто программирует на басике помогите.
Как обравотать прерывание, в моем случае внешнее, допустим INT1.
Может у кого есть примеры или наброски, буду весьма благодарен.

а ты примерчик из хелпника сюда через тег Code вставь, мы тебе и подскажем, если к тому моменту сам не разберешся...

В хелпе я нашел вот.

Код: Выделить всё • Развернуть

Enable Interrupts
Enable Int1

но это я так понимаю просто разрешаем прерывание INT1 или я ошибаюсь?

правильно понимаешь
а почему весь пример не запостил?

$regfile = "m16def.dat"
$crystal = 1000000


Config Pind.4 = Output : Led1 Alias Portd.4

Led1 = 0

Do
Led1 = 1
Loop

куда только вставлять этот кусок???
Enable Interrupts
Enable Int1

допустим я хочу в цикле зажигаем светодиод Led1 и когда появляется сигнал на INT1 вызывалось прерывание которое гасила светодиод на некоторое время. Подскажите кто может.

1. оформляй код в соответсвующий тег, иначе я тебе предупреждение выпишу, я хоть и добрый, но порядок люблю.
2. ты уверен что ты весь пример сюда вставил?

Приношу свои извинения.
а код это я набрасал чтоб разобраться быстрее и вам понятнее было чего я хочу добиться.
Если что не правильно ткните пальцем.
В хелпе было только это и ничего больше

Код: Выделить всё • Развернуть

Enable Interrupts
Enable Int1

поэтому я и не знаю куда нато вписать этот код.
и как написать обработчик прерывания, тоже не знаю?

ты очень сильно заблуждаешся
ты какое слово в хелпе искал что оно тебе всего две строчки кода выдало?

учись читать хелп.
ниже выкладываю рабочий код

Код: Выделить всё • Развернуть

Config Portd.6 = Output
Config Portd.2 = Input
Config Int0 = LOW LEVEL
Enable Interrupts
Enable Int0
On Int0 Knopka

Do
Portd.5 = 0
Loop

Knopka:
Portd.5 = 1
Waitms 100
Return

Надеюсь тут все понятно?

Да все понятно.
БОЛЬШОЕ тебе спасибо за пример.

Добавлено спустя 21 минуту 25 секунд:
Ток наверное будет

Код: Выделить всё • Развернуть

Config Portd.5 = Output

а не

Код: Выделить всё • Развернуть

Config Portd.6 = Output

раз тут так

Код: Выделить всё • Развернуть

Do
Portd.5 = 0
Loop

Knopka:
Portd.5 = 1
Waitms 100
Return

конечно, тут я уж ошибочку допустил