通达信单纯MACD未加密选股指标公式源码

源码正文：

RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100{XG51};
K:SMA(RSV,3,1),LINETHICK2,COLORRED{XG51};
D:Sma(K,3,1),LINETHICK2,COLOR00DDDD{XG51};
J:3*K-2*D,LINETHICK2,COLOR800080{XG51};
dif:ema(CLOSE,12)-EMA(CLOSE,26),LINETHICK0,COLOR0099FF{XG51};
DEA :EMA(DIF,9),LINETHICK0,COLORD89837{XG51};
macd:2*(DIF-DEA),COLORFF9999,LINETHICK0{XG51};
YLZC:=IF(CLOSE=INDEXC,(INDEXC+INDEXH+INDEXL+INDEXO)/4,AMOUNT/(vol+0.01)/100){XG51};
阻价:=IF(CLOSE=INDEXC,YLZC+INDEXC-INDEXL,YLZC+(CLOSE-LOW)){XG51};
支价:=IF(CLOSE=INDEXC,INDEXL+INDEXC-YLZC,LOW+(CLOSE-YLZC)){XG51};
今压:REF(阻价,1),LINETHICK0,COLORAA11BB{XG51};
今撑:REF(支价,1),LINETHICK0,COLOR009900{XG51};
明压:阻价,LINETHICK0{XG51};
明撑:支价,LINETHICK0{XG51};
RSV1:=(HHV(H,9.8)-C)/(HHV(H,9.8)-LLV(L,9.8))*101{XG51};
KK:=SMA(RSV1,3,1){XG51};
DD:=SMA(KK,3,1){XG51};
JJ:=3*KK-2*DD{XG51};
买卖:=IF(JJ>=100,100,IF(JJ<=0,0,JJ)){XG51};
明天买:IF(买卖=100,0-10,0),COLOR00CCCC{XG51};
明天卖:IF(买卖=0,90,100),COLOR00FF00{XG51};
KX:=250{XG51};
KH:=HHV(K,KX){XG51};
DH:=HHV(D,KX){XG51};
JH:=HHV(J,KX){XG51};
KL:=LLV(K,KX){XG51};
DL:=LLV(D,KX){XG51};
JL:=LLV(J,KX){XG51};
HKMAX:=MAX(KH,MAX(DH,JH)){XG51};
LKMIN:=MIN(KL,MIN(DL,JL)){XG51};
KHLB:=(HKMAX+LKMIN)/2{XG51};
KHLC:=HKMAX-LKMIN{XG51};
MHF:=HHV(DIF,KX){XG51};
MHD:=HHV(DEA,KX){XG51};
MHM:=HHV(MacD,KX){XG51};
MLF:=LLV(DIF,KX){XG51};
MLD:=LLV(DEA,KX){XG51};
MLM:=LLV(MACD,KX){XG51};
HMAX:=MAX(MHF,MAX(MHD,MHM)){XG51};
LMIN:=MIN(MLF,MIN(MLD,MLM)){XG51};
FHLB:=(HMAX-LMIN)/100{XG51};
FHLC:=HMAX-LMIN{XG51};
SH:=(0-FHLB)*(KHLC/FHLC)+KHLB{XG51};
DIFA:=(DIF-FHLB)*(KHLC/FHLC)+KHLB{XG51};
DEAA:=(DEA-FHLB)*(KHLC/FHLC)+KHLB{XG51};
MACDA:=(MACD-FHLB)*(KHLC/FHLC)+KHLB{XG51};
CDA:=MACD<REF(MACD,1) AND MACD>0{XG51};
CDB:=MACD>=REF(MACD,1) AND MACD>0{XG51};
CDC:=MACD>REF(MACD,1) AND MACD<0{XG51};
CDD:=MACD<=REF(MACD,1) AND MACD<0{XG51};
stICKLINE(CDA,SH,MACDA,2,0),COLOR00AAFF{XG51};
STICKLINE(CDB,SH,MACDA,2,0),COLOR0000AA;
STICKLINE(CDC,SH,MACDA,2,0),COLORAA00BB{XG51};
TYP:=(HIGH+LOW+CLOSE)/3{XG51};
STICKLINE(DIF>REF(DIF,1),20,20,2,0),COLORWHITE{XG51};
STICKLINE(DIF<REF(DIF,1),20,20,2,0),COLORCYAN{XG51};
STICKLINE(K>=REF(K,1) OR K>D AND DIF>REF(DIF,1),80,80,2,1),COLORWHITE{XG51};
STICKLINE(K<REF(K,1),80,80,2,1),COLORCYAN{XG51};
MACD金叉:=crOSS(MACD,DIF) AND MACD>=(0-0.05) AND MACD<=0.02{XG51};
DRAWTEXT(MACD金叉,MACDA*0.82,'▲MACD金叉'),COLOR00FFFF{XG51};
XX:=EMA(MA(LOW,3)*0.96,30){XG51};
DIF金叉:=IF(CROSS(DIF,DEA) AND XX-REF(XX,1)>0 AND MACD>=REF(MACD,1) AND DIF<=0,1,0){XG51};
DRAWTEXT(DIF金叉=1,DIFA*1.68,'DIF金叉'),COLORCDFFBB{XG51};
低位金叉:=CROSS(DIF,DEA) AND DIF<-0.1{XG51};
DRAWTEXT(低位金叉,DEAA*0.99,'▲DIF低位金叉'),COLOR0099DD{XG51};
DIFDEA:=COUNT(CROSS(DIF,DEA),BArslAST(DEA>=0)){XG51};
二次金叉:=CROSS(DIF,DEA) AND DEA<0 AND COUNT(DIFDEA=2,21)=1{XG51};
DRAWTEXT(二次金叉,DEAA*0.99-8,'▲DIF 二次金叉'),COLORFF00FF{XG51};
A1:=BARSLAST(REF(CROSS(DIF,DEA),1)){XG51};
底背离:=REF(CLOSE,A1+1)>CLOSE AND DIF>REF(DIF,A1+1) AND CROSS(DIF,DEA){XG51};
DRAWTEXT(底背离,DEAA*0.99-16,'▲DIF底背离'),COLOR0099FF{XG51};
A2:=BARSLAST(REF(CROSS(DEA,DIF),1)){XG51};
顶背离:=REF(CLOSE,A2+1)<CLOSE AND REF(DIF,A2+1)>DIF AND CROSS(DEA,DIF){XG51};
DRAWTEXT(FILTER(顶背离,5),DEAA*1.02,'▲DIF顶背离'),COLORDDAAAA{X!G~5~1!C!N!{};

源码正文：

VV:=IF(CAPITAL<1,INDEXV,vol){XG51};
VVC:=IF(CAPITAL<1,SUM(INDEXV,71),CAPITAL){XG51};
stICKLINE(C>REF(C,1),VOL,0,3,1),COLOR330099{XG51};
STICKLINE(C<=REF(C,1),VOL,0,3,1),COLORCC9900{XG51};
换手:=VV/VVC{XG51};
机构意图:=ma(换手,21)*100{XG51};
大户意图:=MA(换手,13)*100{XG51};
中户意图:=MA(换手,8)*100{XG51};
散户意图:=MA(换手,5)*100{XG51};
均量:=(机构意图+大户意图+中户意图+散户意图)/4{XG51};
机构0:=机构意图-均量{XG51};
大户0:=大户意图-均量{XG51};
中户0:=中户意图-均量{XG51};
散户0:=散户意图-均量{XG51};
VIRVOL:=Abs(机构0)+ABS(大户0)+ABS(中户0)+ABS(散户0){XG51};
机构:=机构0/VIRVOL*VV{XG51};
大户:=大户0/VIRVOL*VV{XG51};
中户:=中户0/VIRVOL*VV{XG51};
散户:=散户0/VIRVOL*VV{XG51};
机构1日:机构,LINETHICK0{XG51};
大户1日:大户,,LINETHICK0{XG51};
中户1日:中户,LINETHICK0{XG51};
散户1日:散户,LINETHICK0{XG51};
KC4:=ABS(机构)+ABS(大户)+ABS(中户)+ABS(散户){XG51};
KO4:=ABS(大户)+ABS(中户)+ABS(散户){XG51};
STICKLINE(机构>0,KC4,KO4,2,0 ),COLOR330066{XG51};
STICKLINE(机构>0,KC4,KO4,1,0 ),COLOR663399{XG51};
STICKLINE(机构<=0,KC4,KO4,2,0 ),COLOR660033{XG51};
STICKLINE(机构<=0,KC4,KO4,1,0 ),COLOR990033{XG51};
KC3:=ABS(大户)+ABS(中户)+ABS(散户){XG51};
KO3:=ABS(中户)+ABS(散户){XG51};
STICKLINE(大户>0,KC3,KO3,2,0 ),COLOR0000CC{XG51};
STICKLINE(大户>0,KC3,KO3,1,0 ),COLOR3333FF{XG51};
STICKLINE(大户<=0,KC3,KO3,2,0 ),COLOR009900{XG51};
STICKLINE(大户<=0,KC3,KO3,1,0 ),COLOR33CC33{XG51};
KC2:=ABS(中户)+ABS(散户){XG51};
KO2:=ABS(散户){XG51};
STICKLINE(中户>0,KC2,KO2,2,0 ),COLOR0066CC{XG51};
STICKLINE(中户>0,KC2,KO2,1,0 ),COLOR3399FF{XG51};
STICKLINE(中户<=0,KC2,KO2,2,0 ),COLOR993300{XG51};
STICKLINE(中户<=0,KC2,KO2,1,0 ),COLOR336600{XG51};
KC1:=ABS(散户){XG51};
KO1:=0{XG51};
STICKLINE(散户>0,KC1,KO1,2,0 ),COLOR000066{XG51};
STICKLINE(散户>0,KC1,KO1,1,0 ),COLOR333399{XG51};
STICKLINE(散户<=0,KC1,KO1,2,0 ),COLOR003300{XG51};
STICKLINE(散户<=0,KC1,KO1,1,0 ),COLOR336633{XG51};
DRAWTEXT(ISLASTBAR,V+196000,' 机构增'),COLOR330066{XG51};
DRAWTEXT(ISLASTBAR,V+166000,' 机构减'),COLOR990033{XG51};
DRAWTEXT(ISLASTBAR,V+136000,' 大户增'),COLOR0000CC{XG51};
DRAWTEXT(ISLASTBAR,V+116000,' 大户减'),COLOR009900{XG51};
DRAWTEXT(ISLASTBAR,V+96000,' 中户增'),COLOR0066CC{XG51};
DRAWTEXT(ISLASTBAR,V+66000,' 中户减'),COLOR336600{XG51};
DRAWTEXT(ISLASTBAR,V+36000,' 散户增'),COLOR000066{XG51};
DRAWTEXT(ISLASTBAR,V+16000,' 散户减'),COLOR003300{X!G.5!1!C!N!{};