rs编解码（matlab程序）

rs编码解码程序,在matlab中仿真成功

/*
 * MATLAB Compiler: 4.0 （R14）
 * Date: Sun Aug 02 12:24:15 2009
 * Arguments: “-B“ “macro_default“ “-W“ “lib:librsdecode“ “-T“ “link:lib“
 * “rsdecode.m“ “-v“ 
 */

#include 
#include “librsdecode.h“
#ifdef __cplusplus
extern “C“ {
#endif
extern const unsigned char __MCC_librsdecode_public_data[];
extern const char *__MCC_librsdecode_name_data;
extern const char *__MCC_librsdecode_root_data;
extern const unsigned char __MCC_librsdecode_session_data[];
extern const char *__MCC_librsdecode_matlabpath_data[];
extern const int __MCC_librsdecode_matlabpath_data_count;
extern const char *__MCC_librsdecode_mcr_runtime_options[];
extern const int __MCC_librsdecode_mcr_runtime_option_count;
extern const char *__MCC_librsdecode_mcr_application_options[];
extern const int __MCC_librsdecode_mcr_application_option_count;
#ifdef __cplusplus
}
#endif


static HMCRINSTANCE _mcr_inst = NULL;


#if defined（ _MSC_VER） || defined（__BORLANDC__） || defined（__WATCOMC__） || defined（__LCC__）
#include 

static char path_to_dll[_MAX_PATH];

BOOL WINAPI DllMain（HINSTANCE hInstance DWORD dwReason void *pv）
{
    if （dwReason == DLL_PROCESS_ATTACH）
    {
        char szDllPath[_MAX_PATH];
        char szDir[_MAX_DIR];
        if （GetModuleFileName（hInstance szDllPath _MAX_PATH） > 0）
        {
             _splitpath（szDllPath path_to_dll szDir NULL NULL）;
            strcat（path_to_dll szDir）;
        }
	else return FALSE;
    }
    else if （dwReason == DLL_PROCESS_DETACH）
    {
    }
    return TRUE;
}
#endif
static int mclDefaultPrintHandler（const char *s）
{
    return fwrite（s sizeof（char） strlen（s） stdout）;
}

static int mclDefaultErrorHandler（const char *s）
{
    int written = 0 len = 0;
    len = strlen（s）;
    written = fwrite（s sizeof（char） len stderr）;
    if （len > 0 && s[ len-1 ] != ‘\n‘）
        written += fwrite（“\n“ sizeof（char） 1 stderr）;
    return written;
}

bool librsdecodeInitializeWithHandlers（
    mclOutputHandlerFcn error_handler
    mclOutputHandlerFcn print_handler
）
{
    if （_mcr_inst != NULL）
        return true;
    if （!mclmcrInitialize（））
        return false;
    if （!mclInitializeComponentInstance（&_mcr_inst
                                        __MCC_librsdecode_public_data
                                        __MCC_librsdecode_name_data
                                        __MCC_librsdecode_root_data
                                        __MCC_librsdecode_session_data
                                        __MCC_librsdecode_matlabpath_data
                                        __MCC_librsdecode_matlabpath_data_count
                                        __MCC_librsdecode_mcr_runtime_options
                                        __MCC_librsdecode_mcr_runtime_option_count
                                        true NoobjectType LibTarget
                                        path_to_

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件        750  2009-08-02 00:08  rs\RScode.m

     目录          0  2009-08-03 08:58  rs

     文件       1053  2009-08-03 08:58  rs\build.log

     文件     648723  2009-08-03 08:58  rs\distrib\rscod.ctf

     文件      98304  2009-08-03 08:58  rs\distrib\rscod_1_0.dll

     文件       1079  2009-08-02 00:08  rs\distrib\rscod_mcr\rscod\RScode.m

     目录          0  2009-08-03 09:04  rs\distrib\rscod_mcr\rscod

     文件        914  2002-03-26 19:14  rs\distrib\rscod_mcr\toolbox\comm\comm\@gf\all.m

     文件        914  2002-03-26 19:15  rs\distrib\rscod_mcr\toolbox\comm\comm\@gf\any.m

     文件       1259  2002-03-26 19:15  rs\distrib\rscod_mcr\toolbox\comm\comm\@gf\conv.m

     文件       1139  2002-03-26 19:15  rs\distrib\rscod_mcr\toolbox\comm\comm\@gf\convmtx.m

     文件        794  2002-01-11 16:21  rs\distrib\rscod_mcr\toolbox\comm\comm\@gf\cosets.m

     文件        794  2002-03-26 19:15  rs\distrib\rscod_mcr\toolbox\comm\comm\@gf\ctranspose.m

     文件       1304  2002-04-14 16:11  rs\distrib\rscod_mcr\toolbox\comm\comm\@gf\deconv.m

     文件       1049  2002-03-26 19:14  rs\distrib\rscod_mcr\toolbox\comm\comm\@gf\det.m

     文件       1349  2002-03-26 19:15  rs\distrib\rscod_mcr\toolbox\comm\comm\@gf\dftmtx.m

     文件        974  2002-03-26 19:15  rs\distrib\rscod_mcr\toolbox\comm\comm\@gf\diag.m

     文件       1124  2002-03-26 19:15  rs\distrib\rscod_mcr\toolbox\comm\comm\@gf\display.m

     文件       1019  2002-03-26 19:15  rs\distrib\rscod_mcr\toolbox\comm\comm\@gf\end.m

     文件       1064  2002-03-26 19:15  rs\distrib\rscod_mcr\toolbox\comm\comm\@gf\eq.m

     文件        974  2002-05-17 22:14  rs\distrib\rscod_mcr\toolbox\comm\comm\@gf\fft.m

     文件       1709  2002-04-14 16:11  rs\distrib\rscod_mcr\toolbox\comm\comm\@gf\filter.m

     文件       1109  2002-06-17 08:21  rs\distrib\rscod_mcr\toolbox\comm\comm\@gf\gettables.m

     文件       1829  2004-04-10 23:59  rs\distrib\rscod_mcr\toolbox\comm\comm\@gf\gf.m

     文件       1424  2002-03-26 19:15  rs\distrib\rscod_mcr\toolbox\comm\comm\@gf\gf_mex.m

     文件       1229  2002-03-26 19:15  rs\distrib\rscod_mcr\toolbox\comm\comm\@gf\horzcat.m

     文件        989  2002-05-17 22:14  rs\distrib\rscod_mcr\toolbox\comm\comm\@gf\ifft.m

     文件        959  2002-03-26 19:15  rs\distrib\rscod_mcr\toolbox\comm\comm\@gf\inv.m

     文件        809  2002-01-04 14:04  rs\distrib\rscod_mcr\toolbox\comm\comm\@gf\isempty.m

     文件       1364  2002-03-26 19:15  rs\distrib\rscod_mcr\toolbox\comm\comm\@gf\isprimitive.m

............此处省略145个文件信息