缠论指标 可以画中枢 同级别分解 源码

缠论指标 可以画中枢 同级别分解 源码

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, 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);
买１:=VAR10;
买２:=(VAR11+VAR13+VAR15+VAR17);
卖１:=(VAR12+VAR14+VAR16+VAR18);
 DRAWTEXT(买１>0 OR 买２>0,L*0.985,'买'),COLOR00ffff;
 DRAWTEXT(卖１>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 库存能