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


f& Texas iNSiraJMENTS     IV. Примеры конкретных применений
rra rll    
rra rll    
add rll,rl2 ; Tl в г12
mov rl2,Tl 1633 ; сохранить Т1 в ОЗУ
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 rl2,OUT ; В г13 выходное значение
cmp OUT,MAXHI   ; Сравнить выходное
      ; значение с максиму-
      ; мом
jge SWAP1    
mov OUT,MAXHI   ; замена максимума
mov #03,COL   ; столбец = 3

SWAP1 ; ***************************^

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

FILTER_1633_END .endif

FILTER 2

T2_1477,rl2 rl2,rl3 rl2 Tl_1477,rl2 rl2,rl4 rl2 rl2 rl2,rll rl2 rl2 rl2,rll rl2 rl2,rll rl3,rll
Nll=T/2-Tl

.if FILTER_1477

N11 в rl2 N15=Nll*2*alpha-T2
N15 в rll

mov mov rra sub mov rra rra mov rra rra add rra add sub