同花顺主力资金监控公式

原指标“主力资金能量”稍作修改，仅改变线条颜色和显示效果。

源码：

VAR1:=EMA(HHV(HIGH,500),21);

VAR2:=EMA(HHV(HIGH,250),21);

VAR3:=EMA(HHV(HIGH,90),21);

VAR4:=EMA(LLV(LOW,500),21);

VAR5:=EMA(LLV(LOW,250),21);

VAR6:=EMA(LLV(LOW,90),21);

VAR7:=EMA((VAR4*0.96+VAR5*0.96+VAR6*0.96+VAR1*0.558+VAR2*0.558+VAR3*0.558)/6,21);

VAR8:=EMA((VAR4*1.25+VAR5*1.23+VAR6*1.2+VAR1*0.55+VAR2*0.55+VAR3*0.65)/6,21);

VAR9:=EMA((VAR4*1.3+VAR5*1.3+VAR6*1.3+VAR1*0.68+VAR2*0.68+VAR3*0.68)/6,21);

VARA:=EMA((VAR7*3+VAR8*2+VAR9)/6*1.738,21);

VARB:=REF(LOW,1);

VARC:=SMA(ABS(LOW-VARB),3,1)/SMA(MAX(LOW-VARB,0),3,1)*100;

VARD:=EMA(IF(CLOSE*1.35<=VARA,VARC*10,VARC/10),3);

VARE:=LLV(LOW,30);

VARF:=HHV(VARD,30);

VAR10:=IF(MA(CLOSE,58),1,0);

资金入场1:= EMA(IF(LOW<=VARE,(VARD+VARF*2)/2,0),3)/618*VAR10;

资金入场:=IF(资金入场1>0,资金入场1,0),LINETHICK1,colorred;

今量: 资金入场,NODRAW;

手:=V*100/CAPITAL;

V9:=TROUGHBARS(3,15,1)<10;

V10:=PEAKBARS(3,15,1)<10;

V11:=IF(V9=1,50,0);

V12:=IF(V10=1,50,0);

底部:=IF(V11=50,50,0);

买低位:=IF(底部>REF(底部,1),1,0),colorred,LINETHICK3;

DRAWTEXT(买低位,38,'主力建仓 '),colorwhite;

STICKLINE(买低位,0,37,6,0),colorlimagenta;

头部:=IF(V12=50,100,0);

卖高顶:=IF(头部>REF(头部,1),1,0),colorgreen,LINETHICK3;

DRAWTEXT(卖高顶,38,'拉高出货'),colorwhite;

STICKLINE(卖高顶,0,37,6,0),colorgreen;

日换:(手),colorwhite,LINETHICK1;

周换:EMA(手,7),colorgreen,LINETHICK1;

月换:EMA(手,30),colorgreen,LINETHICK1,DOTLINE;

STICKLINE(日换>月换,日换,月换,1,0),colorred;

STICKLINE(日换>周换,日换,周换,1,0),colorwhite;

HS:=V/CAPITAL*100;

A1:=IF(资金入场>0,今量*1.2,0),STICK,LINETHICK3, COLOR0000FF;

A2:=IF(资金入场>0,今量*0.8,0),STICK,LINETHICK3, COLOR0066FF;

A3:=IF(资金入场>0,今量*0.6,0),STICK,LINETHICK3, COLOR0099FF;

A4:=IF(资金入场>0,今量*0.4,0) ,STICK,LINETHICK3,COLOR00CCFF;

A5:=IF(资金入场>0,今量*0.2,0) ,STICK,LINETHICK3,COLOR00FFFF;

必买: IF(TROUGHBARS(2.5,15,1)=0 AND HIGH>LOW+0.01,1,-18),colorred,LINETHICK1;

趋势线:2.5*SMA((CLOSE-LLV(LOW,25))/(HHV(HIGH,25)-LLV(LOW,25))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,25))/(HHV(HIGH,25)-LLV(LOW,25))*100,5,1),3,2);

高顶卖:=IF(头部>REF(头部,1),18,0),colorcyan,LINETHICK3;

DRAWTEXT(高顶卖,44,'●准备卖 '),colorwhite;

V7:=TROUGHBARS(3,15,1)<10;

低位买:=IF((V7 AND COUNT(V7,3)=1),35,0),colorred,LINETHICK3;

DRAWTEXT(低位买,44,'●准备买 '),colormagenta;

VAEE:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;

VAEF:=100-3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA

((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);

VAR20:=100-3*SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA

((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);

VAR21:=VAEF<REF(VAR20,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1);

DRAWTEXT(VAR21 AND COUNT(VAR21,30)=1,30,'★大资金异动'),LINETHICK1,COLORFF00FF;

STICKLINE(VAR21 AND COUNT(VAR21,30)=1,1,30,2,0),COLORFF00FF;

VAR22:=(HIGH+LOW+CLOSE)/3;

VAR23:=(VAR22-MA(VAR22,14))/(0.015*AVEDEV(VAR22,14));

VAR24:=(VAR22-MA(VAR22,70))/(0.015*AVEDEV(VAR22,70));

VAR25:=IF(VAR23>=150 AND VAR23<200 AND VAR24>=150 AND VAR24<200,10,0);

VAR26:=IF(VAR23<=-150 AND VAR23>-200 AND VAR24<=-150 AND VAR24>-200,-10,VAR25);

VAR27:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;

VAR28:=100-ABS(VAR27);

VAR29:=IF(VAR28<90,VAR28,100);

VAR2A:=IF(VAEE>0,VAEE,0);

VAR2B:=IF(VAR24>=200 AND VAR23>=150,15,IF(VAR24<=-200 AND VAR23<=-150,-15,VAR26))+60;

VAR2C:=VAR2A>48 AND VAR2B>60 AND VAR29<100;

DRAWTEXT(VAR2C AND COUNT(VAR2C,30)=1,43,'★有大笔异动'),LINETHICK1,colormagenta;

STICKLINE(VAR2C AND COUNT(VAR2C,30)=1,0,40,2,0),colormagenta;

AB:ZIG(3,5)+0.5,COLOR338800,LINETHICK2;

GG:=EMA(AB,2);

BA:ZIG(3,10),COLOREEDD00,LINETHICK2;

HH:=EMA(BA,2);

DRAWTEXT(CROSS(HH,BA),BA+10,'高卖'),COLOR00FF00;

DRAWTEXT(CROSS(BA,HH),BA-2,'低买'),COLOR0000FF;

//DRAWICON(CROSS(AB,GG),AB,'BUY');

//DRAWICON(CROSS(GG,AB),AB,'SELL');

VAEC:=(ZIG(3,5)>REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1)<=REF(ZIG(3,5),2)) AND (REF(ZIG

(3,5),2)<=REF(ZIG(3,5),3));

VAED:=(ZIG(3,5)<REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1)>=REF(ZIG(3,5),2)) AND (REF(ZIG

(3,5),2)>=REF(ZIG(3,5),3));

STICKLINE((VAEC=1),(-5),0,2,0),COLOR0000FF;

DRAWTEXT((VAEC=1),(-4),'买进'),COLOR0000FF;

STICKLINE((VAED=1),-5,0,2,0),COLOR00FF00;

DRAWTEXT((VAED=1),-5,'卖出'),COLOR00FF00;