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

kx:="chanlun@kxian";

kxg:="chanlun@kxg";

kxd:="chanlun@kxd";

kxfx:="chanlun@kxfx";

bilast:="chanlun@bilast";{笔周期};

duanlast:="chanlun@duanlast"; {段周期};

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;

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

（共10页）