通达信日周MACD未加密选股指标公式源码

通达信日周MACD未加密选股指标公式源码

源码正文：

DRAWTEXT_FIX(1,0.01,0.01,0,'1、在日线观察周macd，与它在周线的样子是一样的'),COLORRED{XG51};
DRAWTEXT_FIX(1,0.01,0.06,0,'2、在日线分析周maCD时，注意对应的最右边一根k线是最近的这周'),COLORRED{XG51};
DRAWTEXT_FIX(1,0.01,0.11,0,'3、相应的，往左数第二根K线对应上周，接着是上上周...'),COLORRED{XG51};
DRAWTEXT_FIX(1,0.01,0.16,0,'4、周线MacD的具体数值看上方，这才是是正确的'),COLORRED{XG51};
DDATE:DATE,NODRAW,COLORWHITE{XG51};
dif:ema(C,12)-EMA(C,26),COLORRED{XG51};
DEA:EMA(DIF,9),COLORBLUE{XG51};
MACD:(DIF-DEA)*2,NODRAW,COLORLIMAGENTA{XG51};
stICKLINE(MACD>0,MACD,0,1,1),COLORWHITE{XG51};
STICKLINE(MACD<0,0,MACD,1,1),COLORCYAN{XG51};
TESTSKIP(PERIOD!=5){XG51};
D1:=DATE{XG51};
DIF1:=MACD.DIF#WEEK{XG51};
DEA1:=MACD.DEA#WEEK{XG51};
WEK:=REFX(WEEkdAY<REF(WEEKDAY,1) OR
DATETODAY(DATE)-DATETODAY(REF(DATE,1))>=7,1) OR ISLASTBAR{XG51};
D2:=IF(WEK,D1,DRAWNULL){XG51};
DIF2:=IF(WEK,DIF1,DRAWNULL){XG51};
DEA2:=IF(WEK,DEA1,DRAWNULL){XG51};
周日期:ALIGNRIGHT(D2),NODRAW,COLORWHITE{XG51};
周DIF:ALIGNRIGHT(DIF2),NODRAW,COLORRED{XG51};
周DEA:ALIGNRIGHT(DEA2),NODRAW,COLORBLUE{XG51};
周MACD:(周DIF-周DEA)*2,NODRAW,COLORLIMAGENTA{XG51};
A1:=CONST(LLV(MACD,150))*2{XG51};
Q:=0.6{XG51};
NOTEXTA1:A1,COLOR336699,DOTLINE{XG51};
STICKLINE(周MACD>0,A1,周MACD*Q+A1,1,1),COLOR0099FF{XG51};
STICKLINE(周MACD<0,A1,周MACD*Q+A1,1,1),COLOR999900{XG51};
NOTEXT周DIF:周DIF*Q+A1,DOTLINE,COLORLICYAN{XG51};
NOTEXT周DEA:周DEA*Q+A1,DOTLINE,COLORGREEN{X_G~5-1_C_N_{};

通达信多指标同框未加密选股指标公式源码

源码正文：

dif:=ema(CLOSE,12)-Ema(CLOSE,26){XG51};
DEA:=EMA(DIF,9){XG51};
stICKLINE(DIF>=DEA,42,46,2,0),COLORGRAY{XG51};
STICKLINE(DIF<DEA,42,46,3,1),COLOR696969{XG51};
DRAWTEXT(CURRBARSCOUNT=13,44,'★macd多头★'),COLORRED{XG51};
TYP:=(HIGH+LOW+CLOSE)/3{XG51};
cci:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14)){XG51};
P3:=CCI>100{XG51};
P4:=CCI<100{XG51};
STICKLINE(P3,36,40,2,0),COLOR0000BB{XG51};
STICKLINE(P4,36,40,3,1),COLOR696969{XG51};
DRAWTEXT(CURRBARSCOUNT=13,38,'★CC>100★'),COLOR00FFFF{XG51};
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100{XG51};
K:=SMA(RSV,3,1){XG51};
D:=SMA(K,3,1){XG51};
J:=3*K-2*D{XG51};
STICKLINE(K>D,30,34,2,0),COLORBB00BB{XG51};
STICKLINE(K<D,30,34,3,1),COLOR696969{XG51};
DRAWTEXT(CURRBARSCOUNT=13,32,'★kdj多头 ★'),COLOR00FFFF{XG51};
SR1:=SAR(10,2,10){XG51};
P1:=IF(CLOSE>SR1,SR1,DRAWNULL),CIRCLEDOT,COLORWHITE{XG51};
P2:=IF(CLOSE<SR1,SR1,DRAWNULL),CIRCLEDOT,COLORCYAN{XG51};
STICKLINE(P1,24,28,2,0),COLORWHITE{XG51};
STICKLINE(P2,24,28,3,1),COLOR696969{XG51};
DRAWTEXT(CURRBARSCOUNT=13,26,'★SAR红珠★'),COLORRED{XG51};
CV:=CLOSE{XG51};
BBIboll:=(MA(CV,3)+MA(CV,6)+MA(CV,12)+MA(CV,24))/4{XG51};
UPR:=BBIBOLL+6*STD(BBIBOLL,11){XG51};
DWN:=BBIBOLL-6*STD(BBIBOLL,11){XG51};
STICKLINE(C>BBIBOLL,18,22,2,0),COLOR00FFFF{XG51};
STICKLINE(C<BBIBOLL,18,22,3,1),COLOR696969{XG51};
DRAWTEXT(CURRBARSCOUNT=13,20,'★BBIBOLl线上★ '),COLORFF00FF{XG51};
VA:=IF(CLOSE>REF(CLOSE,1),vol,-VOL){XG51};
obv:=SUM(IF(CLOSE=REF(CLOSE,1),0,VA),0){XG51};
MaoBV:=MA(OBV,30){XG51};
STICKLINE(OBV>MAOBV,12,16,2,0),COLOR9F9F6F{XG51};
STICKLINE(OBV<MAOBV,12,16,3,1),COLOR696969{XG51};
DRAWTEXT(CURRBARSCOUNT=13,14,'★OBV多头★'),COLORFFFFFF{XG51};
VOLUME:=VOL,VOLSTICK{XG51};
MAVOL1:=MA(VOLUME,5){XG51};
MAVOL2:=MA(VOLUME,10){XG51};
STICKLINE(MAVOL1>=MAVOL2,6,10,2,0),COLOR4D4DFF{XG51};
STICKLINE(MAVOL1<MAVOL2,6,10,3,1),COLOR696969{XG51};
DRAWTEXT(CURRBARSCOUNT=13,8,'★VOL多头★'),COLORRED{XG51};
MA5:=MA(C,5){XG51};
MA10:=MA(C,10){XG51};
STICKLINE(MA5>=MA10,0,4,2,0),COLORFF00FF{XG51};
STICKLINE(MA5<MA10,0,4,3,1),COLOR696969{XG51};
DRAWTEXT(CURRBARSCOUNT=13,2,'★MA多头 ★'),COLORRED{XG51};
XG1:=DIF>=DEA{XG51};
XG2:=P3{XG51};
XG3:=K>D{XG51};
XG4:=P1>0{XG51};
XG5:=C>BBIBOLL{XG51};
XG6:=OBV>MAOBV{XG51};
XG7:=MAVOL1>=MAVOL2{XG51};
XG8:=MA5>=MA10{XG51};
XG9:=XG1 AND XG2 AND XG3 AND XG4 AND XG5 AND XG6 AND XG7 AND XG8{XG51};
XGE:=XG1 + XG2 + XG3 + XG4 + XG5 + XG6 + XG7 + XG8{XG51};
STICKLINE(1,48,52,3,1),COLOR696969{XG51};
DRAWNUMBER(1,52,XGE),COLORBLACK{XG51};
DRAWNUMBER(XGE=8,52,XGE),COLORLIMAGENTA{XG51};
XG:REF(XG9,1)<>1 AND XG9=1,NODRAW{XG51};
STICKLINE(XG,0,46,0,0),COLORWHITE{X=G-5_1=C=N={};