缠论中枢的提示指标。
只是里边有网格的绿线不知道怎么去除,希望哪位老师能帮忙解决一下。
上次没有发成功,这次再试试
KX:= CHANLUN@KXIAN
KXG:= CHANLUN@KXG
KXD:= CHANLUN@KXD
KXFX:= CHANLUN@KXFX
笔:= CHANLUN@BI
笔周期: CHANLUN@BILAST ,LINETHICK0, COLORFF00FF;
BILAST:= CHANLUN@BILAST {笔周期};
段:= CHANLUN@DUAN
段周期: CHANLUN@DUANLAST , LINETHICK0, COLORFFFFFF;
DUANLAST:= CHANLUN@DUANLAST {段周期};
中枢:= CHANLUN@ZS
ZSZG:= CHANLUN@ZSZG
ZSZD:= CHANLUN@ZSZD
ZSGG:= CHANLUN@ZSGG
ZSDD:= CHANLUN@ZSDD
ZSZZ:= CHANLUN@ZSZZ
ZSKS:= CHANLUN@ZSKSLAST
ZSJS:= CHANLUN@ZSJSLAST
BIFX:=-REF(笔,BILAST);
DUANFX:=-REF(段,DUANLAST);
KXQJ:= CHANLUN@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;
DRAWTEXT(笔=-1, L*0.96, +L+ ), COLORFFFFFF;
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),1) AND REF(ZIG(3,6),1) =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),1) AND REF(ZIG(3,22),1) =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),1) AND REF(ZIG(3,51),1) =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),1) AND REF(ZIG(3,72),1) =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 O),(APP)*(H-O+C-L),(VOL)/(2)));
SF:=IF((H O),0-(APP)*(H-C+O-L),IF((L O),0-(APP)*(H-L),0-(VOL)/(2)));
库存能量:=MA(ZL+SF,2);
库存平均:=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,1) AND REF(PL5,1) =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,1) AND REF(PL10,1) =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,1) AND REF(PL20,1) =REF(PL20,2) AND REF(PL20,2) =REF(PL20,3);
[1]