В данное пособие к выполнению лабораторных работ по дисциплине «Теория увд» включены описания 3-х лабораторных работ: Оптимизация размера зоны увд для обеспечения минимальной вероятности столкновения воздушных судов

Рис. 6. Схема расхождения воздушных судов (второй случай)




Рис. 7. Схема расхождения воздушных судов (третий случай)

Описание программы. Программа реализует рассмотренный метод анализа развития конфликтных ситуаций. Программа разработана на языке БЕЙСИК для ПЭВМ типа IBM PC. Для ее выполнения на других типах ЭВМ необходимо соответствующим образом изменить строки программы с номерами 20, 60, 70, 90, 130, 140, 150, 260÷300, 700, 820, 830, 1000, 1280.
5 REM Программа.

10 REM Конфликтные ситуации, их прогноз и анализ.

20 COLOR 14,1,12 : CLS : Z=60 : LOCATE 6.14

25 LOCATE 4,14 ; PRINT STRING$ (55,196)

30 PRINT TAB(14); ********Условия развития конфликтных ситуаций ********

40 PRINT ТАВ (14); "прогноз и анализ."

50 LOCATE 7, 14 : PRINT STRING$(55,196)

60 LOCATE 12, 31 : COLOR 13

70 LOCATE 10, 31 : PRINT "Инструкция": COLOR 14

80 LOCATE 11, 30 : PRINT STRING$(22,196)

90 LOCATE 13,14

100 PRINT "Расчетные элементы вводить через запятую или по одному."

110 PRINT ТАВ(22);"Время вводить в часах и минутах"

120 LOCATE 15,14 : PRINT STRING$(55,196)

130 LOCATE 20,15: PRINT "Нажмите клавишу пробел."

140 A$=INPUT$(1)

150 CLS : LOCATE 8,19

160 PRINT TAB(14);"Введите КОД заданного расчета:"

170 PRINT ТАВ(12);""

180 PRINT

190 PRINT TAB(12);"1 - Случай 1-й. За менее скоростным вылетает"

200 PRINT ТАВ(28);" более скоростное ВС." : PRINT

210 PRINT ТАВ(12);"2 - Случай 2-й. 1-е ВС, после взлета, набирает высоту,"

220 PRINT ТАВ(28);"2-е выполняет полет на встречном эшелоне." : PRINT

230 PRINT TAB(12);"3 - Случай 3-й. 1-е, менее скоростное ВС, набирает вы-"

240 PRINT ТАВ(28);"соту, 2-е летит на попутном эшелоне." : PRINT

250 PRINT ТАВ(12);"4 - конец расчета."

260 A=VAL(INPUT$(1))

270 ON A GOTO 310, 520, 680, 1280

280 CLS : LOCATE 12,25 : COLOR 12

290 BEEP : PRINT "Вы ошиблись. Повторите ввод кода"

300 COLOR 14 : GOTO 130

310 G0SUB 700 : GОSUB 800 : G0SUB 850 : GОSUB 900

320 PRINT TAB( 13):" "

330 IF XY THEN PRINT TAB(17);"Анализ полета :":GОTО 350

340 PRINT TAB(13); "Анализ развития КОНФЛИКТНОЙ СИТУАЦИИ : "

350 PRINT TAB(13);"*************************************************"

360 PRINT TAB(13); "t п-та 1-го ВС до момента пересеч.эшел.занятого 2-м ВС:"

370 PRINT TAB(49); "t 1 =";К1;" мин ";КЗ;" с "

380 PRINT ТАВ(13); " t набора Н до пересеч.занятого эшелона=";Т5;" мин";Т7;" с

390 PRINT ТАВ(13); "Т пересеч.занятого эшелона »";Т9;" час";К5;" мин";К7;" с"

400 PRINT ТАВ(13); "Удаление ВС от аэродрома вылета: S1 = "; S2;" км"

410 PRINT TAB(46); "S2 =" ; S4;" км."

420 PRINT TAB(13); "S между ВС на момент пересечения занятого эшелона="; D;" км

430 PRINT TAB(13); "t п-та 1-го ВС ДО догона его 2-м BC-";Y5;" мин"; Y 7;" с"

440 PRINT ТА8(13);t п-та 2-го ВС ДО догона им 1-го BC-";Y1;" мин"; YЗ;" с"

450 PRINT TAB(13); "t догона 1-го ВС -";А1;" час";АЗ;" мин";А5;" с"

460 PRINT ТАВ(13);"Высота полета 1-го ВС в момент догона: Н1=";Н1;" м."

470 PRINT ТАВ(13);"Высота полета 2-го ВС в момент догона: Н2=";Н2;" м."

480 PRINT ТАВ(13);"Интервал эшелонирования по высоте В Т расхожд.: Н=";Н0;"м"

490 PRINT ТАВ(13);"Удаление ВС от аэродрома В Т догона: S = ";S;" км"

500 PRINT ТАВ(13); " "

510 GOTO 130

520 GOSUB 700 : GOSUB 1140 : GOSUB 1180 : GOSUB 1000

530 PRINT ТАВ(13);"

540 IF XY THEN PRINT TAB(17);"Анализ полета :":GОT0 560

550 PRINT TAB(13); "Анализ развития КОНФЛИКТНОЙ СИТУАЦИИ : "

560 PRINT ТАВ(13); " "

570 PRINT TAB(13); "t п-та 1-го ВС до расхождения =";Х1;" мин"; ХЗ; " с"

580 PRINT ТАВ(13); "Т расхождения ВС ="; Т6;" ч";Т8;" мин";Т0;" с"

590 PRINT TAB(13); "t п-та 1-го ВС до пересеч.эшел.2-го ВС-";К1;" мин";КЗ;"

600 PRINT ТАВ(13); "Т пересеч.эшелона 2-го ВС-";К5;" ч ";К7;" мин";К9;" с"

610 PRINT ТАВ(13); "Высота п-та 1-го ВС в момент расхождения="; Н1;" м."

620 PRINT ТАВ(13);'Интервал эшелонир.по высоте в момент расхожд.= ";Н;" м."

630 PRINT ТАВ(13);"Удаление точки пересеч.от аэродрома вылета =";S1;" км"

640 PRINT ТАВ(13);"Удаление точки расхожд.от аэродрома вылета -";S2;" км"

650 PRINT TAB(13);"S между ВС в момент пересеч.эшелона="; D;" км"

660 PRINT ТАВ(13);""

670 GOTO 130

680 GОSUB 700 : GOSUB 800 : COSUB 1140 : GOSUB 1190 : GOSUB 1000 : GOTO 530

690 ______________Подпрограммы______________

700 CLS : LOCATE 6,35 : PRINT "Введите :" : PRINT

710 PRINT TAB(13); "Время отхода от аэродрома вылета 1-го ВС .......... ";

720 INPUT " ", ТЗ, М1


780 INPUT " ", W2

790 RETURN

800 W0= W2-W1

810 IF W2<=W1 THEN 820 ELSE 840

820 COLOR 13 : PRINT ТАВ(27);"ПРИ V2

830 COLOR 14 : GOTO 770

840 RETURN

850 PRINT TAB(13); "Время отхода от аэродрома вылета 2-го ВС ........;

860 INPUT " " Т4,М2

870 PRINT ТАВ(13);"V вертикальная набора высоты 2-м ВС………..";

880 INPUT " " ,V2

890 RETURN

900 V0= ABS(V2-V1) : T1=(T3*Z)+M1 : T2= (T4*Z)+M2

910 T0=T2-T1 : X=(V1/V0)*T0 : T5=INT(X) : T6=(X-T5)*Z : T7=INT(T6)

920 K=X+T0 : Kl=INT(K) : K2=(K-K1)*Z : K3=INT(K2) : T8=(T2+X)/Z

930 T9=INT(T8) : K4=(T8-T9)*Z : K5=INT(K4) : K6=(K4-K5)*Z : K7=INT(K6)

940 S1=(W1*K)/Z : S2=INT(S1) : S3=(W2*X)/Z : S4-INT(S3) : D1=ABS(S4-S2)

950 D=INT(10*D1+.51)/10 : Y=(W1/W0)*T0 : Yl=INT(Y) : Y2=(Y-Y1)*Z

960 Y3=INT(Y2) : Y4=Y+T0 : Y5=INT(Y4) : Y6=(Y4-Y5)*Z : Y7=INT(Y6)

970 A=(T2+Y)/Z : Al=INT(A) : A2=(A-A1)*Z : A3=INT(A2) : A4=(A2-A3)*Z

980 A5=INT(A4) : H1=INT( 10*( V1*Y4)*Z+.51 )/10 : H2=INT( 10*(V2*Y)*Z+.51 )/10

990 H0=ABS(H2-H1) : S=INT(10*(W2*Y)/Z+.51)/10

1000 CLS

1010 PRINT TAB(13);" "

1020 IF X-Y THEN 1100

1030 IF X

1040 PRINT TAB(13); "Пересечение высоты 1-го ВС произойдет после его обгона"

1050 PRINT ТАВ(13); " "

1060 GOTO 1130

1070 PRINT ТАВ(13); "Пересечение высоты 1-го ВС произойдет до его обгона."

1080 PRINT ТАВ(13); " "

1090 GOTO 1130

1100 PRINT ТАВ(13); "ВНИМАНИЕ!!! Создались условия опасного сближения"

1110 PRINT ТАВ(13);" Дайте команду:- уменьшить V вертик.скорость 1-го ВС"

1120 PRINT ТАВ(13);" "

1130 RETURN

1140 PRINT ТАВ(13);"Эшелон п-та и удаление 2-го ВС от аэродрома"

1150 PRINT ТАВ( 14);"вылета 1-го ВС…………………………………. ";

1160 INPUT " ", H2, S3

1170 REJURN

1180 W0=ABS(W2+W1)

1190 X=(S3*Z)/W0 : Xl=INT(X) : X2=(X-X1)*Z : X3=INT(X2)

1200 T1= ((T3*Z)+M1) : T2=((T4*Z)+M2) : T5=(T1+X)/Z : T6=INT(T5)

1210 T7=(T5-T6)*Z : T8=INT(T7) : T9=(T7-T8)*Z : T0=INT(T9)

1220 Y=(H2/V1)/Z : Kl=INT(Y) : K2=(Y-K1)*Z : K3=INT(K2)

1230 K4=(T1+Y)/Z : K5=INT(K4) : K6=(K4-K5)*Z : K7=INT(K6)

1240 K8=(K6-K7)*Z : K9=INT(K8) : Hl=((V1*X)*Z+.5l) : H=ABS(H2-H1)

1250 S1=INT(10*(W1*Y)/Z+.51)/10 : S2=INT(10*(W1*X)/Z+.51)/10

1260 D=ABS(S2-Sl)

1270 RETURN

1280 CLS : LOCATE 12,27

1290 PRINT " *** Конец расчета ***" : END
В процессе работы программы на экран дисплея выводится заголовок программы, инструкция для ввода данных и меню для выбора режима расчета. Пользователь в режиме диалога вводит код расчета (строки 160÷260). Если введена цифра (код) 1, 2 или 3, выполняется анализ конфликтной ситуации для случая с номером, равным введенному коду. Если введен код «4»—программа завершает свою работу. Результаты расчетов, сопровождаемые подробными пояснениями и рекомендациями диспетчеру, выводятся на экран дисплея. После вывода порции информации программа приостанавливает свою работу, что достигается введением оператора A=INPUT$ (1) (см. строки 130, 140). Для продолжения вычислительного процесса пользователь нажимает клавишу пробела.

Обозначения основных переменных, используемых в программе, следующие:

1. 
   Входные переменные:
   

А – код расчета, цифра 1, 2, 3 или 4;

ТЗ, Ml – время отхода от аэродрома первого ВС самолета (T1), ч, мин;

Wl, W2 – путевые скорости соответственно 1-го и 2-го самолетов (W1, W2),км/ч;

VI, V2 – вертикальные скорости соответственно 1-го и 2-го самолетов (Vв1,V_в2),м/с;

Т4, М2 – время отхода от аэродрома 2-го самолета (Т₂), ч, мин.

2. 
   Промежуточные переменные:
   

N– разность вертикальных скоростей (Vв), м/с;

T1, Т2 – время отхода от аэродрома соответственно 1-го и 2-го ВС(T1,Т2), ч;

Т0 – интервал взлета (полета по маршруту) (t), мин;

X – отношение Vв1/Vв;

Y – отношение W1/W

3. 
   Выходные переменные:
   

К1, КЗ – время полета 1-го самолета до момента пересечения (), мин, с;

Т5, Т7 – время набора высоты до момента пересечения (), мин, с;

Т9, К5, К7 – момент пересечения (Т), ч, мин, с;

S2, S4 – удаление ВС от аэродрома вылета (S1, S2), км;

D – расстояние между ВС в момент пересечения (d_расх), км;

Y5, Y9 – время полета 1-го самолета «до догона» его 2-м (), мин,с;

Yl, Y3 – время полета 2-го самолета до момента догона 1-го самолета (), мин, с;

А1, A3, А5 – момент догона (Т_дог). ч, мин, с;

H1, Н2 – высота полета ВС в момент догона, м;

H– интервал расхождения по высоте (H1, H2), м;

S – удаление ВС от аэродрома в момент расхождения (S_расх), км.
Контрольные примеры

1. В момент = 10 ч 00 мин от аэродрома вылета отошел с набором высоты заданного эшелона первый самолет, имеющий =430 км/ч и =4 м/с. Второй самолет отошел от аэродрома в момент =10 ч 10 мин с = 780 км/ч и 10 м/с. Определить параметры движения ВС до момента расхождения.

Ответ. После прохождения программы на экране дисплея читаем: пересечение высоты 1-го самолета произойдет до его обгона. Анализ полета: Т полета 1-го самолета до момента пересечения его высоты 2-м самолетом = 16 мин 40 с, время полета 2-го самолета до момента пересечения высоты 1-го самолета = 6 мин 40 с. Момент пересечения высоты 1-го самолета Т =10 ч 16 мин 39 с. Удаление ВС от аэродрома вылета в точке пересечения: = 119 км, = 86 км. Дистанция между самолетами в момент пересечения высоты 1-го самолета d_расх = 33 км. Время полета 1-го самолета «до догона» его 2-м = 22 мин 17 с, время полета 2-го самолета «до догона» им 1-го ВС =12 мин 17 с. Высота полета 1-го самолета в момент догона H1 = 5348,6 м, высота полета 2-го самолета в момент догона H2 = 7371,4 м. Интервал эшелонирования по высоте в точке расхождения H_расх = 2022,8 м. Удаление ВС от аэродрома вылета в точке расхождения 159,7 км.

2. Время отхода от аэродрома вылета 1-го самолета T_отх =11 ч 55 мин. Скорость полета 1-го самолета =580 км/ч. Вертикальная скорость набора высоты 1-м самолетом = 10 м/с; скорость 2-го самолета, выполняющего полет на встречном эшелоне, = 620 км/ч. Эшелон полета 2-го самолета H_эш = 6000 м. Удаление 2-го самолета от аэродрома S = 200 км.

Ответ. После прохождения программы на экране дисплея читаем: Внимание!!! Создались условия опасного сближения. Дайте команду: уменьшить вертикальную скорость набора высоты 1-го ВС.
Контрольные вопросы к лабораторной работе № 3

1. 
   Назовите 3 случая возникновения конфликтных ситуаций в полете ВС.
   
2. 
   Каковы возможные варианты расхождения ВС в каждом из этих случаев?
   
3. 
   От соотношений каких параметров зависит выбор варианта расхождения ВС в каждой из возможных ситуаций?
   
4. 
   Какие решения могут быть приняты диспетчером на основе анализа результатов расчета?