红尘彩带买绿彩带卖，结合macd和kdj确定买卖。因为大单资金流入股价不一定涨

IF(PERIODNAME<>"日线")

{

统计:"该指标只在日线周期下有效。";

RETURN;

}

r1:=ZDMR[-1];

r2:=BDMR[-1];

r3:=-ZDMC[-1];

r4:=-BDMC[-1];

x1:=(ZDMR+BDMR);

y1:=-(ZDMC+BDMC);

STICKLINE(x1+y1>=0,5*(x1+y1),0,8,0),colorred;

STICKLINE(x1+y1<0,5*(x1+y1),0,8,0),colorgreen;

a1=MA(x1,3);

b1=MA(y1,3);

DDX:=2*(a1+b1);

DDX1:EMA(DDX,60)*60,COLOR00FFFF;

DDX2:MA(DDX1,5),COLORFF00FF;

DDX3:MA(DDX2,10),COLOR00FF00;

FILLRGN(DDX1,DDX2,DDX1>DDX2,RGB(255,0,0),DDX1<DDX2,colorgreen);

IF(ISNULL(r1))

{

统计:"本指标由同花顺金融研究中心提供，每晚11点后提供当天的数据，WWW.88GS.COM。";

RETURN;

}

a=(ZDMR[-1]+BDMR[-1]);

b=(ZDMC[-1]+BDMC[-1]);

a3=SUM(a,1)/1000000;

b3=SUM(b,1)/1000000;

VOL1=SUM(VOL,1)/1000000;

IF(a3>b3)

{

y=a3-b3;

z=y/VOL1*100;

统计:TOSTRING(1,0)+"天机构买入"+TOSTRING(a3,1)+"万手,卖出"+TOSTRING(b3,1)+"万手.净买入"+TOSTRING(y,1)+"万手.占总成交"+TOSTRING(z,1)+"％.";

}

ELSE

{

y=b3-a3;

z=y/VOL1*100;

统计:TOSTRING(1,0)+"天机构买入"+TOSTRING(a3,1)+"万手,卖出"+TOSTRING(b3,1)+"万手.净卖出"+TOSTRING(y,1)+"万手.占总成交"+TOSTRING(z,1)+"％.";

}