geoandleo.asv

建立GEO和LEO的轨道

function GEO_Angle_Callback(hObject, eventdata, handles)
% hObject    handle to GEO_Angle (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

% Hints: get(hObject,'String') returns contents of GEO_Angle as text
%        str2double(get(hObject,'String')) returns contents of GEO_Angle as a double


% --- Executes on button press in GEO_Round.
function GEO_Round_Callback(hObject, eventdata, handles)
% hObject    handle to GEO_Round (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

% Hint: get(hObject,'Value') returns toggle state of GEO_Round


% --- Executes on button press in GEO_Ellipse.
function GEO_Ellipse_Callback(hObject, eventdata, handles)
% hObject    handle to GEO_Ellipse (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

% Hint: get(hObject,'Value') returns toggle state of GEO_Ellipse



% --- Executes during object creation, after setting all properties.
function GEO_Radius_CreateFcn(hObject, eventdata, handles)
% hObject    handle to GEO_Radius (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    empty - handles not created until after all CreateFcns called

% Hint: edit controls usually have a white background on Windows.
%       See ISPC and COMPUTER.
if ispc
    set(hObject,'BackgroundColor','white');
else
    set(hObject,'BackgroundColor',get(0,'defaultUicontrolBackgroundColor'));
end



function GEO_Radius_Callback(hObject, eventdata, handles)
% hObject    handle to GEO_Radius (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

% Hints: get(hObject,'String') returns contents of GEO_Radius as text
%        str2double(get(hObject,'String')) returns contents of GEO_Radius as a double


% --- Executes during object creation, after setting all properties.
function GEO_LongAxes_CreateFcn(hObject, eventdata, handles)
% hObject    handle to GEO_LongAxes (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    empty - handles not created until after all CreateFcns called

% Hint: edit controls usually have a white background on Windows.
%       See ISPC and COMPUTER.
if ispc
    set(hObject,'BackgroundColor','white');
else
    set(hObject,'BackgroundColor',get(0,'defaultUicontrolBackgroundColor'));
end



function GEO_LongAxes_Callback(hObject, eventdata, handles)
% hObject    handle to GEO_LongAxes (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

% Hints: get(hObject,'String') returns contents of GEO_LongAxes as text
%        str2double(get(hObject,'String')) returns contents of GEO_LongAxes as a double


% --- Executes during object creation, after setting all properties.
function GEO_ShortAxes_CreateFcn(hObject, eventdata, handles)
% hObject    handle to GEO_ShortAxes (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    empty - handles not created until after all CreateFcns called

% Hint: edit controls usually have a white background on Windows.
%       See ISPC and COMPUTER.
if ispc
    set(hObject,'BackgroundColor','white');
else
    set(hObject,'BackgroundColor',get(0,'defaultUicontrolBackgroundColor'));
end



function GEO_ShortAxes_Callback(hObject, eventdata, handles)
% hObject    handle to GEO_ShortAxes (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

% Hints: get(hObject,'String') returns contents of GEO_ShortAxes as text
%        str2double(get(hObject,'String')) returns contents of GEO_ShortAxes as a double


% --- Executes on button press in Show_GEO_Versus_LEO_LEO_versus_GEO.
function Show_GEO_Versus_LEO_versus_GEO_Callback(hObject, eventdata, handles)
% hObject    handle to Show_GEO_Versus_LEO_LEO_versus_GEO (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)




% --- Executes during object creation, after setting all properties.
function LEO_T_CreateFcn(hObject, eventdata, handles)
% hObject    handle to LEO_T (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    empty - handles not created until after all CreateFcns called

% Hint: edit controls usually have a white background on Windows.
%       See ISPC and COMPUTER.
if ispc
    set(hObject,'BackgroundColor','white');
else
    set(hObject,'BackgroundColor',get(0,'defaultUicontrolBackgroundColor'));
end



function LEO_T_Callback(hObject, eventdata, handles)
% hObject    handle to LEO_T (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

% Hints: get(hObject,'String') returns contents of LEO_T as text
%        str2double(get(hObject,'String')) returns contents of LEO_T as a double


% --- Executes during object creation, after setting all properties.
function GEO_T_CreateFcn(hObject, eventdata, handles)
% hObject    handle to GEO_T (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    empty - handles not created until after all CreateFcns called

% Hint: edit controls usually have a white background on Windows.
%       See ISPC and COMPUTER.
if ispc
    set(hObject,'BackgroundColor','white');
else
    set(hObject,'BackgroundColor',get(0,'defaultUicontrolBackgroundColor'));
end



function GEO_T_Callback(hObject, eventdata, handles)
% hObject    handle to GEO_T (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

% Hints: get(hObject,'String') returns contents of GEO_T as text
%        str2double(get(hObject,'String')) returns contents of GEO_T as a double


% --- Executes on button press in ComputeLeoOut.
function ComputeLeoOut_Callback(hObject, eventdata, handles)
% hObject    handle to ComputeLeoOut (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)


% --- Executes during object creation, after setting all properties.
function LEO_Perigee_CreateFcn(hObject, eventdata, handles)
% hObject    handle to LEO_Perigee (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    empty - handles not created until after all CreateFcns called

% Hint: edit controls usually have a white background on Windows.
%       See ISPC and COMPUTER.
if ispc
    set(hObject,'BackgroundColor','white');
else
    set(hObject,'BackgroundColor',get(0,'defaultUicontrolBackgroundColor'));
end



function LEO_Perigee_Callback(hObject, eventdata, handles)
% hObject    handle to LEO_Perigee (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

% Hints: get(hObject,'String') returns contents of LEO_Perigee as text
%        str2double(get(hObject,'String')) returns contents of LEO_Perigee as a double


% --- Executes during object creation, after setting all properties.
function LEO_apogee_CreateFcn(hObject, eventdata, handles)
% hObject    handle to LEO_apogee (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    empty - handles not created until after all CreateFcns called

% Hint: edit controls usually have a white background on Windows.
%       See ISPC and COMPUTER.
if ispc
    set(hObject,'BackgroundColor','white');
else
    set(hObject,'BackgroundColor',get(0,'defaultUicontrolBackgroundColor'));
end



function LEO_apogee_Callback(hObject, eventdata, handles)
% hObject    handle to LEO_apogee (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

% Hints: get(hObject,'String') returns contents of LEO_apogee as text
%        str2double(get(hObject,'String')) returns contents of LEO_apogee as a double


% --- Executes during object creation, after setting all properties.
function LEO_Apogee_CreateFcn(hObject, eventdata, handles)
% hObject    handle to LEO_Apogee (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    empty - handles not created until after all CreateFcns called

% Hint: edit controls usually have a white background on Windows.
%       See ISPC and COMPUTER.
if ispc
    set(hObject,'BackgroundColor','white');
else
    set(hObject,'BackgroundColor',get(0,'defaultUicontrolBackgroundColor'));
end



function LEO_Apogee_Callback(hObject, eventdata, handles)
% hObject    handle to LEO_Apogee (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

% Hints: get(hObject,'String') returns contents of LEO_Apogee as text
%        str2double(get(hObject,'String')) returns contents of LEO_Apogee as a double


% --- Executes on button press in Show_GEO_Versus_LEO.
function Show_GEO_Versus_LEO_Callback(hObject, eventdata, handles)
% hObject    handle to Show_GEO_Versus_LEO (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)
u=3.986013*10^5;
%========================================================
%LEO的轨迹是椭圆,GEO轨迹是圆
if(get(handles.LEO_Ellipse,'value')==1)
    %-------------------------------------------------------------
    %
    str_GEO_Radius=get(handles.GEO_Radius,'string');
    str_LEO_LongAxes=get(handles.LEO_LongAxes,'string');
    str_LEO_e=get(handles.LEO_e,'string');
    str_LEO_Angle=get(handles.LEO_Angle,'string');
    GEO_Radius=str2num(str_GEO_Radius);
    LEO_LongAxes=str2num(str_LEO_LongAxes);
    LEO_e=str2num(str_LEO_e);
    LEO_Angle=str2num(str_LEO_Angle);
    %--------------------------------------------------------------
        a=LEO_LongAxes;
        e=LEO_e;
        b=(a^2-a*e)^(1/2);
%--------------------------------------------------------------
%计算输出量并显示
        LEO_T=2*pi*(a)^(3/2)/u^(1/2)/3600;
        GEO_T=2*pi*GEO_Radius^(3/2)/u^(1/2)/3600;
        LEO_Perigee=a-a*e;
        LEO_Apogee=a+a*e;
        GEO_Speed=2*pi*GEO_Radius/GEO_T;
        set(handles.LEO_T,'string',num2str(LEO_T));
        set(handles.GEO_T,'string',num2str(GEO_T));
        set(handles.LEO_Perigee,'string',num2str(LEO_Perigee));
        set(handles.LEO_Apogee,'string',num2str(LEO_Apogee));
        set(handles.GEO_Speed,'string',num2str(GEO_Speed));
        ShowGVL_ETrack(GEO_Radius,LEO_LongAxes,LEO_e,LEO_Angle);
%==========================================================================
%如果LEO轨迹是圆型
else
    str_GEO_Radius=get(handles.GEO_Radius,'string');
    str_LEO_Radius=get(handles.LEO_Radius,'string');
    str_LEO_Angle=get(handles.LEO_Angle,'string');
    GEO_Radius=str2num(str_GEO_Radius);
    LEO_Radius=str2num(str_LEO_Radius);
    LEO_Angle=str2num(str_LEO_Angle);
%----------------------------------------------------------------------
%计算输出量并显示
        LEO_T=2*pi*(LEO_Radius)^(3/2)/u^(1/2)/3600;
        GEO_T=2*pi*GEO_Radius^(3/2)/u^(1/2)/3600;
        LEO_Speed=2*pi*LEO_Radius/LEO_T;
        GEO_Speed=2*pi*GEO_Radius/GEO_T;
        set(handles.LEO_T,'string',num2str(LEO_T));
        set(handles.GEO_T,'string',num2str(GEO_T));
        set(handles.LEO_Speed,'string',num2str(LEO_Speed));
        set(handles.GEO_Speed,'string',num2str(GEO_Speed));
 %--------------------------------------------------------------
        ShowGVL_RTrack(GEO_Radius,LEO_Radius,LEO_Angle);
    
    
end

    

% --- Executes on button press in Show_LEO_Versus_GEO.
function Show_LEO_Versus_GEO_Callback(hObject, eventdata, handles)
% hObject    handle to Show_LEO_Versus_GEO (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

u=3.986013*10^5;
%========================================================
%LEO的轨迹是椭圆,GEO轨迹是圆
if(get(handles.LEO_Ellipse,'value')==1)
    str_GEO_Radius=get(handles.GEO_Radius,'string');
    str_LEO_LongAxes=get(handles.LEO_LongAxes,'string');
    str_LEO_e=get(handles.LEO_e,'string');
    str_LEO_Angle=get(handles.LEO_Angle,'string');
    GEO_Radius=str2num(str_GEO_Radius);
    LEO_LongAxes=str2num(str_LEO_LongAxes);
    LEO_e=str2num(str_LEO_e);
    LEO_Angle=str2num(str_LEO_Angle);
%--------------------------------------------------------------
        a=LEO_LongAxes;
        e=LEO_e;
        b=(a^2-a*e)^(1/2);
%--------------------------------------------------------------
%计算输出量并显示
        LEO_T=2*pi*(a)^(3/2)/u^(1/2)/3600;
        GEO_T=2*pi*GEO_Radius^(3/2)/u^(1/2)/3600;
        LEO_Perigee=a-a*e;
        LEO_Apogee=a+a*e;
        GEO_Speed=2*pi*GEO_Radius/GEO_T;
        set(handles.LEO_T,'string',num2str(LEO_T));
        set(handles.GEO_T,'string',num2str(GEO_T));
        set(handles.LEO_Perigee,'string',num2str(LEO_Perigee));
        set(handles.LEO_Apogee,'string',num2str(LEO_Apogee));
        set(handles.GEO_Speed,'string',num2str(GEO_Speed));
%---------------------------------------------------------------
        ShowLVG_ETrack(GEO_Radius,LEO_LongAxes,LEO_e,LEO_Angle);
%======================================================
%LEO的轨迹是圆
else 
    str_GEO_Radius=get(handles.GEO_Radius,'string');
    str_LEO_Radius=get(handles.LEO_Radius,'string');
    str_LEO_Angle=get(handles.LEO_Angle,'string');
    GEO_Radius=str2num(str_GEO_Radius);
    LEO_Radius=str2num(str_LEO_Radius);
    LEO_Angle=str2num(str_LEO_Angle);
%--------------------------------------------------------------
%计算输出量并显示
        LEO_T=2*pi*(LEO_Radius)^(3/2)/u^(1/2)/3600;
        GEO_T=2*pi*GEO_Radius^(3/2)/u^(1/2)/3600;
        LEO_Speed=2*pi*LEO_Radius/GEO_T;
        GEO_Speed=2*pi*GEO_Radius/GEO_T;
        set(handles.LEO_T,'string',num2str(LEO_T));
        set(handles.GEO_T,'string',num2str(GEO_T));
        set(handles.LEO_Speed,'string',num2str(LEO_Speed));
        set(handles.GEO_Speed,'string',num2str(GEO_Speed));
%--------------------------------------------------------------
        ShowLVG_RTrack(GEO_Radius,LEO_Radius,LEO_Angle);
end