مساعده منكم بليز

السلام عليكم ورحمة الله وبركاته …
بليز اللي يعرف في البرنامج الماتلاب …
محتاجة مساعده وهو حل الدائرة الكهربائية التالية في برنامج الماتلاب…

r1=250
r2=125
r3=250
r4=500
r5=500
Iin=1e-3

المطلوب حل الدائر الكهربائية بالمات لاب عن طريق استخدام النوتباد
ايجاد قيمة الفولت والتيار في كل مقاومه
كتابة الناتج في النوت بدا عن طريق المات لاب
بليز ساعدوني ابي الحل مع الشرح والخطوات ضروري انا عملت حل بس للأسف المستر ما رضى فيه مع ان النواتج صح

:a17:

ان شاء الله استطيع مساعدتك
بس شويه اساله للتوضيح
قيم المقاومات ثابته ولا بتتغير من النوتباد
النواتج هي الفولت والامبير عاوزاهم بيكتبو ازاي في النوت باد تنظيمهم يعني
اصلا لو عندك الحل النهائي يرجي وضعه للتاكد
عاوزه تحليه بالماتلاب ولا السيميولينك
ولو بالماتلاب عاوزه البرمجه بس

ان شاء الله اقدر اساعدك بس بصراحه مش حيبقي فبل بكره
يارب تلاقي حد يساعدك انهارده لو مستعجله
والله الموفق

شكرا لك ع الرد اخي …
استانست كثير ان في احد رد علي …
بالنسبةلأسئلتك …
المقاومات متغيرة في النوت باد
بالنسبة للنواتج اهم شي عندي اعرف كيف يطلعوا مو المهم التنظيم يعني افهم كيف واكيد اريد احله بالماتلاب واريد البرمجه

هذا الحل اللي عندي

clear all

testfile=input(‘Input file name’);
fid=fopen(testfile);
y = fgets(fid,2);
y = fgets(fid,2);
y = fgets(fid,2);
y = fgets(fid,4);
R=y;
R1=str2num(R);
y= fgets(fid,8);
y= fgets(fid,2);
y = fgets(fid,2);
y = fgets(fid,2);
y = fgets(fid,4);
R=y;
R2=str2num(R);
y = fgets(fid,8);
y = fgets(fid,2);
y = fgets(fid,2);
y = fgets(fid,2);
y = fgets(fid,4);
R=y;
R3=str2num(R);
y = fgets(fid,8);
y = fgets(fid,2);
y = fgets(fid,2);
y = fgets(fid,2);
y = fgets(fid,4);
R=y;
R4=str2num(R);
y = fgets(fid,8);
y = fgets(fid,2);
y = fgets(fid,2);
y = fgets(fid,2);
y = fgets(fid,4);
R=y;
R5=str2num(R);
y = fgets(fid,8);
y = fgets(fid,3);
y = fgets(fid,2);
y = fgets(fid,2);
y = fgets(fid,5);
Iin=y;
i=str2num(Iin);

fclose(fid);
R1
R2
R3
R4
R5
i
R=[(R1R4+R1R2+R2R4)/(R1R2R4) -1/R2 -1/R1; -1/R2 (R3+R2)/(R2R3) 1/R3;
-1/R1 -1/R3 (R1R5+R3R5+R1R3)/(R1R3*R5)];
I=[0;i;0];
V=inv(R)*I

الاستاذ ما وافق ع الحل قال ان في طريق اكثر احس لان اما نجي نغير تسمية المقاومة لازم نغير الرقم واحنا نريد من دون لا نغير نظام البرمجه

انا اسف جدا علي التاخيير في الرد وذلك لانشغالي الشديد

اولا اريد وضع ملف الدوت تكست اللي بيحتوي علي المدخلات

ثانيا اريد التوضيح علي اي شي كان اعتراض الدكتور حتي نتلاشي الخطا

ثالثا اكرر اسفي علي التاخيير الشديد في الرد

ان شاء الله البرنامج حيبقي جاهز في اقرب فرصه واعزرني علي التاخيير مره اخره

الجزء ده من الكود عشان قراءه المعلومات من الدوت تكست وحل المعادلات وعرض الناتج

ارجو الافاده اذا كانت بالشكل ده حلت المشكله اللي الدكتور اعترض عليها

لو كده المشكله اتحلت ان شاء الله الجزء الاخير من الكود هيبقي جاهز في اقرب وقت

في المرفقات موجود ملف الدوت تكست اللي بتقريء منو المعلومات

والليكي الكود

clear
clc
a=textread('simple circuit.txt','%s');
s1=a{1};s2=a{2};s3=a{3};s4=a{4};s5=a{5};s6=a{6};
eval(s1);eval(s2);eval(s3);eval(s4);eval(s5);eval(s6);
R=[R1*R4+R2*R4+R1*R2 -R1*R4 -R2*R4;-R3 R2+R3 -R2;-R3*R5 -R1*R5  R1*R5+R3*R5+R1*R3];
I=[0;Iin*R2*R3;0];
V=R\I;
V1=V(1);V2=V(2);V3=V(3);
I1=abs((V1-V3)/R1);I2=abs((V1-V2)/R2);I3=abs((V2-V3)/R3);I4=abs((V1-0)/R4);I5=abs((V3-0)/R5);

الملف بتاع الدوت تكست موجود هنا

[LEFT]

CRC - Electronics and Circuit Analysis Using MATLAB

[RIGHT]هذا الكتاب مفيد كتيير لطلبه اقسام كهرباء واتصالات في تحليل الدوائر الكهربيه باستخدام الماتلاب اسال الله ان يفيدك في دراستك

http://www.4shared.com/file/44055847/2adad6c1/CRC_-_Electronics_and_Circuit_Analysis_Using_MATLAB.html?s=1

[/right]
[/left]

هلا أخي ايجبت …
أشكر لك تعاونك حقا …
ولك جزيل الشكر جدا …
أخي انا حاولت اطبق الكود بس ما فهمت . مع العلم في النوت باد لازم نذكر النود مثل ما في النوت باد في المرفقات. ثانيا اخوي بالنسبة للكود اللي عملته شو المقصود ب eval اسمح لي بس ترا انا مبتدئ في ها البرنامج وخلفيتي بسيطة عنه

أخي الكريم … اشكرك مرة ثانية …
بالمرفق التالي عندنا الكود اللي انا عملته بس الاستاذ ما رضى فيه …
حاول تعمل له كوبي في m-file بعدها اعمل رن للكود راح تلاحظ ان بالأول يطلبك اسم التكست فايل اللي هو بالمرفق الاول طبعا لما يظهر الناتج يظهر عندنا المقاومه وقيمتها فقط ويتجاهل قيمة النود المذكوره في التكست فايل بس اللي الحين اذا حاولت مثلا تغير قيمة R1 من النوت باد فرضا الى Rtop راح يكون لازم نغير القيم في الكود مثلا انا كتبت عشان يقرأ قيمة R1 ها الجزء في الكود

y = fgets(fid,2);  
y  = fgets(fid,2);
y  = fgets(fid,2);
y  = fgets(fid,4);
R=y;
R1=str2num(R);

اذا غيرت اسم R1 فرضا الى Rtop راح احتاج ان أرجع للكود وأغير القيم مثل ها الكود

y = fgets(fid,4);  
y  = fgets(fid,2);
y  = fgets(fid,2);
y  = fgets(fid,4);
R=y;
R1=str2num(R);

هنا الاستاذ قال لنا هاذي مجرد قراءة وليست برمجه وطلب منا ان مهما نغير قيمة سواء في تسمية المقاومه أو قيمتها ما يأثر في الكود اي ما نحتاج ان نغير في الكود أبد ويطلع الناتج صح
هذا هو طلبي استاذي ايجبت اتمنى المساعده

انتي عاوزه تعملي برنامج يحل اي دايره كهربيه ولا الدايره دي علي الاخص

يعني لاي عدد من المقاومات ولا خمسه بس وهل مطلوب منك الحل مثلا اذا تغير مصدر التيار الي مصدر فولت

ان شاء الله البرنامج هيتعمل وهنتلاشي الخطاء اللي الدكتور زكرو

شكرا ع التواصل اخي …
أنا اريد لها الدايرة يعني لخمس مقاومات استطيع أغير فيهم القيم أو أغير قمية التيار …

سؤال كمان للدقه
مافيش مشكله ان شاء الله بس لدي استفسار ما هي اهميه تعريف النودز في التكست فيل يعني هتهمك في البرمجه في شي

المرفقات بيها ملف الدوت تكست وال m فيل اعملي رن وغيري في اسم وقيمه المقاومات وشوفي كده المشكله اتحلت ولا لسا واكييد يهمني تعليقك

أهلا أخي ايجيبت شكرا ع ردودك وتواصلك …
بالنسبة لسؤالك اللي هو أهمية ذكر النود وذلك لأيجاد قيمة التيار والفولت والمقاومه في بين كل نود وايضا اذا اردنا أضافة اي فولت او تيار او استبدال المقاومه بفولت وغيره
يعني مثلا انا كتبت في النوت باد

R1  1    3      250 

مثلا اذا اردت استبدال المقاومه بقيمة فولت

v1 1 3 21.7

ان شاء الله تكون وصلت وفهمتها …
اتمنى المساعده
وشكرا ع التواصل

شكرا لك اخي أنا اخذت البرنامج وطبقته بس لما عملت رن للكود يطلع لي بس النتيجة لقيمة الفولت وانا محتاجه لما أعمل رن يطلع لي قيمة كل مقاومه وقيمة كل التيار سواء مثل ما هي في النوت باد او مثلا حاولت أغيرها يعنب نفس الكود قبل في المرفقات

الكود في المرفقات يمكنك من تغيير قيم او رموز المقاومات وحل الدائره الكهربيه و اخراج الناتج النهائي في ملف اكسل

ملحوظه :
السماحيه الوحيده المتاحه هي تغيير قيم و رموز المقاومات فقط