千钧【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,'黄s买入'),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  |