作者;壹瓣心花 转帖；真实通道［通达信版］ 多谢 壹瓣心花、金昌九 老师无私分享。

{内通道}
重心:WMA((2*C+H+L)/4,2),COLOR00FFFF,NODRAW;
UPPERS: 重心*(1+2.382/100),COLOR990099;
DRAWTEXT(ISLASTBAR,UPPERS,CON2STR(UPPERS,2)),COLOR0077FF;
LOWERS: 重心*(1-2.382/100),COLORFF0000;
DRAWTEXT(ISLASTBAR,LOWERS,CON2STR(LOWERS,2)),COLOR00FFFF;
{中通道}
VAR2:=重心*VOL;
VAR3:=(EMA(VAR2,3)/EMA(VOL,3)+EMA(VAR2,8)/EMA(VOL,8)+EMA(VAR2,13)/EMA(VOL,13)+EMA(VAR2,21)/EMA(VOL,21))/4;
UP:=VAR3*1.0809;
DN:=VAR3*0.9191;
{外通道}
VAR4:=EMA(重心,19);
LUP:=EMA(VAR4*1.119,3);
LDN:=EMA(VAR4*0.881,3);

UPK:=UP-UPPERS;
UPL1:=LUP-UP;
UPD:=LOWERS-DN;
UPL:=DN-LDN;
{7}DRAWBAND(IF(UP>UPPERS,UPPERS,UPPERS+UPK),RGB(230,0,50),UPPERS+UPK,RGB(230,0,50));
DRAWBAND(IF(UP DRAWBAND(IF(LOWERS>DN,LOWERS,LOWERS-UPD),RGB(0,230,30),LOWERS-UPD,RGB(0,230,30));
DRAWBAND(IF(DN>LDN,DN,DN-UPL),RGB(0,80,50),DN-UPL,RGB(0,80,50));
{6}DRAWBAND(IF(UP>UPPERS,UPPERS,UPPERS+UPK*0.8),RGB(220,0,180),UPPERS+UPK*0.8,RGB(220,0,180));
DRAWBAND(IF(UP DRAWBAND(IF(LOWERS>DN,LOWERS,LOWERS-UPD*0.8),RGB(0,200,55),LOWERS-UPD*0.8,RGB(0,200,55));
DRAWBAND(IF(DN>LDN,DN,DN-UPL*0.8),RGB(0,100,80),DN-UPL*0.8,RGB(0,100,80));
{5}DRAWBAND(IF(UP>UPPERS,UPPERS,UPPERS+UPK*0.6),RGB(200,0,150),UPPERS+UPK*0.6,RGB(200,0,150));
DRAWBAND(IF(UP DRAWBAND(IF(LOWERS>DN,LOWERS,LOWERS-UPD*0.6),RGB(0,150,100),LOWERS-UPD*0.6,RGB(0,150,100));
DRAWBAND(IF(DN>LDN,DN,DN-UPL*0.6),RGB(0,120,100),DN-UPL*0.6,RGB(0,120,100));
{4}DRAWBAND(IF(UP>UPPERS,UPPERS,UPPERS+UPK*0.5),RGB(180,0,100),UPPERS+UPK*0.5,RGB(180,0,100));
DRAWBAND(IF(UP DRAWBAND(IF(LOWERS>DN,LOWERS,LOWERS-UPD*0.4),RGB(0,100,100),LOWERS-UPD*0.4,RGB(0,100,100));
DRAWBAND(IF(DN>LDN,DN,DN-UPL*0.4),RGB(0,150,150),DN-UPL*0.4,RGB(0,150,150));
{3}DRAWBAND(IF(UP>UPP