[通达信指标]九转顶底主图公式

PMA5:MA(C,5),COLORFF8800;

PMA20:MA(C,20),COLORFF11FF;

TTZZ1:=(MA(C,5)-REF(MA(C,5),1))/REF(MA(C,5),1)*1000,COLORFFFFFF,NODRAW;

IF(PMA5>REF(PMA5,1) && PMA5>PMA20,PMA5,DRAWNULL),COLOR0077FF,LINETHICK3;

IF(PMA5>REF(PMA5,1) && (C>PMA5 OR C>O) && TTZZ1>0.5 && PMA5>PMA20,PMA5,DRAWNULL),COLOR0077FF,LINETHICK6,CROSSDOT;

LC:=REF(C,1);

A1:=C>=REF(C,4);

N:=A1 && LC<REF(LC,4);

N1:=REF(N,1)=1 && C>=REF(C,4) AND A1;

N2:=REF(N1,1)=1 && C>=REF(C,4) AND A1;

N3:=REF(N2,1)=1 && C>=REF(C,4) AND A1;

N4:=REF(N3,1)=1 && C>=REF(C,4) AND A1;

N5:=REF(N4,1)=1 && C>=REF(C,4) AND A1;

N6:=REF(N5,1)=1 && C>=REF(C,4) AND A1;

N7:=REF(N6,1)=1 && C>=REF(C,4) AND A1;

N8:=REF(N7,1)=1 && C>=REF(C,4) AND A1;

N9:=REF(N8,1)=1 && C>=REF(C,4) AND A1;

DRAWTEXT(N=1,L*0.982,’1′),COLOR00DDFF;

DRAWTEXT(N1=1,L*0.982,’2′),COLOR00DDFF;

DRAWTEXT(N2=1,L*0.982,’3′),COLOR00DDFF;

DRAWTEXT(N3=1,L*0.982,’4′),COLOR00DDFF;

DRAWTEXT(N4=1,L*0.982,’5′),COLOR00DDFF;

DRAWTEXT(N5=1,L*0.982,’6′),COLOR00DDFF;

DRAWTEXT(N6=1,L*0.982,’7′),COLOR00DDFF;

DRAWTEXT(N7=1,L*0.982,’8′),COLOR00DDFF;

DRAWTEXT(N8=1,L*0.982,’9′),COLOR00DDFF;

DRAWTEXT(N9=1,L*0.982,’10’),COLOR00DDFF;

M:=C<REF(C,4) AND LC>REF(LC,4);

M1:=REF(M,1) && C<REF(C,4) AND LC<REF(LC,4);

M2:=REF(M1,1) && C<REF(C,4) AND LC<REF(LC,4);

M3:=REF(M2,1) && C<REF(C,4) AND LC<REF(LC,4);

M4:=REF(M3,1) && C<REF(C,4) AND LC<REF(LC,4);

M5:=REF(M4,1) && C<REF(C,4) AND LC<REF(LC,4);

M6:=REF(M5,1) && C<REF(C,4) AND LC<REF(LC,4);

M7:=REF(M6,1) && C<REF(C,4) AND LC<REF(LC,4);

M8:=REF(M7,1) && C<REF(C,4) AND LC<REF(LC,4);

M9:=REF(M8,1) && C<REF(C,4) AND LC<REF(LC,4);

DRAWTEXT(M,H*1.02,’1′),COLOR00CC00;

DRAWTEXT(M1,H*1.02,’2′),COLOR00CC00;

DRAWTEXT(M2,H*1.02,’3′),COLOR00CC00;

DRAWTEXT(M3,H*1.02,’4′),COLOR00CC00;

DRAWTEXT(M4,H*1.02,’5′),COLOR00CC00;

DRAWTEXT(M5,H*1.02,’6′),COLOR00CC00;

DRAWTEXT(M6,H*1.02,’7′),COLOR00CC00;

DRAWTEXT(M7,H*1.02,’8′),COLOR00CC00;

DRAWTEXT(M8,H*1.02,’9′),COLOR00CC00;

DRAWTEXT(M9,H*1.02,’10’),COLOR00CC00;

EMA13:=EMA(C,13),COLORWHITE;

EMA21:=EMA(C,21),COLORYELLOW;

EMA34:=EMA(C,34),COLORFF00FF;

EMA60:=MA(C,60),COLORFFCC66;

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

SSTT3:=1;

SSTT4:=LLV(LOW,5); 

SSTT5:=HHV(HIGH,4);

SANHU:=EMA((SSTT2-SSTT4)/(SSTT5-SSTT4)*100,4)*SSTT3;

ZHULI:=EMA(0.667*REF(SANHU,1)+0.333*SANHU,2)*SSTT3;

DRAWTEXT(CROSS(SANHU,ZHULI) AND SANHU<30,L-0.05,’←买入’),COLORLIRED;

DRAWKLINE(H,O,L,C);

DRAWTEXT(CROSS(ZHULI,SANHU) AND SANHU>70,H+0.05,’←卖出’),COLORGREEN;

DRAWICON(CROSS(SANHU,ZHULI) AND SANHU<30,L-0.05,1);

DRAWICON(CROSS(ZHULI,SANHU) AND SANHU>70,H+0.05,2);

SSTT9:=CLOSE-REF(CLOSE,5);

SSTTA:=EMA(EMA(SSTT9,5),5)/EMA(EMA(ABS(SSTT9),5),5);

SSTTC:=EMA(EMA(SSTT9,20),20)/EMA(EMA(ABS(SSTT9),20),20);

SWZB1:=IF(SSTTA>0 AND CROSS(SSTTC,SSTTA),90,100);

DRAWICON(SWZB1<0,H+0.05,2); 

SWZB2:=EMA(CLOSE,2);

SWZB3:=EMA(SLOPE(CLOSE,21)*20+CLOSE,42);

B1:IF(CROSS(SWZB2,SWZB3),L-0.02,DRAWNULL),CROSSDOT,LINETHICK3,COLORMAGENTA;

S1:IF(CROSS(80,RSI)*30,H+0.02,DRAWNULL),CROSSDOT,LINETHICK3,COLORYELLOW;

VC:=((CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100+(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100+(CLOSE-MA (CLOSE,32))/MA(CLOSE,32)*100)/3;

S2:=IF(VC>20 AND FILTER(VC< REF(VC,1),5),H+0.02,DRAWNULL),CIRCLEDOT,LINETHICK3,COLORGREEN;

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

A1MA:EMA(A0,14)COLORBLUE,LINETHICK2;

A2MA:=EMA(A0,25)COLORLIBLUE,LINETHICK2;

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

A2X:=(A2MA-REF(A2MA,1))/REF(A2MA,1)*100,NODRAW;

IF(A1X>=0 AND BARSLAST(CROSS(A1X,0))>0,REF((C+O)/2,BARSLAST(CROSS(A1X,0))),DRAWNULL),COLORMAGENTA{,LINETHICK2};

IF(A1X<0 AND BARSLAST(CROSS(0,A1X))>0,REF((C+O)/2,BARSLAST(CROSS(0,A1X))),DRAWNULL),COLORCYAN,{LINETHICK2};

IF(A1X>=0,A1MA,DRAWNULL)COLORRED,LINETHICK3;

IF(A1X<0 AND A2X<0,A1MA,DRAWNULL)COLORGREEN,LINETHICK3;

STICKLINE(CROSS(A1X,0),H,L,0,0 ),COLOR9933FF;

STICKLINE(CROSS(A1X,0),C,O,3,0 ),COLOR0000CC;

STICKLINE(CROSS(A1X,0),C,O,1,0 ),COLOR0033FF;

STICKLINE(CROSS(0,A1X),L,H,0,0 ),COLOR66CC33;