English | 简体中文 | 繁體中文
一流镖客16bk.com

书写民间股市传奇...

精华组合 kdj (源码)

admin2021-11-16 16:56:41151

  • RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;
  • K:SMA(RSV,M1,1),COLOR9FA1A1;
  • D:SMA(K,M2,1),COLOR00A13C;
  • J:3*K-2*D,COLOR0089FF,LINETHICK2;
  • OBV:=K;
  • P:=5;
  • A1:=REF(OBV,P)=HHV(OBV,2*P+1);
  • B1:=FILTER(A1,P);
  • C1:=BACKSET(B1,P+1);
  • D1:=FILTER(C1,P);
  • A2:=REF(OBV,P)=LLV(OBV,2*P+1);
  • B2:=FILTER(A2,P);
  • C2:=BACKSET(B2,P+1);
  • D2:=FILTER(C2,P);
  • 上:REF(OBV,BARSLAST(D1)),COLORFF00FF,NODRAW;
  • 下:REF(OBV,BARSLAST(D2)),COLOR00FF00,NODRAW;
  • 向上:CROSS(OBV,上*1.01),NODRAW;
  • 相对能量:(OBV-下)/(上-下)*100,COLORYELLOW,NODRAW;
  • R11:=BACKSET(ISLASTBAR,BARSLAST(D1)+1);
  • S11:=R11>REF(R11,1);
  • DRAWLINE(D1,OBV,S11,OBV,1),COLOR0000FF;
  • T11:=BACKSET(ISLASTBAR,BARSLAST(D2)+1);
  • U11:=T11>REF(T11,1);
  • DRAWLINE(D2,OBV,U11,OBV,1),COLORFFFF00;
  • STICKLINE(C>0,下,下,1,0),COLOR00FF00;
  • STICKLINE(C>0,上,上,1,0),COLORFF00FF;
  • DRAWTEXT(CROSS(OBV,上*1.01),上,'上'),COLORFFFFFF;
  • DRAWTEXT(CROSS(下*0.99,OBV),下,'下'),COLORFFFFFF;
  • BBI:=(EMA(CLOSE,3)+EMA(CLOSE,6)+EMA(CLOSE,12)+EMA(CLOSE,24))/4;
  • EBBI:=(EMA(C,6)+EMA(C,18)+EMA(C,54)+EMA(C,162))/4;
  • FF1:=EMA(C,3)>EMA(C,7)ANDEMA(C,7)>EMA(C,21)ANDEMA(C,21)>EMA(C,54);
  • DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26);
  • DEA:=EMA(DIFF,9);
  • 主升浪:IF(BBI>EBBIANDFF1ANDDIFF>DEA,10,0),COLORYELLOW,POINTDOT;
  • STICKLINE(主升浪,10,0,1,1),COLORYELLOW;
  • DRAWICON(CROSS(K,D)ANDCROSS(J,D),10,1);;
  • DRAWICON(D1,OBV,27);
  • DRAWICON(D2,OBV,25);
  • VAR0004:="KDJ.K#WEEK"(9,3,3);
  • VAR0005:="KDJ.D#WEEK"(9,3,3);
  • VAR0006:="KDJ.K#MONTH"(9,3,3);
  • VAR0007:="KDJ.D#MONTH"(9,3,3);
  • 周金叉:IF(CROSS(VAR0004,VAR0005),15,0)LINESTICK,COLORRED;
  • 月金叉:IF(CROSS(VAR0006,VAR0007),20,0)LINESTICK,COLORYELLOW;
  • DRAWTEXT(周金叉,16,'周金叉'),COLORRED;
  • DRAWTEXT(月金叉,20,'月金叉'),COLORYELLOW;
  • 抄底:IF(REF(COUNT(K<REF(K,1),5)>=5,1)ANDCOUNT(K<30,5)>=2ANDCOUNT(J<0,3)>0ANDCROSS(J,0),60,50),COLOR00FFFF;
  • TJ00:=BARSLAST(REF(CROSS(K,D)ANDREF(K,1)<35,1));
  • TJ11:=C<REF(C,TJ00+1)*1.1ANDREF(K,1)<60AND(TJ00+1)<25AND(TJ00+1)>5ANDK>REF(K,TJ00+1)ANDCROSS(K,D);
  • 加仓:IF(TJ11,35,0),COLORGREEN;
  • A22:=BARSLAST(REF(CROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3)),1));
  • 其他股票