趨勢微分

{趨勢微分}

0;

wxs:=(10-5)/2;{系數(shù)}
jgl_df:=wxs*(ema(close,5)-ref(ema(close,5),1));{微分}
dif_j:=ema(jgl_df,10),color1234aa,linethick2;{積分}
dea_g:=ema(dif_j,8),color338833,linethick2;{平滑}
macd_l:=(dif_j-dea_g)*10;

k_df:=sma(jgl_df,3,1)*1,colorfedcba;{以下為“類kdj”}
d_df:=sma(k_df,3,1),color13f8f9;
j_df:=3*k_df-2*d_df,colorf813f9;
{以下顯示“j_df前差值柱”，柱子太薄時顯示“十”字星}
rf:=ref(j_df,1);
dj:=abs(j_df-rf);
mm:=(hhv(dj,240)+llv(dj,240))/2;

stickline(macd>ref(macd,1) and macd>0,0,macd,-1,0),colorred;
stickline(macd>ref(macd,1) and macd<0,0,macd,-1,1),colorlired;
stickline(macd<ref(macd,1) and macd>0,0,macd,-1,1),colorwhite;
stickline(macd<ref(macd,1) and macd<0,0,macd,-1,0),colorcyan;

一級:(-2*ref(macd,2)+ref(macd,1)+2*macd);
{這是五點平滑二階導(dǎo)數(shù)中心截斷右半支，緊跟股價}
二級:(-0.4*ref(macd,4)-0.4*ref(macd,3)-1.1*ref(macd,2)+0.9*ref(macd,1)+2*macd);
{這是五點、九點平滑二階導(dǎo)數(shù)中心截斷右半支的平均值，緊跟股價}
三級:(-0.8*ref(macd,4)-0.8*ref(macd,3)-0.2*ref(macd,2)+0.8*ref(macd,1)+2*macd);
{這是九點平滑二階導(dǎo)數(shù)中心截斷右半支，緊跟股價};

日趨勢:sma(sma(一級,9,1),9,1);

drawband(一級,rgb(200,10,10),三級,rgb(0,0,128));