一個開拓者tb模型的自適應均線的寫法，求改成金字塔的　[金字塔]

Params
 NumericSeries Price(1);
 Numeric EffRatioLength(10);
 Numeric FastAvgLength(2);
 Numeric SlowAvgLength(30);
Vars
 Numeric NetChg(0);
 Numeric TotChg(0);
 Numeric EffRatio(0);
 Numeric ScaledSFSqr(0);
 NumericSeries AMAValue; 
 Numeric SFDiff;
Begin
 if(CurrentBar == 0)
 {
  AMAValue = Price;
 }Else
 {
  NetChg = Abs( Price - Price[EffRatioLength] );
  TotChg = Summation( Abs( Price - Price[1] ), EffRatioLength );  
  EffRatio = IIF(TotChg > 0, NetChg / TotChg, 0);
  SFDiff = 2 / ( FastAvgLength + 1 ) - 2 / ( SlowAvgLength + 1 );  
  ScaledSFSqr = Sqr( 2 / ( SlowAvgLength + 1 ) + EffRatio * SFDiff );  
  AMAValue = AMAValue[1] + ScaledSFSqr * ( Price - AMAValue[1] );
 }
 Return AMAValue;
End

 請大蝦幫忙改下。。。。

直接貼這樣的代碼，要有人同時精通TB和金字塔，才能幫你改

你還是把每句話都給注釋一下