通达信BOLL缠论主图

BOLL:MA(CLOSE,20);

UB:BOLL+2*STD(CLOSE,20);

LB:BOLL-2*STD(CLOSE,20);

{缠论}

TIM:=TDXDLL3(100,PERIOD,H,L);    {初始化周期};

KX:=TDXDLL3(1,H,L,C);      {解决包含K线的问题};

VALID:=TDXDLL3(15,H,L,C);

BI:=TDXDLL3(4,H,L,C);     {BI类型}

KXG:=TDXDLL3(2,H,L,C); {高点}

KXD:=TDXDLL3(3,H,L,C); {低点}

BILAST:=TDXDLL3(6,H,L,C);{上一笔的距离}

{画笔}

DRAWLINE(BI=1, KXG, BI=-1, KXD,0),COLORYELLOW;

DRAWLINE(BI=-1, KXD, BI=1, KXG,0),COLORYELLOW;

BILIST:=TDXDLL3(5,H,L,C);{BILIST}

DUANLAST:=TDXDLL3(7,H,L,C);{上一段的距离}

ZS:=TDXDLL3(8,H,L,C);{中枢处理}

ZSZG:=TDXDLL3(9,H,L,C);{得到中枢ZG}

ZSZD:=TDXDLL3(10,H,L,C);{得到中枢ZD}

ZSKS:=TDXDLL3(11,H,L,C);{得到中枢开始}

ZSJS:=TDXDLL3(12,H,L,C);{得到中枢结束}

BIFX:=-REF(BI,BILAST);

{下跌笔中枢}

DRAWLINE(ZSKS=1,ZSZG,ZSJS=1,ZSZG,0),COLOR1D7300,LINETHICK2;

DRAWLINE(ZSKS=1,ZSZD,ZSJS=1,ZSZD,0),COLOR1D7300,LINETHICK2;

DRAWLINE(ZSKS=1,(ZSZG+ZSZD)/2,ZSJS=1,(ZSZG+ZSZD)/2,0),COLOR1D7300,DOTLINE;

STICKLINE(ZSKS=1,ZSZG,ZSZD,0.1,0),COLOR1D7300;

STICKLINE(ZSJS=1,ZSZG,ZSZD,0.1,0),COLOR1D7300;

{上涨笔中枢}

DRAWLINE(ZSKS=2,ZSZG, ZSJS=2,ZSZG,0),COLORRED,LINETHICK2;

DRAWLINE(ZSKS=2,ZSZD, ZSJS=2,ZSZD,0),COLORRED,LINETHICK2;

DRAWLINE(ZSKS=2,(ZSZG+ZSZD)/2,ZSJS=2,(ZSZG+ZSZD)/2,0),COLORRED,DOTLINE;

STICKLINE(ZSKS=2,ZSZG,ZSZD,0.1,0),COLORRED;

STICKLINE(ZSJS=2,ZSZG,ZSZD,0.1,0),COLORRED;

{涨停板}

TB:=(C-REF(C,1))/REF(C,1)*100;

STICKLINE(TB>9.9,O,C,2.5,1)COLORMAGENTA;

STICKLINE(TB<-9.9,O,C,2.5,0)COLOR1D7300;