通达信乾坤布林主图 源码

AA:=1;

MID:EMA(CLOSE,17)*AA,LINETHICK1,COLORFFFFFF;

UPPER:MID+2*STD(CLOSE,17),LINETHICK1,COLOR0000FF;

LOWER:MID-2*STD(CLOSE,17),LINETHICK1,COLOR00CC00;

UPPERO:MID+3*STD(CLOSE,17),LINETHICK1,COLORFF00FF;

LOWERO:MID-3*STD(CLOSE,17),LINETHICK1,COLOR00AA00;

LOCK:=IF(TIME<1160101,1,0);

VARA:=MA(CLOSE,20);

VAR1:IF(VARA>REF(VARA,2),VARA,IF(VARA<REF(VARA,2),VARA,VARA)),COLOR00FF00;

IF(VARA>REF(VARA,2),VARA,DRAWNULL),LINETHICK2,COLORFF00FF;

IF(VARA=REF(VARA,2),VARA,DRAWNULL),LINETHICK2,COLORFF0000;

IF(VARA<REF(VARA,2),VARA,DRAWNULL),LINETHICK2,COLOR00FF00;

买入:IF(VARA>REF(VARA,2) AND REF(VARA<=REF(VARA,2),1),1,0),NODRAW,COLORAAAAAA;

{DRAWICON(CROSS(LOW,LOWERO),LOWERO*0.96,'红宝石');

DRAWICON(CROSS(HIGH,UPPERO),HIGH,'绿宝石');}

TY:=CLOSE;{股票指标网}

A1:=REF(TY,10)=HHV(TY,2*10+1); B1:=FILTER(A1,10); C1:=BACKSET(B1,10+1); HD:=FILTER(C1,10);

A2:=REF(TY,10)=LLV(TY,2*10+1); B2:=FILTER(A2,10); C2:=BACKSET(B2,10+1); LD:=FILTER(C2,10);

A:=REF(CLOSE,BARSLAST(HD)); B:=REF(CLOSE,BARSLAST(LD));

T1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ;

T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);

波峰:IF(T1,A,A),COLORFF00FF,POINTDOT;

STICKLINE(T1,A,A,1.5,0),COLORFF00FF;

波谷:IF(T2,B,B),COLOR80FF00,POINTDOT;

STICKLINE(T2,B,B,1.5,0),COLOR80FF00;

原理解析：
AA赋值:1
输出

MID:收盘价的17日指数移动平均*AA,LINETHICK1,COLORFFFFFF
输出

UPPER:MID+2*收盘价的17估算标准差,LINETHICK1,COLOR0000FF
输出

LOWER:MID-2*收盘价的17估算标准差,LINETHICK1,COLOR00CC00


UPPERO:MID+3*收盘价的17估算标准差,LINETHICK1,COLORFF00FF


LOWERO:MID-3*收盘价的17估算标准差,LINETHICK1,COLOR00AA00
如果TIME<1160101返回1否则返回0


VARA赋值:收盘价的20日简单移动平均
输出

VAR1:IF(VARA>2日前的VARA,VARA,IF(VARA<2日前的VARA,VARA,VARA)),COLOR00FF00


IF(VARA>2日前的VARA,VARA,DRAWNULL), 线宽为2,COLORFF00FF


IF(VARA=2日前的VARA,VARA,DRAWNULL), 线宽为2,COLORFF0000


IF(VARA<2日前的VARA,VARA,DRAWNULL), 线宽为2,COLOR00FF00
输出

买入:IF(VARA>2日前的VARA AND 1日前的VARA<=2日前的VARA,1,0),NODRAW,COLORAAAAAA


{DRAWICON(最低价上穿最低价ERO,最低价ERO*0.96,'红宝石')


DRAWICON(最高价上穿UPPERO,最高价,'绿宝石')
}

TY赋值:收盘价
{股票指标网}

A1赋值:10日前的TY=2*10+1日内TY最高值
B1赋值:A1的10过滤
C1赋值:BACKSET(B1,10+1)
HD赋值:C1的10过滤


A2赋值:10日前的TY=2*10+1日内TY最低值
B2赋值:A2的10过滤
C2赋值:BACKSET(B2,10+1)
LD赋值:C2的10过滤


A赋值:REF(收盘价,上次HD距今天数)
B赋值:REF(收盘价,上次LD距今天数)


T1:=上次HD距今天数

T2:=上次HD距今天数>BARSLAST(LD) AND NOT(LD)
如果T1返回A否则返回A
当满足条件T1时,在A和A之间画柱状线
如果T2返回B否则返回B
当满足条件T2时,在B和B之间画柱状线