//-------    () ---------- 16.10.2000
//--------롮ઠ 㬬 ந室  26  (.33)------
#(N,3,0)=R_Date(3);  #(N,2,0)=R_Date(4);
#(C,18,0)=(61);
#F(C,19,0)=R_Face(f);   #I1(C,13,0)=R_Face(i);  #I2(C,15,0)=R_Face(o);
#DRB(C,10,0)=R_Face(data_rb);  #DUV(C,10,0)=R_Face(data_uv);
#TN(C,10,0)=R_Face(tn);

${(1. ଠ ࠢ. )
E                                   F

                     뤠  @F                   @I1           @I2
      
      ⠬          ⮬,  () ࠡ⠫(); 室 㦡___________________________
                     @____________________________________________________________________
                       @DRB         @DUV


  ࠡ⮪  ᮮ⢥⢨  .. 100-104,107   "  㤠⢥ 
  " ⠢:

  N    ਮ,   ⥭ ࠡ⮪  ᫮ -, -  㬬 ௫ (
 /       (  ⢨ )           ४-      ⢨)
             ୮                 ஢*   䠪᪨  ᪮४

&SUMMES(N,12,2)=0;                       //㬬    롮ન
&N(N,2,0)=1;                             //  浪
&T(V,2,0)=0;                             //横  栬
$
#(C,10,0)=(11,+@T);           //ॢ -  த.
#(C,2,0)=(6,+@T);                 //᫮   
#(C,4,0)=(2,+@T);               //樠 ६ 
#S@T(N,12,2)=R_Col_S(1,,26,+@T,+@T);//㬬  ⮫ 26 
#SUM(N,12,2)=R_String(S@T);
&SUMMES=SUMMES+S@T;
$ (S@T)
 @N  c 1 @    @  @ @    @     1               @SUM        
 &N=N+1;                                  //  浪
$_
&T=T+1;
$ (_LE(+T-))                         // 横
 &N=N-1;                                  //  ।   1 <

                                  :         @N               @SUMMES     
&SRED(N,12,2)=SUMMES/N;
&(N,12,0)=_Long(SRED); &(N,4,0)=(SRED-)*100;
//#(C,13,0)=();   // 㬬  ଠ 000'000'000

। ࠡ⮪  ( ⢨)  ᫥ ()
  $(_GT(SRED))
    #(C,160,0)=_(SRED);
    #(N,8,0)=_(,40);   // 頥 ᫮ ப
    &(N,8,0)=0;
    $
      #(N,40,0)=_();
      $(_EQ())                        // ᫨ ࢠ ப
⠢  @            @   @

      $
                                     @
      $_
      &=+1;
    $(_LT(-))
    #=_();
  $
                                     ................................
                                     ................................
  $_
। ᪮४஢ ࠡ⮪ ( ⢨)  ᫥ ()
⠢  ____________________________

             ਬ砭: ਮ   ________________  ______________________________________
                         ᪫祭 ()  裡  ______________________________________
                         _____________________________________________________________________

ࠢ 뤠  ᭮ 楢 

               㪮⥫ ࣠樨             @             ࠢ ()
                                                                     ⥫ ()
     ..       壠                    @           _________________________
                                                                            ()
               砫쭨 䨭. ⤥
$}(1. ଠ ࠢ. )
$LF
