|
M1:=5;
M2:=10;
M3:=20;
M4:=60;
VL:VOL,VOLSTICK;
VL5:=MA(VOL,M1);
VL10:=MA(VOL,M2);
VL20:=MA(VOL,M3);
VL60:MA(VOL,M4);
V1:=MIN(REF(VOL,1),REF(VOL,2));
V2:=MIN(REF(VOL,3),REF(VOL,4));
V3:=MIN(REF(VOL,5),REF(VOL,6));
V4:=MIN(REF(VOL,7),REF(VOL,8));
V5:=MIN(REF(VOL,9),REF(VOL,10));
V6:=MIN(REF(VOL,11),REF(VOL,12));
V7:=MIN(REF(VOL,13),REF(VOL,14));
V8:=MIN(REF(VOL,15),REF(VOL,16));
W1:=MIN(MIN(V1,V2),MIN(V3,V4));
W2:=MIN(MIN(V5,V6),MIN(V7,V8));
ZM1:=MIN(W1,W2);
芝麻量:ZM1,COLORGREEN,LINETHICK1;
另：
{地量通达信源码}
M1:=5;
M2:=35;
M3:=135;
VOLUME:VOL,COLOR009000,LINETHICK4;
V1:MA(VOLUME,M1),COLORWHITE;
V2:MA(VOLUME,M2),COLORYELLOW;
V3:MA(VOLUME,M3),COLORRED;
地量:=VOL<LLV(VOL,14)*1.001;
STICKLINE(地量>0,0,VOL,7,0),COLORYELLOW;
VAR1:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
主动买盘:=IF(CLOSE>OPEN,VAR1*(HIGH-LOW),IF(CLOSE<OPEN,VAR1*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2));
主动卖盘:=IF(CLOSE>OPEN,0-VAR1*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-VAR1*(HIGH-LOW),0-VOL/2));
买卖盘比:-(主动买盘/主动卖盘),COLORYELLOW;
STICKLINE(主动买盘>0,0,主动买盘,1,0),COLORRED;
{STICKLINE(主动卖盘<0,VOL,主动买盘,1,0),COLOR00FF00;}
换手:=VOL/CAPITAL*100;
STICKLINE(换手>0,0,主动买盘,6,0),COLOR9900AA;
STICKLINE(换手>0,VOL,主动买盘,6,1);
STICKLINE(地量>0,0,VOL,7,0),COLORYELLOW; |
