Курсовая работа: Цифровой тахометр

bcf STATUS,RP0 ; банк 0

; задание приращения счетчика импульсов

movlw 0x1 ; *!!! в десятичном виде !!!!!!

movwf DOB

; ----------

movlw 0x0F ;

andwf DOB,0 ;

addwf OB0,1 ; добавить младшую тетраду приращения

btfss STATUS,DC ;

goto Metka2 ;--------------------------

movlw 0x06 ;

addwf OB0,1 ; коррекция при переносе из 3 в 4

goto Metka3 ;--------------------

Metka2 movlw 0x06 ; проверка и коррекция

addwf OB0,0 ; недопустимой комбинации

btfss STATUS,DC ; первой тетрады

goto Metka4 ; выход в конец процедуры !!!!!!!

movwf OB0 ;--------------------------

Metka3 ;проверка и коррекция недопустимой комбинации II тетр.

movlw 0x1 ;*

addwf OB0,0 ;

btfss STATUS,C ;

goto Metka4 ; !!!!!!!!!!

movwf OB0

incf OB1,1 ;

; проверка и коррекция I тетрады II байта

movlw 0x06

addwf OB1,0

btfss STATUS,DC