通达信KDJ的MACD做成主图未加密选股指标公式源码

通达信KDJ的MACD做成主图未加密选股指标公式源码

源码正文：

PK:=5{XG51};
DRAWGBK(O>C,RGB(0,30,0),RGB(0,0,60),0,'01',0){XG51};
ZK1:(xma(Xma(H,25),25)-XMA(XMA(L,25),25))*1+XMA(XMA(H,25),25),DOTLINE,COLORRED{XG51};
ZD1:XMA(XMA(L,25),25)-(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1,DOTLINE,COLORRED{XG51};
bs:(XMA(XMA(H,60),60)-XMA(XMA(L,60),60))*2.2+XMA(XMA(H,60),60),DOTLINE,COLORWHITE{XG51};
BD:XMA(XMA(L,60),60)-(XMA(XMA(H,60),60)-XMA(XMA(L,60),60))*2.8,DOTLINE,COLORCYAN{XG51};
DRAWTEXT(ISLAstBAR,ZK1,STRCAT(' ←【卖出】= ',CON2STR(ZK1,2))),COLOR00FFFF{XG51};
DRAWTEXT(ISLASTBAR,ZD1,STRCAT(' ←【买入】= ',CON2STR(ZD1,2))),COLORRED{XG51};
DRAWTEXT(ISLASTBAR,BS,STRCAT(' ←【顶部】= ',CON2STR(BS,2))),COLOR0044FF{XG51};
DRAWTEXT(ISLASTBAR,BD,STRCAT(' ←【底部】= ',CON2STR(BD,2))),COLOR00FF00{XG51};
DRAWBAND(BS,RGB(0,0,200),ZK1,RGB(0,0,255)){XG51};
DRAWBAND(ZK1,RGB(80,50,0),ZD1,RGB(80,50,0)){XG51};
DRAWBAND(ZD1,RGB(15,25,15),BD,RGB(25,45,25)){XG51};
(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1+XMA(XMA(H,25),25),DOTLINE,COLORRED{XG51};
XMA(XMA(L,25),25)-(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1,DOTLINE,COLORRED{XG51};
(XMA(XMA(H,60),60)-XMA(XMA(L,60),60))*2.2+XMA(XMA(H,60),60),DOTLINE,COLORWHITE{XG51};
XMA(XMA(L,60),60)-(XMA(XMA(H,60),60)-XMA(XMA(L,60),60))*2.8,DOTLINE,COLORCYAN{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};
difF:(ema(J,8) - EMA(J,16))/PK,COLOR00FF00{XG51};
DEA:EMA(DIFF,5),COLORFF9900{XG51};
macd:2*(DIFF-DEA),COLORSTICK{XG51};
0,COLORFF9900,DOTLINE{XG51};
DRAWBAND(DIFF,RGB(255,80,0),DEA,RGB(0,255,100)){XG51};
DRAWTEXT_FIX(1,0.02,0.02,0, STRCAT('■叠加kdj的坐标参数与股票价格有关需要调整【PK】.在不重叠的条件下尽可能的放大k线:▄▄▄▄PK=',CON2STR(PK,2))),COLOR00FFFF{XG51};
DRAWTEXT_FIX(1,0.02,0.05,0,'■现在kdJ的参数是:N=9,M1=3,M2=3;'),COLOR00FF00{XG51};
DRAWTEXT_FIX(1,0.02,0.08,0,'■【KDJ】的【MacD】的参数是:LONG=8,LONG=16,M=5;'),COLOR0044FF{XG51};
MA5:=MA(CLOSE,5){XG51};
DIFFG:=(EMA(C,12) - EMA(C,26)){XG51};
DEAG:=EMA(DIFFG,9){XG51};
MACDG:=2*(DIFFG-DEAG){XG51};
卖:=crOSS((MA5<REF(MA5,1) AND MACDG<REF(MACDG,1) AND J<REF(J,1)),(MA5>REF(MA5,1) AND MACDG>REF(MACDG,1) AND J>REF(J,1))){XG51};
DRAWTEXT(FILTER(卖,5),H*1.112,'★卖'),COLOR00FF00{XG51};
STICKLINE(FILTER(卖,5),H*1.15,H,0,0),COLOR05FF00{XG51};
买:=CROSS((MA5>REF(MA5,1) AND MACDG>REF(MACDG,1) AND J>REF(J,1)),(MA5<REF(MA5,1) AND MACDG<REF(MACDG,1) AND J<REF(J,1))){XG51};
DRAWTEXT(FILTER(买,5),L*0.83,'★买'),COLOR0000FF{XG51};
STICKLINE(FILTER(买,5),L*0.8,L,0,0),COLOR0555FF{XG51};
YTSL:=(3*CLOSE+LOW+OPEN+HIGH)/6{XG51};
辰星线:(20*YTSL+19*REF(YTSL,1)+18*REF(YTSL,2)+17*REF(YTSL,3)+16*REF(YTSL,4)+15*REF(YTSL,5)+14*REF(YTSL,6)+13*REF(YTSL,7)+12*REF(YTSL,8)+11*REF(YTSL,9)+10*REF(YTSL,10)+9*REF(YTSL,11)+8*REF(YTSL,12)+7*REF(YTSL,13)+6*REF(YTSL,14)+5*REF(YTSL,15)+4*REF(YTSL,16)+3*REF(YTSL,17)+2*REF(YTSL,18)+REF(YTSL,20))/211,COLOR00FFFF{XG51};
IF(辰星线>REF(辰星线,1),辰星线,DRAWNULL),LINETHICK3,COLOR0000FF{XG51};
IF(辰星线<REF(辰星线,1),辰星线,DRAWNULL),LINETHICK3,COLORFF9900{XG51};
STICKLINE(CLOSE>= REF(CLOSE,1) ,HIGH,LOW,0,1 ),COLORWHITE{XG51};
STICKLINE(CLOSE>= REF(CLOSE,1) ,OPEN,CLOSE,3,0 ),COLOR000066{XG51};
STICKLINE(CLOSE>= REF(CLOSE,1) ,OPEN,CLOSE,2.6,0 ),COLOR000099{XG51};
STICKLINE(CLOSE>= REF(CLOSE,1) ,OPEN,CLOSE,1.8,0 ),COLOR0000CC{XG51};
STICKLINE(CLOSE>= REF(CLOSE,1) ,OPEN,CLOSE,1.0,0 ),COLOR0000FF{XG51};
STICKLINE(CLOSE>= REF(CLOSE,1) ,OPEN,CLOSE,0.4,0 ),COLORCC66FF{XG51};
STICKLINE(CLOSE< REF(CLOSE,1) ,HIGH,LOW,0,1 ),COLORGREEN{XG51};
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,3,0 ),COLORCC0000{XG51};
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,2.5,0 ),COLORFF1100{XG51};
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,2,0 ),COLORFF2200{XG51};
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,1.6,0 ),COLORFF4400{XG51};
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,1.2,0 ),COLORFF6600{XG51};
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,0.6,0 ),COLORFF8800{XG51};
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,0.2,0 ),COLORGREEN{X=G~5^1=C=N={};

通达信大盘指标未加密选股指标公式源码

源码正文：

N:=9{XG51};
M:=3{XG51};
KK:=LLV(LOW,N){XG51};
EE:=HHV(HIGH,N){XG51};
YY:=ema((CLOSE-KK)/(EE-KK)*100,M){XG51};
MM:=Ema(YY,M){XG51};
AA:MA(MM,M){XG51};
AZ:18{XG51};
BZ:50{XG51};
CZ:88{XG51};
CC:=(CLOSE/AA){XG51};
MA1:=MA(CC*(2*CLOSE+HIGH+LOW)/4,3){XG51};
MAAA:=((MA1-AA)/AA)/3{XG51};
TMP:=MA1-MAAA*MA1{XG51};
J:IF(MM<=AA,AA,DRAWNULL),LINETHICK3,COLORGREEN{XG51};
A:=MM,LINETHICK2,COLORBLUE{XG51};
X:=IF(MM<=AA,MM,DRAWNULL),LINETHICK2,COLORCYAN{X~G_5-1~C~N~{};