主题：求助

没有k线位置是0的k线

那便不必理那句, 骨骼已全,应该能修改到的

又可能是FOR var=n1 TO n2 DO expr;for  i=1 to  datacount  do 的第一棍之类吧

per的值是多少

SF:=5;                       
RSI_Period:=14;      
rat:=4.236;
Wilders_Period:=RSI_Period * 2 - 1;
//
//若k线位置是0, [i}初始化以下全為0,初始化如下
if barpos=1 then  begin
 TrLevelSlow:=0;
 AtrRsi:=0;
 MaAtrRsi:=0;
 Rsi:=0;
 RsiMa:=0;
 dar:=0;
 smin:=0;
 p:=0;
end
       

      
       
       
        if barpos>RSI_Period then begin//若現k线大於rsi_period即14,即大於第14棍
                    

                 Rsi:=sma(MAX(CLOSE-REF(C,1),0),RSI_Period,1)/sma(ABS(CLOSE-REF(C,1)),RSI_Period,1)*100;
                RsiMa:=ema(Rsi,SF);
                AtrRsi:=Abs(ref(RsiMa,1) - RsiMa);//RsiMa[1]是rsima前值,RsiMa是现值
                MaAtrRsi:=ema(AtrRsi,Wilders_Period);
                dar:=ema(MaAtrRsi,Wilders_Period) * rat;       
                sma1x:=RsiMa+dar;
                smin:=RsiMa-dar;

        end     

               if (RsiMa>ref(sma1x,1)) then p:=1;        
                if (RsiMa<ref(smin,1))  then p:=-1;

                if (p>0)  then begin//若p>0, 做以下if句或if else句
         
                 if (smin<ref(smin,1)) then begin
                  smin:=ref(smin,1);
                  TrLevelSlow:=smin;
                 end
                 if (TrLevelSlow<ref(TrLevelSlow,1)) then TrLevelSlow:=ref(TrLevelSlow,1);//上一句成立便如此赋值
         
       end
      
       if barpos<=RSI_PERIOD then begin
         
                if (sma1x>ref(sma1x,1)) then begin//sma1x是现值,sma1x[i]是其前值
                        sma1x:=ref(sma1x,1);////上一句成立便如此赋值
                        TrLevelSlow:=sma1x; //上兩句成立便如此赋值
                end
                if (TrLevelSlow>ref(TrLevelSlow,1)) then //TrLevelSlow是现值,TrLevelSlow[i]是其前值
                        TrLevelSlow:=ref(TrLevelSlow,1);//上一句成立便如此赋值
         
             
   end
rr:rsima;
tt:TRLEVELSLOW;

trlevelslow是求不出的，

求这个需要算sma1x，但是sma1x是在14根k线后计算的，而trlevlslow是在14根k线之前赋值的，所以永远求不到

我个人愚見觉得用序列変量去條件句好似徒勞無功的,

也是不行的，原因同上，k线上是未来的值去算过去的值

你意思是说源码是未來函数式的原码吗