gmsk.c

来自「包括:DSP定时器使用,DSP_DMA的使用,DSP_MCBSP的使用,GMSK」· C语言 代码 · 共 1,310 行 · 第 1/3 页

C
1,310 行
字号
123
				{
					t=pre_2[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg_2=gfunc(temt1,temt2);
					
					t=pre_1[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg_1=-gfunc(temt1,temt2);
					
					t=pre0[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg0=gfunc(temt1,temt2);
					
					t=pre1[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg1=-gfunc(temt1,temt2);
					
					t=pre2[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg2=-gfunc(temt1,temt2);
					
					table10100[j]=temg_2+temg_1+temg0+temg1+temg2;
				}
				for(k=0;k<8;k++)
				{
					fprintf(fp,"%f ",table10100[k]);	
				}
				fputc('\n',fp);
				break;
			case 21://10101
				for(j=0;j<8;j++)
				{
					t=pre_2[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg_2=gfunc(temt1,temt2);
					
					t=pre_1[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg_1=-gfunc(temt1,temt2);
					
					t=pre0[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg0=gfunc(temt1,temt2);
					
					t=pre1[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg1=-gfunc(temt1,temt2);
					
					t=pre2[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg2=gfunc(temt1,temt2);
					
					table10101[j]=temg_2+temg_1+temg0+temg1+temg2;
				}
				for(k=0;k<8;k++)
				{
					fprintf(fp,"%f ",table10101[k]);	
				}
				fputc('\n',fp);
				break;
			case 22://10110
				for(j=0;j<8;j++)
				{
					t=pre_2[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg_2=gfunc(temt1,temt2);
					
					t=pre_1[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg_1=-gfunc(temt1,temt2);
					
					t=pre0[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg0=gfunc(temt1,temt2);
					
					t=pre1[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg1=gfunc(temt1,temt2);
					
					t=pre2[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg2=-gfunc(temt1,temt2);
					
					table10110[j]=temg_2+temg_1+temg0+temg1+temg2;
				}
				for(k=0;k<8;k++)
				{
					fprintf(fp,"%f ",table10110[k]);	
				}
				fputc('\n',fp);
				break;
			case 23://10111
				for(j=0;j<8;j++)
				{
					t=pre_2[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg_2=gfunc(temt1,temt2);
					
					t=pre_1[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg_1=-gfunc(temt1,temt2);
					
					t=pre0[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg0=gfunc(temt1,temt2);
					
					t=pre1[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg1=gfunc(temt1,temt2);
					
					t=pre2[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg2=gfunc(temt1,temt2);
					
					table10111[j]=temg_2+temg_1+temg0+temg1+temg2;
				}
				for(k=0;k<8;k++)
				{
					fprintf(fp,"%f ",table10111[k]);	
				}
				fputc('\n',fp);
				break;
			case 24://11000
				for(j=0;j<8;j++)
				{
					t=pre_2[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg_2=gfunc(temt1,temt2);
					
					t=pre_1[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg_1=gfunc(temt1,temt2);
					
					t=pre0[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg0=-gfunc(temt1,temt2);
					
					t=pre1[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg1=-gfunc(temt1,temt2);
					
					t=pre2[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg2=-gfunc(temt1,temt2);
					
					table11000[j]=temg_2+temg_1+temg0+temg1+temg2;
				}
				for(k=0;k<8;k++)
				{
					fprintf(fp,"%f ",table11000[k]);	
				}
				fputc('\n',fp);
				break;
			case 25://11001
				for(j=0;j<8;j++)
				{
					t=pre_2[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg_2=gfunc(temt1,temt2);
					
					t=pre_1[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg_1=gfunc(temt1,temt2);
					
					t=pre0[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg0=-gfunc(temt1,temt2);
					
					t=pre1[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg1=-gfunc(temt1,temt2);
					
					t=pre2[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg2=gfunc(temt1,temt2);
					
					table11001[j]=temg_2+temg_1+temg0+temg1+temg2;
				}
				for(k=0;k<8;k++)
				{
					fprintf(fp,"%f ",table11001[k]);	
				}
				fputc('\n',fp);
				break;
			case 26://11010
				for(j=0;j<8;j++)
				{
					t=pre_2[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg_2=gfunc(temt1,temt2);
					
					t=pre_1[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg_1=gfunc(temt1,temt2);
					
					t=pre0[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg0=-gfunc(temt1,temt2);
					
					t=pre1[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg1=gfunc(temt1,temt2);
					
					t=pre2[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg2=-gfunc(temt1,temt2);
					
					table11010[j]=temg_2+temg_1+temg0+temg1+temg2;
				}
				for(k=0;k<8;k++)
				{
					fprintf(fp,"%f ",table11010[k]);	
				}
				fputc('\n',fp);
				break;
			case 27://11011
				for(j=0;j<8;j++)
				{
					t=pre_2[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg_2=gfunc(temt1,temt2);
					
					t=pre_1[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg_1=gfunc(temt1,temt2);
					
					t=pre0[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg0=-gfunc(temt1,temt2);
					
					t=pre1[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg1=gfunc(temt1,temt2);
					
					t=pre2[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg2=gfunc(temt1,temt2);
					
					table11011[j]=temg_2+temg_1+temg0+temg1+temg2;
				}
				for(k=0;k<8;k++)
				{
					fprintf(fp,"%f ",table11011[k]);	
				}
				fputc('\n',fp);
				break;
			case 28://11100
				for(j=0;j<8;j++)
				{
					t=pre_2[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg_2=gfunc(temt1,temt2);
					
					t=pre_1[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg_1=gfunc(temt1,temt2);
					
					t=pre0[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg0=gfunc(temt1,temt2);
					
					t=pre1[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg1=-gfunc(temt1,temt2);
					
					t=pre2[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg2=-gfunc(temt1,temt2);
					
					table11100[j]=temg_2+temg_1+temg0+temg1+temg2;
				}
				for(k=0;k<8;k++)
				{
					fprintf(fp,"%f ",table11100[k]);	
				}
				fputc('\n',fp);
				break;
			case 29://11101
				for(j=0;j<8;j++)
				{
					t=pre_2[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg_2=gfunc(temt1,temt2);
					
					t=pre_1[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg_1=gfunc(temt1,temt2);
					
					t=pre0[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg0=gfunc(temt1,temt2);
					
					t=pre1[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg1=-gfunc(temt1,temt2);
					
					t=pre2[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg2=gfunc(temt1,temt2);
					
					table11101[j]=temg_2+temg_1+temg0+temg1+temg2;
				}
				for(k=0;k<8;k++)
				{
					fprintf(fp,"%f ",table11101[k]);	
				}
				fputc('\n',fp);
				break;
			case 30://11110
				for(j=0;j<8;j++)
				{
					t=pre_2[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg_2=gfunc(temt1,temt2);
					
					t=pre_1[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg_1=gfunc(temt1,temt2);
					
					t=pre0[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg0=gfunc(temt1,temt2);
					
					t=pre1[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg1=gfunc(temt1,temt2);
					
					t=pre2[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg2=-gfunc(temt1,temt2);
					
					table11110[j]=temg_2+temg_1+temg0+temg1+temg2;
				}
				for(k=0;k<8;k++)
				{
					fprintf(fp,"%f ",table11110[k]);	
				}
				fputc('\n',fp);
				break;
			case 31://11111
				for(j=0;j<8;j++)
				{
					t=pre_2[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg_2=gfunc(temt1,temt2);
					
					t=pre_1[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg_1=gfunc(temt1,temt2);
					
					t=pre0[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg0=gfunc(temt1,temt2);
					
					t=pre1[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg1=gfunc(temt1,temt2);
					
					t=pre2[j];
					temt1=(sqrt(2*PI)/Alpha)*(t-Tb/2);
					temt2=(sqrt(2*PI)/Alpha)*(t+Tb/2);
					temg2=gfunc(temt1,temt2);
					
					table11111[j]=temg_2+temg_1+temg0+temg1+temg2;
				}
				for(k=0;k<8;k++)
				{
					fprintf(fp,"%f ",table11111[k]);	
				}
				fputc('\n',fp);
				break;
				
			default:printf("error\n");
		}	
	}
	fclose(fp);
}
123

gmsk.c - 源码说明

本页面展示了「包括:DSP定时器使用,DSP_DMA的使用,DSP_MCBSP的使用,GMSK基带波形产生,学校学分绩的计算」中的 gmsk.c 源码文件，采用 C语言 编程语言编写，共 1,310 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫开发者社区收录了大量与DSP相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?