هاام


(system) #1

السلام عليكم ورحمه الله وبركاته

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

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


(system) #2

لو سمحتو الرد لاهنتوووووووو الله يفرج لكم يارب


#3

برنامج الماتلاب موجود فى المواضيع المثبتة يمكنك تحميله


(المهندس سعود) #4

ما في ملف في المرفقات
ارجو اعادة تحميله وخلي اسمه بالانجليزي


(system) #5

وعليكم السلام
تأكد من المرفقات يوجد به الملف
ولكن بكتبه هنا فارجو مساعدتي في شرحه وإذا أمكن تنفيذ لهذا البرنامج لانه لايوجد لدي برنامج …ولكم جزيل الشكر والعرفان

[RIGHT]%second part of hap layout just before square may be to draw more elepse

ثاني جزء من تخطيط الـ hap

[RIGHT]%%%%%%%%%%%%%first to draw eleps

[RIGHT]clc % to clear the screen

[RIGHT]هذا الأمر يستخدم لمسح الشاشة (لتنظيف الشاشة )

[RIGHT]clear all % to clear all cash

[RIGHT]لتنظيف الذاكرة لمسح جميع المتغيرات المخزنة (مسح الشاشة تماما )

[RIGHT]r=2;%radius of center cell 2km

نصف قطر مركز الدائرة الداخلية

[RIGHT]

[RIGHT]h=22;%altitude 22km

[RIGHT]الارتفاع الـ Hap =22كيلو متر

[RIGHT]N=9; % antenna array elemints are N*N

[RIGHT]هذي المصفوفة اللي على أساسها نركب الهوائيات كل هوائي يغطي منطقة معينه (n=عدد الهوائيات )

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

[RIGHT]x=-r:.01*r:r; % x &y are the limits of the area

[RIGHT]الجملة السابقة هي إحداثي x

[RIGHT]حيث xمصفوفة تحتوي على قيم من –rإلى +r

[RIGHT]والخطوة r=0,1

[RIGHT]%that will be covered which the elepse will draw on that conture

[RIGHT]y=((r^2)-(x.^2)).^0.5; %half of the major axis of eleps

[RIGHT]الجملة السابقة هي إحداثي y

[RIGHT]نصف المحور الرئيسي للeleps وهو عبارة عن عداد حيث x,y

[RIGHT]plot(x,y)%to plot the center cell

[RIGHT]هنا بيعطي نصف القطر

[RIGHT]hold on %Remark to draw single tyre

[RIGHT]رسم إطار واحد

[RIGHT]%break % to show the function of the first half of drawing

[RIGHT]إيقاف وتنفيذ النصف الأول من الرسم.

[RIGHT]

[RIGHT]%second half of the major axis of eleps

[RIGHT]y=-((r^2)-(x.^2)).^0.5;

[RIGHT]plot(x,y)% to plot the second half of elepseleps

[RIGHT]نصف القطر الثاني راح إبداء أخليه يكرر احنا هنا عطيناه …يرسم عليه

[RIGHT]لذلك نحتاج عدادين واحد …وواحد …

[RIGHT]hold on %%Remark to draw single tyre

[RIGHT]%break% to show the function of the first half of drawing

[RIGHT]%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

[RIGHT]%%%%%% variable to plot the multi tyrs %%%%

[RIGHT]d=3^.5*r;

[RIGHT]جذر 3 لان d هي المسقط بناء الشعاع وعشان اجيب حساب الوتر …

[RIGHT]to=atan(d/h); % angle of the cone theta 0

[RIGHT]bw_div2=.5sec(to)(asin(sin(to)+0.886/N)-asin(sin(to)-0.886/N));%beam width/2

[RIGHT]bwp=asin(sin(to)+0.886/N)-asin(sin(to)-0.886/N);% conture of the layout

[RIGHT]%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

[RIGHT]بعدها نرسم الأطارات :

[RIGHT]for j=1:3%counter for the turns or tyrs normal 4

[RIGHT]منطقة الخلايا

[RIGHT]for i=1:6j%counter for cells in turn normal 6j

[RIGHT]خلايا j لكل مرة

[RIGHT] ;(ph=(i-1)pi/(3j

[RIGHT] ; theata=atan(d/h)

[RIGHT] b=htan(theata+bw_div2)-htan(theata-bw_div2); %major axes

[RIGHT] a=2*h.*tan(bwp/2)./cos(theata);%minor axes

[RIGHT] (x=linspace(d-b/2,d+b/2,100)% linespace(strt pnt,lst pnt,step

[RIGHT] ; y=a/2.(1-((x-htan(theata)).^2./(b/2)^2)).^.5

[RIGHT] xx=x.*cos(ph)+y.*sin(ph);

[RIGHT] ;( yy=y.*cos(ph)-x.*sin(ph

[RIGHT] ( plot(xx,yy

[RIGHT] ; hold on

[RIGHT] ; y=-a/2.(1-((x-htan(theata)).^2./(b/2)^2)).^.5

[RIGHT] ;(xx=x.*cos(ph)+y.*sin(ph

[RIGHT] yy=y.*cos(ph)-x.*sin(ph);

[RIGHT] ( plot(xx,yy

[RIGHT] ; hold on

[RIGHT]end

[RIGHT]; d=d+b/1.2

[RIGHT] ;(to=atan(d/h

[RIGHT] bw_div2=.5sec(to)(asin(sin(to)+0.886/N)-asin(sin(to)-0.886/N));%beam width/2

[RIGHT] ); bwp=asin(sin(to)+0.886/N)-asin(sin(to)-0.886/N

[RIGHT]end

[RIGHT]break%

[RIGHT]stop %to stop the 1st loop%

[RIGHT]%%%%%%%%%%%%%%%%%%%%%%%%%%%

[RIGHT]loop 2nd %

[RIGHT]%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

[RIGHT]for j=5%counter for the turns normal 5

[RIGHT]for i=1:6j%counter for cells in turnnormal 6j

[RIGHT] ;( ph=(i-1)pi/(3j

[RIGHT] ;( theata=atan(d/h

[RIGHT] ;( b=htan(theata+5+bw_div2)-htan(theata-bw_div2

[RIGHT] ;( a=2*h.*tan(bwp/2)./cos(theata+5

[RIGHT] ( x=linspace(d-b/2,d+b/2,100

[RIGHT] ; y=a/2.(1-((x-htan(theata)).^2./(b/2)^2)).^.5

[RIGHT] ;(xx=x.*cos(ph)+y.*sin(ph

[RIGHT] yy=y.*cos(ph)-x.*sin(ph);

[RIGHT] ( plot(xx,yy

[RIGHT] ; hold on

[RIGHT] ; y=-a/2.(1-((x-htan(theata)).^2./(b/2)^2)).^.5

[RIGHT] ;(xx=x.*cos(ph)+y.*sin(ph

[RIGHT] ;(yy=y.*cos(ph)-x.*sin(ph

[RIGHT] ( plot(xx,yy

[RIGHT] ; hold on

[RIGHT]end

[RIGHT] ;( b=htan(theata+bw_div2)-htan(theata-bw_div2

[RIGHT] ;( a=2*h.*tan(bwp/2)./cos(theata

[RIGHT] ; d=d+b/1.7

[RIGHT] ;( to=atan(d/h

[RIGHT] bw_div2=.5sec(to)(asin(sin(to)+0.886/N)-asin(sin(to)-0.886/N));%beam width/2

[RIGHT] bwp=asin(sin(to)+0.886/N)-asin(sin(to)-0.886/N);

[RIGHT]

[RIGHT]end

[RIGHT]%break

[RIGHT]%stop %to stop the 2nd loop

[RIGHT]%%%%%%%%%%%%%%%% second loops %%%%%%%%%%%%%%%

[RIGHT]for j=6%counter for the turns normal 6

[RIGHT]for i=30:32%counter for cells in turn from 30 to 32

[RIGHT]; (ph=(i-1)pi/(3j

[RIGHT] ;( theata=atan(d/h

[RIGHT] ;( b=htan(theata+j+bw_div2)-htan(theata-bw_div2

[RIGHT] ;( a=2*h.*tan(bwp/2)./cos(theata+5

[RIGHT] ( x=linspace(d-b/2,d+b/2,100

[RIGHT] ; y=a/2.(1-((x-htan(theata)).^2./(b/2)^2)).^.5

[RIGHT] ;( xx=x.*cos(ph)+y.*sin(ph

[RIGHT] yy=y.*cos(ph)-x.*sin(ph);

[RIGHT] ( plot(xx ,yy

[RIGHT] ; hold on

[RIGHT] ; y=-a/2.(1-((x-htan(theata)).^2./(b/2)^2)).^.5

[RIGHT] ;(xx=x.*cos(ph)+y.*sin(ph

[RIGHT] ;( yy=y.*cos(ph)-x.*sin(ph

[RIGHT] ( plot(xx, yy

[RIGHT] ; hold on

[RIGHT]end

[RIGHT]end


(system) #6

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