📄 c2cx0032.lst
字号:
3 ;
3 0171 1f8d LACC *,15,AR5 ; ACC := (PI)/2 PI QI 5
3 0172 3f89 SUB *,15,AR1 ; ACC := (PI-QR)/2 PI QI 1
3 0173 98ad SACH *+,0,AR5 ; PI := (PI-QR)/2 PR+1 QI 5
3 0174 618a ADD *,16,AR2 ; ACC := (PI+QR)/2 PR+1 QI 2
3 0175 98a0 SACH *+ ; QI := (PI+QR)/2 PR+1 QI+1 2
2 0176 P3BY4J 2
3 ; ------ ------ --- --- ---
3 0176 54ad MPY *+,AR5 ; PREG= W*QR/2 - W*QR/2 PR QI 5
3 0177 8d89 SPH *,AR1 ; TMP = W*QR/2 W*QR/2 W*QR/2 PR QI 1
3 0178 1f8a LACC *,15,AR2 ; ACC = PR/2 W*QR/2 W*QR/2 PR QI 2
3 0179 5090 MPYA *- ; ACC = (PR+W*QR)/2 W*QR/2 W*QI/2 PR QR 2
3 017a be05 SPAC ; ACC = (PR-W*QI+W*QR)/2 W*QR/2 W*QI/2 PR QR 2
3 017b 98a9 SACH *+,0,AR1 ; QR' = (PR-W*QI+W*QR)/2 W*QR/2 W*QI/2 PR QI 1
3 017c 6580 SUB *,16 ; ACC = (-PR-W*QI+W*QR)/2 W*QR/2 W*QI/2 PR QI 1
3 017d be02 NEG ; ACC = (PR+W*QI-W*QR)/2 W*QR/2 W*QI/2 PR QI 1
3 017e 98a0 SACH *+ ; PR' = (PR+W*QI-W*QR)/2 W*QR/2 W*QI/2 PI QI 1
3 ;
3 017f 1f8d LACC *,15,AR5 ; ACC = (PI)/2 W*QR/2 W*QI/2 PI QI 5
3 0180 be04 APAC ; ACC = (PI+W*QI)/2 W*QR/2 - PI QI 5
3 0181 618a ADD *,16,AR2 ; ACC = (PI+W*QI+W*QR)/2 - - PI QI 2
3 0182 98e9 SACH *0+,0,AR1 ; QI' = (PI+W*QI+W*QR)/2 - - PI QR5 1
3 0183 6580 SUB *,16 ; ACCU= (-PI+W*QI+W*QR)/2 - - PI QR5 1
3 0184 be02 NEG ; ACCU= (PI-W*QI-W*QR)/2 - - PI QR5 1
3 0185 98ea SACH *0+,0,AR2 ; PI' = (PI-W*QI-W*QR)/2 - - PR5 QR5 2
2 0186 ZEROI
3 0186 1f89 LACC *,15,AR1 ; ACC := (1/2)(QR) PR QR 1
TMS320C1x/C2x/C2xx/C5x COFF Assembler Version 7.00 Sat Jul 14 16:18:01 2001
Copyright (c) 1987-1999 Texas Instruments Incorporated
0032 point DIT Radix-2, Complex FFT PAGE 11
3 0187 2f80 ADD *,15 ; ACC := (1/2)(PR+QR) PR QR 1
3 0188 98aa SACH *+,0,AR2 ; PR := (1/2)(PR+QR) PI QR 2
3 0189 6580 SUB *,16 ; ACC := (1/2)(PR+QR)-(QR) PI QR 2
3 018a 98a0 SACH *+ ; QR := (1/2)(PR-QR) PI QI 2
3 ;
3 018b 1f89 LACC *,15,AR1 ; ACC := (1/2)(QI) PI QI 1
3 018c 2f80 ADD *,15 ; ACC := (1/2)(PI+QI) PI QI 1
3 018d 98aa SACH *+,0,AR2 ; PI := (1/2)(PI+QI) PR+1 QI 2
3 018e 6580 SUB *,16 ; ACC := (1/2)(PI+QI)-(QI) PR+1 QI 2
3 018f 98a0 SACH *+ ; QI := (1/2)(PI-QI) PR+1 QR+1 2
2 0190 PBY4J
3 0190 54ad MPY *+,AR5 ; PREG= W*QR/2 - W*QR/2 PR QI 5
3 0191 8d89 SPH *,AR1 ; TMP = W*QR/2 W*QR/2 W*QR/2 PR QI 1
3 0192 1f8a LACC *,15,AR2 ; ACC = PR/2 W*QR/2 W*QR/2 PR QI 2
3 0193 5190 MPYS *- ; ACC = (PR-W*QR)/2 W*QR/2 W*QI/2 PR QR 2
3 0194 be05 SPAC ; ACC = (PR-W*QI-W*QR)/2 W*QR/2 W*QI/2 PR QR 2
3 0195 98a9 SACH *+,0,AR1 ; QR = (PR-W*QI-W*QR)/2 W*QR/2 W*QI/2 PR QI 1
3 0196 6580 SUB *,16 ; ACC = (-PR-W*QI-W*QR)/2 W*QR/2 W*QI/2 PR QI 1
3 0197 be02 NEG ; ACC = (PR+W*QI+W*QR)/2 W*QR/2 W*QI/2 PR QI 1
3 0198 98a0 SACH *+ ; QR = (PR+W*QI+W*QR)/2 W*QR/2 W*QI/2 PI QI 1
3 ;
3 0199 1f8d LACC *,15,AR5 ; ACC = (PI)/2 W*QR/2 W*QI/2 PI QI 5
3 019a be05 SPAC ; ACC = (PI-W*QI)/2 W*QR/2 - PI QI 5
3 019b 618a ADD *,16,AR2 ; ACC = (PI-W*QI+W*QR)/2 - - PI QI 2
3 019c 98a9 SACH *+,0,AR1 ; QI = (PI-W*QI+W*QR)/2 - - PI QR1 1
3 019d 6580 SUB *,16 ; ACCU= (-PI-W*QI+W*QR)/2 - - PI QR1 1
3 019e be02 NEG ; ACCU= (PI+W*QI-W*QR)/2 - - PI QR1 1
3 019f 98aa SACH *+,0,AR2 ; PI = (PI+W*QI-W*QR)/2 - - PR1 QR1 2
2 01a0 PBY2I
3 01a0 1fad LACC *+,15,AR5 ; PR QI 5
3 01a1 998a SACH *,1,AR2 ; TMP=QR PR QI 2
3 ;
3 01a2 1f89 LACC *,15,AR1 ; ACC := QI/2 PR QI 1
3 01a3 2f80 ADD *,15 ; ACC := (PR+QI)/2 PR QI 1
3 01a4 98aa SACH *+,0,AR2 ; PR := (PR+QI)/2 PI QI 2
3 01a5 6590 SUB *-,16 ; ACC := (PR-QI)/2 PI QR 2
3 01a6 98a9 SACH *+,0,AR1 ; QR := (PR-QI)/2 PI QI 1
3 ;
3 01a7 1f8d LACC *,15,AR5 ; ACC := (PI)/2 PI QI 5
3 01a8 3f89 SUB *,15,AR1 ; ACC := (PI-QR)/2 PI QI 1
3 01a9 98ad SACH *+,0,AR5 ; PI := (PI-QR)/2 PR+1 QI 5
3 01aa 618a ADD *,16,AR2 ; ACC := (PI+QR)/2 PR+1 QI 2
3 01ab 98a0 SACH *+ ; QI := (PI+QR)/2 PR+1 QI+1 2
2 01ac P3BY4J 2
3 ; ------ ------ --- --- ---
3 01ac 54ad MPY *+,AR5 ; PREG= W*QR/2 - W*QR/2 PR QI 5
3 01ad 8d89 SPH *,AR1 ; TMP = W*QR/2 W*QR/2 W*QR/2 PR QI 1
3 01ae 1f8a LACC *,15,AR2 ; ACC = PR/2 W*QR/2 W*QR/2 PR QI 2
3 01af 5090 MPYA *- ; ACC = (PR+W*QR)/2 W*QR/2 W*QI/2 PR QR 2
3 01b0 be05 SPAC ; ACC = (PR-W*QI+W*QR)/2 W*QR/2 W*QI/2 PR QR 2
3 01b1 98a9 SACH *+,0,AR1 ; QR' = (PR-W*QI+W*QR)/2 W*QR/2 W*QI/2 PR QI 1
3 01b2 6580 SUB *,16 ; ACC = (-PR-W*QI+W*QR)/2 W*QR/2 W*QI/2 PR QI 1
3 01b3 be02 NEG ; ACC = (PR+W*QI-W*QR)/2 W*QR/2 W*QI/2 PR QI 1
3 01b4 98a0 SACH *+ ; PR' = (PR+W*QI-W*QR)/2 W*QR/2 W*QI/2 PI QI 1
TMS320C1x/C2x/C2xx/C5x COFF Assembler Version 7.00 Sat Jul 14 16:18:01 2001
Copyright (c) 1987-1999 Texas Instruments Incorporated
0032 point DIT Radix-2, Complex FFT PAGE 12
3 ;
3 01b5 1f8d LACC *,15,AR5 ; ACC = (PI)/2 W*QR/2 W*QI/2 PI QI 5
3 01b6 be04 APAC ; ACC = (PI+W*QI)/2 W*QR/2 - PI QI 5
3 01b7 618a ADD *,16,AR2 ; ACC = (PI+W*QI+W*QR)/2 - - PI QI 2
3 01b8 98e9 SACH *0+,0,AR1 ; QI' = (PI+W*QI+W*QR)/2 - - PI QR5 1
3 01b9 6580 SUB *,16 ; ACCU= (-PI+W*QI+W*QR)/2 - - PI QR5 1
3 01ba be02 NEG ; ACCU= (PI-W*QI-W*QR)/2 - - PI QR5 1
3 01bb 98ea SACH *0+,0,AR2 ; PI' = (PI-W*QI-W*QR)/2 - - PR5 QR5 2
1
1 01bc ZEROI
2 01bc 1f89 LACC *,15,AR1 ; ACC := (1/2)(QR) PR QR 1
2 01bd 2f80 ADD *,15 ; ACC := (1/2)(PR+QR) PR QR 1
2 01be 98aa SACH *+,0,AR2 ; PR := (1/2)(PR+QR) PI QR 2
2 01bf 6580 SUB *,16 ; ACC := (1/2)(PR+QR)-(QR) PI QR 2
2 01c0 98a0 SACH *+ ; QR := (1/2)(PR-QR) PI QI 2
2 ;
2 01c1 1f89 LACC *,15,AR1 ; ACC := (1/2)(QI) PI QI 1
2 01c2 2f80 ADD *,15 ; ACC := (1/2)(PI+QI) PI QI 1
2 01c3 98aa SACH *+,0,AR2 ; PI := (1/2)(PI+QI) PR+1 QI 2
2 01c4 6580 SUB *,16 ; ACC := (1/2)(PI+QI)-(QI) PR+1 QI 2
2 01c5 98a0 SACH *+ ; QI := (1/2)(PI-QI) PR+1 QR+1 2
1 01c6 PBY4J
2 01c6 54ad MPY *+,AR5 ; PREG= W*QR/2 - W*QR/2 PR QI 5
2 01c7 8d89 SPH *,AR1 ; TMP = W*QR/2 W*QR/2 W*QR/2 PR QI 1
2 01c8 1f8a LACC *,15,AR2 ; ACC = PR/2 W*QR/2 W*QR/2 PR QI 2
2 01c9 5190 MPYS *- ; ACC = (PR-W*QR)/2 W*QR/2 W*QI/2 PR QR 2
2 01ca be05 SPAC ; ACC = (PR-W*QI-W*QR)/2 W*QR/2 W*QI/2 PR QR 2
2 01cb 98a9 SACH *+,0,AR1 ; QR = (PR-W*QI-W*QR)/2 W*QR/2 W*QI/2 PR QI 1
2 01cc 6580 SUB *,16 ; ACC = (-PR-W*QI-W*QR)/2 W*QR/2 W*QI/2 PR QI 1
2 01cd be02 NEG ; ACC = (PR+W*QI+W*QR)/2 W*QR/2 W*QI/2 PR QI 1
2 01ce 98a0 SACH *+ ; QR = (PR+W*QI+W*QR)/2 W*QR/2 W*QI/2 PI QI 1
2 ;
2 01cf 1f8d LACC *,15,AR5 ; ACC = (PI)/2 W*QR/2 W*QI/2 PI QI 5
2 01d0 be05 SPAC ; ACC = (PI-W*QI)/2 W*QR/2 - PI QI 5
2 01d1 618a ADD *,16,AR2 ; ACC = (PI-W*QI+W*QR)/2 - - PI QI 2
2 01d2 98a9 SACH *+,0,AR1 ; QI = (PI-W*QI+W*QR)/2 - - PI QR1 1
2 01d3 6580 SUB *,16 ; ACCU= (-PI-W*QI+W*QR)/2 - - PI QR1 1
2 01d4 be02 NEG ; ACCU= (PI+W*QI-W*QR)/2 - - PI QR1 1
2 01d5 98aa SACH *+,0,AR2 ; PI = (PI+W*QI-W*QR)/2 - - PR1 QR1 2
1 01d6 PBY2I
2 01d6 1fad LACC *+,15,AR5 ; PR QI 5
2 01d7 998a SACH *,1,AR2 ; TMP=QR PR QI 2
2 ;
2 01d8 1f89 LACC *,15,AR1 ; ACC := QI/2 PR QI 1
2 01d9 2f80 ADD *,15 ; ACC := (PR+QI)/2 PR QI 1
2 01da 98aa SACH *+,0,AR2 ; PR := (PR+QI)/2 PI QI 2
2 01db 6590 SUB *-,16 ; ACC := (PR-QI)/2 PI QR 2
2 01dc 98a9 SACH *+,0,AR1 ; QR := (PR-QI)/2 PI QI 1
2 ;
2 01dd 1f8d LACC *,15,AR5 ; ACC := (PI)/2 PI QI 5
2 01de 3f89 SUB *,15,AR1 ; ACC := (PI-QR)/2 PI QI 1
2 01df 98ad SACH *+,0,AR5 ; PI := (PI-QR)/2 PR+1 QI 5
2 01e0 618a ADD *,16,AR2 ; ACC := (PI+QR)/2 PR+1 QI 2
2 01e1 98a0 SACH *+ ; QI := (PI+QR)/2 PR+1 QI+1 2
TMS320C1x/C2x/C2xx/C5x COFF Assembler Version 7.00 Sat Jul 14 16:18:01 2001
Copyright (c) 1987-1999 Texas Instruments Incorporated
0032 point DIT Radix-2, Complex FFT PAGE 13
1 01e2 P3BY4J 7
2 ; ------ ------ --- --- ---
2 01e2 54ad MPY *+,AR5 ; PREG= W*QR/2 - W*QR/2 PR QI 5
2 01e3 8d89 SPH *,AR1 ; TMP = W*QR/2 W*QR/2 W*QR/2 PR QI 1
2 01e4 1f8a LACC *,15,AR2 ; ACC = PR/2 W*QR/2 W*QR/2 PR QI 2
2 01e5 5090 MPYA *- ; ACC = (PR+W*QR)/2 W*QR/2 W*QI/2 PR QR 2
2 01e6 be05 SPAC ; ACC = (PR-W*QI+W*QR)/2 W*QR/2 W*QI/2 PR QR 2
2 01e7 98a9 SACH *+,0,AR1 ; QR' = (PR-W*QI+W*QR)/2 W*QR/2 W*QI/2 PR QI 1
2 01e8 6580 SUB *,16 ; ACC = (-PR-W*QI+W*QR)/2 W*QR/2 W*QI/2 PR QI 1
2 01e9 be02 NEG ; ACC = (PR+W*QI-W*QR)/2 W*QR/2 W*QI/2 PR QI 1
2 01ea 98a0 SACH *+ ; PR' = (PR+W*QI-W*QR)/2 W*QR/2 W*QI/2 PI QI 1
2 ;
2 01eb 1f8d LACC *,15,AR5 ; ACC = (PI)/2 W*QR/2 W*QI/2 PI QI 5
2 01ec be04 APAC ; ACC = (PI+W*QI)/2 W*QR/2 - PI QI 5
2 01ed 618a ADD *,16,AR2 ; ACC = (PI+W*QI+W*QR)/2 - - PI QI 2
2 01ee 98e9 SACH *0+,0,AR1 ; QI' = (PI+W*QI+W*QR)/2 - - PI QR5 1
2 01ef 6580 SUB *,16 ; ACCU= (-PI+W*QI+W*QR)/2 - - PI QR5 1
2 01f0 be02 NEG ; ACCU= (PI-W*QI-W*QR)/2 - - PI QR5 1
2 01f1 98ef SACH *0+,0,AR7 ; PI' = (PI-W*QI-W*QR)/2 - - PR5 QR5 2
1 01f2 7b9a banz loop3l,*-,ar2
01f3 011a+
169 ;
170 ; FFT CODE FOR STAGE 4 / ARP=AR2
171 ;
172 01f4 b010 STAGE4: lar ar0,#16 ; index register = 16
173 01f5 8010- sar ar0,TEMP+1 ; save index register
174 01f6 0101- lar ar1,DATAADD ; ar1 -> DATA
175 01f7 0206- lar ar2,DATA16 ; ar2 -> DATA+16
176 01f8 b601 lar ar6,#1 ; loopcounter = 1
177 ;
178 01f9 0309- loop4: lar ar3,cos4 ; start of cosine in stage 4
179 01fa 0408- lar ar4,sin4 ; start of sine in stage 4
180 01fb do_btfly 8 ; setup for 8 butterflies
1 0008 x? .set 8
1 $if divid!=8
1 01fb b700 lar ar7,#8/divid-2 ; execute ZEROI + num-1 times BUTTFLYI
1 01fc 7a80 call macros
01fd 0205+
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -