AN2072 Freescale Semiconductor / Motorola, AN2072 Datasheet - Page 18

• Manufacturer Part Number: AN2072
• Description: AN2072, Decision Feedback Equalizer for StarCore-Based DSPs
• Manufacturer: Freescale Semiconductor / Motorola

Implementation of the Algorithm
;****End loop_b*****
end_loop_b:
move.2f (r0),d2:d3
loop_c:
loop_d:
18
;%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
loopend1
tfra BASE_ROW,r0
adda #N_1,r0,r0
tfra r0,r1
[ suba #4,r1
dosetup2 loop_d
]
tfra r1,BASE_COL
move.2f (r1),d0:d1
[ move.2f (r1),d4:d5
clr d6
]
[ mac d0,d4,d6
]
[ mac d1,d5,d6
]
[ sub d6,d2,d10
]
tfr d10,d15
;%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
loopstart1
doen2 d9
[ move.2f (r1)+n0,d4:d5
clr d6 clr d7
]
[ mac d1,d5,d6
move.2f (r1)+n0,d4:d5
]
[ sub d6,d2,d10
move.2f (r0)+n0,d2:d3
]
loopstart2
;-----------------------------------------------------------------------------------
rnd d10,d10
mac d0,d4,d6
move.2f (r1),d0:d1
Decision Feedback Equalizer for StarCore™-Based DSPs, Rev. 1
dosetup1 loop_c
tfra r0,CURRENT_COL
tfr d8,d9
doen1 d9 ; BASE_COL->r1
tfra r0,r4
clr d7
mac d0,d5,d7
mac -d1,d4,d7
sub d7,d3,d1
tfra r0,r4
mac d0,d5,d7
mac -d1,d4,d7
move.2f (r0)+n0,d2:d3 ; d6 & d7 = Re & Im
sub d7,d3,d11
clr d6 clr d7
rnd d11,d11
; for j=k+1:n d0=real(A(j,k)) d1=imag(A(j,k))
; for j=k+1:n d0=real(A(j,k)) d1=imag(A(j,k))
; move d3 to memory (imag result)
; pointer r0->r0+$30, point to
; next element in the column
; end loop_b
; r0->prevoius diagonal address
; r0->r0+$34 address for current
; diagonal
; save location of the current
; diagonal element in CURRENT_COL
; r1->(CURRENT_COL-$4)=
; previous col=BASE_COL
; d9=d8 (counter)
; d4=Re([A(j:n,k)] &
; d5=Im(A(j:n)
; d6=0 and d7=0
; r4->r0
; d6 & d7 = Re & Im
; [A(i,k)*conj(A(j,k))]
; d10 & d11 = Re & Im [A(i,j)]
; base col.), loop_c for l=k+1:n
; d5=Im(A(j:n,k))
; d6=0 and d7=0
; r4->r0
; [A(i,k)*conj(A(j,k))]
; d10 & d11 = Re & Im [A(i,j)
; d4=real(A(j:n,k)) &
; d5=imag(A(j:n,k))
; d6=0 d7=0
Freescale Semiconductor