دستور if default ؟

[ferry884122]

سلام این یه تیکه از یه برنامس ولی تا اجراش می کنم ارور میده که قسمت زیر رو نمی شناسه


if (m2==1) default zz=50;
else user end
به نظر شما مشکل از کجا می تونه باشه؟

Rs=.1;Xs=.2;Rr=.06;Xr=.2;Xc=1.2;vv=.7;FF=.4
N=.9;Freq=.9;
zz=10;kk=4;inc=.1;
if (m2==1) default zz=50;
else user end
for ii=1:kk;
vv=vv+inc;
RLi=1.2;
for jj=1:zz;
RLi=RLi+.6;
RL(jj,ii)=RLi;
R3=Rs+RL(jj,ii);
A5=Rr*(Xs/Xc)*(Xs/Xc)+Rs*(Xr/Xc)*(Xr/Xc);
A4=-vv*(Rr*(Xs/Xc)*(Xs/Xc)+2*Rs*(Xr/Xc)*(Xr/Xc));
A3=Rr*((Xs/RL(jj,ii))^2+(Rs/Xc)^2-(Xs/Xc))+R3*(Xr/RL(jj,ii))^2+v*v*Rs*(Xr/Xc)^2;

[علی سعیدی]

پاسخ : دستور if default

سلام دوست عزیز
من کدتونو ران کردم
در ظاهر همه چی درست بود

[ferry884122]

برنامه ی کامل وببین..

خیلی ممنون که بهم جواب دادی ولی چرا اروری مبنی بر اینکه شما باید if خود را جایی به پایان برسانید وعبارت شاید از اینجا شروع میشه و ... رو میده الان برنامه کامل رو برات میفرستم خود ببین

Rs=.1;Xs=.2;Rr=.06;Xr=.2;Xc=1.2;vv=.7;FF=.4;
N=.9;Freq=.9;
zz=10;kk=4;inc=.1;
if (m2==1) default zz=50;
 else user end

for ii=1:kk;
vv=vv+inc;
RLi=1.2;
 for jj=1:zz;
  RLi=RLi+.6;
  RL(jj,ii)=RLi;
R3=Rs+RL(jj,ii);
A5=Rr*(Xs/Xc)*(Xs/Xc)+Rs*(Xr/Xc)*(Xr/Xc);
A4=-vv*(Rr*(Xs/Xc)*(Xs/Xc)+2*Rs*(Xr/Xc)*(Xr/Xc));
A3=Rr*((Xs/RL(jj,ii))^2+(Rs/Xc)^2-(Xs/Xc))+R3*(Xr/RL(jj,ii))^2+vv*vv*Rs*(Xr/Xc)^2;
A2=-2*vv*R3*(Xr/RL(jj,ii))^2-vv*Rr*((Rs/Xc)^2+(Xs/RL(jj,ii))^2-2*(Xs/Xc));
A1=Rr*(R3/RL(jj,ii))^2+R3*(Rr/RL(jj,ii))^2+vv*vv*R3*(Xr/RL(jj,ii))^2;
A0=-vv*Rr*(R3/RL(jj,ii))^2;
 coeff=[A5 A4 A3 A2 A1 A0];
R=[roots(coeff)];R=R';
M(jj,1:5)=[R];M1=M(jj,1);M2=M(jj,2);M3=M(jj,3);M4=M(jj,4);M5=M(jj,5);
C1=isreal(M1);C2=isreal(M2);C3=isreal(M3);C4=isreal(M4);C5=isreal(M5);
if C1==1&M1>0&M1<1; F(jj,ii)=M1;
elseif C2==1&M2>0&M2<1; F(jj,ii)=M2;
elseif C3==1&M3>0&M3<1; F(jj,ii)=M3;
elseif C4==1&M4>0&M4<1; F(jj,ii)=M4;
elseif C5==1&M5>0&M5<1; F(jj,ii)=M5;
else           F(jj,ii)=1;
end
FV(jj,ii)=F(jj,ii)-vv; Zp1(jj,ii)=RL(jj,ii)/F(jj,ii);
Zp2(jj,ii)=(-Xc*i)/(F(jj,ii)*F(jj,ii));
Zp(jj,ii)=(Zp1(jj,ii)*Zp2(jj,ii))/(Zp1(jj,ii)+Zp2(jj,ii));
Zs(jj,ii)=(Rs/F(jj,ii))+(Xs*i);
 Zps(jj,ii)=Zp(jj,ii)+Zs(jj,ii);
Yps(jj,ii)=1/Zps(jj,ii);
 Yr(jj,ii)=1/((Rr/FV(jj,ii))+(Xr*i));
Yps_R(jj,ii)=imag(Yps(jj,ii));
 Yr_R(jj,ii)=imag(Yr(jj,ii));
Ym(jj,ii)=-(Yr_R(jj,ii)+Yps_R(jj,ii));
 Xm(jj,ii)=-1/Ym(jj,ii);
 end
end. 

اینم پیامی که میده:

??? Error: File: Untitled.m Line: 4 Column: 1
At least one END is missing: the statement may begin here
این برنامه مربوط میشه به شبیه سازی یه ژنراتور القایی که خازن Xc وراکتانس ونسبت سرعت به سرعت سنکرون و نسبت فرکانس به فرکانس دلخواه، Xm ,F,v توش چهار تا مجهولمون هستند وقتی درستور Iّّf رو برش می دارم برنامه اجرا میشه ! حتی یه دونه END هم در آخر برنامه گذاشتم ولی نشد که نشد! :job: :job:

[علی سعیدی]

پاسخ : دستور if default

دوست من
واقعیت امر اینه که من از رشته قدرت هیچی سرم نیست
با این حال
من بازم رانش کردم و هیچ ایرادی نگرفت
فقط یه چیزی
شما توی خط آخر برنامتون
یه
END. گذاشتید
شاید سر همونه ایراد میگره
نقطه رو بردارید

[ferry884122]

پاسخ : دستور if default

خیلی ممنون از جوابتون
این کارهایی که شما می گید رو قبلا کردم
اصلا خود برنامه تا رانش می کنم می گه اون دو تا end آخر برنامه رو باید بذاری
الان دوباره تست کردم هیچ فرقی نمی کنه
ولی اگه دستورif default رو حذف کنم مشکل حله اما من نمی خوام این کارو بکنم
بازم متشکر از جوابتون انشالله موفق باشین :job:

اینام خروجی های برنامه توی work spaceزمانی که این تابع رو حذف می کنم! باخروجی های برنامه خودتون که ران کردین مقایسه کنید!!!

A0, A1, A2, A3, A4, A5, C1, C2, C3, C4, C5, F, FF, FV, Freq, M, M1, M2, M3, M4, M5, N, R, R3, RL, RLi, Rr, Rs, Xc, Xm, Xr, Xs, Ym, Yps, Yps_R, Yr, Yr_R, Zp, Zp1, Zp2, Zps, Zs, coeff, ii, inc, jj, kk, vv, zz