|
以下是通达信趋势线主图源码（无源码的请下载附件导入）
{趋势线主图}
短线: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;
637466143.png
|
