通达信趋势线主图源码

以下是通达信趋势线主图源码

 {趋势线主图}

短线:EMA(CLOSE,4),COLORFF00FF;

生命:EMA(CLOSE,13),COLORWHITE,LINETHICK2;

趋势:EMA(SLOPE(C,21)*20+C,42),COLORYELLOW,LINETHICK2;

中线:EMA(CLOSE,21),COLOR00FF00,LINETHICK3;

神线:MA(C,72),COLORRED;

年线:MA(C,250),COLORBLUE;

{红点妖股系统:2015.12,COLORRED;}

MA1:=MA(CLOSE,5),COLORFF00FF;

QS1:=EMA(SLOPE(C,21)*20+C,42)*0.91 ;

MA4:=EMA(CLOSE,13),COLORWHITE,LINETHICK2;

MA3:=EMA(CLOSE,40),LINETHICK4;

QS:=EMA(SLOPE(C,21)*20+C,42),COLORYELLOW,LINETHICK3;

XX3:=EMA(C,30)*1.09,COLORBLUE,LINETHICK2;

QSH:=EMA(CLOSE,13)*1.12;

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

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

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

J:=3*K-2*D,COLORFF00FF;

DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26);

DEA:=EMA(DIFF,9);

MACD:=(DIFF-DEA)*2;

SM:=EMA(C,13);

P:=(HIGH + LOW + CLOSE)/3;

CCI:=(P-MA(P,14))*100/(1.5*AVEDEV(P,14)),COLORWHITE;

WR1:=100*(HHV(HIGH,10)-CLOSE)/(HHV(HIGH,10)-LLV(LOW,10));

WR2:=100*(HHV(HIGH,101)-CLOSE)/(HHV(HIGH,101)-LLV(LOW,101));

HSL:=VOL/CAPITAL*100;

ZT:=C/REF(C,1)>1.095 AND H/C<1.001 AND H-C<=0.01 AND C>O;

A:=HHVBARS(V,25);

ZX:=EMA(C,21);

SX:=MA(C,72);

VAR2:=LLV(LOW,10);

VAR3:=HHV(HIGH,25);

GEGE:= EMA((CLOSE-VAR2)/(VAR3-VAR2)*4,4);

L20:IF(A=0,L,REF(L,A)),POINTDOT,COLORYELLOW,LINETHICK3;

L21:IF(A=0,H,REF(H,A)),POINTDOT,COLORRED,LINETHICK2;

DX:=EMA(C,4);

LB:=DYNAINFO(17);

AQQ:=(REF(C,REF(HHVBARS(V,6),1)+1)>REF(O,REF(HHVBARS(V,6),1)+1)AND C>O

     OR (C>O AND V=HHV(V,7))) AND SM>REF(SM,1)

     AND (MACD>REF(MACD,1)OR DIFF>REF(DIFF,1))

     AND (K>REF(K,1)OR K>D)

     AND COUNT(H>REF(L,1),4)=4;

大阴:=H>HHV(REF(H,1),9) AND V>HHV(REF(V,1),9)AND (C<O OR C<REF(C,1));

VOL5:=MA(V,5);

VOL63:=MA(V,63);

SLB:=C>REF(C,1) AND C=H AND C>O AND C/REF(C,3)>1.3;

XSB:=C>REF(C,1) AND C=H AND C/REF(C,3)>1.2 AND COUNT(C/REF(C,1)>1.095,4)>2;

DRAWICON(L<ZX AND ZX>REF(ZX,1)AND SM>REF(SM,1)AND QS>REF(QS,1)

AND C>SM AND C>QS AND QS/ZX<1.02 AND SM/ZX<1.02

AND SM>ZX AND QS>ZX  AND GEGE>REF(GEGE,1)AND REF(K,1)>REF(D,1)

AND (O<SM OR O<QS),L*0.99,1);

DRAWTEXT(  (K>75 OR REF(K,1)>80) AND ((REF(J,1)>80 AND J<REF(J,1)AND H>REF(H,1) AND J<97 AND O>L AND L<REF(C,1))

OR (H>REF(H,1)AND J<REF(J,1) AND REF(J,1)>100 AND L<H AND H>C))

OR (O>REF(EMA(C,4),1)AND H/O<1.002 AND H/L>1.005 AND C<H)

,H*1.005,'止'),COLORYELLOW,LINETHICK5;

DRAWTEXT(J>REF(J,1) AND (O<MA(C,5)OR O<SM) AND C>EMA(C,40) AND L<MA(C,5) AND C>QS AND C>REF(C,5

AND REF(J,1)>REF(J,2) AND SM>QS) OR (CROSS(J,K) AND C>O AND C>QS AND SM>QS)AND O<MA1 ,L,'上车'),COLORRED,LINETHICK5;

DRAWTEXT(MACD>REF(MACD,1) AND K>REF(K,1) AND O<DX AND C>O AND DIFF>0 AND (L<SM OR L<QS) AND MACD>0 AND K>D AND O<REF(QS,1) AND L<REF(DX,1) AND L<SM

AND (O/L<1.003 OR O<SM) AND REF(L,1)>REF(SM,1) ,L*0.95,'咪咪'),COLORYELLOW,LINETHICK5;

DRAWTEXT(大阴 ,O,'大阴'),COLORYELLOW,LINETHICK5;

DRAWTEXT(COUNT(REF(ZT,1),3)>0 AND O/L<1.004 AND COUNT(H/O>1.003,3)=3 AND REF(VOL5,1)>REF(VOL63,1) AND C>O  AND (REF(C,1)-REF(L,1)>0.02 OR L<SM) AND (LB>1.5 OR V/REF(VOL5,1)>1.5 AND O<DX OR (LB>2 OR V/REF(VOL5,1)>2) OR ZT) AND (L<=REF(H,1) OR O-L<0.03) AND (REF(大阴,1)=0 OR O<REF(L,1))

,L*0.99,'孙工'),COLORYELLOW,LINETHICK5;

DRAWTEXT(CLOSE>MA(C,20)  AND MA(C,20)>MA(C,60) AND O/REF(C,1)<0.95 AND C/O>1.03 AND C>REF(C,5) AND O<MA(C,5) AND REF(L,1)<REF(DX,1),L*0.98,'吃货'),COLORYELLOW,LINETHICK5;

DRAWTEXT(COUNT(XSB,15)>0 AND L<SM AND (J>REF(J,1)OR O=L) AND SM>REF(SM,1) AND (H>DX OR REF(O,1)/REF(L,1)<1.005 OR (O=L AND O<SM AND C>SM)) AND (REF(H,1)>REF(DX,1) OR (DX>REF(DX,1)AND C>DX AND O<SM AND C>SM)) AND (REF(SM,1)>REF(SM,2)OR K>REF(K,1)OR (DX>REF(DX,1)AND C>DX AND O<SM AND C>SM))

AND (O<REF(DX,1) AND O<REF(C,1) AND (O<REF(O,1)OR REF(O,1)=REF(L,1))OR O<SM) AND (REF(C,1)>REF(L,1) OR O<REF(L,1)) AND (REF(SM,1)*1.001>REF(SM,2)OR REF(ZX,1)>REF(ZX,2)) AND (K>D OR O=L) ,L*0.98,'高鱼'),COLORYELLOW,LINETHICK5;