通达信奉献给主力资金副图源码贴图

以下是通达信奉献给主力资金副图源码贴图

VAR1:=1;
 VAR3:=LLV(HIGH,240);
 VAR4:=100*(CLOSE-VAR3)/VAR3*VAR1;
 VAR5:=REF(LLV(CLOSE,480),1)*VAR1;
 VAR6:=REF(HHV(CLOSE,480),1)*VAR1;
 VAR7:=100*(CLOSE-VAR5)/(VAR6-VAR5)*VAR1;
 VAR8:=(CLOSE-LLV(CLOSE,981))/(HHV(CLOSE,981)-LLV(CLOSE,981))*100*VAR1;
 VAR9:=(CLOSE-LLV(CLOSE,393))/(HHV(CLOSE,393)-LLV(CLOSE,393))*100*VAR1;
 VARA:=(CLOSE-LLV(LOW,981))/(HHV(HIGH,981)-LLV(LOW,981))*100*VAR1;
 VARB:=(CLOSE-LLV(LOW,393))/(HHV(HIGH,393)-LLV(LOW,393))*100*VAR1;
 VARC:=EMA(100*(CLOSE-LLV(LOW,100))/(HHV(HIGH,100)-LLV(LOW,100)),5)/4*VAR1;
 VARD:=IF(VARC>23.16,VARC,0)*VAR1;
 VARE:=VARC<1*VAR1;
 VARF:=VARD*VAR1;
 VAR10:=VAR4<0 AND VAR7<0;
 VAR11:=1;
 VAR12:=(HIGH+LOW+CLOSE*2)/4*VAR11;
 VAR13:=EMA(VAR12,21);
 VAR14:=STD(VAR12,21);
 VAR15:=((VAR12-VAR13)/VAR14*100+200)/4*VAR11;
 VAR16:=(EMA(VAR15,89)-25)*1.56*VAR11;
 VAR17:=EMA(VAR16,5)*1.22*VAR11;
 VAR18:=EMA(VAR17,3)*VAR11;
 VAR19:=3*VAR17-2*VAR18*VAR11;
 VAR1A:=IF(CROSS(VAR19,VAR17) AND CROSS(VAR19,VAR18) AND CROSS(VAR17,VAR18),1,0);
 VAR1B:=IF(CROSS(VAR17,VAR19) AND CROSS(VAR18,VAR19) AND CROSS(VAR18,VAR17),1,0);

 VAR1C:=EMA(100*(CLOSE-LLV(LOW,100))/(HHV(HIGH,100)-LLV(LOW,100)),13)/4*VAR1;
 VAR1D:=EMA(CLOSE,2)-EMA(CLOSE,89)*VAR1;
 VAR1E:=EMA(VAR1D,30)*VAR1;
 VAR1F:=2*(VAR1D-VAR1E)*10*VAR1;
 VAR20:=POW(VAR1F,3)*0.1+POW(VAR1F,2)*VAR1;
 VAR21:=SQRT(SQRT(LOW*HIGH*OPEN*CLOSE));
 VAR22:=EMA(VAR21*0.97,3)*VAR1;
 VAR23:=(HIGH+LOW+CLOSE)/3*VAR1;
 VAR24:=(VAR23-MA(VAR23,14))/(0.015*AVEDEV(VAR23,14))*VAR1;
 VAR25:=IF(VAR1F>0.015,VAR20,0)/45*VAR1;
拉升资金: VAR25,COLORFF00FF,LINETHICK2;
 VAR26:=EMA(CLOSE,2)-EMA(CLOSE,150);
 VAR27:=EMA(VAR26,100);
 VAR28:=2*(VAR26-VAR27);
 VAR29:=POW(VAR28,3)*0.1+POW(VAR28,1);
 VAR2A:=SQRT(SQRT(LOW*HIGH*OPEN*CLOSE));
 VAR2B:=EMA(VAR2A*0.97,3);
 VAR2C:=(HIGH+LOW+CLOSE)/3;
 VAR2D:=(VAR2C-MA(VAR2C,14))/(0.015*AVEDEV(VAR2C,14));
主力资金:IF(VAR28>0.1,VAR29,0)*5,LINETHICK2,COLORYELLOW;

买点: IF(FILTER(VAR8=0 AND VARE AND VAR10 AND VAR1A,5)=1,10,0),COLORCYAN;
卖点: IF(FILTER(VAR8=100 AND VARF AND VAR1B,5)=1,10,0),COLORGREEN;

 B:=ZIG(3,50/5)*1;
 G:=MA(B,2);
 D:=CROSS(B,G)*10;
 W:=CROSS(G,B)*10;
 DRAWTEXT(W=10,4,'卖' ),COLORWHITE;
 DRAWTEXT(D=10,4,'买'),COLORCYAN;
 DRAWTEXT(ISLASTBAR,拉升资金,'←拉升'),COLORMAGENTA;
 DRAWTEXT(ISLASTBAR,主力资金,'←主力'),COLORYELLOW;
涨家数:INDEXADV,NODRAW,COLORMAGENTA;
跌家数:INDEXDEC,NODRAW,COLORGREEN;
 IF(主力资金>REF(主力资金,1),主力资金,DRAWNULL),COLORYELLOW,LINETHICK2;
 IF(主力资金<REF(主力资金,1),主力资金,DRAWNULL),COLORFF9900,LINETHICK2;
 IF(拉升资金<REF(拉升资金,1),拉升资金,DRAWNULL),COLORGREEN,LINETHICK2;