Файл: Кастин, О. М. Система первичной обработки метеорологической информации.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 »