function?[Out_DispEn?npdf]=DispEn（xmncMAtau）

N=length（x）;
sigma_x=std（x）;?%求標準偏差
mu_x=mean（x）;??%求均值

%??nc為歸一化相關系數???nc=NC_wmk（AB）?A是原始信號，B是提取的水印信息必須是double類型

switch?MA
????case???‘LM‘
????????y=mapminmax（x01）;%歸一化??歸一到0--1
????????y（y==1）=1-1e-10;
????????y（y==0）=1e-10;
????????z=round（y*nc+0.5）;%取整函數
????????
????case?‘NCDF‘
????????y=normcdf（xmu_xsigma_x）;%正態分布概率密度函數
????????y=mapminmax（y01）;
????????y（y==1）=1-1e-10;
????????y（y==0）=1e-10;
????????z=round（y*nc+0.5）;
????????
????case?‘LOGSIG‘
????????y=logsig（（x-mu_x）/sigma_x）;
????????y=mapminmax（y01）;
????????y（y==1）=1-1e-10;
????????y（y==0）=1e-10;
????????z=round（y*nc+0.5）;
????????
????case?‘TANSIG‘
????????y=tansig（（x-mu_x）/sigma_x）+1;
????????y=mapminmax（y01）;
????????y（y==1）=1-1e-10;
????????y（y==0）=1e-10;
???