分享一个趋势主图和2个副图,通达信可用,全部源码。大家周末愉快!
{趋势主图源码}
M1:=55;
HR:=HHV(HIGH,M1);
HRY:=LLV(LOW,M1);
HRY11:=HR*HRY;
HRY33:SQRT(HRY11),COLORGREEN,LINETHICK2;
IF(C>HRY33 AND HRY33>=REF(HRY33,1),HRY33,DRAWNULL),LINETHICK2,COLORRED;
WLT1:=MA(C,5);
WLT2:=MA(C,10);
DRAWBAND(WLT1,RGB(255,255,0),WLT2,RGB(0,0,220));
HP:=(HHV(CLOSE,10)-LLV(CLOSE,10))/CLOSE<0.10;
LB:=VOL/MA(VOL,5);
X1:=(C+L+H)/3;
BB5:=ATAN(EMA(X1,7)-REF(EMA(X1,7),1))*3.1416*10;
DRAWTEXT(FILTER(BB5>1 AND EMA(X1,7)>REF(EMA(X1,7),1),10),LOW*0.99,'★∠45'),COLORFFFFFF;
TT:=FILTER(BB5>1 AND EMA(X1,7)>REF(EMA(X1,7),1),10);
MM:=WLT1>REF(WLT1,1) AND REF(WLT1,1);
GG1:=CROSS(WLT1,WLT2);
TYP:=(HIGH+LOW+CLOSE)/3;
CCI1:=(TYP-MA(TYP,6))/(0.015*AVEDEV(TYP,5));
差值1:=ABS(REF(CCI1,1)-CCI1);
CCI2:=(TYP-MA(TYP,10))/(0.015*AVEDEV(TYP,10));
差值2:=ABS(REF(CCI2,1)-CCI2);
CCI3:=(TYP-MA(TYP,20))/(0.015*AVEDEV(TYP,20));
差值3:=ABS(REF(CCI3,1)-CCI3);
CCI4:=(TYP-MA(TYP,30))/(0.015*AVEDEV(TYP,30));
差值4:=ABS(REF(CCI4,1)-CCI4);
CCI5:=(TYP-MA(TYP,60))/(0.015*AVEDEV(TYP,60));
差值5:=ABS(REF(CCI5,1)-CCI5);
CCI:=(CCI1+CCI2+CCI3+CCI4+CCI5)/2,COLORRED,LINETHICK2;
WLT91:=HHV(CCI,13);
WLT92:=LLV(CCI,13)<-100;
WLT95:=COUNT(WLT92,13)>=3;
WLT93:=CCI>WLT91;
WLT96:=CROSS(CCI,100);
TJ91:=WLT95 AND WLT96;
JLP:=FILTER(TJ91,5);
超买:MA(C,10)*IF(CAPITAL=0,1.04,1.1),POINTDOT,COLORGREEN,LINETHICK2;
超卖:MA(C,10)*IF(CAPITAL=0,0.95,0.9),POINTDOT,COLORRED,LINETHICK2;
TEND:EMA(((SLOPE(CLOSE,21)*20)+CLOSE),42),POINTDOT,COLORFF00FF,LINETHICK4;
DD:=TEND>REF(TEND,1) AND REF(TEND,1)>REF(TEND,2);
GG2:=CROSS(WLT1,TEND);
HRY1:=LLV(LOW,55);
HRY2:=HHV(HIGH,21);
GG3:=C<HRY2*0.8 AND C>HRY33;
JJ1:=C<HRY1*1.62;
TJ1:=GG1;
TJ2:=GG2 AND JJ1;
TJ3:=GG1 AND GG3;
XG:=TJ1 OR TJ3;
XG2:=C<HRY2*0.86 OR LB>1;
XG1:=XG AND XG2 AND C>HRY33 AND JLP;
XG3:=XG AND C<HHV(HIGH,250)*0.3;
XG11:=XG1 OR XG3;
DRAWICON(XG11,LOW*0.97,23);
DRAWTEXT(XG1,LOW*0.95,'全'),COLORFFFFFF;
DRAWTEXT(XG1,LOW*0.93,'仓'),COLORFFFFFF;
VAR1:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100-70;
VAR2:=SMA(VAR1,9,1)+100;
VAR3:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
VAR4:=SMA(VAR3,3,1);
VAR5:=SMA(VAR4,3,1)+100;
VAR6:=VAR5-VAR2;
趋势:IF(VAR6>45,VAR6-45,0);
STICKLINE(REF(趋势,1)<趋势,趋势,REF(趋势,1),2,0),COLORMAGENTA;
STICKLINE(REF(趋势,1)>趋势,趋势,REF(趋势,1),2,0),COLORGREEN;
DRAWICON(FILTER(REF(趋势,1)<趋势 AND REF(趋势,1)<1,5),趋势,23);
分水岭:DMA(EMA(CLOSE,12),SUM(VOL,5)/3/CAPITAL),COLOR00FFFF,LINETHICK2;
CCC:C,COLORFFFFFF;
UPPER:MA(CLOSE,14)*1.06,POINTDOT,COLORFF99FF,LINETHICK2;
LOWER:MA(CLOSE,14)*0.94,POINTDOT,COLORFF00FF,LINETHICK2;
MID:(UPPER+LOWER)/2,NODRAW,COLOR00FFFF,LINETHICK1;
VAR1A:=(2*CLOSE+HIGH+LOW+OPEN)/5;
A1:(EMA(VAR1A,1)+EMA(VAR1A,2)+EMA(VAR1A,3)+EMA(VAR1A,4))/4,COLORCYAN,LINETHICK1;
W1:=(EMA(VAR1A,1)+EMA(VAR1A,2)+EMA(VAR1A,3)+EMA(VAR1A,4))/4;
A2:EMA(A1,2),COLORCYAN,LINETHICK1;
W2:=EMA(A1,2);
A3:EMA(A2,2),COLORCYAN,LINETHICK1;
W3:=EMA(A2,2);
A4:EMA(A3,2),COLORCYAN,LINETHICK1;
W4:=EMA(A3,2);
A5:EMA(A4,2),COLORCYAN,LINETHICK1;
W5:=EMA(A4,2);
A6:EMA(A5,2),COLORCYAN,LINETHICK1;
W6:=EMA(A5,2);
A7:EMA(A6,2),COLORCYAN,LINETHICK1;
W7:=EMA(A6,2);
IF(W1>REF(W1,1),A1,DRAWNULL),COLORRED,LINETHICK1;
IF(W2>REF(W2,1),A2,DRAWNULL),COLORRED,LINETHICK1;
IF(W3>REF(W3,1),A3,DRAWNULL),COLORRED,LINETHICK1;
IF(W4>REF(W4,1),A4,DRAWNULL),COLORRED,LINETHICK1;
IF(W5>REF(W5,1),A5,DRAWNULL),COLORRED,LINETHICK1;
IF(W6>REF(W6,1),A6,DRAWNULL),COLORRED,LINETHICK1;
IF(W7>REF(W7,1),A7,DRAWNULL),COLORRED,LINETHICK1;
DRAWICON(CROSS(CCC,LOWER) AND CROSS(CCC,A3),LOWER,23);
DRAWICON(CROSS(UPPER,CCC),UPPER,15);
DRAWTEXT(CROSS(CCC,UPPER),UPPER,'A'),COLORYELLOW;
