【正文】 ult==0)?EXIT_SUCCESS:EXIT_FAILURE。 } printf(Done\n)。 mxDestroyArray(pa2)。 } mxGetString(pa3, str, 255)。 return(1)。 } pa2 = matGetVariable(pmat, GlobalDouble)。 // if (pa1 == NULL) { printf(Error reading existing matrix LocalDouble\n)。 } // pmat = matOpen(file, r)。 mxDestroyArray(pa2)。 matPutVariable(pmat, LocalString,pa3)。 pa3 = mxCreateString(MATLAB: the language of technical puting)。 mxSetClassName(pa1, LocalDouble)。 if (pmat == NULL) { printf(Error creating file %s\n, file)。 double data[9] = { , , , , , , , , }。 } （ 2） 8 cd d:\mywork mex （ 3） exm120203_2 0 1 2 3 4 5 6 701 圖 MAT 數(shù)據(jù)文件的應(yīng)用 數(shù)據(jù)的輸入輸出方法 創(chuàng)建 MAT 文件的 C 源碼程序的編寫 【例 】目標(biāo)：用 C++編寫一個可創(chuàng)建 MAT 文件的獨立應(yīng)用程序 。 mexCallMATLAB(0, NULL, 1, lhs, plot)。n, MAX)。 mxArray *rhs[1], *lhs[1]。 for (i=0。本例演示：（ A）如何在 MEX 文件中調(diào)用MATLAB 的內(nèi)建指令；（ B）如何在 MEX文件中調(diào)用用戶的自編 M文件。123439。 // plhs[0]=mxCreateString(output_buf)。 //30 if (status!=0) mexWarnMsgTxt(Not enough space,String is truncated.)。 6 input_buf0=(char *)mxCalloc(buflen0,sizeof(char))。 if (mxGetM(prhs[0])!=1||mxGetM(prhs[1])!=1) //19 mexErrMsgTxt(Inputs must be a row vector.)。 int buflen,buflen0,buflen1,status。本例演示：（ A）如何根據(jù) MATLAB 約定的規(guī)則編寫 C MEX 源碼；（ B）如何構(gòu)成該文件的調(diào)用指令；（ C）如何為 MEX文件 編寫在線幫助文件。 5 void mxSetPr(mxArray *array_ptr, double *pr)。 void mxSetM(mxArray *array_ptr, int m)。 int mexPutVariable(const char *workspace, const char *var_name, mxArray *array_ptr)。 void mexWarnMsgTxt(const char *warning_msg)。 //34 myplus(y,x,z)。 //29 // plhs[0]=mxCreateDoubleMatrix(mrows0,ncols0,mxREAL)。 // if (!mxIsDouble(prhs[1])||mxIsComplex(prhs[1])||!(mrows1==1 amp。 ncols1=mxGetN(prhs[1])。 //16 else if (nlhs1) //15 mexErrMsgTxt(Too many output arguments)。 } // void mexFunction(int nlhs, mxArray *plhs[], int nrhs, const mxArray *prhs[]) //8 { double *x,*y,*z。通過本例，從感性上認(rèn)識：（ A）一般 C 源碼文件如何改寫成具有約定格式的C MEX 源碼文件；（ B） C MEX 源碼文件的基本結(jié)構(gòu)；（ C）基本的編譯鏈接方法；（ D） DLL 文件的調(diào)用方法。123439。本章內(nèi)容是根據(jù) 。 第 ：如何借助 DDE技術(shù)在 MATLAB與其他外部程序間進(jìn)行通信。 第 節(jié)用三個算例來說明如何應(yīng)用 ActiveX 實 現(xiàn) MATLAB 與外部應(yīng)用程序的通信。 第 節(jié)用于演示：如何編寫產(chǎn)生 MAT 數(shù)據(jù)文件的 C 源碼程序。這開放性表現(xiàn)在兩方面：一， MATLAB 適應(yīng)各科學(xué)、專業(yè)研究的需要，提供了各種專業(yè)性的工具包；二， MATLAB 為實現(xiàn)與外部應(yīng)用程序的“無縫”結(jié)合，提供了專門的應(yīng)用程序接口 API。作為優(yōu)秀軟件， MATLAB不僅自身功能強大、環(huán)境友善、能十分有效地處理各種科學(xué)和工程問題，而且具有極好的開放性。 第 節(jié)集中介紹：如何 編寫 C MEX 源碼程序，也就是如何為現(xiàn)有的 C 程序編寫接口程序，使之成為 MATLAB 函數(shù)文件；運用這種技術(shù)，讀者可以把積累的優(yōu)秀 C 程序改造成可在 MATLAB 中方便調(diào)用的指令。借助這種技術(shù)，前臺可以是各種外部應(yīng)用程序編寫的界面，而后臺計算則可完全交由 MATLAB 進(jìn)行。由此產(chǎn)生的 PPT 文件，可以在放映過程中，實時地進(jìn)行 MATLAB 調(diào)用。 值得指出： , 版用于 API 的（ MEX、 MAT、及引擎）庫函數(shù)許多已經(jīng)被廢止。39。] A = abcd 1234 ABCD 2 C 語言 MEX文件源程序的構(gòu)成 【例 】列出具有相同運算功能（實現(xiàn)兩個雙精度實數(shù)標(biāo)量加法）的 C++源碼程序和 C++ MEX源碼程序；對 C++ MEX 源碼程序進(jìn)行編譯鏈接；在 MATLAB中調(diào)用生成的DLL 文件。 } （ 2） [] include // 1 // void myplus(double y[],double x[],double z[]) { y[0]=x[0]+z[0]。 // if (nrhs!=2) //13 mexErrMsgTxt(Two inputs required.)。 mrows1=mxGetM(prhs[1])。 ncols0==1)) //22 3 mexErrMsgTxt(Inputs must be all nonplex scalar double.)。 // if (mrows0!=mrows1||ncols0!=ncols1) //28 mexErrMsgTxt(Inputs must be same dimension.)。 //33 y=mxGetPr(plhs[0])。 c=exm12020_1(a,b) c = C MEX 文件的執(zhí)行流程 編寫 C MEX 文件的常用庫函數(shù)和示例 常用的 MEX庫函數(shù) （ 1） include void mexFunction(int nlhs, mxArray *plhs[], int nrhs, const mxArray *prhs[]) 4 { /* 其他 C 源碼 …… */ } （ 2） include void mexErrMsgTxt(const char *error_msg)。 （ 5） includ