TBQ自带指标改成模型谢谢

si摆动指标如下

Vars
   Numeric K( 0 );
   Numeric R( 0 );
   Numeric H0C1( 0 );
   Numeric L0C1( 0 );
   Numeric H0L0( 0 );
   Numeric C1O1( 0 ) ;
   Numeric SIValue;
Events
   OnBar(ArrayRef<Integer> indexs)
   {
       Range[0:DataSourceSize() - 1]
       {
           H0C1 = Abs( High - Close[1] ) ;
           L0C1 = Abs( Low - Close[1] ) ;
           H0L0 = High - Low ;
           C1O1 = Abs( Close[1] - Open[1] ) ;

           If (H0C1 >= L0C1)
           {
               K = H0C1 ;
               If(H0C1 >= H0L0)
               {
                   R = H0C1 - 0.5 * L0C1 + 0.25 * C1O1;
               }Else
               {
                   R = H0L0 + 0.25 * C1O1 ;
               }
           }Else
           {
               K = L0C1;
               If (L0C1 >= H0L0)
               {
                   R = L0C1 - 0.5 * H0C1 + 0.25 * C1O1;
               }Else
               {
                   R = H0L0 + 0.25 * C1O1 ;
               }
           }
           If(R <> 0 )
           {
               SIValue = 50 * ( ( ( Close - Close[1] ) + 0.50 * ( Close - Open ) + 0.25* ( Close[1] - Open[1] ) ) / R ) * K / 1000;
           }Else
           {
               SIValue = 0 ;
           }
           PlotNumeric("SI",SIValue);
           PlotNumeric("零线",0);
       }
   }