brush.Color:=clwhite;

font.Color:=clblue;

font.Style:=[fsbold];

textout(0,0,'TRANSMISSION'+' 4250 MHz');

label8.Caption:='F tx ='+' 4250 MHz';

moveto(0,image1.Height);

lineto(round(image1.Width/5),0);

lineto(round(image1.Width/5),image1.Height);

lineto(round(image1.Width*0.4),0);

lineto(round(image1.Width*0.4),image1.Height);

lineto(round(image1.Width*0.6),0);

lineto(round(image1.Width*0.6),image1.Height);

lineto(round(image1.Width*0.8),0);

lineto(round(image1.Width*0.8),image1.Height);

lineto(round(image1.Width),0);

lineto(round(image1.Width),image1.Height);

End;

// рисуем график модулирующей частоты отраженной высотомером

With image2.Canvas do

Begin

PatBlt(image2.Canvas.Handle, 0, 0,

image2.ClientWidth, image2.ClientHeight, WHITENESS);

repaint;

pen.Width:=2;

pen.Color:=clgreen;

brush.Color:=clwhite;

font.Color:=clblue;

font.Style:=[fsbold];

textout(0,0,'Reflection '+ floattostr(4250+scrollbar1.Position*0.4)+' MHz');

label9.Caption:='F rx = '+floattostr(4250+scrollbar1.Position*0.4)+' MHz';

moveto(scrollbar1.Position-250,image2.Height);

lineto(round(scrollbar1.Position/2.5),0);

lineto(round(scrollbar1.Position/2.5),image1.Height);

lineto(round(scrollbar1.Position/2.5)+round(image1.Width/5),0);

lineto(round(scrollbar1.Position/2.5)+round(image1.Width/5),image1.Height);

lineto(round(scrollbar1.Position/2.5)+round(image1.Width*0.4),0);

lineto(round(scrollbar1.Position/2.5)+round(image1.Width*0.4),image1.Height);

lineto(round(scrollbar1.Position/2.5)+round(image1.Width*0.6),0);

lineto(round(scrollbar1.Position/2.5)+round(image1.Width*0.6),image1.Height);

lineto(round(scrollbar1.Position/2.5)+round(image1.Width*0.8),0);

lineto(round(scrollbar1.Position/2.5)+round(image1.Width*0.8),image1.Height);

lineto(round(scrollbar1.Position/2.5)+round(image1.Width),0);

lineto(round(scrollbar1.Position/2.5)+round(image1.Width),image1.Height);

end;

end;

end.

Интерфейс программы

Заключение

При выполнении курсового проекта мною были рассмотрены различные методы измерения дальности, включая импульсный и частотный метод дальнометрии.

Радиовысотомер с частотной модуляцией применяется при небольших высотах полета в авиации, при посадке самолета и т. д. При этом радиовысотомер излучает непрерывные радиосигналы, у которых изменяется частота в разные периоды, следуя заданному несимметричному пилообразному закону в диапазоне от 4250 до 4350 МГц. Высота летательного аппарата определяется индикатором высотомера, который показывает разность между частотами отраженных и излучаемых радиосигналов.

Радиовысотомер с импульсной модуляцией используется в авиации, в случае аэрофотосъемки с достаточно больших высот.

Для того чтобы определить высоту летательного аппарата, измеряется время запаздывания отраженных радиоимпульсов относительно поступающих в приемник из передатчика радиоимпульсов. В данном проекте также был рассмотрен радиовысотомер А-037. В этом проекте, мы анализировали погрешности радиовысотомеров больших и малых высот. В качестве примера, в работе были приведены временные диаграммы работы радиовысотомера малых и больших высот.

В проведенной данной работе я изучил радиовысотомер и его назначение (роль) в авиации. На основе исходных данных, составлена математическая модель и алгоритм работы. В результате была разработана программа реализующая данный алгоритм с использованием объектно-ориентированного средства программирования Embarcadero Delphi XE5.

Список литературы

1. Чердынцев В. А. Радиотехнические системы. Учебное пособие. -- Мн.: «Высшая школа», 1988.

2. Пестряков В. В., Кузенков В. Д. Радиотехнические системы. Учебник для вузов. -- М.: «Радио и связь», 1985.

3. Бакулев П. А. Радиолокационные системы. Учебник для вузов -- М.: «Радиотехника», 2004.

4. https://en.wikipedia.org/wiki/Avionics

5. http://referatplus.ru/voennaya_kafedra/1_voen_0066.php

6. http://oleg-tulin.narod.ru/index/0-16

7. http://alnam.ru/book_rts.php?id=76

Размещено на Allbest.ru