通达信趋势循环 副图源码

{趋势循环}

P:0;
 EMA5:=EMA(C,5);
 EMA10:=EMA(C,10);
 EMA20:=EMA(C,20);
 EMA60:=EMA(C,60);
 AA:=MAX( MAX(EMA5,EMA10),MAX(EMA20,EMA60));
 BB:=MIN( MIN(EMA5,EMA10),MIN(EMA20,EMA60));
龙:=(BB/AA)*100;
龙A:=XMA(XMA(XMA(EMA(龙,2),2),2),2);
飞:=EMA((龙A-REF(龙A,1))/REF(龙A,1),1)*1000,COLORFF00FF;
净:=XMA(飞,10);
流:=EMA(净,10);
主力动向:=(EMA(净+流,1)-XMA(净-流,2))*2,COLORFF00FF;
飞龙:XMA(主力动向,10),COLORFF00FF;
 STICKLINE(飞龙<0,飞龙,0,4,0),COLOR009900;
 STICKLINE(飞龙<0,飞龙,0,3,0),COLOR00BB00;
 STICKLINE(飞龙<0,飞龙,0,2,0),COLOR00DD00;
 STICKLINE(飞龙<0,飞龙,0,1,0),COLOR00FF00;
 STICKLINE(飞龙>REF(飞龙,1) AND 飞龙<0,飞龙,0,4,0),COLOR000099;
 STICKLINE(飞龙>REF(飞龙,1) AND 飞龙<0,飞龙,0,3,0),COLOR0000BB;
 STICKLINE(飞龙>REF(飞龙,1) AND 飞龙<0,飞龙,0,2,0),COLOR0000DD;
 STICKLINE(飞龙>REF(飞龙,1) AND 飞龙<0,飞龙,0,1,0),COLOR0000FF;
 STICKLINE(飞龙>REF(飞龙,1) AND 飞龙>0,飞龙,0,4,0),COLOR000099;
 STICKLINE(飞龙>REF(飞龙,1) AND 飞龙>0,飞龙,0,3,0),COLOR0000CC;
 STICKLINE(飞龙>REF(飞龙,1) AND 飞龙>0,飞龙,0,1.5,0),COLOR0000FF;
 STICKLINE(飞龙>REF(飞龙,1) AND 飞龙>0,飞龙,0,0.5,0),COLORCC00FF;
 XVAR2:=EXPMEMA(XMA(WINNER(C)*100,2),1);
 STICKLINE(XVAR2>50 AND COST(60)<C AND 飞龙>0,飞龙,0,4,0),COLOR990099;
 STICKLINE(XVAR2>50 AND COST(60)<C AND 飞龙>0,飞龙,0,3,0),COLORBB00BB;
 STICKLINE(XVAR2>50 AND COST(60)<C AND 飞龙>0,飞龙,0,2,0),COLORDD00DD;
 STICKLINE(XVAR2>50 AND COST(60)<C AND 飞龙>0,飞龙,0,1,0),COLORFF00FF;
 STICKLINE(飞龙<REF(飞龙,1) AND 飞龙>0,飞龙,0,4,0),COLORCC9900;
 STICKLINE(飞龙<REF(飞龙,1) AND 飞龙>0,飞龙,0,3,0),COLORDDBB00;
 STICKLINE(飞龙<REF(飞龙,1) AND 飞龙>0,飞龙,0,2,0),COLORBBDD00;
 STICKLINE(飞龙<REF(飞龙,1) AND 飞龙>0,飞龙,0,1,0),COLORAAFF00;
龙1:=EMA(飞龙,12)-EMA(飞龙,26);
龙2:EMA(龙1,8),LINETHICK3;
龙3:EMA(龙1,64),LINETHICK3;
 TJ1:=(MIN(C,O)-L)/(H-L)>=0.5;
 TJ2:=L/MIN(C,O)<=0.99;
 TJ3:=(C-MA(C,30))/MA(C,30)*100<-3;
 TJ4:=C>O;
 XG:TJ1 AND TJ2 AND TJ3 AND TJ4;
 STICKLINE(TJ1 AND TJ2 AND TJ3 AND TJ4,0,5,2,0),COLORYELLOW;