飞狐当前画面自动画出最后一个未封闭缺口 源码 主图

有许多的缺口公式，但细看后，没有飞狐显示的当前画面的最后一个未封闭缺口指标。也有许多朋友求助这个，就发在这里，使用时请打开光标

tk1:=l>refx(h,1) or barpos=0;
 tk2:=h<refx(l,1) or barpos=0;
 s2:=sysparam(2);s3:=sysparam(3);
 ll:=l; ml:=LL[s3];hh:=h;mh:=hh[s3];
 for i=s3 downto s2 do begin
    if tk1[i]=1 and ll[i]>mh then break;
    if hh[i]>mh then mh:=hh[i];
 else begin
    if tk2[i]=1 and hh[i]<ml then break;
    if ll[i]<ml then ml:=ll[i];
   end;
 end;{原文链接由股海网（WWW.Guhai.com.cn）提供}
 sp:=-1 linethick;
 if i>0 then sp:=s3-i;
 
DRAWLINE(barpos=s3-sp and tk1=1,l,barpos=s3,ref(l,sp),0) pxdn1;
 DRAWLINE(barpos=s3-sp and tk2=1,h,barpos=s3,ref(h,sp),0) pxdn1;