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