Файл: Кастин, О. М. Система первичной обработки метеорологической информации.pdf

ВУЗ: Не указан

Категория: Не указан

Дисциплина: Не указана

Добавлен: 23.10.2024

Просмотров: 98

Скачиваний: 0

ВНИМАНИЕ! Если данный файл нарушает Ваши авторские права, то обязательно сообщите нам.

ПРий, з

ПР.1 Л. j

 

пРил. г

пРиЯ.

*В9,0

Т Е И С Т С К О Н Е Ц ОПОЗНАВАНИЯ

И

РАСКОДИРОВАНИЯ' ,

 

*90,0

 

В К А Т , 1,3,3);

 

 

 

*91,0

Б Р ('721' ,ВКАТ,5,200 ,ASP 1)!

 

 

*98,0

 

сото S T O P ;

 

 

 

S 9 S . , J > .

P A T :

B E « I N

 

 

 

* 9 ( 1 , 0

 

 

 

5 9 5 , 0 C O M M E N T Б Л О К О П О З Н А Е Т И Р А С К О Д И Р У Е Т А Э Р О Л О Г И Ч Е С К И Е

* 9 6 , 0

 

С У Х О П У Т Н Ы Е И М Э Р С К И Е С О О Б Щ Е Н И Я Ч А С Т И А И С ,

* 9 7 , 0

 

Ф О Р М И Р У Е Т З А П И С И

( М А К Е Т Ы ) С О О Б Щ Е Н И Й .

 

* Ь в , 0

 

Р а б о т а б л о к а R A T

н а ч и н а е т с я с о

 

* 9 9 , 0

 

С Т Р О К И С Н О М Е Р О М N T

«

 

 

N T S N T S ) ;

 

6 0 0 , 0

6 0 1 , 0

6 0 8 , 0

6 0 3 , 0

6 0 4 , 0

6 0 5 , 0

6 0 6 , 0

6 0 7 , 0

6 0 S , p

6 0 9 , 0

6 1 0 , 0

6 1 1 , 0

6 1 2 , 0

1 N T E . 6 E R

A l O , A 5 T M , A N U , A S V U , I C E . A S H . A O .

 

А К К , A V K , а , A K C P P R , А S О , А У У , Я С С ,

Т , 1 , A R 1 , A N R , A N O S , A K t C , A N S R , A P S E , A K P N S !

C O M M E N T

- Н О М Е Р П О С Л Е Д Н Е Й С Т А Н Д А Р Т Н О Й И З О Б А Р И Ч Е С К О Й

A I D

A S T M

-

П О В Е Р Х Н О С Т И С Д А Н Н Ы М И 0 В Е Т Р Е ,

Н О М Е Р У Р О В Н Я ( С Т Р О К И ) В М А К Е Т Е A 4 ,

A N U

-

Н О М Е Р У Р О В Н Я ,

A S V U

-

Ч И С Л О Г Р У П П В У Р О В Н Е ,

I С Е

-

И С П О Л Ь З У Е Т С Я В Б Л О К Е П О И С К А З А Г О Л О В К А ,

A S H , А О -

Л И Р О Т А И Д О Л Г О Т А ,

А К К

-

Н О М Е Р К В А Д Р А Т А ,

А Ѵ К

. -

В Ы Ч И С Л Е Н Н Ы Й Н О М Е Р К В А Д Р А Т А ,

6 1 3 , 0

6 1 4 , 0

6 1 5 , 0

6 1 6 , 0

Q

- Н О М Е Р

К В А Д Р А Н Т А ,

А К 6 Р Р Я - Д Л Я З А П О М И Н А Н И Я A S V U П Е Р Е Д

 

Р А С Ш И Ф Р О В К О Й О Ч Е Р Е Д Н О Г О У Р О В Н Я ,

Т , 1 . A R I - Р Д Ь О Ч И Е

П Е Р Е М Е Н Н Ы Е

100


П Р И Л , 2

 

і і р

и л .. г

пРил. г

п р и л . з

6 1 7 , n . A N R - ' H O M E P

P A K 0 H A ' = X 4 X 5 ,

 

 

 

6 1 8 . 0

A N O S - ' H O M E P С Т Л Н Ц И Й ' = Х і Х 2 Х З ,

 

 

6 1 1 . 0 A K L G - Ч И С Л О Н О М Е Р О В C T Д Н Ц И Й , С О О Т В Е Т С Т В У Ю Щ И Х

 

6 8 0 . 0

Д а н н о м у

A N A ,

 

 

 

 

6 2 1 . 0

A N S R - H O M Ë P C T - t P o j E r O Б И Т А С Т О Л Б Ц А С П И С К А ,

 

6 2 2 . 0

A P S i - П Е Р В Л Я С Т Р О К А В С П И С К Е Д Л Я Д А Н Н О Г О A N R

 

6 2 8 . 0

A K P N S - Ч И С Л О Н О М Е Р О В С Т А Н Ц И И В С П И С К Е ;

 

6 2 4 . 0

B O O L E A N

A B O Z , A B I C , A B B V , A B H O S , A P U R , A B S K ,

 

6 2 5 . 0

 

A S S E , Л В К Т , A B A C . A B P U N R P , Д В О Р и , А В О Ѵ І

 

6 2 6 , 0

A B l U A , A B L E , A d l O V , A B P U O l , A B 1 , A B 2 , A B 3 J

 

6 2 7 . 0 C O M M E N T

- О Б Н А Р У Ж Е Н А Г Р У П П А С С И М В О Л О М 1 Е ' И Л И

6 2 8 , 0

A B I C

6 2 9 , 0

А В 8 V

-

д е к о д и р о в а н у р о в е н ь б е з

в е т р а ,

 

6 3 0 , 0

A P U R

• О Б Н 4 Р У Ж Е Н П Р О П У Щ Е Н Н Ы Й У Р О В Е Н Ь ,

 

6 3 1 , '

А В S K

- С О В П А Д Е Н И Е Н О М Е Р О В К В А Д Р А Т О В ,

 

6 3 2 , 0

А В 5 Е

- Д Л Я К О Н Т Р О Л Я Е Д И Н И Ц Ш И Р О Т Ы И Д О Л Г О Т Ы ,

6 3 3 , 0

А В К Т

- О Б Щ И Й П Р И З Н А К К О Н Ц А С О О Б Щ Е Н И Я ,

 

6 3 4 , 0

A B A C

- П Р И З Н А К Ч А С Т И А И Д И С ,

 

 

6 5 5 , 0

A B P U N R P - П О С Л Е Д Н И Й У Р О В Е Н Ь В A R P

 

 

6 3 6 , 0 ’

A B O P U - О Б Н А Р У Ж Е Н П О С Л Е Д Н И Й У Р О В Е Н Ь ,

 

6 3 7 . , 0

А Ѳ О Ѵ

- П Р И З Н А К О Т С У Т С Т В И Я И Н Ф О Р М А Ц И И 0 В Е Т Р Е ,

б З в , о

а а і и я

- Р А С Ш И Ф Р О В А Н П Е Р В Ы Й У Р О В Е Н Ь ,

 

639 ,0

А 8 L G

-

В A R P

О Б Н А Р У Ж Е Н Ы

Л И Ш Н И Е

Г Р У П П Ы ,

 

6 4 0 , 0

A B I U V - П Р И З Н А К И С К А Ж Е Н И Я У К А З А Т Е Л Я В Е Т Р А ,

 

6 4 1 , о

A 8 P U J 1 - П Р О П У Щ Е Н У Р О В Е Н Ь - A C V U И З М Е Н Я Е Т С Я

 

6 4 2 , 0

С З Н Д 2 ,

 

 

 

 

 

 

6 4 3 , 0

А В І - А В З - - Р А Б О Ч И Е И Д Е Н Т И Ф И К А Т О Р Ы ;

 

 

6 4 4 , 0

I N T E G E R

А я Я Д у A M [ - i : i l , i : 5 J , A 8 S H , A B J , A B K G ( i : S ) ,

Ю І


ПРИЛ. 2

ПРИЛ. ?

ПРИЛ. 2

ПРиЛ. 2

* 4 5 , 0

6 4 6 , 0

6 4 7 , 0

6 4 0 , 0

6 4 9 , 0

6 5 0 , 0

6 5 1 , 0

6 5 2 , 0

6 5 5 , 0

6 5 4 , 0

6 5 5 , 0

6 5 6 , 0

6 5 7 ^ 0

6 5 8 , 0

6 5 9 , 0

6 6 0 , 0

6 6 1 , 0

6 6 2 , 0

6 6 5 , 0

6 6 4 , 0

6 6 5 , 0

6 6 6 ,

C O M M E N T

4 R P ( O : S , I : S I , A T N U ( O : 6 ) |

- М А К Е Т А Э Р О Л О Г И Ч Е С К О Г О С О О Б Щ Е Н И Я ,

Д М

Д О Э Н

- Г Р У П П А Ш И Р О Т У ,

Д В О

- Г Р У П П А Д О Л Г О Т Ы ,

Д в к с

- К О Н Т Р О Л Ь Н А Я Г Р У П П А

А Я Р

- Р А Б О Ч И Й М А С С И В , И С П О Л Ь З У Е М Ы Й П Р И

A T N U

О П О Э Н - О В Л Н И И С О О Б Щ Е Н И Я ,

- Т А Б Л И Ц А Н О М Е Р О В У Р О В Н Е Й Д Л а

 

И С К Л й Ч Е Н И Я о ш и б о ч н ы х Г Р У П П ;

S W I T C H а 2 : з т ) , т г , т 2 , т з ;

S W I T C H

0 3 ; a J 2 , 5 2 , 3 5 , 0 4 , J 5 , J 6 ;

S W I T C H s o c : s s ' o o o , s o 1, s o 2, s u J :

P R O C E D U R E t t P c T ;

C O M M E N T

В ы Б И Р . Е Т О Ч Е Р Е Д Н У Ю П Я Т И З Н . . Ч н У й Г Р У П П У

 

С О О Б Щ Е Н И Я , В Ы Р А Б А Т Ы В А Е Т О Б Щ И Й П Р И З Н А К

 

К О Н Ц А С О О Б Щ Е Н И Я , И С К Л Ю Ч А Е Т О Ш И Б О Ч Н Ы Е Г Р У П П Ы

 

И С П Р А В Л Е Н Н Ы Е П О П Р А В И Л У Е , . * ;

B E G I N

I N T E G E R t t ;

 

 

Д С 1 :

I F K T T P S » O T H E N B E G I N

 

 

A B K T I a T R U E

i G O T O A G ' E N U

;

 

Д В К Т a F A L S E

i B P G ( 5 ) ;

 

6 6 7 , 0

I F

S G a B G T H E N G O T O A G 2 !

B E G I N

6 6 8 , 0

I F

6 [ s c ) 3 W E T G ( S C J a H P O T H E N

■669,0

 

e T i i s o ) : * C

T I i s o

i * i ;

 

6 7 0 , 0

ЯС2: £ F

A B I G : = T R 4I E

; с о т о A C J E N D

;

671,

S O B T H E N

С О Т О

f l G *

 

672,0 Дез: К5с:=з; coro лсі;

102


ПРиЛ,

2

* • • • • •

ПВиЛ.

%

ПРИЛ.

2

ПРИЛ,

......................................

• • » « » .

. . . . . .

П А К Е Т . 0 0

• » » • •2

ьп, 0.

6 7 4 , 0

6 7 5 , 0

6 7 6 , 0

6 7 7 , 0

6 7 8

, 0

6 7 9

, 0

6 8 0

, 0

6 8 1

, 0

6 8 2 , 0

6 8 3

, 0

6 8 4

, 0

6 8 5 , 0

6 8 6

, 0

6 8 7

, 0

6 8 8

, 0

6 8 9

, 0

6 9 U

,

0

6 9 1

, 0

6 9 2

,

а

6 9 3

, 0

6 9 4

,

п

6 9 5

, 0

6 9 6

, q

Я Е 4 :

I F 7 Л В I G T H E N

;

U O T O Л Е 5 ;

 

 

A C S ;

 

A B I G I S F A L B E

I F

T * O T H E N

с о т о

 

F O R

R I n O S T E P

 

l U N T I L

 

T - l Q O

 

 

 

 

I F

 

Щ 1 І і Я Я Р І Я , 1 1 » C [ 2 ) « A R P ( R , 2 ) I G ( 3 1 = A R P { R , 3 1

 

 

 

Е С | 4 J p A R P t R , 4 ) » G t 5 J » A R P ( R . 5 1 T H E N

 

 

 

B E G I N

Г : = й * 1 J A N U I s A T N U I R ) ;

Я С 5 ; E N O

G O T O A G I E H O ;

 

 

 

 

 

 

 

В Р Е Т [

 

 

 

 

 

 

 

I N T E G E R K R G [

P R O C E D U R E

 

A R U M ( К R G ) I V A L U E K R s ;

C O M M E N T

Б З А В И С И М О С Т И О Т Ч И С Л О Г Р У П П В A R P

 

 

 

Ф О Р М И Р У Е Т О Д Н У И Л И Д В Е С Т Р О К И М А К Е Т А

 

 

 

И З И Н Ф О Р М А Ц И И , Н А Х О Д Я Щ Е Й С Я B - A R P ;

B E G I N

S N I T C H а : = м 2 , м з , м 4 , м 5 , м б ;

 

 

С О Т О

Q l K R G - l l j

 

 

 

 

 

 

 

 

 

M J :

A B B V I S T R U E

і

 

 

 

 

 

 

 

 

м з ' :

u R ( о ) ;

с о т а

к ;

 

 

G O T O - t ;

 

 

М 4 - .

A B B V I s T R U E

і

U R ( Q ) i

 

 

M S ;

U R I O J - :

A B B V I S T R U E

;

G O T O

L ;

 

 

М 6 І

U A ( 0 > ;

K R G I s K R G - 1 ;

A S T M 1 s A S T M * 1 i

L ;

I F

A P U R T H E N B E G I N

 

 

A P U R I S F A L S E

 

E N D

;

U R ( K R G - 2 ) I

 

K ;

E N D

 

— “ ТГ— •

 

 

 

 

 

 

 

A R U M ;

 

V A L U E

J J

I N T E G E R

> i

P R O C E D U R E

 

U R ( I ) ;

C O M M E N T

ф о р м и р у е т

с т р о к у

м а к е т а

и з

6 9 7 , 0

 

 

Г Р У П П ,

Н А Х О Д Я Щ И Х С Я В А Я Р ;

6 9 8

, 0

B E G I N

I N T E G E R F ;

I N T E G E R A R R A V A , 9 , C t i 1 5 ) ;

6 9 9 , 0

I N T E G E R

T V V , T V , T R , Z T , D D , F F ;

7 0 0

, 0

A S T M : = A S T M + 1 ;

 


ПРИЛ. 2

ПРИЛ.. 2

ПРИП. 2

ПРИЛ. 2

701.0 FOR F :=I,2,J ,«,500 BEGIN

702.0Я (F I'.aARPt I ,F| i B(F ):sARP II* t,F I;

703.0C(F|:aARP(I»2,F|EHO ;

704.0

4Mi*STM,i]:»TTN(4,3,i);

B R E A K :

705.0

F:*RM(0,11;

IF FF5(J'2F«60THEN

BEGIN

706.0

п е р е к о д и р о в а н и е г р у п п

т е м п е Р л Ту р н и

707.0

в е т р а в к и т а й с к и х

с о о б щ е н и я х )

700.0

зт:»о; T V V T T N (B,I ,2»;

 

 

706-J-0 £F Т»Ѵ«0ТнеМ

BEOIN Т»!з1023)

710.0TR:B |27) GOTO МЕТЕНО )

711.0 IF

ТѴѴ05Г THEN

BEGIN TVV:*TVV-SJ)

7ia,:

2T :SIEND

;

т у т ѵѵ «і «IT ;

7 1 3 . 0 T R : a T T N ( B , £ , 2 ) )

714.0 £F

T R .O T H E N

B E G I N T R :>)27;

715.0сото метено ;

716.0

IF

T R T 5 O TH E N

T R :«5O -T A ;

717.0 TR:«(-1)12T»TVy-TRJ

71В ,0

l_F

TRT5THEN

T R :«TR« I0EL3E TR;*TR*50S

710.0M E T : A M (A S T M ,2I:>T V ;

720.0RM.(4STM,3):*TR)

721.0

MINO: IF 7ABBVSCtt)=HJTHEN B E G I N

728.0

00:аТТЫ(С,2,2); F F !aTTNIC,4,2 ))

723.0£F FF«0THEN F F :S IOBJELSE

724.0IF DO’ SOTHEN FF:aFF*100J 72$,o W A M (A S T M ,5):*FFS

726,0' ±F 00<0THEN 00:»l27ELSE

727.0IF OO’ SOTHEN 00:aOO-50; '

726.0 AM(ASTH,4);aOOENO HIND)

I »