📄 co0511.lis
字号:
024E 6244 .byte 'b,'D
0250 7840 .byte 'x,64
0252 7C42 .byte 124,'B
0254 424E .byte 'B,'N
0256 0000 .byte 0,0
0258 0000 .byte 0,0
025A 0000 .byte 0,0
025C 0000 .byte 0,0
025E 0000 .byte 0,0
0260 0000 .byte 0,0
0262 0000 .byte 0,0
0264 0000 .byte 0,0
0266 0000 .byte 0,0
0268 0000 .byte 0,0
026A 0000 .byte 0,0
026C 0000 .byte 0,0
026E 0000 .byte 0,0
0270 0000 .byte 0,0
0272 0000 .byte 0,0
0274 0000 .byte 0,0
0276 0000 .byte 0,0
0278 0000 .byte 0,0
027A 0000 .byte 0,0
027C 0000 .byte 0,0
027E 0000 .byte 0,0
0280 0000 .byte 0,0
0282 0000 .byte 0,0
0284 0000 .byte 0,0
0286 0000 .byte 0,0
0288 0000 .byte 0,0
028A 0000 .byte 0,0
028C 0000 .byte 0,0
028E 0000 .byte 0,0
0290 0000 .byte 0,0
0292 0000 .byte 0,0
0294 0000 .byte 0,0
0296 0000 .byte 0,0
0298 0000 .byte 0,0
029A 0000 .byte 0,0
029C 0000 .byte 0,0
029E 0000 .byte 0,0
02A0 0418 .byte 4,24
02A2 9074 .byte 144,'t
02A4 1494 .byte 20,148
02A6 7516 .byte 'u,22
02A8 34D0 .byte 52,208
02AA 1418 .byte 20,24
02AC 0000 .byte 0,0
02AE 0408 .byte 4,8
02B0 7111 .byte 'q,17
02B2 1111 .byte 17,17
02B4 FF11 .byte 255,17
02B6 1131 .byte 17,49
02B8 1000 .byte 16,0
02BA 0000 .byte 0,0
02BC 0849 .byte 8,'I
02BE 4A7F .byte 'J,127
02C0 8A09 .byte 138,9
02C2 2412 .byte 36,18
02C4 00FF .byte 0,255
02C6 0101 .byte 1,1
02C8 0000 .byte 0,0
02CA 0808 .byte 8,8
02CC FF09 .byte 255,9
02CE 0610 .byte 6,16
02D0 FF10 .byte 255,16
02D2 101F .byte 16,31
02D4 0403 .byte 4,3
02D6 0000 .byte 0,0
02D8 0000 .byte 0,0
02DA 0000 .byte 0,0
02DC 0000 .byte 0,0
02DE 0000 .byte 0,0
02E0 0000 .byte 0,0
02E2 0000 .byte 0,0
02E4 0000 .byte 0,0
02E6 0000 .byte 0,0
02E8 0000 .byte 0,0
02EA 0000 .byte 0,0
02EC 0000 .byte 0,0
02EE 0000 .byte 0,0
02F0 0000 .byte 0,0
02F2 0000 .byte 0,0
02F4 0000 .byte 0,0
02F6 0000 .byte 0,0
02F8 0000 .byte 0,0
02FA 0000 .byte 0,0
02FC 0000 .byte 0,0
02FE 0000 .byte 0,0
0300 0000 .byte 0,0
0302 0000 .byte 0,0
0304 0000 .byte 0,0
0306 0000 .byte 0,0
0308 0000 .byte 0,0
030A 0000 .byte 0,0
030C 0000 .byte 0,0
030E 0000 .byte 0,0
0310 0000 .byte 0,0
0312 0000 .byte 0,0
0314 0000 .byte 0,0
0316 0000 .byte 0,0
0318 0000 .byte 0,0
031A 0000 .byte 0,0
031C 0000 .byte 0,0
031E 0000 .byte 0,0
0320 0080 .byte 0,128
0322 8080 .byte 128,128
0324 8090 .byte 128,144
0326 F080 .byte 240,128
0328 8080 .byte 128,128
032A 8080 .byte 128,128
032C 0000 .byte 0,0
032E 1010 .byte 16,16
0330 1010 .byte 16,16
0332 1010 .byte 16,16
0334 F010 .byte 240,16
0336 1010 .byte 16,16
0338 1010 .byte 16,16
033A 0000 .byte 0,0
033C 8000 .byte 128,0
033E 00F0 .byte 0,240
0340 0080 .byte 0,128
0342 8080 .byte 128,128
0344 80F0 .byte 128,240
0346 0000 .byte 0,0
0348 0000 .byte 0,0
034A 0000 .byte 0,0
034C F010 .byte 240,16
034E 2040 .byte 32,64
0350 8020 .byte 128,32
0352 10E0 .byte 16,224
0354 0000 .byte 0,0
0356 0000 .byte 0,0
0358 0000 .byte 0,0
035A 0000 .byte 0,0
035C 0000 .byte 0,0
035E 0000 .byte 0,0
0360 0000 .byte 0,0
0362 0000 .byte 0,0
0364 0000 .byte 0,0
0366 0000 .byte 0,0
0368 0000 .byte 0,0
036A 0000 .byte 0,0
036C 0000 .byte 0,0
036E 0000 .byte 0,0
0370 0000 .byte 0,0
0372 0000 .byte 0,0
0374 0000 .byte 0,0
0376 0000 .byte 0,0
0378 0000 .byte 0,0
037A 0000 .byte 0,0
037C 0000 .byte 0,0
037E 0000 .byte 0,0
0380 0000 .byte 0,0
0382 0000 .byte 0,0
0384 0000 .byte 0,0
0386 0000 .byte 0,0
0388 0000 .byte 0,0
038A 0000 .byte 0,0
038C 0000 .byte 0,0
038E 0000 .byte 0,0
0390 0000 .byte 0,0
0392 0000 .byte 0,0
0394 0000 .byte 0,0
0396 0000 .byte 0,0
0398 0000 .byte 0,0
039A 0000 .byte 0,0
039C 0000 .byte 0,0
039E 0000 .byte 0,0
03A0 0000 .byte 0,0
03A2 0000 .byte 0,0
03A4 0000 .byte 0,0
03A6 0000 .byte 0,0
03A8 0000 .byte 0,0
03AA 0000 .byte 0,0
03AC 0000 .byte 0,0
03AE 0000 .byte 0,0
03B0 0000 .byte 0,0
03B2 0000 .byte 0,0
03B4 0000 .byte 0,0
03B6 0000 .byte 0,0
03B8 0000 .byte 0,0
03BA 0000 .byte 0,0
03BC 0000 .byte 0,0
03BE 0000 .byte 0,0
03C0 0000 .byte 0,0
03C2 0000 .byte 0,0
03C4 0000 .byte 0,0
03C6 0000 .byte 0,0
03C8 0000 .byte 0,0
03CA 0000 .byte 0,0
03CC 0000 .byte 0,0
03CE 0000 .byte 0,0
03D0 0000 .byte 0,0
03D2 0000 .byte 0,0
03D4 0000 .byte 0,0
03D6 0000 .byte 0,0
03D8 0000 .byte 0,0
03DA 0000 .byte 0,0
03DC 0000 .byte 0,0
03DE 0000 .byte 0,0
03E0 0000 .byte 0,0
03E2 0000 .byte 0,0
03E4 0000 .byte 0,0
03E6 0000 .byte 0,0
03E8 0000 .byte 0,0
03EA 0000 .byte 0,0
03EC 0000 .byte 0,0
03EE 0000 .byte 0,0
03F0 0000 .byte 0,0
03F2 0000 .byte 0,0
03F4 0000 .byte 0,0
03F6 0000 .byte 0,0
03F8 0000 .byte 0,0
03FA 0000 .byte 0,0
03FC 0000 .byte 0,0
03FE 0000 .byte 0,0
0400 .dbsym e tab5 _tab5 A[1024:1024]kc
.area text(rom, con, rel)
0000 .dbfile E:\mcu\avr\test\cO0511\co0511.c
0000 .dbfunc e delay_1us _delay_1us fV
.even
0000 _delay_1us::
0000 .dbline -1
0000 .dbline 223
0000 ; /********Co051112864图形液晶*************
0000 ; CS 接PA0
0000 ; RES 接PA1
0000 ; A0 接PA2
0000 ; SCLk 接PC6
0000 ; SI 接PC7
0000 ; C86 接PA5
0000 ; P/S 接PA4
0000 ; *******************************/
0000 ; /********16位ad函数*************
0000 ; sclk 接PB3
0000 ; DOUT 接PB2
0000 ; CONV 接PB4
0000 ; EOC 接PB1
0000 ; cs 接PB0
0000 ; pa5输出
0000 ; *******************************/
0000 ; #define uint unsigned int
0000 ; #define uchar unsigned char
0000 ; #include<iom128v.h>
0000 ; //#include<math.h>
0000 ; #include<macros.h>
0000 ; //#include"ffft.h"
0000 ; uchar turn[128]={0};
0000 ; uchar n=0;
0000 ; /**************************************************
0000 ; float FFT_Re[128]={82,88,108,140,164,177,169,148,114,92,81,90,111,141,165,177,169,144,115,91,82,89,112,141,
0000 ; 166,178,168,144,114,90,80,91,112,143,167,178,166,144,112,89,80,91,112,143,168,177,168,142,111,89,82,91,115,
0000 ; 144,168,177,166,142,110,89,81,92,115,146,168,178,165,139,109,88,81,93,117,145,169,177,165,139,109,86,82,93,
0000 ; 117,148,170,176,164,138,106,88,81,94,118,149,170,177,163,137,106,87,80,94,121,149,171,177,163,106,86,82,96,
0000 ; 120,150,171,178,161,136,104,85,82,98,120,152,172,175,161,134,104}; //输入序列实部，初值为20KHz正弦波AD采样得到
0000 ; float FFT_Im[128]={0.0}; //虚部分存，因为是序列变换因此初值为零
0000 ; float Wr_Buff[64]={1,0.9988,0.9952,0.9892,0.9808,0.9700,0.9569,0.9415,0.9239,0.9040,
0000 ; 0.8819,0.8577,0.8315,0.8032,0.7730,0.7410,0.7071,0.6716,0.6344,0.5957,0.5556,0.5141,
0000 ; 0.4714,0.4276,0.3827,0.3369,0.2903,0.2430,0.1951,0.1467,0.0980,0.0491,0,-0.0491,
0000 ; -0.0980,-0.1467,-0.1951,-0.2430,-0.2903,-0.3369,-0.3827,-0.4276,-0.4714,-0.5141,
0000 ; -0.5556,-0.5957,-0.6344,-0.6716,-0.7071,-0.7410,-0.7730,-0.8032,-0.8315,-0.8577,
0000 ; -0.8819,-0.9040,-0.9239,-0.9415,-0.9569,-0.9700,-0.9808,-0.9892,-0.9952,-0.9988}; //旋转因子实部
0000 ; float Wi_Buff[64]={0,-0.0491,-0.0980,-0.1467,-0.1951,-0.2430,-0.2903,-0.3369,-0.3827,
0000 ; -0.4276,-0.4714,-0.5141,-0.5556,-0.5957,-0.6344,-0.6716,-0.7071,-0.7410,-0.7730,
0000 ; -0.8032,-0.8315,-0.8577,-0.8819,-0.9040,-0.9239,-0.9415,-0.9569,-0.9700,-0.9808,
0000 ; -0.9892,-0.9952,-0.9988, -1,-0.9988,-0.9952,-0.9892,-0.9808,-0.9700,-0.9569,-0.9415,
0000 ; -0.9239,-0.9040,-0.8819,-0.8577,-0.8315,-0.8032,-0.7730,-0.7410,-0.7071,-0.6716,
0000 ; -0.6344,-0.5957,-0.5556,-0.5141,-0.4714,-0.4276,-0.3827,-0.3369,-0.2903,-0.2430,
0000 ; -0.1951,-0.1467,-0.0980,-0.0491}; //旋转因子虚部
0000 ; float Window[128]={0.0806,0.0822,0.0850,0.0888,0.0938,0.0998,0.1069,0.1150,0.1242,
0000 ; 0.1343,0.1454,0.1575,0.1705,0.1844,0.1992,0.2147,0.2311,0.2482,0.2660,0.2844,0.3035,
0000 ; 0.3232,0.3433,0.3640,0.3850,0.4065,0.4282,0.4503,0.4725,0.4949,0.5174,0.5400,0.5626,
0000 ; 0.5851,0.6075,0.6297,0.6518,0.6735,0.6950,0.7160,0.7367,0.7568,0.7765,0.7956,0.8140,
0000 ; 0.8318,0.8489,0.8653,0.8808,0.8956,0.9095,0.9225,0.9346,0.9457,0.9558,0.9650,0.9731,
0000 ; 0.9802,0.9862,0.9912,0.9950,0.9978,0.9994, 1,0.9994,0.9978,0.9950,0.9912,0.9862,
0000 ; 0.9802,0.9731,0.9650,0.9558,0.9457,0.9346,0.9225,0.9095,0.8956,0.8808,0.8653,0.8489,
0000 ; 0.8318,0.8140,0.7956,0.7765,0.7568,0.7367,0.7160,0.6950,0.6735,0.6518,0.6297,0.6075,
0000 ; 0.5851,0.5626,0.5400,0.5174,0.4949,0.4725,0.4503,0.4282,0.4065,0.3850,0.3640,0.3433,
0000 ; 0.3232,0.3035,0.2844,0.2660,0.2482,0.2311,0.2147,0.1992,0.1844,0.1705,0.1575,0.1454,
0000 ; 0.1343,0.1242,0.1150,0.1069,0.0998,0.0938,0.0888,0.0850,0.0822,0.0806,0.0800}; //窗函数，改进汉宁窗
0000 ; float Res[128]; //转换结果
0000 ; float Result1_r;
0000 ; float Result1_i;
0000 ; float Result2_r;
0000 ; float Result2_i;
0000 ; //*************************************************
0000 ; void FFT_Proc(void);
0000 ; /*************************************************
0000 ; int main(void)
0000 ; {
0000 ; unsigned char i;
0000 ; for(i=0;i<128;i++)
0000 ; FFT_Re[i]*=Window[i];
0000 ; FFT_Proc();
0000 ; while(1);
0000 ; return 1;
0000 ; }
0000 ; *************************************************/
0000 ; /*------------------------------------------------
0000 ; FFT_Proc ：计算128点FFT
0000 ; 信息 ：标准C浮点运算，可移植
0000 ; ------------------------------------------------/
0000 ; void FFT_Proc(void)
0000 ; {
0000 ; unsigned char i;
0000 ; unsigned char j;
0000 ; unsigned char a;
0000 ; unsigned char b;
0000 ; unsigned char c;
0000 ; unsigned char k=0;
0000 ; unsigned char temp=0;
0000 ; unsigned char revers=0;
0000 ; float FFT_Re1[128];
0000 ; for(i=0;i<128;i++)
0000 ; FFT_Re1[i]=FFT_Re[i];
0000 ; for(i=0;i<128;i++)
0000 ; {
0000 ; for(j=0;j<7;j++)
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -