机构建仓选股公式 修正源码，补充图片，提供公式下载

源码

大机构仓位:100*(1-WINNER(CLOSE)),COLORRED,LINETHICK3;

VAR2M:=1/WINNER(CLOSE);

VAR3M:=MA(CLOSE,13);

VAR4M:=100-ABS((CLOSE-VAR3M)/VAR3M*100);

VAR5M:=LLV(LOW,120);

VAR6M:=HHV(HIGH,120);

VAR7M:=(VAR6M-VAR5M)/100;

VAR8M:=SMA((CLOSE-VAR5M)/VAR7M,20,1);

VAR9M:=SMA((OPEN-VAR5M)/VAR7M,20,1);

VARA:=3*VAR8M-2*SMA(VAR8M,10,1);

VARB:=3*VAR9M-2*SMA(VAR9M,10,1);

VARC:=100-VARB;

基金私募仓位: (100-VARA),COLORYELLOW,LINETHICK2;

VAR1:=HHV(HIGH,9)-LLV(LOW,9);

VAR2:=HHV(HIGH,9)-CLOSE;

VAR3:=CLOSE-LLV(LOW,9);

VAR4:=((VAR2)/(VAR1))*(100)-70;

VAR5:=((CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60)))*(100);

VAR6:=((2)*(CLOSE)+HIGH+LOW)/(4);

VAR7:=SMA(((VAR3)/(VAR1))*(100),3,1);

VAR8:=LLV(LOW,34);

VAR9:=SMA(VAR7,3,1)-SMA(VAR4,9,1);

VAR10:=IF((VAR9>100),VAR9-100,0);

VAR11:=HHV(HIGH,34);

B1:=EMA(((VAR6-VAR8)/(VAR11-VAR8))*(100),8);

机构趋势:EMA(B1,13),POINTDOT,COLORRED,LINETHICK2;

STICKLINE(B1-机构趋势>0,B1,机构趋势,2.5,0),COLOR0000FF;

STICKLINE(B1-机构趋势<0,B1,机构趋势,2.5,0),COLOR00FF00;

V1:=(C*2+H+L)/4*10;

V2:=EMA(V1,13)-EMA(V1,34);

V3:=EMA(V2,5);

V4:=2*(V2-V3)*5.5;

V5:=(HHV(INDEXH,8)-INDEXC)/(HHV(INDEXH,8)-LLV(INDEXL,8))*8;

V6:=EMA(3*V5-2*SMA(V5,18,1),5);

V7:=(INDEXC-LLV(INDEXL,8))/(HHV(INDEXH,8)-LLV(INDEXL,8))*10;

V8:=(INDEXC*2+INDEXH+INDEXL)/4;

V9:=EMA(V8,13)-EMA(V8,34);

VA:=EMA(V9,3);

VB:=(V9-VA)/2;

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);

V12:=(EMA(V11,3)-REF(EMA(V11,3),1))/REF(EMA(V11,3),1)*100;

AAO:=(EMA(V11,3)<=13) AND FILTER((EMA(V11,3)<=13),15);

买入股票: STICKLINE(EMA(V11,3)<=13 AND V12>13,0,50,5,0),LINETHICK3,COLORRED;

BBO:= (EMA(V11,3)<=13 AND V12>13) AND FILTER((EMA(V11,3)<=13 AND V12>13),10);

DRAWTEXT (BBO,60,'主力进'),COLORWHITE;

卖临界: STICKLINE(EMA(V11,3)>60 AND EMA(V11,3)>REF(EMA(V11,3),1),100,95,15,1),COLORGREEN;

CCO:=(EMA(V11,3)>=90 AND V12) AND FILTER((EMA(V11,3)>=90 AND V12),10);

DDO:=(EMA(V11,3)>=120 AND V12) AND FILTER((EMA(V11,3)>=120 AND V12),10);

STICKLINE(IF(VB>=0,VB,0)  AND EMA(V11,3)<13,0,15,2.5,0),COLORLIRED;

STICKLINE(IF(VB<=0,VB,0)  AND EMA(V11,3)>90,0,7,3.5,0),COLORGREEN;

STICKLINE( IF(V4>=0,V4,1) AND EMA(V11,3)<13,0,15,2.5,0),COLORLIRED;

STICKLINE(IF(V4<=0,V4,1) AND EMA(V11,3)>90,0,7,3.5,0),COLORLIBLUE,LINETHICK1;

DRAWTEXT (CCO,15,'主力减仓'),COLORLIBLUE;

AA:=(O+H+L+C)/4;

BB:=MA(AA,3);

CC:=SUM(IF(AA>REF(AA,1),AA*VOL,0),4)/SUM(IF(AA<REF(AA,1),AA*VOL,0),4);

DD:=REF(100-(100/(1+CC)),1);

A1N:=HHV(AA,10);

A2N:=LLV(AA,30);

A3N:=A1N-A2N;

A4N:=EMA((AA-A2N)/A3N,1)*100;

B1N:=HHV(AA,16);

B2N:=LLV(AA,90);

B3N:=B1N-B2N;

B4N:=EMA((AA-B2N)/B3N,1)*100;

C1:=HHV(AA,30);

C2:=LLV(AA,240);

C3:=C1-C2;

C4:=EMA((AA-C2)/C3,1)*100;

中线趋势:B4N,COLORMAGENTA,LINETHICK2;

STICKLINE(A4N>90 AND B4N>70,86,94,6,0),COLORYELLOW;

VARE:=REF(LOW,1)*0.9;

VARF:=LOW*0.9;

VAR12:=(VARF*VOL+VARE*(CAPITAL-VOL))/CAPITAL;

VAR13:=EMA(VAR12,30);

VAR14:=CLOSE-REF(CLOSE,1);

VAR15:=MAX(VAR14,0);

VAR16:=ABS(VAR14);

VAR17:=SMA(VAR15,7,1)/SMA(VAR16,7,1)*100;

VAR18:=SMA(VAR15,13,1)/SMA(VAR16,13,1)*100;

VAR19:=BARSCOUNT(CLOSE);

VAR20:=SMA(MAX(VAR14,0),6,1)/SMA(ABS(VAR14),6,1)*100;

VAR21:=(-200)*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60))+100;

VAR1A:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100;

VAR1B:=SMA((SMA(VAR1A,4,1)-50)*2,3,1);

VAR1C:=(INDEXC-LLV(INDEXL,14))/(HHV(INDEXH,14)-LLV(INDEXL,14))*100;

VAR1D:=SMA(VAR1C,4,1);

VAR1E:=SMA(VAR1D,3,1);

VAR1F:=(HHV(HIGH,30)-CLOSE)/CLOSE*100;

VAR22:=VAR20<=25 AND VAR21<-95 AND VAR1F>20 AND VAR1B<-30 AND VAR1E<30 AND VAR11-CLOSE>=-0.25 AND VAR17<22 AND VAR18<28 AND VAR19>50;

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

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

VAR25:=(VAR23-MA(VAR23,70))/(0.015*AVEDEV(VAR23,70));

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

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

STICKLINE(VAR22,0,70,2.5,0),LINETHICK2,COLORMAGENTA;

DRAWTEXT(CROSS(VAR22,0.5) AND COUNT(VAR22=1,10)=1,80,'超级主力建仓!') , COLORMAGENTA;

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

VARFX:=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);

VAR10X:=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);

VAR11X:=VARF<REF(VAR10X,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1);

DRAWTEXT(VAR11X AND COUNT(VAR11X,30)=1,70,'大资金进场'),LINETHICK1,COLORYELLOW;

STICKLINE(VAR11X AND COUNT(VAR11X,30)=1,1,60,2.5,0),COLORYELLOW,LINETHICK2;

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

VAR13X:=(VAR12X-MA(VAR12X,14))/(0.015*AVEDEV(VAR12X,14));

VAR14X:=(VAR12X-MA(VAR12X,70))/(0.015*AVEDEV(VAR12X,70));

VAR15X:=IF(VAR13X>=150 AND VAR13X<200 AND VAR14X>=150 AND VAR14X<200,10,0);

VAR16X:=IF(VAR13X<=-150 AND VAR13X>-200 AND VAR14X<=-150 AND VAR14X>-200,-10,VAR15X);

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

VAR18X:=100-ABS(VAR17X);

VAR19X:=IF(VAR18X<90,VAR18X,100);

VAR1AX:=IF(VAREX>0,VAREX,0);

VAR1BX:=IF(VAR14X>=200 AND VAR13X>=150,15,IF(VAR14X<=-200 AND VAR13X<=-150,-15,VAR16X))+60;

VAR1CX:=VAR1AX>48 AND VAR1BX>60 AND VAR19X<100;

DRAWTEXT(VAR1CX AND COUNT(VAR1CX,30)=1,35,'大资金退场'),LINETHICK1,COLORFFCC66;

STICKLINE(VAR1CX AND COUNT(VAR1CX,30)=1,0,30,2.5,0),COLORFFCC66,LINETHICK2;

爆发线: 80,COLORRED;

强弱分界线:50,COLORGREEN;

中心轴:0;