把西早言文预判庄家DDX造假出货改为同花顺指标
编写要求：
www.gszx.com.cn网解答：
网友求助：
源码如下:
INPUT: P1(60,0,100),P2(5,0,100),P3(10,0,100);
REFLINE:0;
DRAWTEXTABS(0,0,'大单动向');
VAR0:=MIN(COUNT(ORDER(2),0),P1);
DDX:(BIGORDER(1) - BIGORDER(2)) * VOL/CAPITAL * 100,linethick0;
真实DDX:(BIGORDER(1) - BIGORDER(2)) ,linethick0;
换手率:vol/capital*100,linethick0;
真实换手:vol/(capital*100 * ((100-PFFIN(4252,0))/100))*10000,linethick0;
换手风险:(真实换手-ema(真实换手,60))/ema(真实换手,60),coloryellow;
STICKLINE(ddx>=0,0,ddx,8,1),colorred;
STICKLINE(ddx<0,ddx,0,8,1),colorgreen;
STICKLINE(真实ddx>=0,0,真实ddx,8,0),colorMagenta;
STICKLINE(真实ddx<0,真实ddx,0,8,0),color00A13A;
1,DOTLINE,colorred;
解答如下：
{同花顺DDX}
a=(ZDMR[-1]+BDMR[-1]);
b=(ZDMC[-1]+BDMC[-1]);
a1=SUM(a,1)/100000000;
b1=-SUM(b,1)/100000000;
VAR0:=MIN(COUNT(B,0),60);
DDX:(A1+B1) * VOL/CAPITAL * 100,linethick0;
真实DDX:=(A1+B1) ,linethick0;
换手率:VOL/CAPITAL*100,linethick0;
真实换手:VOL/(CAPITAL*100 )*10000,linethick0;
换手风险:(真实换手-EMA(真实换手,60))/EMA(真实换手,60),coloryellow;
STICKLINE(真实ddx>=0,0,真实ddx,8,1),colorred;
STICKLINE(真实ddx<0,0,真实ddx,8,1),colorgreen;
a=(ZDMR[-1]+BDMR[-1]);
b=(ZDMC[-1]+BDMC[-1]);
a1=SUM(a,1)/100000000;
b1=-SUM(b,1)/100000000;
VAR0:=MIN(COUNT(B,0),60);
DDX:(A1+B1) * VOL/CAPITAL * 100,linethick0;
真实DDX:=(A1+B1) ,linethick0;
换手率:VOL/CAPITAL*100,linethick0;
真实换手:VOL/(CAPITAL*100 )*10000,linethick0;
换手风险:(真实换手-EMA(真实换手,60))/EMA(真实换手,60),coloryellow;
STICKLINE(真实ddx>=0,0,真实ddx,8,1),colorred;
STICKLINE(真实ddx<0,0,真实ddx,8,1),colorgreen;