相關標簽:

?

1、參數，是自己臨時隨意設置的，因為指標是從其它地方復制而來，原本就缺少參數。
在使用過程中，可自行調整，力求達到更優化；
如果你找到了較好的參數設置，麻煩你回告我一下，謝謝！！
2、除去了原指標中的之字轉向ZIG函數，原代碼附上(txt文本)，可自己再進行更優化；
3、紅柱買入，并不一定急于買入，特別是由綠柱急轉而成的紅柱；
買入時，盡量從底部買入，為的是避開風險；
當紅柱達到相對高位時，介入宜謹慎。
4、綠柱賣出，出現綠柱，一定要賣出，這更是為了避開風險；
5、在綠柱延續過程中，一定不要買入股票，堅持這一原則，并不能保證你賺錢，卻一定可以保證避開風險；
6、有了盈利，隨時可以賣出，并不一定要等到綠柱的出現，落袋為安總是不錯的選擇；
7、適用于波段操作，不怎么適用橫盤整理的時間段。本指標亦可用于期貨買賣：
出現綠色賣出線為賣出信號，預示階段頂部，后勢下跌概率較大，到轉紅為平倉信號；
出現紅色線為買進信號，預示階段底部，后勢上漲跌概率較大，到轉綠時為平倉信號。
8、最后，再說一次，避開風險，這是炒股的第一原則。做到了這一點，賺錢，就不再困難了。

?

?

原理解析：
DIFF賦值:收盤價的12日指數移動平均 - 收盤價的26日指數移動平均 DEA賦值: DIFF的9日指數移動平均 MACD賦值:(DIFF-DEA)*2 AA賦值:收盤價N4%的之字轉向 GG賦值:AA的2日指數移動平均 輸出SS:如果1日前的GG<GG,返回1,否則返回0 輸出XJ:如果1日前的GG>GG,返回1,否則返回0 VAR1賦值:((收盤價 - N1日內最低價的最低值)/(N1日內最高價的最高值 - N1日內最低價的最低值))*(100) VAR3賦值:VAR1的5日[1日權重]移動平均 K賦值:VAR3的3日[1日權重]移動平均 D賦值:K的3日[1日權重]移動平均 當滿足條件(K>=D)時,在K和D位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,COLOR0000A8 當滿足條件(K>=D)時,在K和D位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,COLOR0000C0 當滿足條件(K>=D)時,在K和D位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLOR0000E0 當滿足條件(K>=D)時,在K和D位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLOR0000F0 當滿足條件(K>=D)時,在K和D位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLOR0000D0 當滿足條件(K>=D)時,在K和D位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLOR8080FF 當滿足條件(K<=D)時,在K和D位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,COLOR008800 當滿足條件(K<=D)時,在K和D位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,COLOR009900 當滿足條件(K<=D)時,在K和D位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLOR00AA00 當滿足條件(K<=D)時,在K和D位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLOR00BB00 當滿足條件(K<=D)時,在K和D位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLOR00CC00 當滿足條件(K<=D)時,在K和D位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLOR00DD00 MID賦值:(3*收盤價+最低價+開盤價+最高價)/6 K2賦值:(20*MID+19*1日前的MID+18*2日前的MID+17*3日前的MID+16*4日前的MID+15*5日前的MID+14*6日前的MID+13*7日前的MID+12*8日前的MID+11*9日前的MID+10*10日前的MID+9*11日前的MID+8*12日前的MID+7*13日前的MID+6*14日前的MID+5*15日前的MID+4*16日前的MID+3*17日前的MID+2*18日前的MID+20日前的MID)/210 K3賦值:K2的5日簡單移動平均 J賦值:收盤價的N2日簡單移動平均和收盤價的N3日簡單移動平均的較大值 K1賦值:收盤價的N2日簡單移動平均和收盤價的N3日簡單移動平均的較小值 A1賦值:上次1日前的DIFF上穿DEA距今天數 A2賦值:上次1日前的DEA上穿DIFF距今天數 A3賦值:上次1日前的K上穿D距今天數 A4賦值:上次1日前的D上穿K距今天數 底背離賦值:如果A1+1日前的最低價>LOWANDDIFF>A1+1日前的DIFFANDCROSS(DIFF,DEA),返回1,否則返回0 頂背離賦值:如果A2+1日前的最高價<HIGHANDREF(DIFF,A2+1)>DIFFANDCROSS(DEA,DIFF),返回1,否則返回0 底背離1賦值:如果A3+1日前的最低價>LOWANDK>A3+1日前的KANDCROSS(K,D),返回1,否則返回0 頂背離1賦值:如果A4+1日前的最高價<HIGHANDREF(D,A4+1)ANDCROSS(D,K),返回1,否則返回0 當滿足條件K上穿DANDC>JANDD<76ANDREF(MACD,1)<MACDAND(頂背離=0OR頂背離1=0)ANDSS=1ANDC>K2時,在K位置書寫文字,畫紅色 當滿足條件K上穿DANDC>JANDD<76ANDREF(MACD,1)<MACDAND(頂背離=0OR頂背離1=0)ANDSS=1ANDC>K2時,在K位置畫1號圖標 當滿足條件D上穿KAND(收盤價<K1OR(J>=CANDC>=K))ANDREF(MACD,1)>MACDAND(底背離=0OR底背離1=0)ANDD>18ANDXJ=1ANDC<K3時,在D位置書寫文字,畫白色 當滿足條件D上穿KAND(收盤價<K1OR(J>=CANDC>=K))ANDREF(MACD,1)>MACDAND(底背離=0OR底背離1=0)ANDD>18ANDXJ=1ANDC<K3時,在D位置畫2號圖標 當滿足條件K上穿DAND(底背離=1AND底背離1=1)AND頂背離1=0ANDSS=1時,在K位置書寫文字,畫紅色 當滿足條件K上穿DAND(底背離=1AND底背離1=1)AND頂背離1=0ANDSS=1時,在K位置畫1號圖標 當滿足條件D上穿KAND頂背離=1AND頂背離1=1ANDXJ=1時,在D位置書寫文字,畫白色 當滿足條件D上穿KAND頂背離=1AND頂背離1=1ANDXJ=1時,在D位置畫2號圖標,畫白色 當滿足條件收陽線時,在橫軸0.01縱軸0.9位置書寫文字,畫紅色 當滿足條件收陽線時,在橫軸1縱軸1位置書寫文字,畫紅色

?

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

源碼：

?

?

{參數：N1,N2,N3,N4}DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26);
DEA:= EMA(DIFF,9);
MACD:=(DIFF-DEA)*2;
AA:=ZIG(3,N4);
GG:=EMA(AA,2);
SS:IF(REF(GG,1)<GG,1,0);
XJ:IF(REF(GG,1)>GG,1,0);
VAR1:=((CLOSE - LLV(LOW,N1))/(HHV(HIGH,N1) - LLV(LOW,N1)))*(100);
VAR3:=SMA(VAR1,5,1);
K:=SMA(VAR3,3,1);
D:=SMA(K,3,1);
STICKLINE((K >= D),K,D,8,0),COLOR0000A8;
STICKLINE((K >= D),K,D,6,0),COLOR0000C0;
STICKLINE((K >= D),K,D,4,0),COLOR0000E0;
STICKLINE((K >= D),K,D,3,0),COLOR0000F0;
STICKLINE((K >= D),K,D,2,0),COLOR0000D0;
STICKLINE((K >= D),K,D,1,0),COLOR8080FF;
STICKLINE((K <= D),K,D,8,0),COLOR008800;
STICKLINE((K <= D),K,D,6,0),COLOR009900;
STICKLINE((K <= D),K,D,4,0),COLOR00AA00;
STICKLINE((K <= D),K,D,3,0),COLOR00BB00;
STICKLINE((K <= D),K,D,2,0),COLOR00CC00;
STICKLINE((K <= D),K,D,1,0),COLOR00DD00;
MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;
K2:=(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+16*REF(MID,4)+15*REF(MID,5)+14*REF(MID,6)+13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+4*REF(MID,16)+3*REF(MID,17)+2*REF(MID,18)+REF(MID,20))/210;
K3:=MA(K2,5);
J:=MAX(MA(C,N2),MA(C,N3));
K1:=MIN(MA(C,N2),MA(C,N3));
A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));
A2:=BARSLAST(REF(CROSS(DEA,DIFF),1));
A3:=BARSLAST(REF(CROSS(K,D),1));
A4:=BARSLAST(REF(CROSS(D,K),1));
底背離:=IF(REF(LOW,A1+1)>LOW AND DIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA),1,0);
頂背離:=IF(REF(HIGH,A2+1)<HIGH AND REF(DIFF,A2+1)>DIFF AND CROSS(DEA,DIFF),1,0);
底背離1:=IF(REF(LOW,A3+1)>LOW AND K>REF(K,A3+1) AND CROSS(K,D),1,0);
頂背離1:=IF(REF(HIGH,A4+1)<HIGH AND REF(D,A4+1) AND CROSS(D,K),1,0);
DRAWTEXT(CROSS(K,D) AND C>J AND D<76 AND REF(MACD,1)<MACD AND (頂背離=0 OR 頂背離1=0) AND SS=1 AND C>K2,K,'買'),COLORRED;
DRAWICON(CROSS(K,D) AND C>J AND D<76 AND REF(MACD,1)<MACD AND (頂背離=0 OR 頂背離1=0) AND SS=1 AND C>K2,K,1);
DRAWTEXT(CROSS(D,K) AND (C<K1 OR (J>=C AND C>=K)) AND REF(MACD,1)>MACD AND (底背離=0 OR 底背離1=0) AND D>18 AND XJ=1 AND C<K3,D,'賣'),COLORWHITE;
DRAWICON(CROSS(D,K) AND (C<K1 OR (J>=C AND C>=K)) AND REF(MACD,1)>MACD AND (底背離=0 OR 底背離1=0) AND D>18 AND XJ=1 AND C<K3,D,2);
DRAWTEXT(CROSS(K,D) AND (底背離=1 AND 底背離1=1) AND 頂背離1=0 AND SS=1 ,K,'買'),COLORRED;
DRAWICON(CROSS(K,D) AND (底背離=1 AND 底背離1=1) AND 頂背離1=0 AND SS=1 ,K,1);
DRAWTEXT(CROSS(D,K) AND 頂背離=1 AND 頂背離1=1 AND XJ=1,D,'賣'),COLORWHITE;
DRAWICON(CROSS(D,K) AND 頂背離=1 AND 頂背離1=1 AND XJ=1,D,2),COLORWHITE;DRAWTEXT_FIX(C>O,0.01,0.9,0,' www.kzuj.com.cn '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;

?

?

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

?