良友精準macd(無未來）），與主力同步，真正的螞蝗盯莊，死纏爛打

相關標簽:

?

良友精準macd(無未來）），與主力同步，真正的螞蝗盯莊，死纏爛打

?

原理解析：
輸出DIF:收盤價的SHORT日指數移動平均-收盤價的LONG日指數移動平均 輸出DEA:DIF的MID日指數移動平均 輸出平滑異同平均:(DIF-DEA)*2,COLORSTICK 輸出買:當滿足條件DIF上穿DEA時,在DEA和0位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,畫紅色,線寬為1 當滿足條件DIF上穿DEA時,在0和0.1位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLORFF9900,線寬為1 當滿足條件DIF上穿DEA時,在0.3位置書寫文字,COLORFFFFCC 當滿足條件MACD<1日前的MACDANDMACD>0時,在0和MACD位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLOR00BBFF 當滿足條件MACD>=1日前的MACDANDMACD>0時,在0和MACD位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLOR0011BB 當滿足條件MACD>1日前的MACDANDMACD<0時,在0和MACD位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLORBB11BB 當滿足條件MACD<=1日前的MACDANDMACD<0時,在0和MACD位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLORFFBB11 RSV賦值:(收盤價-9日內最低價的最低值)/(9日內最高價的最高值-9日內最低價的最低值)*100 K賦值:RSV的3日[1日權重]移動平均 D賦值:K的3日[1日權重]移動平均 J賦值:3*K-2*D MM賦值:如果MACD<0,返回MACD,否則返回0 JJ賦值:MM> 1日前的MM ZZ賦值:1日前的JJ=1 準備賦值:(JJ AND ZZ)*DEA JH賦值:250日內K和D和J的較大值的較大值的最高值 DH賦值:250日內DIF和DEA的較大值的最高值 SH賦值:JH/DH的整數部分/2 DIFF50賦值:SH*DIF+50 DEA50賦值:SH*DEA+50 縮頭賦值:如果1.5*(DIFF50-DEA50)>0ANDREF(1.5*(DIFF50-DEA50),1)>2日前的1.5*(DIFF50-DEA50)AND1.5*(DIFF50-DEA50)<1日前的1.5*(DIFF50-DEA50),返回1,否則返回0 縮腳賦值:如果1.5*(DIFF50-DEA50)<0ANDREF(1.5*(DIFF50-DEA50),1)<2日前的1.5*(DIFF50-DEA50)AND1.5*(DIFF50-DEA50)>1日前的1.5*(DIFF50-DEA50),返回1,否則返回0 殺多賦值:如果1.5*(DIFF50-DEA50)<0ANDREF(1.5*(DIFF50-DEA50),1)>2日前的1.5*(DIFF50-DEA50)AND1.5*(DIFF50-DEA50)<1日前的1.5*(DIFF50-DEA50),返回1,否則返回0 誘空賦值:如果1.5*(DIFF50-DEA50)>0ANDREF(1.5*(DIFF50-DEA50),1)<2日前的1.5*(DIFF50-DEA50)AND1.5*(DIFF50-DEA50)>1日前的1.5*(DIFF50-DEA50),返回1,否則返回0 阻力賦值:如果收盤價上穿收盤價的20日簡單移動平均ORCROSS(收盤價,收盤價的60日簡單移動平均),返回10,否則返回0 當滿足條件殺多的3日過濾AND殺多時,在MACD+0.1位置書寫文字,COLORFF00FF 當滿足條件縮頭的3日過濾AND縮頭時,在MACD+0.1位置書寫文字,COLORFF00FF 當滿足條件誘空的3日過濾AND誘空時,在MACD+0.1位置書寫文字,COLOR00FF00 當滿足條件縮腳的3日過濾AND縮腳時,在MACD-0.1位置書寫文字,COLOR00FF00

?

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

源碼：

?

?

DIF:EMA(CLOSE,SHORT)-EMA(CLOSE,LONG);
DEA:EMA(DIF,MID);
MACD:(DIF-DEA)*2,COLORSTICK;
買:STICKLINE(CROSS(DIF,DEA),DEA,0,2,0),COLORRED,LINETHICK1;
STICKLINE(CROSS(DIF,DEA),0,0.1,2,0),COLORFF9900,LINETHICK1;
DRAWTEXT(CROSS(DIF,DEA),0.3,' 買'),COLORFFFFCC;
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,1,0 ),COLOR00BBFF;
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,1,0 ),COLOR0011BB;
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,1,0),COLORBB11BB;STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,1,0),COLORFFBB11;
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;
MM:=IF(MACD< 0,MACD,0);
JJ:=MM> REF(MM,1);
ZZ:=REF(JJ,1)=1;
準備:=(JJ AND ZZ)*DEA;JH:=HHV(MAX(K,MAX(D,J)),250);
DH:=HHV(MAX(DIF,DEA),250);
SH:=INTPART(JH/DH)/2;
DIFF50:=SH*DIF+50;
DEA50:=SH*DEA+50;
縮頭:=IF(1.5*(DIFF50-DEA50)>0 AND REF(1.5*(DIFF50-DEA50),1)>REF(1.5*(DIFF50-DEA50),2) AND 1.5*(DIFF50-DEA50)< REF(1.5*(DIFF50-DEA50),1),1,0);
縮腳:=IF(1.5*(DIFF50-DEA50)<0 AND REF(1.5*(DIFF50-DEA50),1)< REF(1.5*(DIFF50-DEA50),2) AND 1.5*(DIFF50-DEA50)>REF(1.5*(DIFF50-DEA50),1),1,0);
殺多:=IF(1.5*(DIFF50-DEA50)<0 AND REF(1.5*(DIFF50-DEA50),1)> REF(1.5*(DIFF50-DEA50),2) AND 1.5*(DIFF50-DEA50)<REF(1.5*(DIFF50-DEA50),1),1,0);
誘空:=IF(1.5*(DIFF50-DEA50)>0 AND REF(1.5*(DIFF50-DEA50),1)< REF(1.5*(DIFF50-DEA50),2) AND 1.5*(DIFF50-DEA50)>REF(1.5*(DIFF50-DEA50),1),1,0);阻力:=IF(CROSS(C,MA(C,20)) OR CROSS(C,MA(C,60)),10,0);
DRAWTEXT(FILTER(殺多,3) AND 殺多,MACD+0.1,'殺多'),COLORFF00FF;
DRAWTEXT(FILTER(縮頭,3) AND 縮頭,MACD+0.1,'賣'),COLORFF00FF;
DRAWTEXT(FILTER(誘空,3) AND 誘空,MACD+0.1,'?洗'),COLOR00FF00;
DRAWTEXT(FILTER(縮腳,3) AND 縮腳,MACD-0.1,'買'),COLOR00FF00;{SHORT 22003LONG220016MID22007};

?

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

?