同花顺 趋势准备副图源码

此指标可以提前知道大盘后市先机。可明确提示今日压力位、今日支撑位、明日压力位、明日支撑位等信息。

DIF:EMA(CLOSE,6)-EMA(CLOSE,19),,NODRAW;
 DEA:EMA(DIF,9),NODRAW;
 MACD:2*(DIF-DEA),COLORSTICK;
 STICKLINE(MACD>0,MACD,0,0.5,0),colorred;
 STICKLINE(MACD<0,MACD,0,0.5,0),colorgreen;
 STICKLINE(MACD>0 AND MACD<REF(MACD,1),MACD,0,0.5,0),colorwhite;
 STICKLINE(MACD<0 AND MACD>REF(MACD,1),MACD,0,0.5,0),COLORFF00FF;
 FH1:=REF(MACD,1)<REF(MACD,2) AND REF(MACD,2)<REF(MACD,3) AND REF(MACD,3)<REF(MACD,4);
 FH2:=MACD>=0 AND COUNT(MACD>REF(MACD,1),1)=1;
 FH3:=FH1 AND FH2 AND EMA(C,13)>REF(EMA(C,13),1);
 FH4:=FH1 AND FH2 AND ABS((DIF-DEA)/C)<0.018;
 FH5:=FH1 AND FH2 AND MACD<0.10;
 VV:=CLOSE>OPEN AND MA(CLOSE,5)>MA(CLOSE,10) AND MA(CLOSE,10)>MA(CLOSE,30)
 AND DIF>DEA AND MACD>REF(MACD,1) AND DIF>0 AND DEA>0 AND
 MA(VOL,5)>MA(VOL,34) AND MA(CLOSE,30)>=REF(MA(CLOSE,30),1);
佛手:IF(VV,1,0),NODRAW;
 X0:=BARSLAST((CROSS(MACD,REF(MACD,1)) AND MACD>0) OR CROSS(MACD,0));
 X1:=BARSLAST(CROSS(0.5,COUNT(MACD>REF(MACD,1),X0+1)=X0+1));
 X2:=COUNT(MACD<REF(MACD,1),X1+1)=X1+1 AND COUNT(MACD<0,X1+1)<=2;
 X3:=REF(X2,1) AND MACD>REF(MACD,1) AND C>O AND C>REF(C,1);
 STICKLINE(X1=0 AND MACD>0,MACD,0,2,0),COLORDCDC00;
 STICKLINE(X3,MACD,0,2,0),COLOR0854FF;
 DRAWICON(佛手,-0.15,11);
二次翻红:(FH3 OR FH4 OR FH5),colorred,NODRAW;
低买:CROSS(DIF,DEA) AND DIF<0,COLORFF00FF,NODRAW;
加油:CROSS(DIF,DEA) AND DIF>0,coloryellow,NODRAW;
 DRAWICON(二次翻红,-0.05,1);
 DRAWTEXT(二次翻红,-0.15,'↖翻红'),colorred;
 DRAWTEXT(CROSS(DIF,DEA) AND DIF<0,DEA-0.02,'↖低买'),COLORFF00FF;
 DRAWTEXT(CROSS(DIF,DEA) AND DIF>0,DEA-0.05,'↖加油'),coloryellow;
 XG:二次翻红 OR 低买 OR 加油,NODRAW;
 YLZC:=IF(CLOSE=INDEXC,(INDEXC+INDEXH+INDEXL+INDEXO)/4,AMOUNT/(VOL+0.01)/100);
阻价:=IF(CLOSE=INDEXC,YLZC+INDEXC-INDEXL,YLZC+(CLOSE-LOW));
支价:=IF(CLOSE=INDEXC,INDEXL+INDEXC-YLZC,LOW+(CLOSE-YLZC));
今压:REF(阻价,1),LINETHICK0,COLORAA11BB,NODRAW;
今撑:REF(支价,1),LINETHICK0,COLOR009900,NODRAW;
明压:阻价,LINETHICK0,NODRAW;
明撑:支价,LINETHICK0,NODRAW;
 DIFF:DIF,colorred,LINETHICK2;
 DDEA:DEA,coloryellow,LINETHICK2;Var1:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)
 -2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1),3,1);
趋线1:=EMA(Var1,3) ;
 Var2:=(趋线1-REF(趋线1,1))/REF(趋线1,1)*100;
清仓:IF(趋线1>=90 AND Var2<0,100,80),STICK,linethick3,COLOR00ff00;80,STICK,linethick3,COLOR000000;
准备:IF(趋线1<=13,20,0),STICK,linethick3,coloryellow;
买入:IF(趋线1<=13 AND Var2>13,50,0),STICK,linethick3,colorred;
 0, linethick0, color999999;100, linethick0, color999999;
趋线:趋线1,linethick1,colorf0f000;