相關標簽:大智慧ddx指標源碼 、 大智慧最牛指標源碼 、 大智慧纏論指標源碼 、 大智慧指標公式大全 、 大智慧成交量指標公式 、 大智慧散戶線指標公式 、 大智慧背離指標公式 、 大智慧指標公式下載 、 大智慧ene指標公式 、 boll主圖指標公式源碼 、 macd主圖指標源碼公式 、 預警指標源碼及副圖 、 狙擊主力副圖指標源碼 、 主圖買賣指標公式源碼 、 135戰法副圖指標源碼 、

?

原理解析：
輸出DIF:收盤價的SHORT日指數移動平均 - 收盤價的LONG日指數移動平均 輸出DEA:DIF的M日指數移動平均,畫藍色,線寬為3 輸出平滑異同平均:2*(DIF-DEA),COLORSTICK A4賦值:上次1日前的DIF上穿DEA距今天數 B1賦值:A4+1日前的收盤價>收盤價 AND A4+1日前的DIF<DIF AND DIF上穿DEA 當滿足條件B1>0的5日過濾時,在DIF+0.2位置書寫文字,畫黃色 輸出操盤:當滿足條件MACD>=0ANDMACD>=1日前的MACD時,在0和MACD位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,畫紅色 輸出減倉:當滿足條件MACD>=0ANDMACD<1日前的MACD時,在0和MACD位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLORFF9900 輸出反彈:當滿足條件MACD<0ANDMACD>=1日前的MACD時,在0和MACD位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,畫黃色 輸出尋底:當滿足條件MACD<0ANDMACD<1日前的MACD時,在0和MACD位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLORFFFF00 輸出空倉:0,畫白色 如果DIF<0,返回DIF,否則返回0,畫黃色,線寬為1 如果DIF<0,返回0,否則返回DIF,畫紅色,線寬為1 如果DIF<DEA,返回DIF,否則返回DEA,畫白色,線寬為1 如果DIF>DEA,返回DEA,否則返回DEA,畫綠色,線寬為1 RSV賦值:(收盤價-9日內最低價的最低值)/(9日內最高價的最高值-9日內最低價的最低值)*100 K賦值:RSV的3日[1日權重]移動平均 D賦值:K的3日[1日權重]移動平均 J賦值:3*K-2*D 周Ｋ賦值:"KDJ的K[取周線數據]"(9,3,3)的5日簡單移動平均 周Ｄ賦值:"KDJ的D[取周線數據]"(9,3,3)的5日簡單移動平均 周Ｊ賦值:"KDJ的J[取周線數據]"(9,3,3)的5日簡單移動平均 當滿足條件K<20ANDCROSS(K,D)時,在MACD位置畫1號圖標,ALIGN2 輸出周金:當滿足條件"KDJ的K[取周線數據]"(9,3,3)上穿"KDJ的D[取周線數據]"(9,3,3)時,在MACD位置書寫文字,ALIGN2,畫紅色 輸出周死:當滿足條件"KDJ的D[取周線數據]"(9,3,3)上穿"KDJ的K[取周線數據]"(9,3,3)時,在MACD*1.5位置書寫文字,ALIGN2,畫綠色 輸出月金:當滿足條件"KDJ的K[取月線數據]"(9,3,3)上穿"KDJ的D[取月線數據]"(9,3,3)時,在MACD位置書寫文字,ALIGN2,畫洋紅色 輸出月死:當滿足條件"KDJ的D[取月線數據]"(9,3,3)上穿"KDJ的K[取月線數據]"(9,3,3)時,在MACD*1.5位置書寫文字,ALIGN2,畫黃色 VAR1C賦值:(最高價 - 開盤價和收盤價的較小值) VAR2C賦值:(收盤價 - 開盤價) VAR3C賦值:(開盤價和收盤價的較小值 - 最低價) VAR4C賦值:(最高價 - 最低價) VAR5C賦值:((成交量(手) * VAR1C) / VAR4C) VAR6C賦值:((成交量(手) * VAR2C) / VAR4C) VAR7C賦值:((成交量(手) * VAR3C) / VAR4C) VAR8C賦值:((VAR5C - VAR6C) - VAR7C) VAR4賦值:收盤價的5日簡單移動平均 VAR5賦值:收盤價的10日簡單移動平均 VAR6賦值:收盤價的30日簡單移動平均 VAR7賦值:收盤價的60日簡單移動平均 VAR8賦值:獲利盤為85%的成本分布的7日指數移動平均 VAR9賦值:獲利盤為15%的成本分布的7日指數移動平均 VARA賦值:(((收盤價*成交量(手))*10)的4日累和 / (成交量(手)*200)的4日累和) VARB賦值:((VARA*10)的整數部分 / 10) VARC賦值:(((收盤價*成交量(手))*10)的7日累和 / (成交量(手)*200)的7日累和) VARD賦值:((VARC*10)的整數部分 / 10) VARE賦值:(((收盤價*成交量(手))*10)的28日累和 / (成交量(手)*200)的28日累和) VARF賦值:((VARE*10)的整數部分 / 10) 輸出短線趨勢:(收盤價的5日指數移動平均 - 收盤價的10日指數移動平均),畫洋紅色,線寬為2 輸出中線趨勢:短線趨勢的9日指數移動平均,畫洋紅色,線寬為3 VAR10賦值:((0 - ((10 * (5日內收盤價的最高值 - 收盤價)) / (5日內收盤價的最高值 - 5日內最低價的最低值))) + 10) VAR11賦值:((0 - ((10 * (10日內收盤價的最高值 - 收盤價)) / (10日內收盤價的最高值 - 10日內最低價的最低值))) + 10) VAR12賦值:((0 - ((10 * (20日內收盤價的最高值 - 收盤價)) / (20日內收盤價的最高值 - 20日內最低價的最低值))) + 10) VAR13賦值:((0 - ((10 * (30日內收盤價的最高值 - 收盤價)) / (30日內收盤價的最高值 - 30日內最低價的最低值))) + 10) VAR14賦值:1日前的中線趨勢 VAR15賦值:中線趨勢 VAR16賦值:(VAR15 - VAR14) VAR17賦值:1日前的短線趨勢 VAR18賦值:短線趨勢 VAR19賦值:(VAR18 - VAR17) VAR1A賦值:開盤價 VAR1B賦值:收盤價 輸出莊家吸籌:如果(((((((VAR1A<=VAR4)AND(VAR1A<=VAR5))AND(VAR1A<=VAR6))AND(VAR1B>=VAR4))AND(VAR1B>=VARF))AND(VAR16>0))AND(VAR19>0)),返回0.5,否則返回0,線寬為2,COLOR66FF00 輸出短線指標:如果((((短線趨勢上穿中線趨勢AND(短線趨勢<0))AND(中線趨勢<(0-0.2)))AND(VAR11>45))AND(VAR16>0)),返回0.3,否則返回0.1,COLOR66FF00 CXH賦值:STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1)) 輸出WARNING('HTTP://www.kzuj.com.cn',CURRENTTIME>180000 AND (CXH=1 OR CXH=6)) DRAWTEXTREL(10 ,10 ,'指標公式')

?

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

源碼：

?

?

DIF:EMA(CLOSE,SHORT) - EMA(CLOSE,LONG);DEA:EMA(DIF,M),COLORBLUE,LINETHICK3;MACD:2*(DIF-DEA),COLORSTICK;A4:=BARSLAST(ref(cross(dif,dea),1));B1:=ref(c,A4+1)>c and ref(dif,A4+1)<dif and cross(dif,dea);DRAWTEXT(FILTER(B1>0,5),dif+0.2,'背離'),COLORyellow;操盤:STICKLINE(MACD>=0 AND MACD>=REF(MACD,1),0,MACD,2,0),COLORRED{COLOR6058FF};減倉:STICKLINE(MACD>=0 AND MACD< REF(MACD,1),0,MACD,2,0),COLORff9900{COLOR6058FF};反彈:STICKLINE(MACD<0 AND MACD>=REF(MACD,1),0,MACD,2,0),COLORYELLOW{COLORFFFF00};尋底:STICKLINE(MACD<0 AND MACD< REF(MACD,1),0,MACD,2,0),COLORFFFF00;空倉:0,COLORWHITE;if(dif<0,dif,0),coloryellow,linethick1;if(dif<0,0,dif),colorred,linethick1;if(dif<dea,dif,dea),COLORWHITE,linethick1;if(dif>dea,dea,dea),COLORgreen{colorff00ff},linethick1;RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;K:=SMA(RSV,3,1);D:=SMA(K,3,1);J:=3*K-2*D;周Ｋ:=MA("KDJ.K#WEEK"(9,3,3) ,5);周Ｄ:=MA("KDJ.D#WEEK"(9,3,3) ,5);周Ｊ:=MA("KDJ.J#WEEK"(9,3,3) ,5);DRAWICON(k<20 and cross(k,d),MACD,1),align2;周金:DRAWTEXT(CROSS("KDJ.K#WEEK"(9,3,3),"KDJ.D#WEEK"(9,3,3)) ,MACD,'▲'),align2,COLORred;周死:DRAWTEXT(CROSS("KDJ.d#WEEK"(9,3,3),"KDJ.k#WEEK"(9,3,3)) ,macd*1.5,'▼'),align2,COLORgreen;月金:DRAWTEXT(CROSS("KDJ.K#MONTH"(9,3,3),"KDJ.D#MONTH"(9,3,3)) ,MACD,'▲'),align2,COLORMAGENTA;月死:DRAWTEXT(CROSS("KDJ.D#MONTH"(9,3,3),"KDJ.K#MONTH"(9,3,3)) ,macd*1.5,'▼'),align2,COLORYELLOW;VAR1C:=(HIGH - MIN(OPEN,CLOSE));VAR2C:=(CLOSE - OPEN);VAR3C:=(MIN(OPEN,CLOSE) - LOW);VAR4C:=(HIGH - LOW);VAR5C:=((VOL * VAR1C) / VAR4C);VAR6C:=((VOL * VAR2C) / VAR4C);VAR7C:=((VOL * VAR3C) / VAR4C);VAR8C:=((VAR5C - VAR6C) - VAR7C);VAR4:=MA(CLOSE,5);VAR5:=MA(CLOSE,10);VAR6:=MA(CLOSE,30);VAR7:=MA(CLOSE,60);VAR8:=EMA(COST(85),7);VAR9:=EMA(COST(15),7);VARA:=(SUM(((CLOSE * VOL) * 10),4) / SUM((VOL * 200),4));VARB:=(INTPART((VARA * 10)) / 10);VARC:=(SUM(((CLOSE * VOL) * 10),7) / SUM((VOL * 200),7));VARD:=(INTPART((VARC * 10)) / 10);VARE:=(SUM(((CLOSE * VOL) * 10),28) / SUM((VOL * 200),28));VARF:=(INTPART((VARE * 10)) / 10);短線趨勢:(EMA(CLOSE,5) - EMA(CLOSE,10)),COLORMAGENTA,LINETHICK2;中線趨勢:EMA(短線趨勢,9),COLORMAGENTA,LINETHICK3;VAR10:=((0 - ((10 * (HHV(CLOSE,5) - CLOSE)) / (HHV(CLOSE,5) - LLV(LOW,5)))) + 10);VAR11:=((0 - ((10 * (HHV(CLOSE,10) - CLOSE)) / (HHV(CLOSE,10) - LLV(LOW,10)))) + 10);VAR12:=((0 - ((10 * (HHV(CLOSE,20) - CLOSE)) / (HHV(CLOSE,20) - LLV(LOW,20)))) + 10);VAR13:=((0 - ((10 * (HHV(CLOSE,30) - CLOSE)) / (HHV(CLOSE,30) - LLV(LOW,30)))) + 10);VAR14:=REF(中線趨勢,1);VAR15:=中線趨勢;VAR16:=(VAR15 - VAR14);VAR17:=REF(短線趨勢,1);VAR18:=短線趨勢;VAR19:=(VAR18 - VAR17);VAR1A:=OPEN;VAR1B:=CLOSE;莊家吸籌:IF((((((((VAR1A <= VAR4) AND (VAR1A <= VAR5)) AND (VAR1A <= VAR6)) AND (VAR1B >= VAR4)) AND (VAR1B >= VARF)) AND (VAR16 > 0)) AND (VAR19 > 0)),0.5,0),LINETHICK2,COLOR66FF00;短線指標:IF(((((CROSS(短線趨勢,中線趨勢) AND (短線趨勢 < 0)) AND (中線趨勢 < (0 - 0.2))) AND (VAR11 > 45)) AND (VAR16 > 0)),0.3,0.1),COLOR66FF00;CXH:=STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1));
WARNING('http://www.kzuj.com.cn',CURRENTTIME>180000 and (CXH=1 OR CXH=6));
DRAWTEXTREL(10 ,10 ,'指標公式');


?

?

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

?