helicaldraw.m

来自「天线设计方面的资料」· M 代码 · 共 47 行

function HelicalDraw(handles)

Frequency = str2num(get(handles.Frequency,'String'));

AxialLength = (get(handles.Parameter1,'Value'));
Pitch = (get(handles.Parameter3,'Value'));

set(handles.Wizard,'CurrentAxes',handles.antenna);



if get(handles.Units,'Value')
    lambda = 300/Frequency;
    Pitch = atand(tand(Pitch)*300/Frequency);
else 
    lambda = 1;
end

%set(handles.antenna,'XMinorTick','on');

LineWidth = 2;

t = 0:AxialLength/1000:AxialLength;
plot3(sin(1/tand(Pitch)*t)*sqrt(lambda),cos(1/tand(Pitch)*t)*sqrt(lambda),t,'LineWidth',1.5)
hold on
plot3([0 0],[0 sqrt(lambda)],[0 0],'b','LineWidth',2)
plot3(0,0,0,'sk','MarkerSize',6,'MarkerFaceColor','r')
hold off

if get(handles.Grid,'Value')
    grid(handles.antenna);
end

%axis equal
%set(handles.antenna,'DataAspectRatio',[1 1 1])
%set(handles.antenna,'PlotBoxAspectRatio',[1 1 1])


title({'\bf Axial Mode Helical Antenna', '\bf Preview'})
if get(handles.Units,'Value')
    zlabel('\bf Axial Length (\rm{m}\bf)')
else
    zlabel('\bf Axial Length (\rm{\lambda}\bf)')
end

%set(handles.antenna,'ButtonDownFcn','rotate3d(gcbo);');%set(gcbf,''WindowButtonUpFcn'',''rotate3d(gcbo)'');