[求助]麻煩老師寫一個變色K線指標
作者:文華財經 來源:cxh99.com 發布時間:2023年10月21日
-
咨詢內容:
?老師,麻煩你幫我寫一個變色K線指標。要求如下:1.全部符合五個條件,所有K線全變紅色,(而不是只是其中一根K線變色),只要其中一個條件不符合,則變灰色:A:MACD金叉,2.CCI上穿0軸,3.KDj金叉,4,OBV快線金叉慢線,5.EMA均線(13 21 50 144)多頭排列
2.全部符合五個條件,所有K線全變綠色,(而不是只是其中一根K線變色),只要其中一個條件不符合,則變灰色:A:MACD死叉,2.CCI下穿0軸,3.KDJ死叉,4,OBV快線死叉慢線。5.EMA均線(13 21 50 144)空頭排列
附OBV雙線指標:(m 34)VA:=IF(CLOSE>REF(CLOSE,1),VOL,-VOL);OBV:SUM(IF(CLOSE=REF(CLOSE,1),0,VA),0),RGB(0,240,0);MAOBV:EMA(OBV,M),RGB(255,0,255);
要做成的效果如附圖所示,另外,我要這個指標能用于WH6
?
?來源:程序化99
-
文華技術人員:
?老師,幫一下忙啊
?
?來源: m.kzuj.com.cn
-
文華客服:
?
DIFF := EMA(CLOSE,12) - EMA(CLOSE,26);
DEA? := EMA(DIFF,9);
MACD:=2*(DIFF-DEA),COLORSTICK;
TYP:=(CLOSE+HIGH+LOW)/3;
CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
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;
EMA13:=EMA(C,13);
EMA21:=EMA(C,21);
EMA50:=EMA(C,50);
EMA144:=EMA(C,144);
M:=34;
VA:=IF(CLOSE>REF(CLOSE,1),VOL,-VOL);
OBV:=SUM(IF(CLOSE=REF(CLOSE,1),0,VA),0),RGB(0,240,0);
MAOBV:=EMA(OBV,M),RGB(255,0,255);
COND1:=DIFF>DEA&&CCI>0&&K>D&&OBV>MAOBV&&EMA13>EMA21&&EMA21>EMA50&&EMA50>EMA144;
COND2:=DIFF<DEA&&CCI<0&&K<D&&OBV<MAOBV&&EMA13<EMA21&&EMA21<EMA50&&EMA50<EMA144;
DRAWCOLORKLINE(COND1,COLORRED,0);
DRAWCOLORKLINE(COND2,COLORGREEN,0);
DRAWCOLORKLINE(NOT(COND1)&&NOT(COND2),COLORGRAY,0);