配色: 字号:
KDJ源码
2013-12-15 | 阅:  转:  |  分享 
  


RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))100;K:SMA(RSV,3,1),POINTDOT,COLORWHITE,LINETHICK1;D:SMA(K,3,1),POINTDOT,COLORGREEN,LINETHICK1;J:3K-2D,COLORFF00FF,LINETHICK1;IF(J<0,J,DRAWNULL),COLORGREEN,LINETHICK2;IF(K>90,K,DRAWNULL),COLOR0000FF,LINETHICK2;IF(D>85,D,DRAWNULL),COLORFFFF11,LINETHICK2;DRAWICON(CROSS(J,1),-50,1);DRAWICON(K>80ANDD>80ANDCROSS(D,K),150,2);

PP:=V>REF(V,1);F:=C>OANDHIGH>REF(HIGH,1);G:=C>OANDLOW>REF(LOW,1)ANDC>REF(C,1);X:=(ATAN((MA(C,1)/REF(MA(C,1),1)-1)100)180/3.14115926)>45;R:=J>REF(J,2)ANDJ<100;OK:=FANDGANDXANDRANDPP;JJ:=CROSS(J,OK);DD:=COUNT(CROSS(J,OK),6)<0;DRAWTEXT(OK,50,''买''),COLOR00FFFF;DRAWTEXT(J<-10,-20,''底''),COLOR00FFFF;DRAWTEXT(JJ,90,''买''),COLORRED;

LOWV:=LLV(LOW,9);HIGHV:=HHV(HIGH,9);RSV1:=EMA((CLOSE-LOWV)/(HIGHV-LOWV)100,3);A:=EMA(RSV1,3);B:=MA(A,3);VAR1:=3;VAR2:=((3SMA((((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27)))100),5,1))

-(2SMA(SMA((((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27)))

100),5,1),3,1)));买:IF(CROSS(VAR2,VAR1),60,0);

LST1:=(H+L+O+C2)/5;LST2:=EMA(LST1,21);LST3:=STD(LST1,23);LST4:=EMA(LST1,2);LSTA:=(LST1-LST2)100/LST3;KG:=(EMA(LSTA,23)+100)/2-3,COLOR00FFFF,LINETHICK1;DG:=SMA(KG,5,1),COLORFFFF00,LINETHICK1;JG:4KG-3DG,COLORFF00FF,LINETHICK2;IF(JG>REF(JG,1),JG,DRAWNULL),COLORRED,LINETHICK2;IF(JGREF(JG,1)ANDJGREF(LST4,1)AND

KG>=REF(KG,1)ANDJG<40ORCROSS(JG,KG)ANDCROSS(JG,DG)ANDJG<40ORJG>REF(JG,1)AND

JG<-20,7),-30,1);DRAWICON(FILTER(JG<=REF(JG,1)ANDJG>80,8),140,15);

VARA:=(2CLOSE+HIGH+LOW)/4;VARB:=EXPMA(EXPMA(EXPMA(VARA,4),4),4);JY:=(VARB-REF(VARB,1))/REF(VARB,1)120;KY:=MA(JY,1),COLORCYAN,LINETHICK1;DY:=MA(JY,3),COLORGREEN,LINETHICK1;

VARYGB:=EMA(EMA(CLOSE,9),9);控盘:=(VARYGB-REF(VARYGB,1))/REF(VARYGB,1)100;A10:=CROSS(控盘,0);开始控盘:IF(A10,20,0),LINETHICK1,COLORCYAN;

VAR200:=(CLOSE-LLV(LOW,20))/(HHV(HIGH,20)-LLV(LOW,20))100;VAR300:=SMA(SMA(VAR200,3,1),3,1)/28.57;VAR400:=EMA(VAR300,5);操盘:=3VAR300-2VAR400;A1:=CROSS(操盘,VAR300)ANDVAR300<2.1ANDC>O;STICKLINE(A1,90,0,0.3,0),COLORWHITE;DRAWTEXT(A1,100,''全仓''),COLORWHITE;

MY1:=CROSS(KY,DY);AY1:=BARSLAST(REF(CROSS(KY,DY),1));底背离:=REF(CLOSE,AY1+1)>CLOSEANDKY>REF(KY,AY1+1)ANDCROSS(KY,DY);DRAWLINE(AY1=0ANDDY<0ANDKY<0,KY,底背离,KY,0),COLORFF00FF,LINETHICK3;DRAWICON(MY1,-40,1),COLORWHITE;DRAWICON(CROSS(DY,KY),150,2);

KK:=SMA(RSV,3,1);DDD:=SMA(K,3,1);N:=KK+DDD,COLORMAGENTA;准备:IF(CROSS(N,50),40,-20),COLORLIRED;发射:IF(CROSS(N,100),50,-10),COLORYELLOW;ZTSJ:=BARSLAST(发射=100);价:REF(C,ZTSJ)1.1,COLORBLUE;涨:=(C/REF(C,ZTSJ)-1)100,RGB(255,255,0);低:=IF(ZTSJ>0ANDZTSJ<10AND(L/REF(C,ZTSJ)-1)100<=-5,5,50),RGB(255,255,255);达标:=ZTSJ<20ANDCROSS(H,REF(C,ZTSJ)1.1);GWGD:=N=160ANDREF(N,1)>=REF(N,2);卖:IF(GWGD,130,160),COLORGREEN;

XX:=LLV(J,2)=LLV(J,8);YGBLST:=CROSS(J,REF(J+0.01,1))ANDXXANDJ<20;短进:IF(YGBLST,20,0),LINETHICK1,COLORWHITE;

通达信附图指标散人KDJ源码

RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))100;K:SMA(RSV,3,1),COLORWHITE;D:SMA(K,3,1),COLORYELLOW;J:3K-2D,COLORYELLOW;金叉:IF(SUM(CROSS(K,D)ANDD<23,15)>=2ANDCROSS(K,D)ANDC>O,10,0),COLORFFFF00;加仓:IF(J>D,J,DRAWNULL),COLORRED,LINETHICK1;减仓:IF(J100ANDK>=60),100,J,1,1),COLORYELLOW;STICKLINE(K>92,100,K,1,1),COLORGREEN;STICKLINE((J<=0ANDK<=30),0,J,1,1),COLORYELLOW;STICKLINE(K<=9,0,K,1,1),COLORRED;A1:=BARSLAST(REF(CROSS(J,K),1));底背:=REF(CLOSE,A1+1)>CLOSEANDJ>REF(J,A1+1)ANDCROSS(J,K);底:DRAWLINE(A1=0,D,底背,D,0),COLORRED,POINTDOT;DRAWTEXT(底背,D,''底B''),COLORRED;A2:=BARSLAST(REF(CROSS(K,J),1));顶背:=REF(CLOSE,A2+1)JANDCROSS(K,J);顶:DRAWLINE(A2=0,D,顶背,D,0),COLORBLUE,POINTDOT;DRAWTEXT(顶背,D,''顶B''),COLORBLUE;压力线:DRAWLINE(D>=HHV(D,21),D,D<=LLV(D,21),D,1),COLORBLUE;DRAWTEXT(CURRBARSCOUNT=60,60,''弱势建仓莫着急''),COLORYELLOW;DRAWTEXT(CURRBARSCOUNT=55,45,''看到红了找背离''),COLORRED;DRAWTEXT(CURRBARSCOUNT=50,30,''强势变黄不要卖''),COLORGREEN;DRAWTEXT(CURRBARSCOUNT=45,15,''黄走绿来才走开''),COLORBLUE;



献花(0)
+1
(本文系惠民科技首藏)