#includestdio.h
站在用户的角度思考问题，与客户深入沟通，找到正阳网站设计与正阳网站推广的解决方案，凭借多年的经验，让设计与互联网技术结合，创造个性化、用户体验好的作品，建站类型包括：成都网站设计、网站制作、企业官网、英文网站、手机端网站、网站推广、申请域名、网页空间、企业邮箱。业务覆盖正阳地区。
#includestring.h
int fun(char*s,char*c)
{
int i=0,j=0,k,n=strlen(c),a=0;
while(s[i])
{
if(s[i]==c[j])
{ for(k=1;(s[i+k]c[i+k])(s[i+k]==c[j+k]);k++);
if(k==n)
a++;
i+=n;
}
else
i++;
}
return a;
}
void main()
{
char s[40],c[20];
int m=0;
gets(s);
gets(c);
m=fun(s,c);
printf("%d\n",m);
}
在编写好S函数的实现代码*.c文件后，还需要在Matlab的命令输出窗口中进行命令行输入，完成对源代码的编译，这样才能被S函数模块所调用。在命令窗口中输入命令：
“mex
-g
RandomTimeDelay.c”
M文件S-函数在MATLAB环境下可以通过解释器直接执行，而C文件或其它语言编写的C-函数，则需要先编译成可以在MATLAB内运行的二进制代码：动态连接库或静态连接库，然后才可以使用，这些经过编译的二进制文件就称作MEX文件。用MEX命令来对*.c文件进行编译，然后会在相应的目录下生成对应的*.mexw32文件。然后就可以在simulink模块中引用这个s函数了。
function s(GetData0,GetData1,GetData2)
{
if(GetData0 == "")return;
if(n==1)tempstr+="tr";
if(GetData1 == null || trim(GetData1) == "")
{
tempstr+="";
}
else
{
tempstr+="td ";
}
if(GetData1 == null || trim(GetData1) == "")
{
//tempstr+="font color=#8888ff※/fonta href=;%=Url%User/LookUserMoreInfo.asp?OlID=" + GetData0 + "游客/a/td";
}
else
{
rguser+=1;
if (GetData1 == "隐身会员")
{
tempstr+="font color=gray class=GrayFont※/fonta href=;%=Url%User/LookUserMoreInfo.asp?OlID=" + GetData0 + "隐身会员/a/td";
}
else
{
if(parseInt(GetData2)(1(10-1))){tempstr+="font color=Red class=RedFont●/font";}
else
{
if(parseInt(GetData2)(1(14-1))){tempstr+="font color=Green class=GreenFont●/font";}
else
{
if(parseInt(GetData2)(1(8-1))){tempstr+="font color=Blue class=BlueFont●/font";}
else
{
if(parseInt(GetData2)(1(2-1))){tempstr+="font color=Gray class=GrayFont●/font";}
else{tempstr+="font color=green class=GreenFont※/font";}
}
}
}
tempstr+="a href='%=Url%User/LookUserInfo.asp?name=" + GetData1 + "'" + GetData1 + "/a/td";
}
}
if(GetData1 == null || trim(GetData1) == "")
{
}
else
{
n+=1;
}
if(n7)
{
tempstr+="/tr";
n=1;
}
}
各种用
C
语言实现的模板可能在使用形式上有所不同。现以一个求和函数
Sum
为例，用
C++
Template
可写如下：
template
R
Sum(const
T
*array,
int
n)
{
R
sum
=
0;
for
(int
i
=
;
i
n
;
++i)
sum
+=
i;
return
sum;
}
如果不是内置类型，该模板隐式地需要
有R
R::operator+=(T)运算符可用。
1.
使用函数指针作为
Functor
替换者
Typedef
struct
tagAddClass
{
Void
(*add)(char*
r1,
const
char*
r2);
Int
elemSize;
Char
sum[MAX_ELEM_SIZE];
}
AddClass;
void
Sum(AddClass*
self,
const
char*
array,
int
n)
{
for
(int
i
=
;
i
n
;
++i)
self-add(self-sum,
array
+
i*self-elemSize);
}
使用时：
Void
AddInt(char*
r1,
const
char*
r2)
{
*(long*)r1
+=
*(int*)r2;
}
AddClass
addClass
=
{AddInt,
2,
};
Int
array[100];
Read(array);
Sum(addClass,
array,
100);
…..
2.
用宏作为Functor的替换者
#define
GenSumFun(SumFunName,
Add,
RetType,
ElemType)
RetType
SumFunName
(const
ElemType
*array,
int
n)
\
{
RetType
sum
=
0;
for
(int
i
=
;
i
n
;
++i)
Add(sum,
i);
return
sum;
}
使用时：
#define
AddInt(x,
y)
((x)
+=
(y))
GenSumFun(SumInt,
AddInt,
long,
int)
…..
Int
array[100];
Read(array);
Long
sum
=
SumInt(array,
100);
…..
3.
所有可替换参数均为宏
至少需要一个额外的文件(实现文件)为
impsum.c
/*
impsum.c
*/
RetType
FunName(const
ElemType
*array,
int
n)
{
RetType
sum
=
0;
for
(int
i
=
;
i
n
;
++i)
Add(sum,
i);
return
sum;
}
使用时：
#undef
RetType
#undef
FunName
#undef
ElemType
#undef
Add
#define
AddInt(x,
y)
((x)
+=
(y))
#define
RetType
long
#define
FunName
SumInt
#define
ElemType
int
#define
Add
AddInt
#include
impsum.c
…..
Int
array[100];
Read(array);
Long
sum
=
SumInt(array,
100);
4.
总结：
第一种方法，易于跟踪调试，但是效率低下，适用于对可变函数（函数指针）的效率要求不高，但程序出错的可能性较大（复杂），模板函数（Sum）本身很复杂，模板参数也比较复杂（add）的场合。
第二种方法，效率高，但很难跟踪调试，在模板函数和模板参数本身都很复杂的时候更是如此。
第三种方法，是我最近几天才想出的，我认为是最好的，在模板参数（Add）比较复杂时可以用函数（第二种也可以如此），简单时可以用宏，并且，易于调试。在模板函数本身很复杂，而模板参数比较简单时更为优越。但是，可能有点繁琐。
mpl的118行case 3,sys=mdlOutputs(t,x,u);flag=3表示此时要计算输出，即y=fo(t,x,u),找到mdlOutputs函数（在218行），如上，如果sys=[]表示没有输出，我们改成sys=fo(t,x,u)或sys=C*x+D*u %sys此时为输出y好像快完了，嘻嘻，在sfuntmpl的124行case 4,sys=mdlGetTimeOfNextVarHit(t,x,u);flag=4表示此时要计算下一次采样的时间，只在离散采样系统中有用(即上文的mdlInit ializeSizes中提到的ts设置ts(1)不为0)连续系统中只需在mdlGetTimeOfNextVarHit函数中写上sys=[];这个函数主要用于变步长的设置，具体实现大家可以用edit vsfunc看vsfunc.m这个例子最后一个，在sfuntmpl的130行case 9,sys=mdlTerminate(t,x,u);flag=9表示此时系统要结束，一般来说写上在mdlTerminate函数中写上sys=[]就可，如果你在结束时还要设置什么，就在此函数中写关于sfuntmpl这个s函数的模板讲完了。s函数还可以带用户参数，下面给个例子，和simulink下的gain模块功能一样，大伙自己 看吧，我睡觉去了，累了。function [sys,x0,str,ts] = sfungain(t,x,u,flag,gain)switch flag,case 0,sizes = simsizes;sizes.NumContStates = 0;sizes.NumDiscStates = 0;sizes.NumOutputs = 1;sizes.NumInputs = 1;sizes.DirFeedthrough = 1;sizes.NumSampleTimes = 1;sys = simsizes(sizes);x0=[];str=[];ts=[0,0];case 3,sys=gain*u;case {1,2,4,9},sys = [];end做好了s函数后，simulink--user-defined function下拖一个S-Function到你的模型，就可以用了，在simulink----user-defined function还有个s-Function Builder，他可以生成用c语言写的s函数在matlab的workspace下打sfundemos，可以看到很多演示s函数的程序。
