通达信自用主图源码贴图 EA-万能指标公式

本人认为很有参考意义，带给大家。主图有明显的多空趋势带，并且只有工作线在生命线之上并回调的时候才开新仓，简单明了，操作方便

r 工作线:(EMA(C,14)),LINETHICK2,COLORYELLOW;
r生命线:(MA(C,25)) ,LINETHICK1,COLORMAGENTA;
r高:= HHV(EMA(EMA(EMA(EMA(EMA(L,2),2),2),2),2),2),COLORLIBLUE,LINETHICK1;
r低:= LLV(EMA(EMA(EMA(EMA(EMA(L,2),2),2),2),2),1),COLORRED,LINETHICK2;
r {30分钟MA}
r MA4:=MA(C,4),COLORBLUE,LINETHICK4;
r A8:=MA(C,8),COLORRED;
r A24:=MA(C,24),COLORRED;
r A40:=MA(C,40);
r A80:=MA(C,80);
r A160:=MA(C,160);
r DK:=A8;
r买:=IF(MA4>REF(MA4,1),MA4,DRAWNULL),COLORRED,LINETHICK4;
r卖:=IF(MA4<REF(MA4,1),MA4,DRAWNULL),COLORGREEN,LINETHICK4;
r牛熊分界线:=EMA(CLOSE,50),LINETHICK1,COLORRED;
r {NO.2}
r VAR31:=(3*CLOSE+LOW+OPEN+HIGH)/6;
r VAR41:=(20*VAR31+19*REF(VAR31,1)+18*REF(VAR31,2)+17*REF(VAR31,3)+16*REF(VAR31,4)+15*REF(VAR31,5)+14*REF(VAR31,6)+13*REF(VAR31,7)+12*REF(VAR31,8)+11*REF(VAR31,9)+10*REF(VAR31,10)+9*REF(VAR31,11)+8*REF(VAR31,12)+7*REF(VAR31,13)+6*REF(VAR31,14)+5*REF(VAR31,15)+4*REF(VAR31,16)+3*REF(VAR31,17)+2*REF(VAR31,18)+REF(VAR31,20))/210,COLORRED;
r VAR51:=MA(VAR41,6),COLORGREEN;
r DRAWBAND(VAR41,RGB(155,50,50),VAR51,RGB(0,100,50));
r红线:VAR41,COLORRED;
r绿线:VAR51,COLORGREEN;

X1:=(C+L+H)/1.5;
r X2:=EMA(X1,3);
r X3:=EMA(X2,2.5);

DIFF1:=EMA(CLOSE,12)-EMA(CLOSE,26);
r DEA1:=EMA(DIFF1,9);

CBFB:=COSTEX(C,REF(C,1));
r JL:=IF(C>CBFB,V,0);
r CL:=IF(C<CBFB,V,0);
r JLH:=SUM(JL,4);
r CLH:=SUM(CL,4);
r LHB:=CLH/JLH;
r TJ1:=IF(HHV(LHB,5)>4 AND CROSS(2,LHB) AND C>=O,1,0);

VAR1:=EMA((C-(LLV(L,25)))/((HHV(H,25))-(LLV(L,25)))*100,5);
r VAR2:=VAR1,COLORRED,LINETHICK2;
r VAR3:=MA((V-REF(V,1))/REF(V,1),5);
r VAR4:=(C-MA(C,24))/MA(C,24)*100;
r VAR5:=VAR4*(1+VAR3);
r VAR6:=REF(VOL,1);
r VAR7:=SMA(MAX(VOL-VAR6,0),6,1)/SMA(ABS(VOL-VAR6),6,1)*100;
r VAR8:=VAR5>REF(VAR5,1) AND VAR2<REF(VAR2,1) AND VAR7>REF(VAR7,1);
r VAR9:=VAR5<REF(VAR5,1) AND VAR2>REF(VAR2,1) AND VAR7>REF(VAR7,1);
r VAR10:=VAR5>REF(VAR5,1) AND VAR2<REF(VAR2,1) AND VAR7<REF(VAR7,1);
r VAR11:=VAR5<REF(VAR5,1) AND VAR2>REF(VAR2,1) AND VAR7<REF(VAR7,1);
r VAR12:=VAR5>REF(VAR5,1);
r VAR13:=VAR5<REF(VAR5,1);
r VAR14:=L<HHV(H,60)*0.6 OR L<HHV(H,50)*0.65 OR L<HHV(H,40)*0.7 OR L<HHV(H,30)*0.75 OR L<HHV(H,20)*0.8
r OR L<HHV(H,10)*0.85
r AND (H-L)/REF(C,1)>0.08
r AND V>MA(V,135)
r AND VAR2<40
r AND VAR5>REF(VAR5,1);
r VAR15:=H<MA(C,20) OR CROSS(MA(C,5),MA(C,10));
r VAR16:=SUM(MAX(0,HIGH-(REF(HIGH+LOW,1)/2)),26)/SUM(MAX(0,(REF(HIGH+LOW,1)/2)-LOW),26)*100<40
r OR 100*((SUM(IF(CLOSE>REF(CLOSE,1),VOL,0),26))*2+(SUM(IF(CLOSE=REF(CLOSE,1),VOL,0),26)))/((SUM(IF(CLOSE<REF(CLOSE,1),
r VOL,0),26))*2+(SUM(IF(CLOSE=REF(CLOSE,1),VOL,0),26)))<40
r OR SUM(MAX(0,HIGH-REF(CLOSE,1)),26)/SUM(MAX(0,REF(CLOSE,1)-LOW),26)*100<40
r OR SUM(HIGH-OPEN,26)/SUM(OPEN-LOW,26)*100<40;
r VAR17:=CROSS(82,SMA(MAX(C-(REF(C,1)),0),6,1)/SMA(ABS(C-(REF(C,1))),6,1)*100);
r VAR18:=CROSS((SMA(MAX(CLOSE-(REF(CLOSE,1)),0),6,1)/SMA(ABS(CLOSE-(REF(CLOSE,1))),6,1)*100),20);

EMA7:=EMA(C,7),COLOR00FF00;
r EMA14:=EMA(C,14),COLORWHITE;
r EMA21:=EMA(C,21),COLORYELLOW;
r ZMA7:=EMA(C,35),COLORFF00FF;
r ZMA14:=EMA(C,70),COLORFFCCCC;
r ZMA34:=EMA(C,170),COLORFFCC66;
r VV1:=EMA(C,35)>EMA(C,70) AND EMA(C,35)>EMA(C,170) AND EMA(C,170)>REF(EMA(C,170),1);
r VV2:=VV1 AND CROSS(EMA(C,70),EMA(C,170));

RSV1:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100;
r K11:=SMA(RSV1,5,1);
r D11:=SMA(K11,5,1);
r J11:=3*K11-2*D11;
r AA11:=EMA(J11,5);
r AA22:=REF(AA11,1);
r RSV2:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
r K22:=SMA(RSV2,3,1);
r D22:=SMA(K22,3,1);
r J22:=3*K22-2*D22;
r BB11:=EMA(J22,5);
r BB22:=REF(BB11,1);
r DD:=AA11>AA22 AND BB11>BB22;
r注意买入:=DD AND NOT(REF(DD,1)) AND (AA11<50 OR BB11<50);
r注意卖出:=REF(DD,1)=1 AND NOT(DD);

VAR1A:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,9);
r VAR2A:=REF(VAR1A,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
r VAR3A:=REF(VAR2A,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
r VAR4A:=REF(VAR3A,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
r VAR5A:=REF(VAR4A,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
r VAR6A:=REF(VAR5A,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
r VAR7A:=REF(VAR6A,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
r VAR8A:=REF(VAR7A,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
r VAR9A:=REF(VAR8A,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
r VARAA:=REF(VAR9A,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
r VARBA:=REF(VARAA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
r VARCA:=REF(VARBA,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
r VARDA:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);
r VAREA:=REF(VARDA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
r VARFA:=REF(VAREA,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
r VAR10A:=REF(VARFA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
r VAR11A:=REF(VAR10A,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
r VAR12A:=REF(VAR11A,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
r VAR13A:=REF(VAR12A,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
r VAR14A:=REF(VAR13A,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
r VAR15A:=REF(VAR14A,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
r VAR16A:=REF(VAR15A,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
r VAR17A:=REF(VAR16A,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
r VAR18A:=REF(VAR17A,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
r VAR19A:=REF(VARDA OR VAREA OR VARFA OR VAR10A OR VAR11A OR VAR12A OR VAR13A OR
r VAR14A OR VAR15A OR VAR16A OR VAR17A OR VAR18A,1) AND VAR1A;
r MA1V:=MA(C,6),COLORRED;
r AV:=C-MA1V;
r A1V:=CROSS(AV,0);

RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
r K:=SMA(RSV,3,1);
r D:=SMA(K,3,1);
r J:=3*K-2*D;
r X:=LLV(J,2)=LLV(J,8);
r Y:=IF(CROSS(J,REF(J+0.01,1)) AND X AND J<20,30,0);
r主力:=EMA( (CLOSE-MA(CLOSE,3))/MA(CLOSE,3),2);
r散户:=EMA( (CLOSE-MA(CLOSE,20))/MA(CLOSE,20),7);
r VAR20:=LLV(LOW,10);
r VAR21:=HHV(HIGH,25);
r动能趋势线:=100*EMA((CLOSE-VAR20)/(VAR21-VAR20),4);

STICKLINE(DK<=C AND CLOSE>=OPEN,HIGH,LOW,0,1),COLORRED;
r STICKLINE(DK<=C AND CLOSE>=OPEN,CLOSE,OPEN,3.2,0),COLOR6600FF;
r STICKLINE(DK<=C AND CLOSE>=OPEN,CLOSE,OPEN,2.7,0),COLORDD33FF;
r STICKLINE(DK<=C AND CLOSE>=OPEN,CLOSE,OPEN,2.1,0),COLORFF55FF;
r STICKLINE(DK<=C AND CLOSE>=OPEN,CLOSE,OPEN,1.5,0),COLORFF88FF;
r STICKLINE(DK<=C AND CLOSE>=OPEN,CLOSE,OPEN,0.9,0),COLORFFAAFF;
r STICKLINE(DK<=C AND CLOSE>=OPEN,CLOSE,OPEN,0.3,0),COLORFFCCFF;
r STICKLINE(DK<=C AND CLOSE<OPEN,HIGH,LOW,0,1),COLORRED;
r STICKLINE(DK<=C AND CLOSE<OPEN,CLOSE,OPEN,3.2,0),COLOR000033;
r STICKLINE(DK<=C AND CLOSE<OPEN,CLOSE,OPEN,2.7,0),COLOR000066;
r STICKLINE(DK<=C AND CLOSE<OPEN,CLOSE,OPEN,2.1,0),COLOR000099;
r STICKLINE(DK<=C AND CLOSE<OPEN,CLOSE,OPEN,1.5,0),COLOR0000CC;
r STICKLINE(DK<=C AND CLOSE<OPEN,CLOSE,OPEN,0.9,0),COLOR0000FF;
r STICKLINE(DK<=C AND CLOSE<OPEN,CLOSE,OPEN,0.3,0),COLORCC66FF;
r STICKLINE(DK>C AND CLOSE>=OPEN,HIGH,LOW,0,1),COLORGREEN;
r STICKLINE(DK>C AND CLOSE>=OPEN,CLOSE,OPEN,3.2,0 ),COLOR990000;
r STICKLINE(DK>C AND CLOSE>=OPEN,CLOSE,OPEN,2.7,0 ),COLORCC0000;
r STICKLINE(DK>C AND CLOSE>=OPEN,CLOSE,OPEN,2.1,0),COLORFF4400;
r STICKLINE(DK>C AND CLOSE>=OPEN,CLOSE,OPEN,1.5,0 ),COLORFF8800;
r STICKLINE(DK>C AND CLOSE>=OPEN,CLOSE,OPEN,0.9,0 ),COLORFFCC00;
r STICKLINE(DK>C AND CLOSE>=OPEN,CLOSE,OPEN,0.3,0 ),COLORCYAN;
r STICKLINE(DK>C AND CLOSE<OPEN,HIGH,LOW,0,1),COLORWHITE;
r STICKLINE(DK>C AND CLOSE<OPEN,CLOSE,OPEN,3.2,0 ),COLOR555555;
r STICKLINE(DK>C AND CLOSE<OPEN,CLOSE,OPEN,2.7,0 ),COLOR777777;
r STICKLINE(DK>C AND CLOSE<OPEN,CLOSE,OPEN,2.1,0 ),COLOR999999;
r STICKLINE(DK>C AND CLOSE<OPEN,CLOSE,OPEN,1.5,0 ),COLOR999999;
r STICKLINE(DK>C AND CLOSE<OPEN,CLOSE,OPEN,0.9,0 ),COLORDDDDDD;
r STICKLINE(DK>C AND CLOSE<OPEN,CLOSE,OPEN,0.3,0 ),COLORFFFFFF;