Энергетический расчет канала дальней тропосферной радиосвязи (Программа для ЭВМ). Владимир Иванович Шлома
Чтение книги онлайн.
Читать онлайн книгу Энергетический расчет канала дальней тропосферной радиосвязи (Программа для ЭВМ) - Владимир Иванович Шлома страница 3
function edit22_CreateFcn(hObject, eventdata, handles)
if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
set(hObject,'BackgroundColor','white');
end
function popupmenu1_Callback(hObject, eventdata, handles)
contents = get(hObject,'Value');
global n
switch contents
case 1
n=1;
case 2
n = 2;
case 3
n = 4;
end
function popupmenu1_CreateFcn(hObject, eventdata, handles)
if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
set(hObject,'BackgroundColor','white');
end
function radiobutton5_Callback(hObject, eventdata, handles)
global tipcan
if get (handles.radiobutton5,'value') == 1
set(handles.radiobutton6,'value',0);
set(handles.uipanel13,'visible','off');
set(handles.uipanel12,'visible','on');
tipcan=2;
end
function radiobutton6_Callback(hObject, eventdata, handles)
global tipcan
if get (handles.radiobutton6,'value') == 1
set(handles.radiobutton5,'value',0);
set(handles.uipanel13,'visible','on');
set(handles.uipanel12,'visible','off');
tipcan=1;
end
function listbox6_Callback(hObject, eventdata, handles)
global Tm
contents = get(hObject,'Value');
switch contents
case 1
Tm=1;
case 2
Tm = 2;
case 3
Tm = 3;
case 4
Tm = 4;
case 5
Tm = 5;
otherwise
end
function listbox6_CreateFcn(hObject, eventdata, handles)
if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
set(hObject,'BackgroundColor','white');
end
function listbox7_Callback(hObject, eventdata, handles)
global kan
contents = get(hObject,'Value');
switch contents
case 1
kan=2;
case 2
kan = 1;
otherwise
end
function listbox7_CreateFcn(hObject, eventdata, handles)
if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
set(hObject,'BackgroundColor','white');
end
function listbox10_Callback(hObject, eventdata, handles)
global Sez
contents = get(hObject,'Value');
switch contents
case 1
Sez=1;
case 2
Sez = 2;
case 3
Sez = 3;
otherwise
end
function listbox10_CreateFcn(hObject, eventdata, handles)
if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
set(hObject,'BackgroundColor','white');
end
function listbox11_Callback(hObject, eventdata, handles)
global Tp
contents = get(hObject,'Value');
switch contents
case 1
Tp=1;
case 2
Tp = 2;
case 3
Tp = 3;
case 4
Tp = 4;
otherwise
end
function listbox11_CreateFcn(hObject, eventdata, handles)
if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
set(hObject,'BackgroundColor','white');
end
function pushbutton1_Callback(hObject, eventdata, handles)
global Pvh1vt
global Lm1z
global Pvh1med
global