主题：求助

N:=14;
dar_factor:=4.236;
sf:=5;
variable: Rsi:=0, Rsi_Ma:=0, aTRD_rsi:=0,ma_aTRD_rsi:=0, dar:=0, DV:=0;//TRD:=0;
 
Rsia:=SMA(MAX(CLOSE-ref(c,1),0),N,1);
rsib:=SMA(ABS(CLOSE-ref(c,1)),N,1);

   if barpos>14 then            

Rsi:=rsia/rsib*100;
               
  Rsi_Ma:=WMA(Rsi,SF);
 
 
if barpos>14 then  begin
      atr_rsi := abs(rsi_ma[barpos - 1] - rsi_ma);end
   ma_atr_rsi := ema(atr_rsi, 2*n-1);
   dar := ema(ma_atr_rsi, 2*n-1)*dar_factor;
 variable:  trd := 0;
if barpos>14 then begin
      dv := trd;
      if rsi_ma < trd then begin
         trd := rsi_ma + dar;
         if rsi_ma[barpos-1] < dv and trd > dv then trd := dv;
      end else if rsi_ma > trd then begin
         trd := rsi_ma - dar;
         if rsi_ma[barpos-1] > dv and trd < dv then trd := dv;
      end;
     
end