[通达信指标]新买卖组合主图公式

N:=5;

M:=13;

EE5:=EMA(C,5),LINETHICK2,COLORWHITE;

EE15:=EMA(C,15),POINTDOT,COLORYELLOW,LINETHICK6; 

EE25:=EMA(C,25),LINETHICK2,COLORMAGENTA;  

EMA35:=EMA(C,35),LINETHICK1,COLORCYAN; 

EMA60:=EMA(C,60),LINETHICK1,COLOR0099FF;

DUOX:=EMA(C,120),LINETHICK1,COLORBLUE; 

NIUXX:=EMA(C,250),LINETHICK1,COLORGREEN;

M1:=1000*EE15/EE25<=1115 AND 1000*EE15/EE25>=870; 

M2:=1000*EE25/EMA35<=1115 AND 1000*EE25/EMA35>=875; 

M3:=1000*EMA35/EMA60<=1120 AND 1000*EMA35/EMA60>=880; 

M4:=1000*EMA60/DUOX<=1015 AND 1000*EMA60/DUOX>=885; 

DRAWICON(M1 AND M2 AND M3 AND M4 AND CROSS(EE5,EE15),L-0.20,9); 

TTZZ1:=EMA(C,5),COLORRED,LINETHICK1;  

TTZZ2:=EMA(C,7),COLOR00FF00,LINETHICK1;  

TTZZ3:=EMA(TTZZ2,7),COLORWHITE,LINETHICK1;

TTZZ4:=EMA(((SLOPE(CLOSE,28) * 20) + CLOSE),42),POINTDOT,COLORFF00FF,LINETHICK4;  

V1:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,28))/MA(CLOSE,28);  

V2:=(1-7/100)*(DMA(CLOSE,V1));  

V3:=(1+7/100)*(DMA(CLOSE,V1));  

V5:=MA((LOW+HIGH+CLOSE)/3,5); 

TTZZ5:=REFDATE(V2,DATE),POINTDOT,LINETHICK3,COLORCC66FF;  

TTZZ6:=REFDATE(V3,DATE),POINTDOT,LINETHICK3,COLORGREEN;  

MA1:=MEMA(CLOSE,7);  

MA2:=ATAN((MA1/REF(MA1,1)-1)*100)*180/3.1416;  

MA3:=IF(MA2>0,MA2,MA2);  

MA5:=MA(CLOSE,N),COLOR888899;  

MA13:=MA(CLOSE,M),COLORFF00F0,LINETHICK2;  

SWZB1:=CLOSE=HHV(C,4) AND (REF(C,1)>=REF(C,2) OR REF(C,1)>=REF(C,3))  OR REF(C,1)=HHV(C,4) AND CLOSE>=REF(C,2) OR REF(C,2)=HHV(C,4) AND  REF(C,3)=LLV(C,4) AND C>=REF(C,1) OR REF(C,3)=HHV(C,4) AND  C>=REF(C,1) AND C>=REF(C,2); 

SWZB2:=CLOSE=HHV(C,4) AND REF(C,1)=LLV(C,4); 

SWZB3:=CLOSE=LLV(C,4) AND (REF(C,1)<REF(C,2) OR REF(C,1)<REF(C,3)) OR  REF(C,1)=LLV(C,4) AND C<REF(C,2) OR REF(C,2)=LLV(C,4) AND  REF(C,1)=HHV(C,4) AND C<REF(C,1) OR REF(C,3)=LLV(C,4) AND  C<REF(C,1) AND C<REF(C,2); 

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

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

SWZB6:=V5>REF(V5,1) AND REF(V5,1)<REF(V5,2); 

SWZB7:=LOW<HHV(V5,13) AND HIGH>HHV(V5,13) AND CLOSE>REF(C,1) AND CLOSE>OPEN; 

SWZB8:=SWZB7 AND COUNT(SWZB6,2);  

SWZB9:=100*EMA(EMA(C-REF(C,1),6),6)/EMA(EMA(ABS(C-REF(C,1)),6),6);  

SWZB10:=EMA(MA(C,13),13);  

SWZB11:=FILTER((LLV(SWZB9,2)=LLV(SWZB9,7) AND COUNT(SWZB9<0,2) AND  CROSS(SWZB9,MA(SWZB9,2)))=1,5);  

SWZB12:=FILTER((HHV(SWZB9,2)=HHV(SWZB9,7) AND COUNT(SWZB9>50,2) AND  CROSS(MA(SWZB9,2),SWZB9))=1,1);  

SWZB13:=SMA(EMA((C-REF(C,1))/REF(C,1),5)*100,3,1)*10;  

SWZB14:=FILTER(((CROSS(SWZB13,0) OR CROSS(C,SWZB10)) AND SWZB11)=1,3);  

SWZB15:=MA(C,18)>=REF(MA(C,18),3) AND CROSS(C,MA(C,18));  

SWZB16:=SWZB8 AND NOT(REF(SWZB8,1)); 

TTZZ7:=IF(MA3>REF(MA3,1) AND MA3>=0,MA13,DRAWNULL),COLORYELLOW,LINETHICK2;  

TTZZ8:=IF(MA3<REF(MA3,1) AND MA3>0,MA13,DRAWNULL),COLORGREEN,LINETHICK2;  

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;  

RRES1:=(SWZB14 OR SWZB15) AND SWZB11;  

RRES2:=(SWZB14 OR SWZB15) AND SWZB4;  

RRES3:=(SWZB14 OR SWZB15) AND SWZB2;  

RRES4:=(SWZB2 AND SWZB11) OR (SWZB4 AND SWZB11);  

RRES5:=(CROSS(J,D) AND SWZB4) OR (CROSS(J,D) AND SWZB2) OR (CROSS(J,D) AND SWZB11);  

STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,3.3,0),COLORFF7700;  

STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,2.4,0),COLORFF9900;  

STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,1.3,0),COLORFFBB00;  

STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,0.8,0),COLORCYAN;  

STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3.3,0),COLOR000099;  

STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2.4,0),COLOR0000CC;  

STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1.3,0),COLOR0000FF;  

STICKLINE(CLOSE>OPEN,CLOSE,OPEN,0.8,0),COLORCC66FF;    

STICKLINE(SWZB3,OPEN,(OPEN+CLOSE)/2,3.3,0),COLOR009900;  

STICKLINE(SWZB3,OPEN,(OPEN+CLOSE)/2,2.4,0),COLOR00BB00;    

STICKLINE(SWZB3,OPEN,(OPEN+CLOSE)/2,1.3,0),COLOR00DD00;      

STICKLINE(SWZB3,OPEN,(OPEN+CLOSE)/2,0.8,0),COLOR00FF00; 

STICKLINE(SWZB4,OPEN,(OPEN+CLOSE)/2,3.3,0),COLOR999999;  

STICKLINE(SWZB4,OPEN,(OPEN+CLOSE)/2,2.2,0),COLORBBBBBB;        

STICKLINE(SWZB4,OPEN,(OPEN+CLOSE)/2,1.3,0),COLORDDDDDD;     

STICKLINE(SWZB4,OPEN,(OPEN+CLOSE)/2,0.8,0),COLORFFFFFF;  

STICKLINE(CROSS(J,D),OPEN,CLOSE,1,0),COLORYELLOW;  

STICKLINE(CROSS(D,J),OPEN,CLOSE,1,0),COLOR000099;  

DRAWICON(SWZB16,LOW-0.02,7);  

DRAWICON(RRES1 OR RRES2 OR RRES3 OR RRES4 OR RRES5,LOW-0.01,1);  

DRAWICON(CROSS(D,J) OR SWZB12 OR CROSS(40,SWZB9),HIGH+0.01,2);   

X1:=(C+L+H)/3;  

BB13:=ATAN(EMA(X1,13)-REF(EMA(X1,13),1))*3.1416*10;  

EMA8:=EMA(C,8);  

DRAWTEXT(FILTER(BB13>1 AND EMA(X1,13)>REF(EMA(X1,8),1),10),  EMA8,’∠45升’),COLORWHITE;   

SWZB81:=1;  

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

SWZB84:=LLV(LOW,7);  

SWZB85:=HHV(HIGH,6);  

C1:=(EMA((((SWZB82-SWZB84)/(SWZB85-SWZB84))*100),6)*SWZB81),COLORFF00FF,LINETHICK2;  

C2:=(EMA(((0.667*REF(C1,1))+(0.333*C1)),3)*SWZB81),COLORFFFFFF,LINETHICK2;  

CCE3:=CROSS(C1,C2) AND C1<40;  

CCE4:=CROSS(C2,C1) AND C1>90;  

TJ1:=CROSS(C1,C2);  

TJ2:=CROSS(C2,C1);  

TJ3:=CROSS(C1,C2) AND REF(C1,1)<20;  

TJ4:=CROSS(C2,C1) AND REF(C1,1)>80;  

DRAWTEXT(CCE4,H*1.02,’S’),COLORBLUE; 

DRAWTEXT(TJ3,L*0.98,’买底’),COLORFF00FF;  

DRAWTEXT(TJ4,H*1.02,’逃顶’),COLORGREEN;   

E1:=BARSCOUNT(C);  

AH:=HHV(H,200);  

AL:=LLV(L,200);  

B0:=(AH-AL)/40;  

KB1:=H+B0;  

KB2:=L-B0;  

STICKLINE((E1+0)/34=FLOOR((E1+0)/34),KB2,KB2-0.8*B0,1,0),COLORYELLOW,LINETHICK3;  

DRAWTEXT((E1+0)/34=FLOOR((E1+0)/34),KB2-B0,’时窗’),COLORYELLOW;   

CCE5:=EMA(CLOSE,89),COLOR3399FF;  

AAA:=(3*C+H+L+O)/6;  

CCE:=(8*AAA+7*REF(AAA,1)+6*REF(AAA,2)+5*REF(AAA,3)+4*REF(AAA,4)+3*REF(AAA,5)+2*REF(AAA,6)+REF(AAA,8))/36;  

CCE7:=(LLV(CCE,2)+LLV(CCE,4)+LLV(CCE,6))/3;  

TTJ1:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>CCE;  

CCE8:=FILTER(TTJ1,5); 

TTJ2:=IF(BARSLAST(CCE8)=1 AND CLOSE>REF(HIGH,1),1,IF(BARSLAST(CCE8)=2 AND CLOSE>REF(HIGH,2),1,IF(BARSLAST(CCE8)=3 AND CLOSE>REF(HIGH,3),1,0)));  

TTJ3:=IF(BARSLAST(CCE8)=1 AND CLOSE>REF(LOW,1),1,IF(BARSLAST(CCE8)=2 AND CLOSE>REF(LOW,2),1,IF(BARSLAST(CCE8)=3 AND CLOSE>REF(LOW,3),1,0)));  

CCE9:=FILTER(TTJ3=1 AND TTJ2=1,3);  

DRAWICON(CCE9,L*0.91,1); 

DRAWTEXT(CCE9,L*0.91,’立桩’),COLORFF26FF;  

MA(C,9),LINETHICK0,COLORYELLOW;  

MA(C,21),LINETHICK0,COLORRED;  

IF(MA(C,9)<REF(MA(C,9),1),MA(C,9),DRAWNULL),LINETHICK0,COLORBLUE;  

IF(MA(C,21)<REF(MA(C,21),1),MA(C,21),DRAWNULL),LINETHICK0,COLORGREEN;  

DRAWTEXT(CROSS(MA(C,3),MA(C,9)) AND C>=REF(C,1)  AND C>O,L*0.98,’追加’),COLORMAGENTA;