自编缠论画中枢和级别的主图指标通达信指标公式源码 下载本文

内容发布更新时间 : 2024/5/5 23:56:59星期一 下面是文章的全部内容请认真阅读。

自编缠论画中枢和级别的主图指标! kx:=\kxg:=\kxd:=\kxfx:=\笔:=\

笔周期:\bilast:=\笔周期}; 段:=\

段周期:\duanlast:=\段周期}; 中枢:=\zszg:=\zszd:=\zsgg:=\zsdd:=\zszz:=\zsks:=\zsjs:=\bifx:=-REF(笔,bilast);

duanfx:=-REF(段,duanlast); kxqj:=\

{画中枢Begin} {以背景方式画}

STICKLINE(zszg>zszd AND duanfx=1, zszg, zszd, 10, 1),Color8E236B; STICKLINE(zszg>zszd AND duanfx=-1, zszg, zszd, 10, 1), Color007700; {中枢震荡监视器}

DRAWLINE(zsks=1, zszz, zsjs=1, zszz, 0), colorFFFFFF; {画中枢END} {顶底分型}

STICKLINE(kx>0, kxg, kxd, 5, 1),Color007700,linethick2; STICKLINE(kx<0, kxg, kxd, 5, 1),Color00ffff,linethick2; {笔段}

STICKLINE(笔=1, kxg, kxd, 5, 1), colorgreen, linethick2; STICKLINE(笔=-1, kxg, kxd, 5, 1), colorred, linethick2; STICKLINE(段=1, kxg, kxd, 5, 0), color007700, linethick2; STICKLINE(段=-1, kxg, kxd, 5, 0), color0000cc, linethick2; {画K线END} {画笔段}

drawline(笔=1,h,笔=-1,l,0),colorBLUE,linethick2; drawline(笔=-1,l,笔=1,h,0),ColorFF00FF ,linethick2; drawline(段=1,h,段=-1,l,0),color007700, linethick2; drawline(段=-1,l,段=1,h,0),colorRED, linethick2;

{笔高低点 周期 力度 提示}

DRAWTEXT(笔= 1, h*1.038, ''+h+''), colorffffff, align1, valign1; DRAWTEXT(笔=-1, L*0.96, ''+l+''), colorFFffFF, align1, valign1; VAR3:=LLV(H,240);

VAR4:=100*(C-VAR3)/VAR3;

VAR5:=(C-LLV(L,528))/(HHV(H,528)-LLV(L,528))*100; VAR6:=(C-LLV(C,530))/(HHV(C,530)-LLV(C,530))*100; VAR7:=0;

VAR8:=SMA(MAX(CLOSE-REF(CLOSE,1),0),34,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),7,1)*100;

VAR9:=SMA(MAX(CLOSE-REF(CLOSE,1),0),13,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),13,1)*100;

VAR10:=IF(TROUGHBARS(3,16,1)=0 AND H>L+0.04,4,0);

VAR11:=ZIG(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3);

VAR12:=ZIG(3,6)=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3); VAR13:=ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3); VAR14:=ZIG(3,22)=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3); VAR15:=ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3); VAR16:=ZIG(3,51)=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3); VAR17:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3); VAR18:=ZIG(3,72)=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3); VAR19:=EMA(C,2)-EMA(C,150); 买1:=VAR10;

买2:=(VAR11+VAR13+VAR15+VAR17); 卖1:=(VAR12+VAR14+VAR16+VAR18);

DRAWTEXT(买1>0 OR 买2>0,L*0.985,'买'),COLOR00ffff; DRAWTEXT(卖1>0,H*1.01,'卖'),COLOR00ffff; APP:=(VOL)/((H-L)*(2)-ABS(C-O));

ZL:=IF((H>O),(APP)*(H-L),IF((L

SF:=IF((H>O),0-(APP)*(H-C+O-L),IF((L

库存平均:=MA(ZL+SF,5);

GET:ZIG(3,5),COLORYELLOW,LINETHICK3; PL5:=ZIG(3,5);

EN1:=PL5>REF(PL5,1) AND REF(PL5,1)<=REF(PL5,2) AND REF(PL5,2)<=REF(PL5,3);

EX1:=PL5=REF(PL5,2) AND REF(PL5,2)>=REF(PL5,3); PL10:=ZIG(3,10);

EN2:=PL10>REF(PL10,1) AND REF(PL10,1)<=REF(PL10,2) AND REF(PL10,2)<=REF(PL10,3);

EX2:=PL10=REF(PL10,2) AND REF(PL10,2)>=REF(PL10,3); PL20:=ZIG(3,20);

EN3:=PL20>REF(PL20,1) AND REF(PL20,1)<=REF(PL20,2) AND REF(PL20,2)<=REF(PL20,3);

EX3:=PL20=REF(PL20,2) AND REF(PL20,2)>=REF(PL20,3);

走强1:=BARSLAST(PL5REF(PL5,1)); 走强2:=BARSLAST(PL10REF(PL10,1)); 走强3:=BARSLAST(PL20REF(PL20,1));

ZTJZ5:=IF(PL10>REF(PL10,1),COUNT(EN1,走强2),0); ZTJD5:=IF(PL10>REF(PL10,1),COUNT(EX1,走强2),0); DTJZ5:=IF(PL10REF(PL20,1),COUNT(EN2,走强3),0); ZTJD10:=IF(PL20>REF(PL20,1),COUNT(EX2,走强3),0); DTJZ10:=IF(PL20

DRAWTEXT(EN2 AND DTJZ10=1,L*0.96,'[类二买]'),COLORFFffFF; DRAWTEXT(EN3 AND ZTJZ10=1,L*0.95,'[一买]'),COLORFF00ff;

DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=1,H*1.04,'[二卖]'),LINETHICK2,COLORFFff00;

DRAWTEXT(EN2 AND PL20>REF(PL20,1) AND ZTJZ10=2,L*0.94,'[二买]'),LINETHICK2,COLORFFFF00;

DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=2 OR (ZTJD10=0 OR ZTJD10=2) AND EX2,H*1.03,'[一卖]'),LINETHICK3,COLOR00FF00;

DRAWTEXTABS(620,-55,'历史最高价:'+HHV(HIGH,0)),Colorff00ff,LAYER0; DRAWTEXTABS(620,-37,'历史最低价:'+LLV(LOW,0)),ColorAFFF00,LAYER0; DRAWTEXTABS(750,-55,'20日最高价:'+HHV(HIGH,20)),Colorred,LAYER0; DRAWTEXTABS(750,-37,'20日最低价:'+LLV(LOW,20)),ColorAFFF00,LAYER0;