源码
大机构仓位: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,机构趋势,5,0),COLOR0000FF;
STICKLINE(B1-机构趋势<0,B1,机构趋势,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,5,0),COLORLIRED;
STICKLINE(IF(VB<=0,VB,0) AND EMA(V11,3)>90,0,7,10,0),COLORGREEN;
STICKLINE( IF(V4>=0,V4,1) AND EMA(V11,3)<13,0,15,5,0),COLORLIRED;
STICKLINE(IF(V4<=0,V4,1) AND EMA(V11,3)>90,0,7,10,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,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,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,5,0),COLORFFCC66,LINETHICK2;
爆发线: 80,COLORRED;
强弱分界线:50,COLORGREEN;
中心轴:0;
