相關標簽:

?

指標只是給你一個參考范圍，這套指標因為畫線會有未來函數，不喜繞道。
因為使用趨勢畫線，所以 不能進行歷史選股。可以實盤預警和盤后選股{主圖畫線}

?

?

原理解析：
F賦值:平滑異同平均的DIF D賦值:平滑異同平均的DEA M賦值:平滑異同平均的MACD HT賦值:上次F上穿D距今天數 HT1賦值:HT=0累加至2的天數 LT賦值:上次D上穿F距今天數 LT1賦值:LT=0累加至2的天數 H1賦值:上次最高價=HT+1日內最高價的最高值距今天數 H2賦值:LT日前的H1+LT的最后一日取值設為常數 H3賦值:LT1-1日前的H1+LT1的最后一日取值設為常數 L1賦值:上次最低價=LT+1日內最低價的最低值距今天數 L2賦值:HT1-1日前的L1+HT1的最后一日取值設為常數 L3賦值:HT日前的L1+HT的最后一日取值設為常數 HH1賦值:最高價在1日前的L1的最后一日取值設為常數天內第1個最高價到當前周期的周期數 LL1賦值:最低價在1日前的HT的最后一日取值設為常數天內第1個最低價到當前周期的周期數 GJ賦值:上次到最后交易的周期=HH1的最后一日取值設為常數+1距今天數日前的最高價 GJ1賦值:上次到最后交易的周期=H1的最后一日取值設為常數+1距今天數日前的最高價 輸出EXT1:當滿足條件到最后交易的周期=H2的最后一日取值設為常數+1時,在最高價位置畫直線起點，當滿足條件M的最后一日取值設為常數>0ANDCURRBARSCOUNT=HH1的最后一日取值設為常數+1時,在最高價位置畫直線終點,1表示是否延長.,畫紅色 輸出EXT2:當滿足條件到最后交易的周期=H3的最后一日取值設為常數時,在最高價位置畫直線起點，當滿足條件M的最后一日取值設為常數<0ANDCURRBARSCOUNT=H1的最后一日取值設為常數+1時,在最高價位置畫直線終點,1表示是否延長.,畫紅色 TJ1賦值:收盤價上穿EXT1 AND M的最后一日取值設為常數>0 TJ2賦值:收盤價上穿EXT2 AND M的最后一日取值設為常數<0 T賦值:上次TJ1ORTJ2距今天數 當滿足條件到最后交易的周期=T的最后一日取值設為常數+1時,在最低價位置畫直線起點，當滿足條件是否最后一個周期時,在T日前的最低價位置畫直線終點,0表示是否延長.,畫青色,DOTLINE GT賦值:上次最高價=T+1日內最高價的最高值ANDNOT(是否最后一個周期)距今天數 當滿足條件到最后交易的周期=GT的最后一日取值設為常數+1時,在最高價位置畫直線起點，當滿足條件是否最后一個周期時,在GT日前的最高價位置畫直線終點,0表示是否延長.,畫洋紅色,DOTLINE F賦值:平滑異同平均的DIF D賦值:平滑異同平均的DEA M賦值:平滑異同平均的MACD HT賦值:上次F上穿D距今天數 HT1賦值:HT=0累加至2的天數 LT賦值:上次D上穿F距今天數 LT1賦值:LT=0累加至2的天數 H1賦值:上次最高價=HT+1日內最高價的最高值距今天數 H2賦值:LT日前的H1+LT的最后一日取值設為常數 H3賦值:LT1-1日前的H1+LT1的最后一日取值設為常數 L1賦值:上次最低價=LT+1日內最低價的最低值距今天數 HH1賦值:最高價在1日前的L1的最后一日取值設為常數天內第1個最高價到當前周期的周期數 TJ1賦值:M的最后一日取值設為常數>0 AND H2的最后一日取值設為常數日前的最高價>HH1的最后一日取值設為常數日前的最高價 TJ2賦值:M的最后一日取值設為常數<0 AND H3的最后一日取值設為常數日前的最高價>H1的最后一日取值設為常數日前的最高價 XG1賦值:TJ1 OR TJ2 EXT1賦值:當滿足條件到最后交易的周期=H2的最后一日取值設為常數+1時,在最高價位置畫直線起點，當滿足條件M的最后一日取值設為常數>0ANDCURRBARSCOUNT=HH1的最后一日取值設為常數+1時,在最高價位置畫直線終點,1表示是否延長. EXT2賦值:當滿足條件到最后交易的周期=H3的最后一日取值設為常數時,在最高價位置畫直線起點，當滿足條件M的最后一日取值設為常數<0ANDCURRBARSCOUNT=H1的最后一日取值設為常數+1時,在最高價位置畫直線終點,1表示是否延長. TJ3賦值:收盤價上穿EXT1 AND M的最后一日取值設為常數>0 TJ4賦值:收盤價上穿EXT2 AND M的最后一日取值設為常數<0 T賦值:上次TJ3ORTJ4距今天數 GT賦值:上次最高價=T+1日內最高價的最高值ANDNOT(是否最后一個周期)距今天數 DD賦值:T日內最低價的最低值

?

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

源碼：

?

?

F:=MACD.DIF;
D:=MACD.DEA;
M:=MACD.MACD;
HT:=BARSLAST(CROSS(F,D));
HT1:=SUMBARS(HT=0,2);
LT:=BARSLAST(CROSS(D,F));
LT1:=SUMBARS(LT=0,2);
H1:=BARSLAST(H=HHV(H,HT+1));
H2:=REF(H1,LT)+CONST(LT);
H3:=REF(H1,LT1-1)+CONST(LT1);
L1:=BARSLAST(L=LLV(L,LT+1));
L2:=REF(L1,HT1-1)+CONST(HT1);
L3:=REF(L1,HT)+CONST(HT);
HH1:=FINDHIGHBARS(H,1,CONST(L1),1);
LL1:=FINDLOWBARS(L,1,CONST(HT),1);
GJ:=REF(H,BARSLAST(CURRBARSCOUNT=CONST(HH1)+1));
GJ1:=REF(H,BARSLAST(CURRBARSCOUNT=CONST(H1)+1));
EXT1:DRAWLINE(CURRBARSCOUNT=CONST(H2)+1,H,CONST(M)>0 AND CURRBARSCOUNT=CONST(HH1)+1,H,1),COLORRED;
EXT2:DRAWLINE(CURRBARSCOUNT=CONST(H3),H,CONST(M)<0 AND CURRBARSCOUNT=CONST(H1)+1,H,1),COLORRED;
TJ1:=CROSS(C,EXT1) AND CONST(M)>0;
TJ2:=CROSS(C,EXT2) AND CONST(M)<0;
T:=BARSLAST(TJ1 OR TJ2);
DRAWLINE(CURRBARSCOUNT=CONST(T)+1,L,ISLASTBAR,REF(L,T),0),COLORCYAN,DOTLINE;
GT:=BARSLAST(H=HHV(H,T+1) AND NOT(ISLASTBAR));
DRAWLINE(CURRBARSCOUNT=CONST(GT)+1,H,ISLASTBAR,REF(H,GT),0),COLORMAGENTA,DOTLINE;
{選股}
F:=MACD.DIF;
D:=MACD.DEA;
M:=MACD.MACD;
HT:=BARSLAST(CROSS(F,D));
HT1:=SUMBARS(HT=0,2);
LT:=BARSLAST(CROSS(D,F));
LT1:=SUMBARS(LT=0,2);
H1:=BARSLAST(H=HHV(H,HT+1));
H2:=REF(H1,LT)+CONST(LT);
H3:=REF(H1,LT1-1)+CONST(LT1);
L1:=BARSLAST(L=LLV(L,LT+1));
HH1:=FINDHIGHBARS(H,1,CONST(L1),1);
TJ1:=CONST(M)>0 AND REF(H,CONST(H2))>REF(H,CONST(HH1));
TJ2:=CONST(M)<0 AND REF(H,CONST(H3))>REF(H,CONST(H1));
XG1:=TJ1 OR TJ2;
EXT1:=DRAWLINE(CURRBARSCOUNT=CONST(H2)+1,H,CONST(M)>0 AND CURRBARSCOUNT=CONST(HH1)+1,H,1);
EXT2:=DRAWLINE(CURRBARSCOUNT=CONST(H3),H,CONST(M)<0 AND CURRBARSCOUNT=CONST(H1)+1,H,1);
TJ3:=CROSS(C,EXT1) AND CONST(M)>0;
TJ4:=CROSS(C,EXT2) AND CONST(M)<0;
T:=BARSLAST(TJ3 OR TJ4);
GT:=BARSLAST(H=HHV(H,T+1) AND NOT(ISLASTBAR));
DD:=LLV(L,T);
XG:CROSS(C,REF(H,GT)) AND V>REF(V,1) AND XG1 AND DD>REF(L,T) AND DYNAINFO(17)!=0;DRAWTEXT_FIX(C>O,0.01,0.9,0,' www.kzuj.com.cn '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;
?

?

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

?