用MATLAB编写一函个数文件,实现所给日期的星期数求解，

clc
clear
CY=1;
while(CY)
CH=input('choose the mode\n1.today\n2.other time\n');
if CH==1
Dat1=datestr(now,29);
else
Dat1=input('Input the date\n','s');
end
DatSt='2014-10-20';
A1=cdfepoch(DatSt);
B1=todatenum(A1);
A2=cdfepoch(Dat1);
B2=todatenum(A2);
C=B2-B1;
if C>=0
C1=C;
else
C1=C+ceil(-C/7)*7;
end
D=rem(C1,7);
switch(D)
case 0
disp('Monday')
case 1
disp('Tuesday')
case 2
disp('Wednesday')
case 3
disp('Thursday')
case 4
disp('Friday')
case 5
disp('Saturday')
case 6
disp('Sunday')
end
CY=input('continue?\n1 to continue\n0 to stop\n');
end