//------------- ࠢ  । . -----------------
#(N,5,0)=_(0);      // ᫮ ᥩ  ⠡
$(_EQ())
  $
$_
//${(1. ਧ  )
//&FlInfoP(N,2,0)=1; // 1 -  ଠ  ।⨨, 0 - 
//&FKop(N,2,0)=0;    // 1 -   ⤥쭮, 0 - 
//&FPRk(N,2,0)=0;    // 1 -  / ⤥쭮, 0 - 
// ,  ᪮, ᠭ ᫥⥫쭮 ᨬ, 
// 㤥    祭.
//#(C,81,0)=R_String(____________________________________________________________________);
//$}(1. ਧ  )
&(N,5,0)=0; &ITS(N,10,2)=0;&ITS1(N,4,0)=0;&ITS2(N,4,0)=0;&ITS3(N,4,0)=0;&S50(N,4,0)=0;
&SD(N,7,2)=0;&SM(N,10,2)=0;
#(N,2,0)=_(FCf);    #(N,2,0)=_(FCi);
#(N,2,0)=_(FCo);    #(N,2,0)=_(C_FIO);
#(N,2,0)=_(FCdata_rb); #(N,2,0)=_(FCdata_uv);
#(N,2,0)=_(FCstrah_n); #(N,2,0)=_(FCdolgnost);
#(N,2,0)=_(SrZarplata); #MTEK(N,4,0)=(0);
  #(C,121,0)=_(!SPACE,);
  #=_(,80);
  &I(V,2,0)=0; #01(C,150,0)=_(0); #02(C,80,0)=R_String();
  $(_GT(-1))
    #02=_(1);
  $_
&Name(N,2,0)=;
  #=_();
  #03(C,80,0)=_(!SPACE,);
  // &J(V,2,0)=15;
$                                      //     ⠡
    #=_();                     // ਧ  
    #(N,9,0)=_(,);
    $(*)
#04(C,41,0)=_(,);  #05(C,41,0)=_(,);
#06(C,41,0)=_(,);  #(C,15,0)=_(,);
#(C,40,0)=_(,);
#(C,10,0)=_(,); #(C,20,0)=_();
#=_();
         $(_EQ())
            #(C,30,0)=R_String("__"_._._._._._._._.200__ );
         $_
#(C,10,0)=_(,); #(C,20,0)=_();
#PRUV(C,30,0)=_(FCpruv,);
#PRIK(C,35,0)=_(FCprikaz,);
#=_();
         $(_EQ())
            #(C,30,0)=R_String("__"_._._._._._._._.200__ );
         $_
#(C,20,0)=(61);
#(C,100,0)=_(!SPACE,04, ,05, ,06);
#_(C,100,0)=_(,3,POL);
${(2. ଠ )
//   $ (_EQ(FlInfoP))
// ( 㪠  ।                 ᫥ । ࠡ⪠,
//  ⥫䮭 㪮⥫)                       ⢥ত ⠭
//                                          㤠  樠쭮 ࠧ 
 //                                                          N-1  16.01.98 .
//$
  #Adr(C,121,0)=(,,,,);
  #=_(Adr,40);
  #A01(C,40,0)=_(0); #A02(C,40,0)=R_String();
  $(_GT(-1))
    #A02=_(1);
  $_
      ⠬                ࠡ⭮            @
      ࣠樨          뤠 @_
                            ⮬,  () ࠡ⠫()    ᪠ 
                           $(_GT(Name-1)) @02
                           $_
                            @                      @                
#=_(TNLS,10000);  // TNLS -  㤭
#dddd(C,10,0)=R_Face(data_tru);
                            㤮 㢥 (,  ᭨ 㤮ᯮᮡ  裡  㤮 㢥쥬),
                             ᬥ, ᫥⢨ 㤮 㢥 @dddd
//$_
 __________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________
|   |ਮ      |  㬬   |                                      ஢ ⠢ ࠡ⭮                                                                                                                             |ࠡ⠭ |
|/ | ⥭ |ࠡ⭮|                      (६, ᤥ쭮, ᮡ  ६ 㤮ᯮᮡ,                                                                                                                  |       |
|    |ࠡ⮪     |     |                          ᪭, , ६, ᮢ⥫⢮  祥)                                                                                                                       |           |
|____|______________|          |______________________________________________________________________________________________________________________________________________________________________________________________________|___________|
|    |  |   |          |   |⠦   | |.      |    ||⥭ᨢ|ࠧ|室|    |   |  |祡 |⯓|⢠||୨| | ||/  |쭨 | | |
|    |     |        |          |   |       |㣨  |ᯠ|       |         |   |     |        |       |ᬮ |        |  |       |         |⥫⢮|        |       |        ||ந |     |     |     |
|____|_____|________|__________|________|_______|________|_____|_______|_________|________|________|________|_______|_______|________|________|_______|_________|________|________|_______|________|_____|_________|________|_____|_____|
$                             //     ⠡
$ (_GT(-))
 #=_();                // ਧ  
$()                            //   ப ⠡
#CMES(C,7,0)=_(Month,);#CM(C,8,0)=(1,CMES);#CM1(C,4,0)=(2,CMES);
#R(N,4,0)=_(Order,);
#S1(N,8,2)=_(S_Col_17,);
#S2(N,3,0)=_(S100,); // ଠ
#S3(N,3,0)=_(S1,); //ࠡ祥 ६
&S50=S2-S3;
#S4(N,7,2)=_(SN1,);
#S5(N,8,2)=_(SN2,);
#S6(N,8,2)=_(SN3,);
#S7(N,7,2)=_(SN4,);
#S8(N,7,2)=_(SN5,);
#S9(N,7,2)=_(SN6,);
#S10(N,7,2)=_(SN7,);
#S11(N,7,2)=_(SN8,);
#S12(N,8,2)=_(SN9,);
#S13(N,8,2)=_(SN10,);
#S14(N,8,2)=_(SN11,);
#S15(N,7,2)=_(SN12,);
#S16(N,7,2)=_(SN13,);
#S17(N,7,2)=_(SN14,);
#S18(N,8,2)=_(SN15,);
#S19(N,7,2)=_(SN16,);
#S20(N,7,2)=_(SN17,);
#S21(N,7,2)=_(SN18,);
#S22(N,8,2)=_(SN19,);
#S23(N,7,2)=_(SN20,);
#S24(N,7,2)=_(SN21,);
#S25(N,7,2)=_(SN22,);
|@R  |@CM1 |@CM     |@S1       |@S4     |@S20   |@S5     |@S6       |@S7    |@S23     |@S25    |@S8     |@S9     |@S10   |@S11   |@S12    |@S13    |@S24   |@S15     |@S21    |@S16    |@S17   |@S22    |@S18    |@S19       |@S14    |@S2  |@S3  |
___________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________
&ITS=ITS+S1;
&ITS1=ITS1+S2;
&ITS2=ITS2+S3;
&ITS3=ITS3+S50;
&S50=0;
$_
  $_
  &=+1;
$_
#(N,5,0)=_();         // 稪 ப  
$(_GE(+6-)+_EQ(-))
// $
// $_
$_
$(_GT(-+1))
         ᥣ      |@ITS      |                                                                                                                                                                                                      |@ITS1|@ITS2|
____________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________
  &SD=ITS/ITS2;
  &SM=SD*ITS1/;
#QSD(C,73,0)=_(SD,1);
#PSD(C,75,0)=_((,1,1,QSM,1,73,),1,1,1);
#QSM(C,73,0)=_(SM,1);
#PSM(C,75,0)=_((,1,1,QSM,1,73,),1,1,1);
। ࠡ⮪ ⠢ @SM       
@PSM
: ਮ __________________________________________________________________________________________
᪫祭 ()  裡 _________________________________________________________________________________________
᭮ 뤠 ࠢ_______________________________________________________________________________________________

                       㪮⥫ ࣠樨                   _____________ /@            /

       ..             壠                          _____________ /@           /

                         ਮ   ᮣᥭ _____________ /@             /


//!    ࠢ,  㣫 ⠬ 
// 㪠 ਤ᪮   ⢨⥫쭠.
       $_
$}(2. ଠ )
    $_
    &=+1;
$(_GT(-))
$
))
$

᪮   ⢨⥫쭠.
       $_
$}(2. ଠ )
    $_
    &=+1;
$(_GT(-))
$


$

