Page 36 - 6369
P. 36

org  000      ;при  скиданні  у  РС  заноситься  адреса
           h’000’
                   goto  MAIN    ;  перехід  до  початку  фонової
           програми
                 ;----ВЕКТОР ПЕРЕРИВАННЯ----------------------------
                   оrg  004;  при  перериванні  РІС  перехід  на  адресу
           h’004’
                   goto INT_COUNT ; перехід до процедури обробки
                                   ; переривань
                 ;----ІНІЦІАЛІЗАЦІЯ У ФОНОВІЙ ПРОГРАМІ-------
                 MAIN
                   bsf  INTCON,  INTE  ;  дозвіл  зовнішнього
           переривання
                   bsf  INTCON,  GIE    ;  дозвіл  глобального
           переривання
                   clrf  EVENT        ;онулення  лічильника  кількості
           деталей
                 ;----НЕСКІНЧЕНИЙ            ЦИКЛ           ФОНОВОЇ
           ПРОГРАМИ-----------------
                 M_LOOP            ; виконання певної команди
                                    ; виконання певної команди
                   goto M_LOOP

                 ;----ФУНКЦІЯ         ОБРОБКИ         ЗОВНІШНЬОЇ
           ;ПОДІЇ
                 ;---- ДОДАЄ ДО ЛІЧИЛЬНИКА КОЖНУ ДЕТАЛЬ-
                 INT_COUNT
                   movwf _work      ; збереження W у памяті даних
                   swapf  STATUS,W    ;  зчитування  STATUS  без
           зміни ознак
                   movwf  _status        ;  і  збереження  його  у  памяті
           даних

                                        36
   31   32   33   34   35   36   37   38   39