神仙三線WAH指標[同花順公式]

相關標簽:

?

根據大趨勢選股，再結合其他指標，新聞，熱點等選擇.

?

?

原理解析：
A賦值:收盤價的17日簡單移動平均+收盤價的17日簡單移動平均-1日前的收盤價的17日簡單移動平均的絕對值 B賦值:收盤價的17日簡單移動平均+收盤價的17日簡單移動平均-1日前的收盤價的17日簡單移動平均 輸出分水嶺:如果收盤價的17日簡單移動平均<B,返回B,否則返回收盤價的17日簡單移動平均,COLORFF00FF,線寬為2 輸出操作線:分水嶺-(收盤價的3日指數移動平均-分水嶺),COLOR00FFFF,線寬為2 輸出PM:收盤價的5日簡單移動平均,畫白色,線寬為2 如果PM>1日前的PM,返回PM,否則返回無效數,COLORRED，LINETHICK2 如果PM=1日前的PM,返回PM,否則返回無效數,畫紅色 如果PM<1日前的PM,返回PM,否則返回無效數,COLORRED，LINETHICK2 S賦值:(PM>操作線) CNDD賦值:分水嶺<1日前的分水嶺 如果DD,返回分水嶺,否則返回無效數,COLOR00FF00,線寬為2 如果S,返回分水嶺,否則返回無效數,COLOR00FF00,POINTDOT,線寬為4 當滿足條件分水嶺上穿操作線時,在分水嶺-0.1位置畫1號圖標 A1賦值:上次1日前的"平滑異同平均的DIF"上穿"平滑異同平均的DEA"距今天數 B1賦值:A1+1日前的收盤價>收盤價 AND A1+1日前的"平滑異同平均的DIF"<"平滑異同平均的DIF"AND "平滑異同平均的DIF"上穿"平滑異同平均的DEA" 當滿足條件B1>0時,在最低價-0.02位置書寫文字,COLOR00FFFF A2賦值:上次1日前的"KDJ的K"上穿"KDJ的D"距今天數 B2賦值:A2+1日前的收盤價>收盤價 AND A2+1日前的"KDJ的K"<"KDJ的K"AND "KDJ的K"上穿"KDJ的D" 當滿足條件B2>0時,在最低價-0.10位置書寫文字,COLORFF00FF A3賦值:上次1日前的"RSI的RSI1"上穿"RSI的RSI2"距今天數 B3賦值:A3+1日前的收盤價>收盤價 AND A3+1日前的"RSI的RSI1"<"RSI的RSI1"AND "RSI的RSI1"上穿"KRSI.RSI2" 當滿足條件B3>0時,在最低價-0.18位置書寫文字,COLOR0000FF C1賦值:上次1日前的"平滑異同平均上穿DEA"距今天數 D1賦值:C1+1日前的收盤價<收盤價 AND C1+1日前的"平滑異同平均的DIF">"平滑異同平均的DIF"ANDCROSS("平滑異同平均的DEA","平滑異同平均的DIF") 當滿足條件D1>0時,在最高價+0.16位置書寫文字,COLOR00FF00 C2賦值:上次1日前的"KDJ上穿D"距今天數 D2賦值:C2+1日前的收盤價<收盤價 AND C2+1日前的"KDJ的K">"KDJ的K"AND "KDJ的D"上穿"KDJ的K" 當滿足條件D2>0時,在最高價+0.08位置書寫文字,COLORFFFFCC C3賦值:上次1日前的"RSI的RSI2"上穿"RSI的RSI1"距今天數 D3賦值:C3+1日前的收盤價<收盤價 AND C3+1日前的"RSI的RSI1">"RSI的RSI1"AND "RSI的RSI2"上穿"KRSI.RSI1" 當滿足條件D3>0時,在最高價+0.04位置書寫文字,COLORFF9900

?

?來源:程序化99（ www.tumamayizhan.com ）

源碼：

?

?

A:=MA(CLOSE,17)+ABS(MA(CLOSE,17)-REF(MA(CLOSE,17),1));B:=MA(CLOSE,17)+MA(CLOSE,17)-REF(MA(CLOSE,17),1);分水嶺:IF(MA(CLOSE,17)<B,B,MA(CLOSE,17)),COLORFF00FF,LINETHICK2;操作線:分水嶺-(EMA(C,3)-分水嶺),COLOR00FFFF,LINETHICK2;PM:MA(C,5),colorwhite,LINETHICK2;IF(PM>REF(PM,1),PM,DRAWNULL),colorred，LINETHICK2;IF(PM=REF(PM,1),PM,DRAWNULL),colorred;IF(PM<REF(PM,1),PM,DRAWNULL),colorred，LINETHICK2;S:=(PM>操作線);///公式網 www.guhai.com.cnDD:=分水嶺<REF(分水嶺,1);IF(DD,分水嶺,DRAWNULL),COLOR00FF00,LINETHICK2;IF(S,分水嶺,DRAWNULL),COLOR00FF00,POINTDOT,LINETHICK4;DRAWICON(CROSS(分水嶺,操作線),分水嶺-0.1,1);A1:=BARSLAST(REF(CROSS("MACD.DIF","MACD.DEA"),1));B1:=REF(C,A1+1)>C AND REF("MACD.DIF",A1+1)<"MACD.DIF"AND CROSS("MACD.DIF","MACD.DEA");DRAWTEXT(B1>0,L-0.02,' M'),COLOR00FFFF;A2:=BARSLAST(REF(CROSS("KDJ.K","KDJ.D"),1));B2:=REF(C,A2+1)>C AND REF("KDJ.K",A2+1)<"KDJ.K"AND CROSS("KDJ.K","KDJ.D");DRAWTEXT(B2>0,L-0.10,'◎ K'),COLORFF00FF;A3:=BARSLAST(REF(CROSS("RSI.RSI1","RSI.RSI2"),1));B3:=REF(C,A3+1)>C AND REF("RSI.RSI1",A3+1)<"RSI.RSI1"AND CROSS("RSI.RSI1","KRSI.RSI2");DRAWTEXT(B3>0,L-0.18,'◆ R'),COLOR0000FF;C1:=BARSLAST(REF(CROSS("MACD,DEA","MACD.DIF"),1));D1:=REF(C,C1+1)<C AND REF("MACD.DIF",C1+1)>"MACD.DIF"ANDCROSS("MACD.DEA","MACD.DIF");DRAWTEXT(D1>0,H+0.16,' M'),COLOR00FF00;C2:=BARSLAST(REF(CROSS("KDJ,D","KDJ.K"),1));D2:=REF(C,C2+1)<C AND REF("KDJ.K",C2+1)>"KDJ.K"AND CROSS("KDJ.D","KDJ.K");DRAWTEXT(D2>0,H+0.08,'◎ K'),COLORFFFFCC;C3:=BARSLAST(REF(CROSS("RSI.RSI2","RSI.RSI1"),1));D3:=REF(C,C3+1)<C AND REF("RSI.RSI1",C3+1)>"RSI.RSI1"AND CROSS("RSI.RSI2","KRSI.RSI1");DRAWTEXT(D3>0,H+0.04,'◆ R'),COLORFF9900;

?

公式導入教程: 【通達信公式源碼導入方法教程】 【同花順公式源碼導入方法教程】 【大智慧新一代公式源碼導入方法教程】

?