主题：莫名其妙的金字塔

  if barpos=1 then
   begin
     xiangbao:=0;
     mark:=0;
    end

   Bi:0;
   Shi:=BARPOS;
     if(Shi>3 and mark=0) then
        begin
           j:=0;
           x:=HHVbars(high,Shi);
           y:=llvbars(low,Shi);
           if(x-y>=4 and high[Shi-y]<low[Shi-x]) then
             begin
               Bi[Shi-x]:=high[Shi-x];     
             end

        end

  dd:Bi,CIRCLEDOT;

想编个公式，才起个头，结果出现莫名其妙的错误：          

     if(x-y>=4 and high[Shi-y]<low[Shi-x]) then
  这一句完全不起作用，无论x-y>=4 还是x-y<=4，显示的完全一样，让人哭笑不得。