感谢原发送源码楼主北美飞像,原贴发图看不见,我觉得颜色不完美,我现在作了修改,主要是方便大家看图,利于大家交流,
注意源码有未来请善用:
源码:数据正确与否有待验证,使用时请注意
JE:=VOL;
JJ:=(HIGH+LOW+CLOSE)/3;
QJ0:=VOL/IF(HIGH=LOW,4,HIGH-LOW);
主买:=(QJ0*(JJ-MIN(CLOSE,OPEN)));
主卖:=(QJ0*(MIN(OPEN,CLOSE)-LOW));
TMP:=主买-主卖;
主力活跃度:(主买+主卖)*10000/(2*FINANCE(7)),NODRAW;
STICKLINE(TMP>0,0,主力活跃度,2,0),COLORRED;
STICKLINE(TMP<0,0,主力活跃度,2,0),COLORGREEN;
AA:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
买量:=IF(CLOSE>OPEN,AA*(HIGH-LOW),IF(CLOSE<OPEN,AA*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),LINETHICK0;
卖量:=IF(CLOSE>OPEN,0-AA*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-AA*(HIGH-LOW),0-VOL/2)),LINETHICK0,COLORCYAN;
主力净流入亿元:MA(买量+卖量/2,3)*AMO/V/100000000,COLORYELLOW,LINETHICK1;
201051310573072568.jpg
201051310574836159.jpg
20105131058036708.jpg
|