主图叠加量－精品通达信指标公式源码分享

MA5:MA(CLOSE,5);   

MA10:MA(CLOSE,10);   

MA30:MA(CLOSE,30);   

MA60:MA(CLOSE,60);   

红轨道:=MA(MA(CLOSE,3),1),LINETHICK1,COLORYELLOW;   

绿轨道:=MA(MA(CLOSE,3),3);   

上升:IF(红轨道>=绿轨道,绿轨道,DRAWNULL),COLORRED,LINETHICK2;   

AA1:=3*SMA((C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100,3,1)-2*SMA(SMA((C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100,3,1),3,1);   

加仓:=IF(CROSS(AA1,REF(AA1+0.01,1)) AND LLV(AA1,2)=LLV(AA1,8) AND BETWEEN(AA1,20,60),1,0);   

波段底:=(3)*(SMA(((CLOSE - LLV(LOW,27))/(HHV(HIGH,27) - LLV(LOW,27)))*(100),5,1)) -   

(2)*(SMA(SMA(((CLOSE - LLV(LOW,27))/(HHV(HIGH,27) - LLV(LOW,27)))*(100),5,1),3,1));   

DRAWICON(加仓,L*0.97,7);   

DRAWICON(CROSS(波段底,3),L*0.97,1);   

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

X:=(20*A+19*REF(A,1)+18*REF(A,2)+17*REF(A,3)+16*REF(A,4)+15*REF(A,5)+   

14*REF(A,6)+13*REF(A,7)+12*REF(A,8)+11*REF(A,9)+10*REF(A,10)+9*REF(A,11)+8*REF(A,12)   

+7*REF(A,13)+6*REF(A,14)+5*REF(A,15)+4*REF(A,16)+3*REF(A,17)+2*REF(A,18)+   

REF(A,20))/210;   

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

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

CB:=EMA(X,13);   

卖:=IF(HHV(DX,2)=HHV(DX,7) AND COUNT(DX>50,2) AND CROSS(MA(DX,2),DX),1,0);   

DRAWTEXT(FILTER(卖=1,1),HIGH*1.02,'卖'),COLORWHITE;   

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

DRAWTEXT(FILTER(买=1,5),LOW-0.03,'买'),COLORRED;   

RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;   

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

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

J:=3*K-2*D;   

BDGD:=HHV(J,2)=HHV(J,8) AND J>80;   

注意:=IF(CROSS(REF(J-0.01,1),J) AND REF(BDGD,1),1,0);   

DRAWTEXT(注意 AND 卖!=1,HIGH*1.02,'减'),COLORLIBLUE;   

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

DRAWTEXT(FILTER((CROSS(加仓A,0) OR CROSS(CLOSE,CB)) AND 买!=1,3),LOW-0.03,'加'),COLOR0080FF;   

MA18:=MA(C,18);   

跟:=IF(MA18>=REF(MA18,3) AND CROSS(CLOSE,MA18),1,0);   

DRAWTEXT(MA18>=REF(MA18,3) AND CROSS(CLOSE,MA18),LOW*0.96,'跟'),COLOR7F52AF;   

买价:=((C-REF(MA5,1))/5+MA5)*1.004;     

买条件:=CROSS(C,买价) AND 买价>REF(买价,1);     

醉白K买进:IF(买条件,L,H),COLORWHITE,POINTDOT;     

STICKLINE(买条件,H,L,0,1),COLORWHITE,LINETHICK2;     

STICKLINE(买条件,O,C,4,1),COLORWHITE,LINETHICK2;     

加码价:=((C-REF(MA10,1))/20+MA10)*1.004;     

加码条件:=CROSS(C,加码价) AND 加码价>REF(加码价,1);     

醉黄K加码:IF(加码条件,L,H),COLORYELLOW,POINTDOT;     

STICKLINE(加码条件,H,L,0,1),COLORYELLOW,LINETHICK2;     

STICKLINE(加码条件,O,C,4,1),COLORYELLOW,LINETHICK2;   

HH0:=CONST(HHV(H,120))*1;   

LL0:=CONST(LLV(L,120))*1;   

MM0:=CONST((HH0+LL0)/2);   

HH1:=IF(CONST(C)<MM0,LL0-(HH0-LL0)*0.4,LL0-(HH0-LL0)*0.4),COLORRED;   

LL1:=LL0;HLMAX:=MAX(HH1,LL1);   

HLMIN:=MIN(HH1,LL1);   

HLMN1:=(HLMAX+HLMIN)/2;   

HLMN2:=(HLMAX-HLMIN);   

HLMN3:=HHV(V,250)/2;   

HLMN4:=HHV(V,250);   

VZ:=(V-HLMN3)*HLMN2/HLMN4+HLMN1;   

STICKLINE(C>=O,VZ,(0-HLMN3)*HLMN2/HLMN4+HLMN1,2.5,1),COLORRED;   

STICKLINE(C<O,VZ,(0-HLMN3)*HLMN2/HLMN4+HLMN1,2.5,0),COLORCYAN;   

(MA(V,5)-HLMN3)*HLMN2/HLMN4+HLMN1,COLORFFFFFF;   

(MA(V,10)-HLMN3)*HLMN2/HLMN4+HLMN1,COLOR00FFFF;   

T:=V=LLV(V,20);   

DRAWICON(T,(V-HLMN3)*HLMN2/HLMN4+HLMN1,1);    

STICKLINE(C/REF(C,1)>1.099,VZ,(0-HLMN3)*HLMN2/HLMN4+HLMN1,2,0),COLORRED;   

STICKLINE(C/REF(C,1)<0.901,VZ,(0-HLMN3)*HLMN2/HLMN4+HLMN1,2,0),COLORGREEN;   

VY:=(0-HLMN3)*HLMN2/HLMN4+HLMN1;    

STICKLINE(V>=2*REF(V,1),VZ,VY,0.3,0),COLORWHITE;    

STICKLINE(V>=3*REF(V,1),VZ,VY,0.3,0),COLORYELLOW;     

MA13:=MA(C,3);   

UU:=1,V<=LLV(V,13) AND MA13>REF(MA13,1);   

TJ:=1,REF(V,1)<=LLV(V,13) AND MA13>REF(MA13,1),COLORRED,LINETHICK3;   

DRAWTEXT(TJ=1,(V-HLMN3)*HLMN2/HLMN4+HLMN1+0.2,'买')COLORMAGENTA;     

地:(0-HLMN3)*HLMN2/HLMN4+HLMN1-0.7,COLORBLACK;   

天:CONST(HHV(C,120))*1+0.7,COLORBLACK;   

BIAS11:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100;   

BIAS12:=(CLOSE-MA(CLOSE,12))/MA(CLOSE,12)*100;   

BIAS13:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;   

短跌BIAS:IF(BIAS11<=-6,0.6+地,地),COLORBLACK,LINETHICK2;   

中跌BIAS:IF(BIAS12<=-10,0.6+地,地),COLORBLUE,LINETHICK2;   

长跌BIAS:IF(BIAS13<=-16,0.6+地,地),COLORRED,LINETHICK2;   

短涨BIAS:IF(BIAS11>=6,天,天+0.6),COLORBLACK,LINETHICK2;   

中涨BIAS:IF(BIAS12>=10,天,天+0.6),COLORBLUE,LINETHICK2;   

长涨BIAS:IF(BIAS13>=16,天,天+0.6),COLORRED,LINETHICK2;     

BIAS1:=(C-MA(C,6))/MA(C,6)*100;   

BIAS2:=(C-MA(C,12))/MA(C,12)*100;   

BIAS3:=(C-MA(C,24))/MA(C,24)*100;   

BIAS:=(BIAS1+2*BIAS2+3*BIAS3)/6;   

乖离:=MA(BIAS,3);   

DRAWTEXT(CROSS(BIAS,乖离)  AND 乖离<-9,(V-HLMN3)*HLMN2/HLMN4+HLMN1+0.2,'底'),COLORRED;