缺口提示.algINPUT:p1(5,1,100), p2(26,1,100),p3(55,1,100);
M1:MA(CLOSE,P1);
M2:MA(CLOSE,P2);
M3:MA(CLOSE,P3);
if datacount<3 then exit;
dw:=IF(STKTYPE=0 or STKTYPE=13,c*1/500,MINDIFF);
上突缺口:=l>REF(c,1)+dw,COLORRED,LINETHICK0;
下突缺口:=h<REF(c,1)-dw,COLORCYAN,LINETHICK0;
DRAWICON(上突缺口 and SYSPARAM(3)-SYSPARAM(2)<300,l,4);
DRAWICON(下突缺口 and SYSPARAM(3)-SYSPARAM(2)<300,h,5);
HH:=H;
LL:=L;
pL:=LL[datacount]; pH:=0;
tk:=if(上突缺口,1,if(下突缺口,-1,0));
for i=datacount-1 downto 2 do begin
if LL[i]<pL then pL:=LL[i];
if HH[i]>pH then pH:=HH[i];
if tk[i]=1 and pL<=HH[i-1] then tk[i]:=0;
if tk[i]=-1 and pH>=LL[i-1] then tk[i]:=0;
end;DRAWTEXT(tk=1,REF(c,1),'未补')COLORRED;
DRAWTEXT(tk=-1,REF(c,1),'未补')COLORCYAN;
DRAWSL(tk=1,REF(c,1),0,0,0)COLORRED;
DRAWSL(tk=-1,REF(c,1),0,0,0)COLORCYAN;
向上跳空未回补:count(tk=1,0),linethick0;
向下跳空未回补:count(tk=-1,0),linethick0{点击看本软件截图： 58股票 公式网 http://www. 58gu. com 整理} |
