缠论分笔分段是比较高级的理论工具,其笔与段的关系,厢体理论,中杻理论,一直是较高级的理论。现转赠给有需要的朋友,内容均来自网络。附件下载解压后直接拷入dzh2的目录下面,否则公式不能正常运行。自己可以把代码加入到任何的主图指标中,或自建一个公式使用。
公式如下(注意:因网页问题,请把下面所有中括号里面的内容连同中括号[]一起删除,这不是公式的内容)(我已打了第二个包,里面含有公式文本,直接用就行了。):
kxian:="chanlun@kxian"; {初始化}
kxg:="chanlun@kxg";
kxd:="chanlun@kxd";
bi:="chanlun@bi";
duan:="chanlun@duan";
duanfx:="chanlun@duanfx";
{中枢 笔构成的中枢}
zs:="chanlun@zs";
zsgg:="chanlun@zsgg";
zsdd:="chanlun@zsdd";
zszg:="chanlun@zszg";
zszd:="chanlun@zszd";
zszz:="chanlun@zszz";
zskslast:="chanlun@zskslast";
zsjslast:="chanlun@zsjslast";
{以直线方式画中枢}
{上涨中枢}
DRAWLINE(zskslast=1 AND duanfx=1, zszg, zsjslast=1 AND duanfx=1, zszg, 0), colormagenta, linethick2;
DRAWLINE(zskslast=1 AND duanfx=1, zszd, zsjslast=1 AND duanfx=1, zszd, 0), colormagenta, linethick2;
STICKLINE(zskslast=1 AND duanfx=1, zszg, zszd, 1, -501), colormagenta, linethick2;
STICKLINE(zsjslast=1 AND duanfx=1, zszg, zszd, 1, 501), colormagenta, linethick2;
{下跌中枢}
DRAWLINE(zskslast=1 AND duanfx=-1, zszg, zsjslast=1 AND duanfx=-1, zszg, 0), colorCyan, linethick2;
DRAWLINE(zskslast=1 AND duanfx=-1, zszd, zsjslast=1 AND duanfx=-1, zszd, 0), colorCyan, linethick2;
STICKLINE(zskslast=1 AND duanfx=-1, zszg, zszd, 1, -501), colorCyan, linethick2;
STICKLINE(zsjslast=1 AND duanfx=-1, zszg, zszd, 1, 501), colorCyan, linethick2;
{中枢震荡监视器}
DRAWLINE(zskslast=1, zszz, zsjslast=1, zszz, 0), coloryellow;
{画中枢END}
zslx:="chanlun@zslx"(duan);
{走势类型中枢 段构成的中枢}
zslxzs:="chanlun@zslxzs";
zslxzsgg:="chanlun@zslxzsgg";
zslxzsdd:="chanlun@zslxzsdd";
zslxzszg:="chanlun@zslxzszg";
zslxzszd:="chanlun@zslxzszd";
zslxzszz:="chanlun@zslxzszz";
zslxzskslast:="chanlun@zslxzskslast";
zslxzsjslast:="chanlun@zslxzsjslast";
{画中枢Begin}
DRAWLINE(zslxzskslast=1, zslxzszg, zslxzsjslast=1, zslxzszg, 0), colorGreen, linethick2;
DRAWLINE(zslxzskslast=1, zslxzszd, zslxzsjslast=1, zslxzszd, 0), colorGreen, linethick2;
STICKLINE(zslxzskslast=1, zslxzszg, zslxzszd, 1, -501), colorGreen, linethick2;
STICKLINE(zslxzsjslast=1, zslxzszg, zslxzszd, 1, 501), colorGreen, linethick2;
{中枢震荡监视器}
DRAWLINE(zslxzskslast=1, zslxzszz, zslxzsjslast=1, zslxzszz, 0), colorGreen;
{画中枢End}
{高级别走势类型中枢 本级别走势构成的中枢}
zslxA:="chanlun@zslx"(zslx);
zslxzsA:="chanlun@zslxzs";
zslxzsggA:="chanlun@zslxzsgg";
zslxzsddA:="chanlun@zslxzsdd";
zslxzszgA:="chanlun@zslxzszg";
zslxzszdA:="chanlun@zslxzszd";
zslxzszzA:="chanlun@zslxzszz";
zslxzskslastA:="chanlun@zslxzskslast";
zslxzsjslastA:="chanlun@zslxzsjslast";
{画中枢Begin}
DRAWLINE(zslxzskslastA=1, zslxzszgA, zslxzsjslastA=1, zslxzszgA, 0), colorRed, linethick2;
DRAWLINE(zslxzskslastA=1, zslxzszdA, zslxzsjslastA=1, zslxzszdA, 0), colorRed, linethick2;
STICKLINE(zslxzskslastA=1, zslxzszgA, zslxzszdA, 1, -501), colorRed, linethick2;
STICKLINE(zslxzsjslastA=1, zslxzszgA, zslxzszdA, 1, 501), colorRed, linethick2;
{中枢震荡监视器}
DRAWLINE(zslxzskslastA=1, zslxzszzA, zslxzsjslastA=1, zslxzszzA, 0), colorRed;
{画中枢End}
{笔 段 走势类型}
drawline(bi=1, kxg, bi=-1, kxd, 0),colorYellow, linethick1;
drawline(bi=-1, kxd, bi=1, kxg, 0),colorYellow, linethick1;
drawline(duan=1, kxg, duan=-1, kxd, 0),colorBlue, linethick2;
drawline(duan=-1, kxd, duan=1, kxg, 0),colorBlue, linethick2;
drawline(zslx=1, kxg, zslx=-1, kxd, 0),colorRed, linethick2;
drawline(zslx=-1, kxd, zslx=1, kxg, 0),colorRed, linethick2;
drawline(zslxA=1, kxg, zslxA=-1, kxd, 0),colorMagenta, linethick2;
drawline(zslxA=-1, kxd, zslxA=1, kxg, 0),colorMagenta, linethick2;
|