通达信涨跌趋势 副图源码

以下是通达信涨跌趋势 副图源码

Z1:=STRCAT(HYBLOCK,' ');
 Z2:=STRCAT(Z1,DYBLOCK);
 Z3:=STRCAT(Z2,' ');
 DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLORRED;
金牛:(MA(MA(H,8),8)-MA(MA(L,8),8))*1+MA(MA(H,8),8),DOTLINE,COLORYELLOW;
金钻趋势:MA(MA(L,5),5)-(MA(MA(H,5),5)-MA(MA(L,5),5))*1,LINETHICK2,COLORRED;
金牛2:EMA(金钻趋势,85)COLORCYAN,LINETHICK2;
 DRAWBAND(金钻趋势,RGB(55,0,0),金牛2,RGB(0,91,0));
 DRAWKLINE(H,O,L,C);
 STICKLINE(金钻趋势>LOW AND 金钻趋势<HIGH,金钻趋势,MIN(MIN(OPEN,CLOSE),金钻趋势),2,1),COLORWHITE;
 STICKLINE(金钻趋势>MIN(C,O) AND 金钻趋势<MAX(C,O),金钻趋势,MIN(OPEN,CLOSE),2,1),COLORWHITE;
 STICKLINE(金钻趋势>HIGH,OPEN,CLOSE,2,1),COLORWHITE;
 STICKLINE(金钻趋势>HIGH,HIGH,LOW,0,1),COLORWHITE;
 VAR23:=100*MA(MA((C-REF(C,1)),6),6)/MA(MA(ABS((C-REF(C,1))),6),6);
回调买:=LLV(VAR23,2)=LLV(VAR23,7) AND COUNT(VAR23<0,2) AND CROSS(VAR23,MA(VAR23,2));
 XG:=金钻趋势>HIGH AND 回调买 AND L<=金钻趋势;
JJ:=(HIGH+LOW+CLOSE)/3;
 V2:=SMA(IF(C>=REF(C,1),DDX,-DDX/100),2,1);
 V5:=SMA(V2*120/FROMOPEN*5,2,1);
 V10:=SMA(V5,5,1);
 V20:=SMA(V10,5,1);
 DY:=CURRBARSCOUNT=1 AND C<REF(C,1);
 DY2:=REF(V2,1)-DY;
 XG2:=C>O AND DY2<0.02 AND MA(C,5)>MA(C,60) AND C/REF(C,1)>=1.02 AND H<金牛;
 {DRAWTEXT(XG2,L,'▲抓牛'),COLORYELLOW;}
 DRAWTEXT(XG2 AND L<金钻趋势,L,'金牛起涨'),COLORMAGENTA;
买:EMA(CLOSE,5),COLORRED,LINETHICK0;
 A:=(REF(买,1));
卖:EMA(SLOPE(CLOSE,21)*20+CLOSE,42),LINETHICK0;
 B:=CROSS(买,卖);
S:=CROSS(卖,买);
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
 K:=SMA(RSV,3,1);
 D:=SMA(K,3,1);
 J:=3*K-2*D;
 G:=95;
 VAR29:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100;
 VAR2A:=SMA(VAR29,5,1);
 VAR2B:=SMA(VAR2A,10,1);
 VAR2C:=CROSS(VAR2B,VAR2A);
 VAR2D:=VAR2B>80 OR VAR2A>80;
 VAR2E:=VAR2C AND VAR2D;
 VAR33:=HIGH;
 VAR34:=LOW;
逃顶:=STICKLINE(VAR2E,VAR33,VAR34,4,0);
 DRAWTEXT(CROSS((REF(HIGH,1)+REF(LOW,1))/2,
 MA(CLOSE,20)+2*STD(CLOSE,20)),HIGH*1.03,'-落袋为安'),COLORYELLOW;
 M1:=5,LINETHICK0;
 M2:=10,LINETHICK0;
 M3:=20,LINETHICK0;
 M4:=60,LINETHICK0;
 MA1:MA(CLOSE,M1),LINETHICK0;
 MA2:MA(CLOSE,M2),LINETHICK0;
 MA3:MA(CLOSE,M3),LINETHICK0;
 MA4:=MA(CLOSE,M4),LINETHICK0;
 VAR1:=HHV(HIGH,25);
 VAR2:=LLV(LOW,25);
 VAR3:=EMA((CLOSE-VAR2)/(VAR1-VAR2)*100,20);
 VAR4:=EMA((CLOSE-VAR2)/(VAR1-VAR2)*100,5);
 VAR5:=CROSS(VAR4,VAR3);
 DRAWTEXT(CROSS(VAR3,VAR4),HIGH+HIGH*0.05,'跌'),COLORGREEN;
 DRAWTEXT(CROSS(VAR4,VAR3) ,LOW-LOW*0.05,'涨'),COLORYELLOW;
 DRAWICON(CROSS(VAR3,VAR4) ,HIGH+0.5,2);
 DRAWICON(CROSS(VAR4,VAR3) ,LOW-0.5,1);