同花顺主力资金监控公式
原指标“主力资金能量”稍作修改，仅改变线条颜色和显示效果。有未来函数，最好不要用它
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;
/////公式网 www.gszb.com
低位买:=IF((V7 AND COUNT(V7,3)=1),35,0),colorred,LINETHICK3;
DRAWTEXT(低位买,44,'●准备买 '),colormagenta;
部分源码隐藏，请下载附件，导入，才可以看到完整源码
