📄 dsp1.txt
字号:
module w1(clk,dx,dy);
input clk;
output[7:0] dx,dy;
integer i,j,k;
reg[5:0] st;
reg[7:0] x[64],f[64];
reg[31:0] dre00[6],dim00[6],dre01[6],dim01[6];
reg[7:0] dwre[6],dwim[6];
reg[31:0] dre10[6],dim10[6],dre11[6],dim11[6];
reg[31:0] re00[64],re01[64],re10[64],re11[64],re20[64],re21[64],
re30[64],re31[64],re40[64],re41[64],re50[64],re51[64];
reg[31:0] im00[64],im01[64],im10[64],im11[64],im20[64],im21[64],
im30[64],im31[64],im40[64],im41[64],im50[64],im51[64];
//---------------------------------------------------------------
//module die(re00,im00,re01,im01,wre,wim,re10,im10,re11,im11);
//input[31:0] re00,im00,re01,im01;
//input[7:0] wre,wim;
//output[31:0] re10,im10,re11,im11;
//---------------------------------------------------------------
function[31:0] mul;
input[31:0] a;
input[7:0] b;
reg s;
reg[30:0] aa;
reg[6:0] bb;
reg[37:0] dd,d;
begin
s=a[31]^b[7];
aa=(a[31])?~a[30:0]+1:a[30:0];
bb=(b[7])?~b[6:0]+1:b[6:0];
dd=aa*bb;
d=(s)?~dd+1:dd;
mul={s,d[36:6]};
end
endfunction
//---------------------------------------------------------------
always @(posedge clk)
begin
st=(st!=40)?st+1:0;
case(st)
0:begin
end
1:begin
dre00[0]=re00[ 0];dre01[0]=re00[ 1];
dim00[0]=im00[ 0];dim01[0]=im00[ 1];
dwre=wre[ 0];dwim=wim[ 0];
dre00[1]=re10[ 0];dre01[1]=re10[ 2];
dim00[1]=im10[ 0];dim01[1]=im10[ 2];
dwre=wre[ 0];dwim=wim[ 0];
dre00[2]=re20[ 0];dre01[2]=re20[ 4];
dim00[2]=im20[ 0];dim01[2]=im20[ 4];
dwre=wre[ 0];dwim=wim[ 0];
dre00[3]=re30[ 0];dre01[3]=re30[ 8];
dim00[3]=im30[ 0];dim01[3]=im30[ 8];
dwre=wre[ 0];dwim=wim[ 0];
dre00[4]=re40[ 0];dre01[4]=re40[16];
dim00[4]=im40[ 0];dim01[4]=im40[16];
dwre=wre[ 0];dwim=wim[ 0];
dre00[5]=re50[ 0];dre01[5]=re50[32];
dim00[5]=im50[ 0];dim01[5]=im50[32];
dwre=wre[ 0];dwim=wim[ 0];
end
2:begin
dre00[0]=re00[ 2];dre01[0]=re00[ 3];
dim00[0]=im00[ 2];dim01[0]=im00[ 3];
dwre=wre[ 0];dwim=wim[ 0];
re01[ 0]=dre10[0];re01[ 1]=dre11[0];
im01[ 0]=dim10[0];im01[ 1]=dim11[0];
dre00[1]=re10[ 1];dre01[1]=re10[ 3];
dim00[1]=im10[ 1];dim01[1]=im10[ 3];
dwre=wre[16];dwim=wim[16];
re11[ 0]=dre10[1];re11[ 2]=dre11[1];
im11[ 0]=dim10[1];im11[ 2]=dim11[1];
dre00[2]=re20[ 1];dre01[2]=re20[ 5];
dim00[2]=im20[ 1];dim01[2]=im20[ 5];
dwre=wre[ 8];dwim=wim[ 8];
re21[ 0]=dre10[2];re21[ 4]=dre11[2];
im21[ 0]=dim10[2];im21[ 4]=dim11[2];
dre00[3]=re30[ 1];dre01[3]=re30[ 9];
dim00[3]=im30[ 1];dim01[3]=im30[ 9];
dwre=wre[ 4];dwim=wim[ 4];
re31[ 0]=dre10[3];re31[ 8]=dre11[3];
im31[ 0]=dim10[3];im31[ 8]=dim11[3];
dre00[4]=re40[ 1];dre01[4]=re40[17];
dim00[4]=im40[ 1];dim01[4]=im40[17];
dwre=wre[ 2];dwim=wim[ 2];
re41[ 0]=dre10[4];re41[16]=dre11[4];
im41[ 0]=dim10[4];im41[16]=dim11[4];
dre00[5]=re50[ 1];dre01[5]=re50[33];
dim00[5]=im50[ 1];dim01[5]=im50[33];
dwre=wre[ 1];dwim=wim[ 1];
re51[ 0]=dre10[5];re51[32]=dre11[5];
im51[ 0]=dim10[5];im51[32]=dim11[5];
end
3:begin
dre00[0]=re00[ 4];dre01[0]=re00[ 5];
dim00[0]=im00[ 4];dim01[0]=im00[ 5];
dwre=wre[ 0];dwim=wim[ 0];
re01[ 2]=dre10[0];re01[ 3]=dre11[0];
im01[ 2]=dim10[0];im01[ 3]=dim11[0];
dre00[1]=re10[ 4];dre01[1]=re10[ 6];
dim00[1]=im10[ 4];dim01[1]=im10[ 6];
dwre=wre[ 0];dwim=wim[ 0];
re11[ 1]=dre10[1];re11[ 3]=dre11[1];
im11[ 1]=dim10[1];im11[ 3]=dim11[1];
dre00[2]=re20[ 2];dre01[2]=re20[ 6];
dim00[2]=im20[ 2];dim01[2]=im20[ 6];
dwre=wre[16];dwim=wim[16];
re21[ 1]=dre10[2];re21[ 5]=dre11[2];
im21[ 1]=dim10[2];im21[ 5]=dim11[2];
dre00[3]=re30[ 2];dre01[3]=re30[10];
dim00[3]=im30[ 2];dim01[3]=im30[10];
dwre=wre[ 8];dwim=wim[ 8];
re31[ 1]=dre10[3];re31[ 9]=dre11[3];
im31[ 1]=dim10[3];im31[ 9]=dim11[3];
dre00[4]=re40[ 2];dre01[4]=re40[18];
dim00[4]=im40[ 2];dim01[4]=im40[18];
dwre=wre[ 4];dwim=wim[ 4];
re41[ 1]=dre10[4];re41[17]=dre11[4];
im41[ 1]=dim10[4];im41[17]=dim11[4];
dre00[5]=re50[ 2];dre01[5]=re50[34];
dim00[5]=im50[ 2];dim01[5]=im50[34];
dwre=wre[ 2];dwim=wim[ 2];
re51[ 1]=dre10[5];re51[33]=dre11[5];
im51[ 1]=dim10[5];im51[33]=dim11[5];
end
4:begin
dre00[0]=re00[ 6];dre01[0]=re00[ 7];
dim00[0]=im00[ 6];dim01[0]=im00[ 7];
dwre=wre[ 0];dwim=wim[ 0];
re01[ 4]=dre10[0];re01[ 5]=dre11[0];
im01[ 4]=dim10[0];im01[ 5]=dim11[0];
dre00[1]=re10[ 5];dre01[1]=re10[ 7];
dim00[1]=im10[ 5];dim01[1]=im10[ 7];
dwre=wre[16];dwim=wim[16];
re11[ 4]=dre10[1];re11[ 6]=dre11[1];
im11[ 4]=dim10[1];im11[ 6]=dim11[1];
dre00[2]=re20[ 3];dre01[2]=re20[ 7];
dim00[2]=im20[ 3];dim01[2]=im20[ 7];
dwre=wre[24];dwim=wim[24];
re21[ 2]=dre10[2];re21[ 6]=dre11[2];
im21[ 2]=dim10[2];im21[ 6]=dim11[2];
dre00[3]=re30[ 3];dre01[3]=re30[11];
dim00[3]=im30[ 3];dim01[3]=im30[11];
dwre=wre[12];dwim=wim[12];
re31[ 2]=dre10[3];re31[10]=dre11[3];
im31[ 2]=dim10[3];im31[10]=dim11[3];
dre00[4]=re40[ 3];dre01[4]=re40[19];
dim00[4]=im40[ 3];dim01[4]=im40[19];
dwre=wre[ 6];dwim=wim[ 6];
re41[ 2]=dre10[4];re41[18]=dre11[4];
im41[ 2]=dim10[4];im41[18]=dim11[4];
dre00[5]=re50[ 3];dre01[5]=re50[35];
dim00[5]=im50[ 3];dim01[5]=im50[35];
dwre=wre[ 3];dwim=wim[ 3];
re51[ 2]=dre10[5];re51[34]=dre11[5];
im51[ 2]=dim10[5];im51[34]=dim11[5];
end
5:begin
dre00[0]=re00[ 8];dre01[0]=re00[ 9];
dim00[0]=im00[ 8];dim01[0]=im00[ 9];
dwre=wre[ 0];dwim=wim[ 0];
re01[ 6]=dre10[0];re01[ 7]=dre11[0];
im01[ 6]=dim10[0];im01[ 7]=dim11[0];
dre00[1]=re10[ 8];dre01[1]=re10[10];
dim00[1]=im10[ 8];dim01[1]=im10[10];
dwre=wre[ 0];dwim=wim[ 0];
re11[ 5]=dre10[1];re11[ 7]=dre11[1];
im11[ 5]=dim10[1];im11[ 7]=dim11[1];
dre00[2]=re20[ 8];dre01[2]=re20[12];
dim00[2]=im20[ 8];dim01[2]=im20[12];
dwre=wre[ 0];dwim=wim[ 0];
re21[ 3]=dre10[2];re21[ 7]=dre11[2];
im21[ 3]=dim10[2];im21[ 7]=dim11[2];
dre00[3]=re30[ 4];dre01[3]=re30[12];
dim00[3]=im30[ 4];dim01[3]=im30[12];
dwre=wre[16];dwim=wim[16];
re31[ 3]=dre10[3];re31[11]=dre11[3];
im31[ 3]=dim10[3];im31[11]=dim11[3];
dre00[4]=re40[ 4];dre01[4]=re40[20];
dim00[4]=im40[ 4];dim01[4]=im40[20];
dwre=wre[ 8];dwim=wim[ 8];
re41[ 3]=dre10[4];re41[19]=dre11[4];
im41[ 3]=dim10[4];im41[19]=dim11[4];
dre00[5]=re50[ 4];dre01[5]=re50[36];
dim00[5]=im50[ 4];dim01[5]=im50[36];
dwre=wre[ 4];dwim=wim[ 4];
re51[ 3]=dre10[5];re51[35]=dre11[5];
im51[ 3]=dim10[5];im51[35]=dim11[5];
end
6:begin
dre00[0]=re00[10];dre01[0]=re00[11];
dim00[0]=im00[10];dim01[0]=im00[11];
dwre=wre[ 0];dwim=wim[ 0];
re01[ 8]=dre10[0];re01[ 9]=dre11[0];
im01[ 8]=dim10[0];im01[ 9]=dim11[0];
dre00[1]=re10[ 9];dre01[1]=re10[11];
dim00[1]=im10[ 9];dim01[1]=im10[11];
dwre=wre[16];dwim=wim[16];
re11[ 8]=dre10[1];re11[10]=dre11[1];
im11[ 8]=dim10[1];im11[10]=dim11[1];
dre00[2]=re20[ 9];dre01[2]=re20[13];
dim00[2]=im20[ 9];dim01[2]=im20[13];
dwre=wre[ 8];dwim=wim[ 8];
re21[ 8]=dre10[2];re21[12]=dre11[2];
im21[ 8]=dim10[2];im21[12]=dim11[2];
dre00[3]=re30[ 5];dre01[3]=re30[13];
dim00[3]=im30[ 5];dim01[3]=im30[13];
dwre=wre[20];dwim=wim[20];
re31[ 4]=dre10[3];re31[12]=dre11[3];
im31[ 4]=dim10[3];im31[12]=dim11[3];
dre00[4]=re40[ 5];dre01[4]=re40[21];
dim00[4]=im40[ 5];dim01[4]=im40[21];
dwre=wre[10];dwim=wim[10];
re41[ 4]=dre10[4];re41[20]=dre11[4];
im41[ 4]=dim10[4];im41[20]=dim11[4];
dre00[5]=re50[ 5];dre01[5]=re50[37];
dim00[5]=im50[ 5];dim01[5]=im50[37];
dwre=wre[ 5];dwim=wim[ 5];
re51[ 4]=dre10[5];re51[36]=dre11[5];
im51[ 4]=dim10[5];im51[36]=dim11[5];
end
7:begin
dre00[0]=re00[12];dre01[0]=re00[13];
dim00[0]=im00[12];dim01[0]=im00[13];
dwre=wre[ 0];dwim=wim[ 0];
re01[10]=dre10[0];re01[11]=dre11[0];
im01[10]=dim10[0];im01[11]=dim11[0];
dre00[1]=re10[12];dre01[1]=re10[14];
dim00[1]=im10[12];dim01[1]=im10[14];
dwre=wre[ 0];dwim=wim[ 0];
re11[ 9]=dre10[1];re11[11]=dre11[1];
im11[ 9]=dim10[1];im11[11]=dim11[1];
dre00[2]=re20[10];dre01[2]=re20[14];
dim00[2]=im20[10];dim01[2]=im20[14];
dwre=wre[16];dwim=wim[16];
re21[ 9]=dre10[2];re21[13]=dre11[2];
im21[ 9]=dim10[2];im21[13]=dim11[2];
dre00[3]=re30[ 6];dre01[3]=re30[14];
dim00[3]=im30[ 6];dim01[3]=im30[14];
dwre=wre[24];dwim=wim[24];
re31[ 5]=dre10[3];re31[13]=dre11[3];
im31[ 5]=dim10[3];im31[13]=dim11[3];
dre00[4]=re40[ 6];dre01[4]=re40[22];
dim00[4]=im40[ 6];dim01[4]=im40[22];
dwre=wre[12];dwim=wim[12];
re41[ 5]=dre10[4];re41[21]=dre11[4];
im41[ 5]=dim10[4];im41[21]=dim11[4];
dre00[5]=re50[ 6];dre01[5]=re50[38];
dim00[5]=im50[ 6];dim01[5]=im50[38];
dwre=wre[ 6];dwim=wim[ 6];
re51[ 5]=dre10[5];re51[37]=dre11[5];
im51[ 5]=dim10[5];im51[37]=dim11[5];
end
8:begin
dre00[0]=re00[14];dre01[0]=re00[15];
dim00[0]=im00[14];dim01[0]=im00[15];
dwre=wre[ 0];dwim=wim[ 0];
re01[12]=dre10[0];re01[13]=dre11[0];
im01[12]=dim10[0];im01[13]=dim11[0];
dre00[1]=re10[13];dre01[1]=re10[15];
dim00[1]=im10[13];dim01[1]=im10[15];
dwre=wre[16];dwim=wim[16];
re11[12]=dre10[1];re11[14]=dre11[1];
im11[12]=dim10[1];im11[14]=dim11[1];
dre00[2]=re20[11];dre01[2]=re20[15];
dim00[2]=im20[11];dim01[2]=im20[15];
dwre=wre[24];dwim=wim[24];
re21[10]=dre10[2];re21[14]=dre11[2];
im21[10]=dim10[2];im21[14]=dim11[2];
dre00[3]=re30[ 7];dre01[3]=re30[15];
dim00[3]=im30[ 7];dim01[3]=im30[15];
dwre=wre[28];dwim=wim[28];
re31[ 6]=dre10[3];re31[14]=dre11[3];
im31[ 6]=dim10[3];im31[14]=dim11[3];
dre00[4]=re40[ 7];dre01[4]=re40[23];
dim00[4]=im40[ 7];dim01[4]=im40[23];
dwre=wre[14];dwim=wim[14];
re41[ 6]=dre10[4];re41[22]=dre11[4];
im41[ 6]=dim10[4];im41[22]=dim11[4];
dre00[5]=re50[ 7];dre01[5]=re50[39];
dim00[5]=im50[ 7];dim01[5]=im50[39];
dwre=wre[ 7];dwim=wim[ 7];
re51[ 6]=dre10[5];re51[38]=dre11[5];
im51[ 6]=dim10[5];im51[38]=dim11[5];
end
9:begin
dre00[0]=re00[16];dre01[0]=re00[17];
dim00[0]=im00[16];dim01[0]=im00[17];
dwre=wre[ 0];dwim=wim[ 0];
re01[14]=dre10[0];re01[15]=dre11[0];
im01[14]=dim10[0];im01[15]=dim11[0];
dre00[1]=re10[16];dre01[1]=re10[18];
dim00[1]=im10[16];dim01[1]=im10[18];
dwre=wre[ 0];dwim=wim[ 0];
re11[13]=dre10[1];re11[15]=dre11[1];
im11[13]=dim10[1];im11[15]=dim11[1];
dre00[2]=re20[16];dre01[2]=re20[20];
dim00[2]=im20[16];dim01[2]=im20[20];
dwre=wre[ 0];dwim=wim[ 0];
re21[11]=dre10[2];re21[15]=dre11[2];
im21[11]=dim10[2];im21[15]=dim11[2];
dre00[3]=re30[16];dre01[3]=re30[24];
dim00[3]=im30[16];dim01[3]=im30[24];
dwre=wre[ 0];dwim=wim[ 0];
re31[ 7]=dre10[3];re31[15]=dre11[3];
im31[ 7]=dim10[3];im31[15]=dim11[3];
dre00[4]=re40[ 8];dre01[4]=re40[24];
dim00[4]=im40[ 8];dim01[4]=im40[24];
dwre=wre[16];dwim=wim[16];
re41[ 7]=dre10[4];re41[23]=dre11[4];
im41[ 7]=dim10[4];im41[23]=dim11[4];
dre00[5]=re50[ 8];dre01[5]=re50[40];
dim00[5]=im50[ 8];dim01[5]=im50[40];
dwre=wre[ 8];dwim=wim[ 8];
re51[ 7]=dre10[5];re51[39]=dre11[5];
im51[ 7]=dim10[5];im51[39]=dim11[5];
end
10:begin
dre00[0]=re00[18];dre01[0]=re00[19];
dim00[0]=im00[18];dim01[0]=im00[19];
dwre=wre[ 0];dwim=wim[ 0];
re01[16]=dre10[0];re01[17]=dre11[0];
im01[16]=dim10[0];im01[17]=dim11[0];
dre00[1]=re10[17];dre01[1]=re10[19];
dim00[1]=im10[17];dim01[1]=im10[19];
dwre=wre[16];dwim=wim[16];
re11[16]=dre10[1];re11[18]=dre11[1];
im11[16]=dim10[1];im11[18]=dim11[1];
dre00[2]=re20[17];dre01[2]=re20[21];
dim00[2]=im20[17];dim01[2]=im20[21];
dwre=wre[ 8];dwim=wim[ 8];
re21[16]=dre10[2];re21[20]=dre11[2];
im21[16]=dim10[2];im21[20]=dim11[2];
dre00[3]=re30[17];dre01[3]=re30[25];
dim00[3]=im30[17];dim01[3]=im30[25];
dwre=wre[ 4];dwim=wim[ 4];
re31[16]=dre10[3];re31[24]=dre11[3];
im31[16]=dim10[3];im31[24]=dim11[3];
dre00[4]=re40[ 9];dre01[4]=re40[25];
dim00[4]=im40[ 9];dim01[4]=im40[25];
dwre=wre[18];dwim=wim[18];
re41[ 8]=dre10[4];re41[24]=dre11[4];
im41[ 8]=dim10[4];im41[24]=dim11[4];
dre00[5]=re50[ 9];dre01[5]=re50[41];
dim00[5]=im50[ 9];dim01[5]=im50[41];
dwre=wre[ 9];dwim=wim[ 9];
re51[ 8]=dre10[5];re51[40]=dre11[5];
im51[ 8]=dim10[5];im51[40]=dim11[5];
end
11:begin
dre00[0]=re00[20];dre01[0]=re00[21];
dim00[0]=im00[20];dim01[0]=im00[21];
dwre=wre[ 0];dwim=wim[ 0];
re01[18]=dre10[0];re01[19]=dre11[0];
im01[18]=dim10[0];im01[19]=dim11[0];
dre00[1]=re10[20];dre01[1]=re10[22];
dim00[1]=im10[20];dim01[1]=im10[22];
dwre=wre[ 0];dwim=wim[ 0];
re11[17]=dre10[1];re11[19]=dre11[1];
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -