通达信洗盘异动量源码

M1:=5;M2:=144;

【成交量】:VOL,VOLSTICK;

MA1:MA(VOL,M1),COLORYELLOW,LINETHICK2;

IF(MA1 =REF(MA1,1),MA1,DRAWNULL),COLORRED,LINETHICK2;

MA2:MA(VOL,M2),COLORGREEN,LINETHICK2;

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));ZM:=MIN(W1,W2);

D:=MIN(MA(V,5),MIN(MIN(MA(V,10),MA(V,20)),MIN(MA(V,60),MA(V,120))));

HSL:=V/CAPITAL*100;

量芝麻点:V D AND V =LLV(V,60) AND HSL

DRAWTEXT(量芝麻点=1,V,'钻石量'),COLORYELLOW;

启:=MA(V,5)COLORMAGENTA,LINETHICK2;

洗:=MA(V,30)COLORGREEN,LINETHICK2;

异:=MA(V,60)COLORLIBLUE,LINETHICK2;

DRAWTEXT(CROSS(启,洗)AND V 洗 AND V 异 AND 洗 异,V,'★洗盘'),COLORMAGENTA;

DRAWTEXT(CROSS(启,异)AND V 异 AND V 异 AND 洗 异,V,'★异动'),COLORYELLOW;