【图】缺口公式

hh:=h;LL:=L;DD:=DATE;
gb:=SYSPARAM(1);
上突缺口:LOW>REF(HIGH,1),COLORRED,LINETHICK0;
下突缺口:HIGH<REF(LOW,1),COLORCYAN,LINETHICK0;
XQS:=ubound(下突缺口),LINETHICK0;
s1:=SUMBARS(上突缺口,1);
s2:=SUMBARS(上突缺口,2);
x1:=SUMBARS(下突缺口,1);
x2:=SUMBARS(下突缺口,2);
上突位置1:=gb-s1[gb]+1,LINETHICK0;
//上突位置2:=gb-s2[gb]+1,LINETHICK0;
下突位置1:=gb-x1[gb]+1,LINETHICK0;
//下突位置2:gb-x2[gb]+1,LINETHICK0;
STICKLINE(下突缺口,0,10,4,0),COLORCYAN;
STICKLINE(上突缺口,0,20,6,0),COLORRED;
0,colorgreen;
XQ1:=LL[下突位置1-1];
//XQ2:=hh[下突位置2];
XQD:=DD[下突位置1];
BXQ:=COUNT(RANGE(BARPOS,下突位置1,XQS) AND HH>XQ1,XQS-下突位置1)=1;
BXQ:=FILTER(BXQ,XQS-下突位置1);
SQ1:=HH[上突位置1-1];
SQD:=DD[上突位置1];
BSQ:=COUNT(RANGE(BARPOS,上突位置1,XQS) AND LL<SQ1,XQS-上突位置1)=1;
BSQ:=FILTER(BSQ,XQS-上突位置1);
补上缺:STICKLINE(BSQ,0,15,4,0),COLOR6699FF;
DRAWTEXT(BSQ,20,' 补'+STRRIGHT(NUMTOSTR(SQD,0),6)+'\n 上突缺口\n '+numtostr(SQ1,2)),COLORFF99FF;
补下缺:STICKLINE(BXQ,0,10,4,0),COLOR33CC99;
DRAWTEXT(BXQ,10,' 补'+STRRIGHT(NUMTOSTR(XQD,0),6)+'\n 下突缺口\n '+numtostr(XQ1,2)),COLORGREEN;股票论坛 www.55188.com