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

; коррекция TMR0

; при обращении преобразует число текущего разряда

; в семисегментный код, и производит его подсветку

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

; текущего разряда на 1 в пределах 0...3

movlw 0xF1

movwf TMR0 ; коррекция TMR0

bcf STATUS,RP0 ; банк 0

movlw 0xFF ; погасить индикатор

movwf PORTA ;

movlw IKANB

addwf INR,0 ; вычисление косвенного адреса разряда

movwf FSR

movf INDF,0 ; код числа разряда - в W

call Table1

movwf PORTB ; семисегментный код - на индикатор

movf INR,0

call Table2

movwf PORTA ; подсветкаразряда

incf INR,1 ;

btfsc INR,H'02' ;

clrf INR ; INR=INR+1

return

;------------------------------------------------------------

Sum

;-производит счет входных импульсов + нормировку для

; обеспечения показаний в оборотах/мин.

; счет ведется в двоично-десятичном коде

; обнуление счетчика при включении и по таймеру после