分享

通达信黑马量柱指标公式

 dfy7880 2023-08-28 发布于广东

图片

M1:=3;

{预估成交量}

TOTAL:=IF(PERIOD=1,5,IF(PERIOD=2,15,IF(PERIOD=3,30,IF(PERIOD=4,60,IF(PERIOD=5,TOTALFZNUM,1)))));

MTIME:=MOD(FROMOPEN,TOTAL);

CTIME:=IF(MTIME<0.5,TOTAL,MTIME);

预估成交量:IF((CURRBARSCOUNT=1 AND DYNAINFO(8)>1),VOL*(TOTAL+3)/(CTIME+3),DRAWNULL),NODRAW;

STICKLINE((CURRBARSCOUNT=1 AND DYNAINFO(8)>1),预估成交量,0,-1,-1),COLOR00C0C0;

VOL,VOLSTICK;

T:=DYNAINFO(8)>0;

VO:=VOL=LLV(VOL,100) AND T;

地量柱:T AND VO,COLORBLUE;

STICKLINE(地量柱,0,V,1,0),COLORBLUE;

DRAWTEXT(地量柱,VOL+3000,'地'),COLORBLUE;

AMOV:=VOL*(OPEN+CLOSE)/2;

AMV1:SUM(AMOV,M1)/SUM(VOL,M1)COLORWHITE;

梯量柱:VOL>REF(VOL,1) AND REF(VOL,1)>REF(VOL,2) AND AMV1>REF(AMV1,1) AND C/REF(C,1)>1.01 AND CLOSE>OPEN,COLORYELLOW;

DRAWTEXT(梯量柱,VOL*0.1,'↖梯柱'),COLORYELLOW;

BLZ:=VOL>REF(V,1)*1.9;

BLZ1:=VOL<REF(LLV(VOL,13),1);

BLZ2:=VOL<REF(LLV(VOL,55),1);

倍量柱:BLZ,COLORRED;

DRAWTEXT(倍量柱,VOL*0.9,'倍'),COLORYELLOW;

二倍量:=VOL>=REF(VOL,1)*3 AND VOL<REF(VOL,1)*4;

STICKLINE(二倍量,0,VOL,0.1,0),COLORYELLOW;

DRAWTEXT(二倍量,VOL,'二倍'),COLORMAGENTA;

四倍量:=VOL>=REF(VOL,1)*4;

STICKLINE(四倍量,0,VOL,0.1,0),COLORYELLOW;

DRAWTEXT(四倍量,VOL,'四倍量以上'),COLORMAGENTA;

{量能}

QJJ:=V/((H-L)*2-ABS(C-O));

HSL:=IF(C!=O,QJJ*(C-O),0)/100;

LNGJ:=HSL*0.5+REF(HSL,1)*0.3+REF(HSL,2)*0.2;

LLJX:=EMA(LNGJ,3);

B:=0,POINTDOT,COLORWHITE;

B1:=SUM(LLJX,1),COLORCYAN;

B2:=SUM(LLJX,2),COLORCYAN;

B3:=SUM(LLJX,3),COLORCYAN;

B4:=SUM(LLJX,4),COLORCYAN;

B5:=SUM(LLJX,5),COLORCYAN;

B6:=SUM(LLJX,6),COLORCYAN;

B7:=SUM(LLJX,7),COLORCYAN;

B8:=SUM(LLJX,8),COLORCYAN;

B9:=SUM(LLJX,9),COLORCYAN;

B10:=SUM(LLJX,10),COLORCYAN;

RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;

K:=SMA(RSV,3,1);

D:=SMA(K,3,1);

J:=3*K-2*D;

XG0:=B1 AND B2 AND B3 AND B4 AND B5 AND B6 AND B7 AND B8 AND B9 AND B10;

XG1:=COUNT(CROSS(MA(C,5),MA(C,20)),3)=1;

XG2:=C>PEAK(1,5,1) AND REF(C,1)<PEAK(1,5,1);

XG3:=V>REF(V,1)*1.9 AND C>O AND J<90 AND K<80;

XG4:=COUNT(V>REF(V,1)*1.9 AND C>REF(C,1)*1.04,3)=1 AND C<REF(C,1)*0.96 AND V<REF(V,1)*0.6;

XG:=(XG0 OR XG1 OR XG2) AND XG3;

HH:=HHV(B10,120);

DRAWTEXT(XG AND XG0,VOL*1.15,'量'),COLORRED;

STICKLINE(XG AND XG0,0,V*2.5/3,2,0)COLORRED;

量缩涨:COUNT(CLOSE>REF(CLOSE,1),2)=2 AND COUNT(VOL<REF(VOL,1),2)=2,COLORGREEN;

STICKLINE(量缩涨,0,V,1,0),COLORGREEN;

{DRAWTEXT(量缩涨,VOL*1.05,'量缩涨'),COLORGREEN; }

HJZ:=(3*C+H+L+O)/6;

HJZ2:=(8*HJZ+7*REF(HJZ,1)+6*REF(HJZ,2)+5*REF(HJZ,3)+4*REF(HJZ,4)+3*REF(HJZ,5)+2*REF(HJZ,6)+REF(HJZ,8))/36;

HJZ3:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>HJZ2 AND C>O;

黑马黄金柱:FILTER(HJZ3,5),COLORYELLOW,NODRAW;

{DRAWTEXT(黑马黄金柱,V*1.25,'◆黄'),COLORYELLOW;}

STICKLINE(黑马黄金柱,0,V,3.3,1),COLORRED;

STICKLINE(黑马黄金柱,0,V*2.5/3,2,0)COLORRED;

STICKLINE(倍量柱,0,VOL,0.1,0),COLORYELLOW;

{DRAWLINE(V<= LLV(V,20),VOL,VOL>=HHV(V,20) ,HHV(V,3),0),,COLORRED,LINETHICK2;

DRAWLINE(V>=HHV(V,20),V,V<=LLV(V,3),HHV(V,3),0),COLORCYAN,LINETHICK2;};

    本站是提供个人知识管理的网络存储空间,所有内容均由用户发布,不代表本站观点。请注意甄别内容中的联系方式、诱导购买等信息,谨防诈骗。如发现有害或侵权内容,请点击一键举报。
    转藏 分享 献花(0

    0条评论

    发表

    请遵守用户 评论公约