千钧【DDE系统】大智慧L版
一、千钧DDX
JJ:=(OPEN+HIGH+LOW+CLOSE)/4;
AA:=IF(BETWEEN(C,JJ,H) OR C=O,vol,0);
BB:=IF(BETWEEN(C,JJ,L),vol,0);
CC:=IF(AA and BB,0,vol/3);
DDX:10*(AA-(BB+CC))/IF(CAPITAL<1,SUM(vol,13),CAPITAL),LINETHICK0;
STICKLINE(DDX>0,0,DDX,6,0 ),COLOR0022FF;
STICKLINE(DDX>0,0,DDX,4,0 ),COLORBB22CC;
STICKLINE(DDX<0,0,DDX,6,0 ),COLORFFFF00;
DDX1:EMA(DDX,60)*60,COLOR00FFFF;
DDX2:MA(DDX1,5),COLORFF00FF;
DDX3:MA(DDX2,10),COLOR00FF00;
预警:DDX>0 and CROSS(DDX1,DDX2) AND (CLOSE/REF(CLOSE,1)-1)
*100>3,LINETHICK0;
DRAWTEXT(预警,DDX*5.06,'★'),LINETHICK3,COLOR00FFFF;
DRAWTEXTABS(0,0,'大单动向'),COLORFFFFFF;
1,DOTLINE,COLORFF0000;
二、千钧DDY
AA:=IF(BETWEEN(C,REF(C,1),H),vol,0);
BB:=IF(BETWEEN(C,REF(C,1),L),vol,0);
CC:=IF(AA and BB,0,vol/3);
DDY:3*(AA-(BB+CC))/IF(CAPITAL<1,SUM(INDEXV,71),CAPITAL),LINETHICK0;
STICKLINE(DDY>0,0,DDY,6,0 ),COLOR0022CC;
STICKLINE(DDY<0,0,DDY,6,0 ),COLORFFFF00;
DDY1:EMA(DDY,60)*60,COLOR00FFFF;
DDY2:MA(DDY1,5),COLORFF00FF;
DDY3:MA(DDY1,10),COLOR00FF00;
DRAWTEXTABS(0,0,'涨跌动因'),COLORFFFFFF;
0.5,DOTLINE,COLORFF0000;
三、千钧DDZ
input:p1(170),p2(200);
CC:=IF(CAPITAL<1,INDEXV*0.618,vol/3);
H1:=VOL/CAPITAL*100;
h2:=INDEXV/SUM(INDEXV,71)*100;
hs:=IF(CAPITAL<1,h2,h1);
JJ:=IF(CAPITAL<1,INDEXA/INDEXV/100,(OPEN+HIGH+LOW+CLOSE)/4);
AA:=IF(BETWEEN(C,JJ,H) OR C=O,vol,0);
BB:=IF(BETWEEN(C,JJ,L) OR C<O,vol,0);
DDZ:hs*(BB-(AA+CC))/(CC-(AA-BB))*P2/100,LINETHICK0;
DDZ1:hs*(BB-(AA+CC))/(CC-(AA-BB))*P1/100,LINETHICK0;
FILLRGN(DDZ,DDZ1,DDZ>DDZ1,RGB(255,0,0),DDZ<DDZ1,RGB(0,255,0));
DRAWTEXTABS(0,0,'大单分差');
四、千钧DDE金指
DRAWTEXTREL(0,0,STKLABEL+' '+STKNAME+''),Color00FFFF,LINETHICK2;
DDX:="千钧DDX.DDX";持股线:=EMA(C,26);
ww1:=FILTER(O<REF(L,1) and C>O and vol>REF(v,1),13);
LC:=REF(C,1);
JH:=SMA(MAX(C-LC,0),6,1)/SMA(ABS(C-LC),6,1)*100;
SZ:=FILTER(CROSS(JH,35) and cross("千钧DDX.DDX1","千钧DDX.DDX2"),13);
SX:=FILTER(CROSS(JH,30) and cross("千钧DDX.DDX1","千钧DDX.DDX3"),7);
SQ:=FILTER(CROSS(71,JH) and "千钧DDX.DDX"<0 and cross("千钧DDX.DDX3","千钧DDX.DDX1"),74);
SD:=FILTER(CROSS(80,JH) and "千钧DDX.DDX"<0 and cross("千钧DDX.DDX2","千钧DDX.DDX1"),74);
AA:=IF(CAPITAL<1,SZ,SX);
BB:=IF(CAPITAL<1,SQ,SD);
w10:=BARSLAST(AA);
w11:=BARSLAST(BB);
w12:=IF(w10>0 and w10<w11,w10,0);
w13:=IF(w11>0 and w11<w10,w11,0);
VERTLINE(AA,1),Color0000FF;
VERTLINE(BB,1),Color00FB00;
CC:=REF(HHV(CLOSE,120),1);DD:=REF(LLV(CLOSE,120),1);
WW:=((100 * (CLOSE - DD)) / (CC - DD));EE:=AMOUNT;
FF:=(EMA(EE,5) / REF(EMA(EE,5),5));
霸占:=FILTER(((((((FF >= 2)) AND (WW < 35))) AND (BARSCOUNT(CLOSE) > 30)) OR (((((FF >= 2)) AND (WW < 100))) AND (BARSCOUNT(CLOSE) < 50))),90);
STICKLINE(C>=O,C,O,8,0),COLOR0022FF;
STICKLINE(C>=O,H,L,1,0),COLOR0022FF;
STICKLINE(C>=O,C,O,5,0),COLOR0066FF;
STICKLINE(C>=O,C,O,3,0),COLOR0099FF;
STICKLINE(C>=O,C,O,1.5,0),COLOR00DDFF;
STICKLINE(C>=O,H,L,0,0),COLOR00DDFF;
STICKLINE(C<=O,C,O,8,0),COLORFF2200;
STICKLINE(C<=O,H,L,1,0),COLORFF2200;
STICKLINE(C<=O,C,O,5,0),COLORFF6600;
STICKLINE(C<=O,C,O,3,0),COLORFF9900;
STICKLINE(C<=O,C,O,1.5,0),COLORFFDD00;
STICKLINE(C<=O,H,L,0,0),COLORFFDD00;
STICKLINE(霸占,CLOSE,OPEN,10,0),color0000FF;
STICKLINE(霸占,HIGH,LOW,1,0),color0000FF;
STICKLINE(ww1,CLOSE,OPEN,10,0),colorMagenta;
STICKLINE(ww1,HIGH,LOW,1,0),colorMagenta;
STICKLINE(AA,CLOSE,OPEN,10,0),colorYellow;
STICKLINE(AA,HIGH,LOW,1,0),colorYellow;
STICKLINE(BB,CLOSE,OPEN,10,0),Color00FF00;
STICKLINE(BB,HIGH,LOW,1,0),Color00FF00;
PARTLINE(持股线,CLOSE>持股线,RGB(255,0,0),CLOSE<持股线,RGB(0,255,0),1,RGB(0,0,255)),LINETHICK2;
DRAWTEXTREL(10,960,'千钧【DDE金指】:'),Color00FFFF;
DRAWTEXTREL(180,960,'红色牛股'),Color0000FF;
DRAWTEXTREL(280,960,'黄色买入'),Color00FFFF;
DRAWTEXTREL(380,960,'粉色洗盘'),ColorFF00FF;
DRAWTEXTREL(480,960,'绿色卖出'),Color00FF00;
A4:=MA(CLOSE,20);
A5:=(CLOSE > MA(CLOSE,5));
A6:=(MA(CLOSE,5) > MA(CLOSE,10));
A7:=(CLOSE > MA(CLOSE,10));
A8:=(MA(CLOSE,5) > MA(CLOSE,20));
A9:=(CLOSE > MA(CLOSE,20));
A10:=REF(A4,1);
A11:=(A4 > A10);
AVX:=(((((IF(A5,10,(0 - 10)) + IF(A6,10,(0 - 10))) + IF(A7,10,(0 - 10))) + IF(A8,10,(0 - 10))) + IF(A9,10,(0 - 10))) + IF(A11,10,(0 - 10)));
DSLX:=(CLOSE / INDEXC);
DSLX1:=MA(DSLX,5);
DSLX2:=MA(DSLX,10);
V1:=MA(VOL,5);
V2:=MA(VOL,10);
TJTS1:=BARSTATUS=2 and c<200;
TJTS2:=BARSTATUS=2 and c>200;
k2:=hhv(h*1.04,barslast(BARSTATUS=1=BARPOS)+1);
DRAWTEXT(TJTS1 and ((CROSS(AVX,1) AND (V1 >= V2)) AND (DSLX >= DSLX1)) ,k2*0.99,'★该股的量能理想，有明显走强迹象，可以考虑中线进场参与，仓位在2/3左右。'),ALIGN2,colorFF00FF;
DRAWTEXT(TJTS1 and ((CROSS(AVX,1) AND (V1 < V2)) AND (DSLX >= DSLX1)) ,k2*0.99,'★该股虽然走势趋强，但量能还显不足，可以考虑短线进场，仓位在1/2左右。'),ALIGN2,colorFF00FF;
DRAWTEXT(TJTS1 and ((CROSS(AVX,1) AND (V1 > V2)) AND (DSLX < DSLX1)) ,k2*0.99,'★该股量价配合良好，但相对其它股票并没有明显走强，可以考虑短线进场，仓位1/2左右。'),ALIGN2,colorFF00FF;
DRAWTEXT(TJTS1 and ((CROSS(AVX,1) AND (V1 <= V2)) AND (DSLX < DSLX1)) ,k2*0.99,'★该股形态尚可，但量能不足，股票也未完全走强，可以短线参与，仓位1/3左右。'),ALIGN2,colorFF00FF;
DRAWTEXT(TJTS1 and ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX >= DSLX1)) ,k2*0.99,'★该股形态变坏，但走势相对其它股票尚可，重仓者减持大半，清仓者可以观望。'),ALIGN2,color00FF00;
DRAWTEXT(TJTS1 and ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX >= DSLX1)) ,k2*0.99,'★该股随大盘一起下跌，程明显缩量走势，考虑到大盘风险，减持或清仓。'),ALIGN2,color00FF00;
DRAWTEXT(TJTS1 and ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX < DSLX1)) ,k2*0.99,'★该股放量下跌，走势明显偏弱，离场观望。'),ALIGN2,color00FF00;
DRAWTEXT(TJTS1 and ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX < DSLX1)) ,k2*0.99,'★该股缩量下跌，走势偏弱，离场观望。'),ALIGN2,color00FF00;
DRAWTEXT(TJTS1 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)) ,k2*0.99,'★该股形态良好，强势明显，量能充足，可以继续持有。'),ALIGN2,colorFFFF00;
DRAWTEXT(TJTS1 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)) ,k2*0.99,'★该股上行趋势不变，强势依然，但量能开始转弱，注意风险。'),ALIGN2,colorFFFF00;
DRAWTEXT(TJTS1 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)) ,k2*0.99,'★该股仍然具备上涨潜力，但股性偏弱，可考虑减仓。'),ALIGN2,colorFFFF00;
DRAWTEXT(TJTS1 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX < DSLX1)) ,k2*0.99,'★该股走势趋弱，量能不足，减持大部分筹码。'),ALIGN2,colorFFFF00;
DRAWTEXT(TJTS1 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)) ,k2*0.99,'★该股形态不佳，注意成交量的变化，但目前不适合参与。'),ALIGN2,ColorFFB060;
DRAWTEXT(TJTS1 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)) ,k2*0.99,'★该股趋势不明，股价偏弱，注意量能变化，目前不宜参与。'),ALIGN2,ColorFFB060;
DRAWTEXT(TJTS1 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)) ,k2*0.99,'★该股有走强迹象，但量能不足，趋势不明，不适合操作。'),ALIGN2,ColorFFB060;
DRAWTEXT(TJTS1 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX < DSLX1)) ,k2*0.96,'★该股走势太弱，没有参与价值。'),ALIGN2;
DRAWTEXT(TJTS2 and (CROSS(AVX,1) AND (V1 >= V2)) ,k2*0.99,'★大盘量能理想，有明显走强迹象，可以考虑中线进场参与，仓位在2/3左右。'),ALIGN2,colorFF00FF;
DRAWTEXT(TJTS2 and (CROSS(AVX,1) AND (V1 >= V2)) ,k2*0.98,'★如前期经过一轮下跌，此时为最佳买点，但如果前期有过一段涨幅则介入需谨慎。'),ALIGN2,colorFF00FF;
DRAWTEXT(TJTS2 and (CROSS(AVX,1) AND (V1 < V2)) ,k2*0.99,'★大盘虽然走势趋强，但量能还显不足，如果前期经过一轮下跌。'),ALIGN2,colorFF00FF;
DRAWTEXT(TJTS2 and (CROSS(AVX,1) AND (V1 < V2)) ,k2*0.98,' ★可以考虑短线进场，仓位在1/2左右，一旦量能放大可以加仓买入。'),ALIGN2,colorFF00FF;
本文仅仅提供源码，并无公式提供下载
{点击看本软件截图：58股票 公式网 http://www. 58gu. com 整理} |
