求助修改成通达信指标

888518zp

求助修改成通达信指标

来自：MACD论坛(bbs.shudaoyoufang.com) 作者：888518zp 浏览：20046 回复：0

资金动力（源码是up的）日线锁定:=IFF(PERIOD==4,1,DRAWNULL);日期锁定:=CURRENTDATE>=1100104;
主力流入:=SYS_SUPERIN+SYS_BIGIN;
主力流出:=SYS_SUPEROUT+SYS_BIGOUT;
主力净买:=(主力流入-主力流出)/10000;
正基准线1:=EMA(EMA(EMA(EMA(IFF(主力净买>=0,主力净买,0),20),2),2),2);
正基准线6:=正基准线1*6;
负基准线1:=EMA(EMA(EMA(EMA(IFF(主力净买<0,主力净买,0),20),2),2),2);
负基准线6:=负基准线1*6;
衰减系数正:=(C-L)/(REF(C,1)-L);
衰减系数负:=(H-C)/(H-REF(C,1));
动力评估:=IFF(正基准线1>0 OR 正基准线1<0,IFF(主力净买>=正基准线6,100,IFF(主力净买>=0,100*(主力净买/正基准线6),IFF(主力净买<=负基准线6,-100,(-100)*主力净买/

负基准线6))),DRAWNULL);
动力综合值:=IFF(动力评估>=0 AND C>=REF(C,1),动力评估*1.0,IFF(动力评估>=0 AND C<REF(C,1),动力评估*衰减系数正,IFF(动力评估<0 AND C>=REF(C,1),动力评估*衰减系数负,IFF(动力评估<0 AND C<REF(C,1),动力评估*1.0,0)))),NODRAW;

资金动力强:IFF(动力综合值>50 AND 日期锁定 AND 日线锁定,动力综合值,0),linethick0,COLORRED;
资金动力中:IFF(动力综合值<=50 AND 动力综合值>0 AND 日期锁定 AND 日线锁定,动力综合值,0),linethick0,COLORYELLOW;
资金动力弱:IFF(动力综合值<=0 AND 日期锁定 AND 日线锁定,动力综合值,0),linethick0,COLORFFFF00;

STICKLINE(动力综合值>50 AND 日期锁定 AND 日线锁定,0,动力综合值,8,0),COLORRED;
STICKLINE(动力综合值<=50 AND 动力综合值>0 AND 日期锁定 AND 日线锁定,0,动力综合值,8,0),COLORYELLOW;
STICKLINE(动力综合值<=0 AND 日期锁定 AND 日线锁定,0,动力综合值,8,0),COLORFFFF00;