Библиотека Компэла


f& Texas iNSiraJMENTS   IV. Примеры конкретных применений
rra rll  
rra rll  
rra rll  
rra rll  
add rll,rl2 ; Tl в г12
mov rl2,Tl 1209 ; сохранить Tl в ОЗУ
rla rl3 ; N3 * 32
rla rl3  
rla rl3  
rla rl3  
rla rl3  
rla rl2 ; Tl * 32
rla rl2  
rla rl2  
rla rl2  
rla rl2  
sub IN,rl2  
add 12,OUT ; В г13 выходное значение
. *************** **************- ************************
cmp OUT,MAXHI ; Сравнить выходное
    ; значение с максиму-
    ; мом
jge SWAP4  
mov rl3,MAXHI ; замена максимума
mov #00,COL ; столбец = С

SWAP4 ******************************************** ; окончание согласующей цепи

FILTER_120 9_ENDE .endif


.if FILTER 5
FILTER 941  
mov T2 941,rl3
mov Tl 941,rl2
mov rl2,rl4
sub rl3,rl2
rra rl2
rra rl2
rra rl2
rra rl2
rra rl2
mov rl2,rll
rra rl2
add rl2,rll

N1=(T1-T2)*alpha