sub procedure interrupt ()
myCounter1=0                    'сброс таймера если не нажата кнопка
if INTCON.INT0IF=1 then      'произошло событие  encoder
select case Menu1
case 1                       '    если меню громкости
if PORTC.7=1 then            '+

   if Volume1<63 then
      Volume1=Volume1+1
      flag1.7=1             '   нужно записать новое значение громкости
      flag1.6=1             '   нужно обновить экран
     ' sound_play(3300,50)
   end if
else                         '-
   if Volume1>0 then
      Volume1=Volume1-1
      flag1.7=1             '   нужно записать новое значение громкости
      flag1.6=1             '   нужно обновить экран
      'sound_play(2800,50)
   end if
end if
'delay_us(10)

INTCON.INT0IF = 0     '   сброс флага

если (не защёлка)
{
     обработка;
     защёлка = 1;
}
если (encoder.1 == encoder.2)
{
     обработка
     защёлка = 0;
}