分享

[通达信指标]主力建仓 主力进主图公式 主力行为一网打尽

 新用户5173uwrS 2024-05-01 发布于安徽

注意本指标源码用于通达信。

图片
图片

指标源码

图片
图片

01


HHJSJDA:=(3*CLOSE+OPEN+LOW+HIGH)/6;

HHJSJDB:(20*HHJSJDA+19*REF(HHJSJDA,1)+18*REF(HHJSJDA,2)+17*REF(HHJSJDA,3)+16*REF(HHJSJDA,4)+15*REF(HHJSJDA,5)+14*REF(HHJSJDA,6)+13*REF(HHJSJDA,7)+12*REF(HHJSJDA,8)+11*REF(HHJSJDA,9)+10*REF(HHJSJDA,10)+9*REF(HHJSJDA,11)+8*REF(HHJSJDA,12)+7*REF(HHJSJDA,13)+6*REF(HHJSJDA,14)+5*REF(HHJSJDA,15)+4*REF(HHJSJDA,16)+3*REF(HHJSJDA,17)+2*REF(HHJSJDA,18)+REF(HHJSJDA,20))/210,COLORYELLOW;

HHJSJDC:MA(HHJSJDB,5),COLORRED;

TSM1:=IF(O=C AND (C-REF(C,1))/REF(C,1)*100>9.8,AMOUNT,AMOUNT/((H-L)*2-ABS(O-C))*(C-L));

TSM%:=TSM1/AMOUNT*100;

LIURU1:=AMOUNT*TSM%/10000000000;

LIUCHU1:=AMOUNT/100000000-LIURU1;

JINGLIU:=(LIURU1-LIUCHU1);

AMOUNT3:=SUM(AMOUNT,3);

LIURU3:=SUM(LIURU1,3);

LIUCHU3:=SUM(LIUCHU1,3);

JINGLIU3:=SUM(LIURU1-LIUCHU1,3);

AMOUNT5:=SUM(AMOUNT,5);

LIURU5:=SUM(LIURU1,5);

LIUCHU5:=SUM(LIUCHU1,5);

JINGLIU5:=SUM(LIURU1-LIUCHU1,5);

AMOUNT10:=SUM(AMOUNT,10);

LIURU10:=SUM(LIURU1,10);

LIUCHU10:=SUM(LIUCHU1,10);

JINGLIU10:=SUM(LIURU1-LIUCHU1,10);

MA1:=MA(C,1);

MA2:=MA(C,2);

MA3:=MA(C,3);

MA4:=MA(C,5);

MA52:=MA(C,8);

MA62:=MA(C,13);

JUNXIAN:MA((MA1+MA2+MA3+MA4+MA52+MA62)/6,5),COLORMAGENTA,LINETHICK2;

TT2:=DMA((((HIGH + LOW) + (CLOSE * 2)) / 4.15),0.9);

TT1:=REF(EMA(TT2,3),1);

RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;

K:=SMA(RSV,3,1);

D:=SMA(K,3,1);

J:=3*K-2*D;

LC:=REF(CLOSE,1);

RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);

FF:=EMA(CLOSE,3);

AA1:=AMOUNT/VOL;

BB1:=L<AA1*0.9;

CC1:=(C-REF(C,1))/REF(C,1)*100>1.2;

DD1:=L<MA(C,5)*0.921;

EE1:=VOL<MA(V,5)*1.5;

FF1:=BB1 AND CC1 AND DD1 AND EE1;

F:=100*(C-REF(C,1))/REF(C,1);

P1:=IF(C<REF(O,1) AND F<0,1,0);

P2:=IF(C<REF(O,2) AND F<0,1,0);

TT3:=P1=0 AND REF(P1,1)=1 AND P2=0 AND REF(P2,1)=1 ;

TT4:=P1=1 AND REF(P1,1)=0 AND P2=1 AND REF(P2,1)=0 ;

Z1:=MA(C,13);

ZX:=REF(Z1,13/2+1);

DRAWTEXT(CROSS(CLOSE,TT1)AND J<55,LOW,'买'),COLORRED;

STICKLINE(TT3,OPEN,CLOSE,3,0),COLORFF00FF;

A1:=EMA(C,14)COLORWHITE,LINETHICK1;

A1X:=(A1-REF(A1,1))/REF(A1,1)*100,NODRAW;

STICKLINE(CROSS(A1X,0),C,O,2,0)COLORYELLOW;

STICKLINE(CROSS(0,A1X),C,O,2,0)COLORGREEN;

AZ:=BARSCOUNT(CLOSE);

AH:=HHV(HIGH,144);

AL:=LLV(LOW,144);

B0:=(AH-AL)/34;

BL1:=HIGH+B0;

BL2:=LOW-B0;

STICKLINE((AZ+0)/34=FLOOR((AZ+0)/34),BL2,BL2-2*B0,2,0),COLORFFFFFF;

DRAWTEXT((AZ+0)/34=FLOOR((AZ+0)/34),BL2-4*B0,'窗'),COLORFFFFFF;

VAR3:=REF(C,1)=LLV(C,4) AND C>=REF(C,2) OR REF(C,2)=LLV(C,4) AND REF(C,1)<=REF(C,3) AND REF(C,2)<REF(C,4) AND C>=REF(C,1);

STICKLINE(VAR3,O,(O+C)/2,2.5,0),COLOR00BB00;

STICKLINE(VAR3,O,(O+C)/2,0.2,0),COLOR00FF00;

MTM:=C-REF(C,1);

DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);

TSM:=LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2));

TSMXIAN:=EMA(CLOSE,2);

TTMXIAN:=EMA(SLOPE(CLOSE,32)*20+CLOSE,56),LINETHICK0;

BU:=CROSS(TSMXIAN,TTMXIAN);

SEL:=CROSS(TTMXIAN,TSMXIAN);

DRAWTEXT (BU,LOW*0.989,'点'),COLORYELLOW,LINETHICK3;

STICKLINE(CROSS(TSMXIAN,TTMXIAN),OPEN,CLOSE,2,0),COLORYELLOW;

AA:=CROSS(MA(C,5),MA(C,21)) AND CROSS(MA(C,5),MA(C,34)) AND CROSS(MA(C,5),MA(C,55));

BB:=MA(C,55)>MA(C,13) AND CROSS(MA(C,13),MA(C,34)) AND MA(C,34)>MA(C,21) AND ABS(MA(C,55)-MA(C,21))/MA(C,21)<0.05;

CC:=MA(C,34)>MA(C,5) AND CROSS(MA(C,5),MA(C,21)) AND MA(C,21)>MA(C,13);

DD:=ABS((MA(C,5)-MA(C,13))+(MA(C,13)-MA(C,21))+(MA(C,21)-MA(C,34)))<0.02 AND MA(C,5)>REF(MA(C,5),1) AND MA(C,13)>REF(MA(C,13),1);

EE:=MA(C,21)>MA(C,5) AND CROSS(MA(C,5),MA(C,13)) AND MA(C,13)>MA(C,55) AND ABS(MA(C,21)-MA(C,55))/MA(C,55)<0.05;

FFF:=AA OR BB OR CC OR DD OR EE ;

TANCE:=FFF AND FILTER( FFF,8);

DRAWTEXT(TANCE,L*0.978,'●'),COLORRED;

STICKLINE(TANCE,O,C,3,0),LINETHICK2,COLORWHITE;

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

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

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

MTJ4:=((MTJ2)/(MTJ1))*(100)-70;

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

MTJ7:=SMA(((MTJ3)/(MTJ1))*(100),3,1);

MTJ8:=LLV(LOW,34);

MTJ9:=SMA(MTJ7,3,1)-SMA(MTJ4,9,1);

MTJ10:=IF((MTJ9>100),MTJ9-100,0);

MTJ11:=HHV(HIGH,34);

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

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

V3:=EMA(V2,5);

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

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;

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

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

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

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

BBZ:=MA(AAZ,3);

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

DDZ:=REF(100-(100/(1+CCZ)),1);

A1N:=HHV(AAZ,10);

A2N:=LLV(AAZ,30);

A3N:=A1N-A2N;

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

B1N:=HHV(AAZ,16);

B2N:=LLV(AAZ,90);

B3N:=B1N-B2N;

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

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

MTJF:=LOW*0.9;

MTJ12:=(MTJF*VOL+MTJE*(VOL));

MTJ13:=EMA(MTJ12,30);

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

MTJ15:=MAX(MTJ14,0);

MTJ16:=ABS(MTJ14);

MTJ17:=SMA(MTJ15,7,1)/SMA(MTJ16,7,1)*100;

MTJ18:=SMA(MTJ15,13,1)/SMA(MTJ16,13,1)*100;

MTJ19:=BARSCOUNT(CLOSE);

MTJ20:=SMA(MAX(MTJ14,0),6,1)/SMA(ABS(MTJ14),6,1)*100;

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

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

MTJ1B:=SMA((SMA(MTJ1A,4,1)-50)*2,3,1);

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

MTJ1D:=SMA(MTJ1C,4,1);

MTJ1E:=SMA(MTJ1D,3,1);

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

MTJ22:=MTJ20<=25 AND MTJ21<-95 AND MTJ1F>20 AND MTJ1B<-30 AND MTJ1E<30 AND MTJ11-CLOSE>=-0.25 AND MTJ17<22 AND MTJ18<28 AND MTJ19>50;

DRAWTEXT(CROSS(MTJ22,0.5) AND COUNT(MTJ22=1,10)=1,L,'主力建仓') , COLORMAGENTA;

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

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

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

MTJ11X:=MTJF<REF(MTJ10X,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1);

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

图片
图片
图片

图片示例

图片
图片

图片

风险提示:本指标公式仅作为知识分享,供交流学习使用,不构成任何投资建议,不作为投资依据。  

图片

    本站是提供个人知识管理的网络存储空间,所有内容均由用户发布,不代表本站观点。请注意甄别内容中的联系方式、诱导购买等信息,谨防诈骗。如发现有害或侵权内容,请点击一键举报。
    转藏 分享 献花(0

    0条评论

    发表

    请遵守用户 评论公约

    类似文章 更多