通达信今年红裤衩 资金动能

资金动能：
VOLUME:VOL/2.9,VOLSTICK;
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:10000*IF(((QJ1+QJ2)-(QJ3+QJ4))/IF(CAPITAL=0,1000000,10000)>0,
((QJ1+QJ2)-(QJ3+QJ4))/IF(CAPITAL=0,1000000,10000),
-((QJ1+QJ2)-(QJ3+QJ4))/IF(CAPITAL=0,1000000,10000)),COLORRED,NODRAW;
AABB:=((QJ1+QJ2)-(QJ3+QJ4))/IF(CAPITAL=0,1000000,10000);
STICKLINE(((QJ1+QJ2)-(QJ3+QJ4))/IF(CAPITAL=0,1000000,10000)>0,0,DDX,1.5,0),COLORLIRED;
STICKLINE((AABB*10000/VOLUME)>0.6,0,DDX,1.5,0),COLORRED;
STICKLINE(((QJ1+QJ2)-(QJ3+QJ4))/IF(CAPITAL=0,1000000,10000)<0,0,DDX,1.5,0),COLOR00CC00;
STICKLINE(((QJ1+QJ2)-(QJ3+QJ4))/IF(CAPITAL=0,1000000,10000)<0,0,DDX,1,0),COLOR00EE00;
三十天红:COUNT(AABB>=0,30),COLORRED,NODRAW;
六十天红:COUNT(AABB>=0,60),COLORRED,NODRAW;
V5:MA(VOLUME,5),COLORWHITE;
V35:MA(VOLUME,35),COLORYELLOW;
V135:MA(VOLUME,135),COLORFF00FF;
{}
TTT:=CONST(HHV(VOLUME,60));
DRAWTEXT(CURRBARSCOUNT=40,TTT,'DDX大单进红色'),COLORRED;
DRAWTEXT(CURRBARSCOUNT=30,TTT,'DDX大单出绿色'),COLORGREEN;
低量:DRAWTEXT(VOLLLV(REF(VOL,1),135),V35,'低'),COLORYELLOW;
地量:DRAWTEXT(VOL {}
D:= EMA((CLOSE-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30))*100,20);
J:= EMA((CLOSE-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30))*100,5) ;
BIAS1W :=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100;
BIAS2W :=(CLOSE-MA(CLOSE,12))/MA(CLOSE,12)*100;
BIAS3W :=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;
MM:=(BIAS1W+2*BIAS2W+3*BIAS3W)/6;
MN:=MA(MM,3);
VAR1:=(HHV(HIGH,24)-CLOSE)/(HHV(HIGH,24)-LLV(LOW,24))*100;
VAR2:=(CLOSE-LLV(LOW,18))/(HHV(HIGH,18)-LLV(LOW,18))*100;
VAR3:=(2*CLOSE+HIGH+LOW)/4;
VAR4:=LLV(LOW,26);
VAR5:=HHV(HIGH,34);
VAR6:=EMA((VAR3-VAR4)/(VAR5-VAR4)*100,16);
VAR7:=SMA((SMA(VAR2,3,1)+3),3,1),LINETHICK3;
VAR8:=EMA(VAR6,7);
VAR9:=SMA(VAR1,3,1);
VAR10:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100;
VAR11:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;
VAR12:=(CLOSE-MA(CLOSE,32))/MA(CLOSE,32)*100;
VAR13:=(VAR10+VAR11+VAR12)/3;
VAR14:=IF(VAR13<=-20,10,0);
VAR15:=HHV(VAR14,10);
VAR24:=LLV(LOW,36);
VAR25:=HHV(HIGH,30);
VAR26:=EMA((CLOSE-VAR24)/(VAR25-VAR24)*4,4)*25;
底背离: IF((VAR26<10),V135*1.1,0), COLORRED,LINETHICK2;
顶背离: IF((VAR26>90),V135,0), COLORGREEN,LINETHICK2;
地量1:IF(CROSS(0.9,1/VOL*1000>0.01 AND "KDJ.J"<0),V5,0),COLORYELLOW,LINETHICK2;
{}
股价趋势:= 3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)