Энергетический расчет канала дальней тропосферной радиосвязи (Программа для ЭВМ). Владимир Иванович Шлома

get(0,'defaultUicontrolBackgroundColor'))

      set(hObject,'BackgroundColor','white');

      end

      function edit11_Callback(hObject, eventdata, handles)

      function edit11_CreateFcn(hObject, eventdata, handles)

      if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))

      set(hObject,'BackgroundColor','white');

      end

      function edit12_Callback(hObject, eventdata, handles)

      function edit12_CreateFcn(hObject, eventdata, handles)

      if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))

      set(hObject,'BackgroundColor','white');

      end

      function edit13_Callback(hObject, eventdata, handles)

      function edit13_CreateFcn(hObject, eventdata, handles)

      if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))

      set(hObject,'BackgroundColor','white');

      end

      function edit1_Callback(hObject, eventdata, handles)

      function edit1_CreateFcn(hObject, eventdata, handles)

      if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))

      set(hObject,'BackgroundColor','white');

      end

      function edit2_Callback(hObject, eventdata, handles)

      function edit2_CreateFcn(hObject, eventdata, handles)

      if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))

      set(hObject,'BackgroundColor','white');

      end

      function edit3_Callback(hObject, eventdata, handles)

      function edit3_CreateFcn(hObject, eventdata, handles)

      if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))

      set(hObject,'BackgroundColor','white');

      end

      function edit4_Callback(hObject, eventdata, handles)

      function edit4_CreateFcn(hObject, eventdata, handles)

      if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))

      set(hObject,'BackgroundColor','white');

      end

      function edit5_Callback(hObject, eventdata, handles)

      function edit5_CreateFcn(hObject, eventdata, handles)

      if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))

      set(hObject,'BackgroundColor','white');

      end

      function edit6_Callback(hObject, eventdata, handles)

      function edit6_CreateFcn(hObject, eventdata, handles)

      if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))

      set(hObject,'BackgroundColor','white');

      end

      function edit7_Callback(hObject, eventdata, handles)

      function edit7_CreateFcn(hObject, eventdata, handles)

      if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))

      set(hObject,'BackgroundColor','white');

      end

      function edit21_Callback(hObject, eventdata, handles)

      function edit21_CreateFcn(hObject, eventdata, handles)

      if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))

      set(hObject,'BackgroundColor','white');

      end

      function edit22_Callback(hObject, eventdata, handles)

      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