同花顺大机构仓位副图源码 EA

大机构仓位:100*(1-WINNER(CLOSE)),colorred,LINETHICK3;
r VAR2:=1/WINNER(CLOSE);
r VAR3:=MA(CLOSE,13);
r VAR4:=100-ABS((CLOSE-VAR3)/VAR3*100);
r VAR5:=LLV(LOW,120);
r VAR6:=HHV(HIGH,120);
r VAR7:=(VAR6-VAR5)/100;
r VAR8:=SMA((CLOSE-VAR5)/VAR7,20,1);
r VAR9:=SMA((OPEN-VAR5)/VAR7,20,1);
r VARA:=3*VAR8-2*SMA(VAR8,10,1);
r VARB:=3*VAR9-2*SMA(VAR9,10,1);
r VARC:=100-VARB;
r基金私募仓位: (100-VARA),coloryellow,LINETHICK2;
r VARE:=REF(LOW,1)*0.9;
r VARF:=LOW*0.9;
r VAR10:=(VARF*VOL+VARE*(CAPITAL-VOL))/CAPITAL;
r VAR11:=EMA(VAR10,30);
r VAR12:=CLOSE-REF(CLOSE,1);
r VAR13:=MAX(VAR12,0);
r VAR14:=ABS(VAR12);
r VAR15:=SMA(VAR13,7,1)/SMA(VAR14,7,1)*100;
r VAR16:=SMA(VAR13,13,1)/SMA(VAR14,13,1)*100;
r VAR17:=BARSCOUNT(CLOSE);
r VAR18:=SMA(MAX(VAR12,0),6,1)/SMA(ABS(VAR12),6,1)*100;
r VAR19:=(-200)*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60))+100;
r VAR1A:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100;
r VAR1B:=SMA((SMA(VAR1A,4,1)-50)*2,3,1);
r VAR1C:=(INDEXC-LLV(INDEXL,14))/(HHV(INDEXH,14)-LLV(INDEXL,14))*100;
r VAR1D:=SMA(VAR1C,4,1);
r VAR1E:=SMA(VAR1D,3,1);
r VAR1F:=(HHV(HIGH,30)-CLOSE)/CLOSE*100;
r VAR20:=VAR18<=25 AND VAR19<-95 AND VAR1F>20 AND VAR1B<-30 AND VAR1E<30 AND VAR11-CLOSE>=-0.25 AND VAR15<22 AND VAR16<28 AND VAR17>50;
r VAR21:=(HIGH+LOW+CLOSE)/3;
r VAR22:=(VAR21-MA(VAR21,14))/(0.015*AVEDEV(VAR21,14));
r VAR23:=(VAR21-MA(VAR21,70))/(0.015*AVEDEV(VAR21,70));
r VAR24:=IF(VAR22>=150 AND VAR22<200 AND VAR23>=150 AND VAR23<200,10,0);
r VAR25:=IF(VAR22<=-150 AND VAR22>-200 AND VAR23<=-150 AND VAR23>-200,-10,VAR24);
r STICKLINE(VAR20,0,80,5,0),LINETHICK4,colorred;
r DRAWTEXT(CROSS(VAR20,0.5) AND COUNT(VAR20=1,10)=1,90,’超级主力建仓!’) , colorred;
r VARE:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;
r VARF:=100-3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA
r ((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);
r VAR10:=100-3*SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA
r ((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);
r VAR11:=VARF<REF(VAR10,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1);
r DRAWTEXT(VAR11 AND COUNT(VAR11,30)=1,70,’大资金活动’),LINETHICK1,colorlimagenta;
r STICKLINE(VAR11 AND COUNT(VAR11,30)=1,1,60,5,0),colorlimagenta,LINETHICK4;
r V10:=PEAKBARS(3,15,1)<10; V12:=IF(V10=1,50,0);
r头部:= IF(V12=50,100,0);
r卖:IF(IF(V12=50,100,0)>REF(IF(V12=50,100,0),1),40,0),colorgreen,LINETHICK3;
r DRAWTEXT(卖,50,’主力清仓 ‘),colorgreen;
r V9:=TROUGHBARS(3,15,1)<10; V11:=IF(V9=1,50,0);
r底部:= IF(V11=50,50,0);
r买:IF( 底部>REF(底部,1),40,0),colorred,LINETHICK4;
r DRAWTEXT(买,50,’主力抄底 ‘),colorred;
r V7:=TROUGHBARS(3,15,1)<10; V9:=IF(V7=1,50,0);
r v1:=(C*2+H+L)/4*10;
r V2:=EMA(V1,13)-EMA(V1,34);
r V3:=EMA(V2,5);
r V4:=2*(V2-V3)*5.5;
r V5:=(HHV(INDEXH,8)-INDEXC)/(HHV(INDEXH,8)-LLV(INDEXL,8))*8;
r V6:=EMA(3*V5-2*SMA(V5,18,1),5);
r V7:=(INDEXC-LLV(INDEXL,8))/(HHV(INDEXH,8)-LLV(INDEXL,8))*10;
r V8:=(INDEXC*2+INDEXH+INDEXL)/4;
r V9:=EMA(V8,13)-EMA(V8,34);
r VA:=EMA(V9,3);
r VB:=(V9-VA)/2;
r V11:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1),3,1);
r V12:=(EMA(V11,3)-REF(EMA(V11,3),1))/REF(EMA(V11,3),1)*100;
r准备现金: STICKLINE(EMA(V11,3)<=13,0,15,5,0),colorlired;
r AA:=(EMA(V11,3)<=13) AND FILTER((EMA(V11,3)<=13),15);
r DRAWTEXT (AA,-10,’准备现金’),colorlired;
r买入股票: STICKLINE(EMA(V11,3)<=13 AND V12>13,0,50,5,0),LINETHICK3,colorred;
r BB:= (EMA(V11,3)<=13 AND V12>13) AND FILTER((EMA(V11,3)<=13 AND V12>13),10),colorwhite,LINETHICK3;
r DRAWTEXT (BB,60,’主力进’),colorwhite;
r卖临界: STICKLINE(EMA(V11,3)>60 AND EMA(V11,3)>REF(EMA(V11,3),1),100,95,15,1),colorgreen;
r CC:=(EMA(V11,3)>=90 AND V12) AND FILTER((EMA(V11,3)>=90 AND V12),10);
r DD:=(EMA(V11,3)>=120 AND V12) AND FILTER((EMA(V11,3)>=120 AND V12),10);
r STICKLINE(IF(VB>=0,VB,0) AND EMA(V11,3)<13,0,15,5,0),colorlired;
r STICKLINE(IF(VB<=0,VB,0) AND EMA(V11,3)>90,0,10,10,0),colorgreen;
r STICKLINE( IF(V4>=0,V4,1) AND EMA(V11,3)<13,0,15,5,0),colorlired;
r STICKLINE(IF(V4<=0,V4,1) AND EMA(V11,3)>90,0,10,10,0),colorliblue,LINETHICK1;
r DRAWTEXT (CC,20,’主力减仓’),colorliblue;
r AA:=(O+H+L+C)/4;
r BB:=MA(AA,3);
r CC:=SUM(IF(AA>REF(AA,1),AA*VOL,0),4)/SUM(IF(AA<REF(AA,1),AA*VOL,0),4);
r DD:=REF(100-(100/(1+CC)),1);
r a1:=HHV(AA,10);
r a2:=LLV(AA,30);
r a3:=a1-a2;
r a4:=EMA((AA-a2)/a3,1)*100;
r b1:=HHV(AA,16);
r b2:=LLV(AA,90);
r b3:=b1-b2;
r b4:=EMA((AA-b2)/b3,1)*100;
r C1:=HHV(AA,30);
r C2:=LLV(AA,240);
r C3:=C1-C2;
r C4:=EMA((AA-C2)/C3,1)*100;
r中线趋势:b4,colormagenta,LINETHICK2;
r STICKLINE(a4>90 AND b4>70,86,94,6,0),coloryellow;
r STICKLINE(a4<5 AND b4<30,0,8,6,0),colorwhite;
r DRAWTEXT((a4>90 AND b4>70)=1, 85,’拉’),coloryellow;
r爆发线: 80,colorred;

r