通达信趋势彩丝带主图 开源分享

X2:=EMA(((SLOPE(C,22)*20)+C),55);

压力:=MA(REF(HHV(C,30),1),2);

支撑:=MA(REF(LLV(C,30),1),2);

DRAWBAND(压力,RGB(171,130,255),X2,RGB(171,130,255));

DRAWBAND(X2,RGB(137,104,205),支撑,RGB(137,104,205));

K:=BARSLAST(CURRBARSCOUNT=120);

GD:=CONST(IF(ISLASTBAR=1,HHV(H,K),0));

DD:=CONST(IF(ISLASTBAR=1,LLV(L,K),0));

STICKLINE(CURRBARSCOUNT=1,GD,DD,0,-1),COLORGREEN;

 

{彩色K线}

TYX3:=MA(REF(HHV((C+L+O+H)/4,30),1),3);

TYX4:=MA((C+L+O+H)/4,13);

TYX5:=EMA((C+L+O+H)/4,21);

 

{空心红}

STICKLINE(C<TYX5 AND C>O,H,L,0,0),COLORRED;

STICKLINE(C<TYX5 AND C>O,C,O,5,1),COLORRED;

 

{深绿}

STICKLINE(C<TYX5 AND C<O,H,L,0,0),COLOR007700;

STICKLINE(C<TYX5 AND C<O,C,O,5,0),COLOR005500;

STICKLINE(C<TYX5 AND C<O,C,O,5,0),COLOR006600;

 

{蓝}

STICKLINE(C>TYX5 AND C<O,H,L,0,0),COLORFFDD44;

STICKLINE(C>TYX5 AND C<O,C,O,5,0 ),COLORFF7700;

STICKLINE(C>TYX5 AND C<O,C,O,5,0 ),COLORFFAA22;

 

{黄}

STICKLINE(C>TYX5 AND C>O,H,L,0,0 ),COLOR00EEFF;

STICKLINE(C>TYX5 AND C>O,C,O,5,0 ),COLOR00AAFF;

STICKLINE(C>TYX5 AND C>O,C,O,5,0 ),COLOR00CCFF;

 

{粉红}

STICKLINE(C>TYX4 AND C>O,H,L,0,0),COLORFF66AA;

STICKLINE(C>TYX4 AND C>O,C,O,5,0 ),COLORFF11FF;

STICKLINE(C>TYX4 AND C>O,C,O,5,0 ),COLORFF44FF;

 

{亮灰}

STICKLINE(C>TYX4 AND C<O,H,L,0,0),COLOR999999;

STICKLINE(C>TYX4 AND C<O,C,O,5,0),COLOR555555;

STICKLINE(C>TYX4 AND C<O,C,O,5,0),COLOR777777;

 

{深红}

STICKLINE(C>TYX3 AND C>O,H,L,0,0),COLOR0000DD;

STICKLINE(C>TYX3 AND C>O,C,O,5,0),COLOR000099;

STICKLINE(C>TYX3 AND C>O,C,O,5,0),COLOR0000BB;

STICKLINE(C/REF(C,1)>1.095,C,O,3.5,0),COLORYELLOW;

∑:=DMA(CLOSE,IF((CLOSE < 100),(VOL / CAPITAL),(VOL / SUM(VOL,240))));

DRAWICON(ISLASTBAR,∑,20);

DRAWICON(ISLASTBAR,(∑ * 1.1),38);

DRAWICON(ISLASTBAR,(∑ * 1.21),22);

DRAWICON(ISLASTBAR,(∑ * 0.91),39);

DRAWICON(ISLASTBAR,(∑ * 0.826),21);

DI:=EMA(C,12)-EMA(C,13);

DE:=EMA(DI,3);

TJ:=VOL>=REF(V,1)*1.91 AND C>REF(C,1)*1.01;

DRAWICON(TJ,LOW*0.986,11);

短线BBI:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4,COLORGREEN,LINETHICK2;

长线EBBI:=(EMA(C,6)+EMA(C,18)+EMA(C,54)+EMA(C,162))/4,COLOR0000FF,LINETHICK2;

STICKLINE(CROSS(短线BBI,长线EBBI),L,L-0.09,4,0),COLORYELLOW;

DRAWTEXT(CROSS(短线BBI,长线EBBI),L-0.13,'走牛') ,COLORWHITE;

VARA8:=REF(CLOSE,1);

VARE:=SMA(MAX(CLOSE-VARA8,0),6,1)/SMA(ABS(CLOSE-VARA8),6,1)*100;

DRAWTEXT(DATE>700101 AND CROSS(84,VARE),HIGH,'☆卖出提示'),COLORGREEN;

临界线:= (13*C+12*REF(C,1)+11*REF(C,2)+10*REF(C,3)+9*REF(C,4)+8*REF(C,5)+

7*REF(C,6)+ 6*REF(C,7)+5*REF(C,8)+4*REF(C,9)+3*REF(C,10)+2*REF(C,11)+

1*REF(C,12))/(13+12+11+10+9+8+7+6+5+4+3+2+1),COLORWHITE;

临界:=MA(临界线,6),COLORLIMAGENTA;

DRAWICON(CROSS(临界线,临界),L,34);

DRAWICON(CROSS(临界,临界线),H,35);

持仓:IF(CLOSE>=SAR(4,2,20),SAR(4,2,20),

DRAWNULL),CIRCLEDOT,COLORRED,{COLOR9955FF};

空仓:IF(CLOSE<=SAR(4,2,20),SAR(4,2,20),

DRAWNULL),CIRCLEDOT,COLORGREEN,{COLORDDFF00};

 

原理解析：
X2赋值:EMA(((SLOPE(C,22)*20)+C),55)
压力赋值:MA(REF(30日内C最高值,1),2)
支撑赋值:MA(REF(30日内C最低值,1),2)
DRAWBAND(压力,RGB(171,130,255),X2,RGB(171,130,255))
DRAWBAND(X2,RGB(137,104,205),支撑,RGB(137,104,205))
K赋值:上次 到最后交易的周期=120距今天数
GD赋值:CONST(IF(ISLASTBAR=1,K日内H最高值,0))
DD赋值:CONST(IF(ISLASTBAR=1,K日内L最低值,0))
当满足条件 到最后交易的周期=1时,在GD和DD之间画柱状线
 
{彩色K线}
TYX3:=MA(REF(HHV((C+L+O+H)/4,30),1),3)
TYX4赋值:MA((C+L+O+H)/4,13)
TYX5赋值:EMA((C+L+O+H)/4,21)
当满足条件CO时,在H和L之间画柱状线
当满足条件CO时,在C和O之间画柱状线
当满足条件C当满足条件C当满足条件C当满足条件C>TYX5 AND C当满足条件C>TYX5 AND C当满足条件C>TYX5 AND C当满足条件C>TYX5 AND C>O时,在H和L之间画柱状线
当满足条件C>TYX5 AND C>O时,在C和O之间画柱状线
当满足条件C>TYX5 AND C>O时,在C和O之间画柱状线
当满足条件C>TYX4 AND C>O时,在H和L之间画柱状线
当满足条件C>TYX4 AND C>O时,在C和O之间画柱状线
当满足条件C>TYX4 AND C>O时,在C和O之间画柱状线
当满足条件C>TYX4 AND C当满足条件C>TYX4 AND C当满足条件C>TYX4 AND C当满足条件C>TYX3 AND C>O时,在H和L之间画柱状线
当满足条件C>TYX3 AND C>O时,在C和O之间画柱状线
当满足条件C>TYX3 AND C>O时,在C和O之间画柱状线
STICKLINE(C/1日前的C>1.095,C,O,3.5,0),画黄色
∑赋值:DMA(收盘价,IF((收盘价 < 100),(成交量 / 当前流通股本),(成交量 / 240的成交量日累和)))
当满足条件ISLASTBAR时,在∑和20之间画图标
DRAWICON(ISLASTBAR,(∑ * 1.1),38)
DRAWICON(ISLASTBAR,(∑ * 1.21),22)
DRAWICON(ISLASTBAR,(∑ * 0.91),39)
DRAWICON(ISLASTBAR,(∑ * 0.826),21)
DI赋值:C的12日指数移动平均-C的13日指数移动平均
DE赋值:DI的3日指数移动平均
TJ赋值:成交量>=1日前的V*1.91 AND C>1日前的C*1.01
当满足条件TJ时,在最低价*0.986和11之间画图标
短线BBI赋值:(收盘价的3日简单移动平均+收盘价的6日简单移动平均+收盘价的12日简单移动平均+收盘价的24日简单移动平均)/4,画绿色,LINETHICK2
长线EBBI赋值:(C的6日指数移动平均+C的18日指数移动平均+C的54日指数移动平均+C的162日指数移动平均)/4,COLOR0000FF,LINETHICK2
STICKLINE(短线BBI上穿长线EBBI,L,L-0.09,4,0),画黄色
DRAWTEXT(短线BBI上穿长线EBBI,L-0.13,'走牛') ,画白色
VARA8赋值:1日前的收盘价
VARE赋值:SMA(收盘价-VARA8和0较大值,6,1)/SMA(收盘价-VARA8的绝对值,6,1)*100
DRAWTEXT(DATE>700101 AND 84上穿VARE,最高价,'☆卖出提示'),画绿色
临界线赋值: (13*C+12*1日前的C+11*2日前的C+10*3日前的C+9*4日前的C+8*5日前的C+
7*6日前的C+ 6*7日前的C+5*8日前的C+4*9日前的C+3*10日前的C+2*11日前的C+
1*12日前的C)/(13+12+11+10+9+8+7+6+5+4+3+2+1),画白色
临界赋值:临界线的6日简单移动平均,COLORLIMAGENTA
DRAWICON(临界线上穿临界,L,34)
DRAWICON(临界上穿临界线,H,35)
输出持仓:IF(收盘价>=SAR(4,2,20),SAR(4,2,20),
DRAWNULL),CIRCLEDOT,画红色,{COLOR9955FF}
输出空仓:IF(收盘价<=SAR(4,2,20),SAR(4,2,20), DRAWNULL),CIRCLEDOT,画绿色,{COLORDDFF00}