软件名称：[B]向下跳空缺口[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/
软件语言：简体中文
授权方式：免费版
软件大小：3.00 KB
官方主页：Home Page
更新时间：2009-10-27 05:41:20
软件简介:

先感谢论坛上各位，一直来都是享用别人的公式，从来没自己编过。这阵子在网上找了下大智慧的缺口公式，都不是偶想要的像通达信那样的。这个缺口公式能在k线可见区域内显示一个向上跳空缺口与一个向下跳空缺口。由于以前没编过公式，许多的函数不知道怎么用，所以最后缺口显示的时候还有点问题（缺口阴影只有一天），在这里希望各位大侠帮忙完善，小弟不胜感激!!!!!!!!!!

{向下跳空缺口}
I1:=0;
flag1:=0;
while I1<BARSLAST(DISPSTATUS=1)-BARSLAST(DISPSTATUS=2)
DO  
        IF REF(H,I1)<REF(L,I1+1) AND REF(L,I1+1)>HHV(H,I1+1)
           THEN   BEGIN     FLAG1:=1;
                            S1:=I1;
                            I1:=BARSLAST(DISPSTATUS=1);                        
                  END
        ELSE  I1:=I1+1;            
   STICKLINE(FLAG1,REF(L,S1+1),HHV(H,S1+1),s1*18,0),ColorC0C0C0,ALIGN1,LAYER7;
{向上跳空缺口}
I:=0;
flag:=0;
while I<BARSLAST(DISPSTATUS=1)-BARSLAST(DISPSTATUS=2)
DO  
        IF REF(L,I)>REF(H,I+1) AND REF(H,I+1)<LLV(LOW,I+1)
           THEN   BEGIN     FLAG:=1;
                            S:=I;
                            I:=BARSLAST(DISPSTATUS=1);                        
                  END
        ELSE  I:=I+1;            
   STICKLINE(FLAG,REF(H,S+1),LLV(LOW,S+1),18*s,-0),ColorC0C0C0,ALIGN1,LAYER7;

[url=http://www.70822.com/soft/sort013/sort03/down-13931.html]向下跳空缺口[/url]