一个很好用的汇编FFT原程序
3星 · 超过75%的资源 需积分: 21 189 浏览量
2009-09-12
14:08:51
上传
评论 2
收藏 117KB DOC 举报 
FFT 程序
1 ORG 0800H
2 SIN EQW 12C0H
3 COS EQW 1380H
4 BB EQW 8900H
5 FT: MOV R,#80H ; 采样数据个数
6 MOV SP,#13H ; 设置堆栈
7 MOV 77H,#0C3H ; 置采样数据地址
8 MOV 76H,#00H
9 MOV DPTR,#DXB ; 置倒序表地址
10 MOV 73H,DPH
11 MOV 72H,DPL
12 FDBH:MOV DPH,77H ; 取采样数据→R2R3
13 MOV DPL,76H
14 MOVX,A,@DPTR
15 MOV R2,A
16 INC DPTR
17 MOVX,A,@DPTR
18 MOV R3,A
19 INC DPTR
20 MOV 77H,DPH
21 MOV 76M， DPL
22 MOV A,R2 ; 数符→3CH
23 MOV C,ACC.7
24 MOV 3CH,C
25 CLR, ACC.7
26 MOV R2,A
27 MOV R6,#10H ; 阶码#16→R6
28 SETB C
29 CLR PSW.5
30 LCALL FSDT ; 右规格化
31 MOV A,R6 ; 置数符
32 MOV C,3CH
33 MOV ACC.7, C
34 MOV R4,A
35 MOV DPH,73H ; 取倒序变量
36 MOV DPL,72H
37 CLR A
38 MOVC, A,@A+DPTR
39 MOV 20H,R2
40 MOV 21H,R3
41 MOV R0,#0CH
42 MOV R3,A
43 MOV R6,#00H
44 MOV R7, #00H
45 NADD: CLR C ; 倒序值 X#3→R6R7
46 MOV R2,#00H
47 MOV A,R3
48 ADD A,R7
49 MOV R7,A
50 MOV A,R2
51 ADDC, A,R6
52 MOV R6,A
53 DJNZ R0, NADD
剩余19页未读，继续阅读
资源评论
wenzhiquan2012-06-14看起来太复杂了，注释不好
jiangduo2009
- 粉丝: 0
- 资源: 1
