根据个人喜好修改的千钧DDE—(源码,无未来)

2011-03-01 18:45:00来源:本站整理浏览:96

已经很久不用DDE指标了,最近感觉千钧DDE非常不错,无须下载数据,越用越爽,于是,根据个人喜好,对其进行了修改。改的好不好,还需大家提提意见。源码奉献,免得害死人!我向来反感加密指标。先上张图,让大家养眼一下,呵呵。
千钧DDX
N:=5;jj:=(HIGH+LOW+CLOSE)/3;qj0:=vol/IF(HIGH=LOW,4,HIGH-LOW);
qj1:=IF(CAPITAL=0,qj0*(jj-MIN(CLOSE,OPEN)),qj0*IF(HIGH=LOW,1,(MIN(OPEN,CLOSE)-LOW)));
qj2:=IF(CAPITAL=0,qj0*(MIN(OPEN,CLOSE)-LOW),qj0*IF(HIGH=LOW,1,(jj-MIN(CLOSE,OPEN))));
qj3:=IF(CAPITAL=0,qj0*(HIGH-MAX(OPEN,CLOSE)),qj0*IF(HIGH=LOW,1,(HIGH-MAX(OPEN,CLOSE))));
qj4:=IF(CAPITAL=0,qj0*(MAX(CLOSE,OPEN)-jj),qj0*IF(HIGH=LOW,1,(MAX(CLOSE,OPEN)-jj)));
DDX:((QJ1+QJ2)-(QJ3+QJ4))/SUM(VOL,10)*10,COLOR3D;
DX:=ma(ddx,5)*N;
DDX1:sma(DX,3,1);
DDX2:sma(DDX1,3,1);
DDX3:wma(DDX2,5);
1,DOTLINE;
预警:=DDX>0 and ma(v,5)>ma(ma(v,5),5) and CROSS(DDX1,DDX2);
天:=COUNT(DDX>0,5);
DRAWTEXT(预警,DDX*1.06,'★'),LINETHICK3,COLOR00FFFF;
DRAWTEXTABS(180,0,'一周内翻红:'+NUMTOSTRN(天,0)+' 天'),Color00EEFF;
DRAWTEXTABS(0,0,'大单动向');

千钧DDY
N:=5;jj:=(HIGH+LOW+CLOSE)/3;qj0:=vol/IF(HIGH=LOW,4,HIGH-LOW);
qj1:=IF(CAPITAL=0,qj0*(jj-MIN(CLOSE,OPEN)),qj0*IF(HIGH=LOW,1,(MIN(OPEN,CLOSE)-LOW)));
qj2:=IF(CAPITAL=0,qj0*(MIN(OPEN,CLOSE)-LOW),qj0*IF(HIGH=LOW,1,(jj-MIN(CLOSE,OPEN))));
qj3:=IF(CAPITAL=0,qj0*(HIGH-MAX(OPEN,CLOSE)),qj0*IF(HIGH=LOW,1,(HIGH-MAX(OPEN,CLOSE))));
qj4:=IF(CAPITAL=0,qj0*(MAX(CLOSE,OPEN)-jj),qj0*IF(HIGH=LOW,1,(MAX(CLOSE,OPEN)-jj)));
DDY:((QJ2+QJ4)-(QJ1+QJ3))/SUM(VOL,10)*10,COLOR3D;
DY:=ma(ddy,5)*N;
DDY1:sma(DY,3,1);
DDY2:sma(DDY1,3,1);
DDY3:wma(DDY2,5);
1,DOTLINE;
预警:=DDy>0 and CROSS(DDy1,DDy2) and ddy1<0;
DRAWTEXT(预警,DDy*1.06,'★'),LINETHICK3,COLOR00BBFF;
DRAWTEXTABS(0,0,'涨跌动因');

千钧DDZ
jj:=(HIGH+LOW+CLOSE)/3;qj0:=vol/IF(HIGH=LOW,4,HIGH-LOW);
qj1:=IF(CAPITAL=0,qj0*(jj-MIN(CLOSE,OPEN)),qj0*IF(HIGH=LOW,1,(MIN(OPEN,CLOSE)-LOW)));
qj2:=IF(CAPITAL=0,qj0*(MIN(OPEN,CLOSE)-LOW),qj0*IF(HIGH=LOW,1,(jj-MIN(CLOSE,OPEN))));
qj3:=IF(CAPITAL=0,qj0*(HIGH-MAX(OPEN,CLOSE)),qj0*IF(HIGH=LOW,1,(HIGH-MAX(OPEN,CLOSE))));
qj4:=IF(CAPITAL=0,qj0*(MAX(CLOSE,OPEN)-jj),qj0*IF(HIGH=LOW,1,(MAX(CLOSE,OPEN)-jj)));
qj5:=qj1+qj2;
qj6:=qj3+qj4;
DDZ:(qj5-qj6)/(qj5+qj6)*100;
DDZ1:=DDZ*0.8;
FILLRGN(DDZ,DDZ1,DDZ>=DDZ1,RGB(255,0,0),DDZ<DDZ1,RGB(0,130,250));
DRAWTEXTABS(0,0,'大单分差');

股票公式栏目导航

精品指标推荐

最新热门

本类随机推荐

相关公式