不同软件函数机制不同，效果可能略有差异，改写参考：
DRAWGBK(C>0, RGB(1,1,1),RGB(1,1,1),0);
STICKLINE(C>0,120,120,28,-1),COLORBLACK;
STICKLINE(C>0,100,100,28,-1),COLOR000080;
STICKLINE(C>0,80,80,28,-1),COLOR000080;
STICKLINE(C>0,50,50,28,-1),COLOR000080;
STICKLINE(C>0,20,20,28,-1),COLOR000080;
STICKLINE(C>0,0,0,28,-1),COLOR000080;
STICKLINE(C>0,-20,-20,28,-1),COLORBLACK;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:SMA(RSV,3,1),COLORCYAN;
D:SMA(K,3,1),COLORYELLOW;
J:3*K-2*D,COLORMAGENTA;
//{K值，D值，J值的背离}
//{------------------------------------------------------------------------------}
N:=5;
J底背:REF(C,BARSLAST(REF(FILTER(BACKSET(REF(J,N)=LLV(J,2*N+1),N+1),N) AND J=LLV(J,N+1),1))+1)>C AND
REF(J,BARSLAST(REF(FILTER(BACKSET(REF(J,N)=LLV(J,2*N+1),N+1),N) AND J=LLV(J,N+1),1))+1)<J AND
FILTER(BACKSET(REF(J,N)=LLV(J,2*N+1),N+1),N) AND J=LLV(J,N+1),COLORWHITE,NODRAW;
DRAWLINE(FILTER(BACKSET(REF(J,N)=LLV(J,2*N+1),N+1),N) AND J=LLV(J,N+1),J,FILTER(J底背>0,5),J,0),
COLORWHITE,NODRAW;
DRAWTEXT(J底背,J,'J底背'),COLORMAGENTA;
J顶背:REF(C,BARSLAST(REF(FILTER(BACKSET(REF(J,N)=HHV(J,2*N+1),N+1),N) AND J=HHV(J,N+1),1))+1)<C AND
REF(J,BARSLAST(REF(FILTER(BACKSET(REF(J,N)=HHV(J,2*N+1),N+1),N) AND J=HHV(J,N+1),1))+1)>J AND
FILTER(BACKSET(REF(J,N)=HHV(J,2*N+1),N+1),N) AND J=HHV(J,N+1),COLORGREEN,NODRAW;
DRAWLINE(FILTER(BACKSET(REF(J,N)=HHV(J,2*N+1),N+1),N) AND J=HHV(J,N+1),J,FILTER(J顶背>0,5),J,0),COLORGREEN,DOT;
DRAWTEXT(J顶背,J,'J顶背'),COLORMAGENTA;
//{------------------------------------------------------------------------------}
K底背:REF(C,BARSLAST(REF(FILTER(BACKSET(REF(K,N)=LLV(K,2*N+1),N+1),N) AND K=LLV(K,N+1),1))+1)>C AND
REF(K,BARSLAST(REF(FILTER(BACKSET(REF(K,N)=LLV(K,2*N+1),N+1),N) AND K=LLV(K,N+1),1))+1)<K AND
FILTER(BACKSET(REF(K,N)=LLV(K,2*N+1),N+1),N) AND K=LLV(K,N+1),COLORWHITE,NODRAW;
DRAWLINE(FILTER(BACKSET(REF(K,N)=LLV(K,2*N+1),N+1),N) AND K=LLV(K,N+1),K,FILTER(K底背>0,5),K,0),
COLORWHITE,DOT;
DRAWTEXT(K底背,K,'K底背'),COLORWHITE;
K顶背:REF(C,BARSLAST(REF(FILTER(BACKSET(REF(K,N)=HHV(K,2*N+1),N+1),N) AND K=HHV(K,N+1),1))+1)<C AND
REF(K,BARSLAST(REF(FILTER(BACKSET(REF(K,N)=HHV(K,2*N+1),N+1),N) AND K=HHV(K,N+1),1))+1)>K AND
FILTER(BACKSET(REF(K,N)=HHV(K,2*N+1),N+1),N) AND K=HHV(K,N+1),COLORGREEN,NODRAW;
DRAWLINE(FILTER(BACKSET(REF(K,N)=HHV(K,2*N+1),N+1),N) AND K=HHV(K,N+1),K,FILTER(K顶背>0,5),K,0),
COLORGREEN,DOT;
DRAWTEXT(K顶背,K,'K顶背'),COLORBLUE;
//{------------------------------------------------------------------------------}
D底背:REF(C,BARSLAST(REF(FILTER(BACKSET(REF(D,N)=LLV(D,2*N+1),N+1),N) AND D=LLV(D,N+1),1))+1)>C AND
REF(D,BARSLAST(REF(FILTER(BACKSET(REF(D,N)=LLV(D,2*N+1),N+1),N) AND D=LLV(D,N+1),1))+1)<D AND
FILTER(BACKSET(REF(D,N)=LLV(D,2*N+1),N+1),N) AND D=LLV(D,N+1),COLORWHITE,NODRAW;
DRAWLINE(FILTER(BACKSET(REF(D,N)=LLV(D,2*N+1),N+1),N) AND D=LLV(D,N+1),D,FILTER(D底背>0,5),D,0),
COLORWHITE,DOT;
DRAWTEXT(D底背,D,'D底背'),COLORYELLOW;
D顶背:REF(C,BARSLAST(REF(FILTER(BACKSET(REF(D,N)=HHV(D,2*N+1),N+1),N) AND D=HHV(D,N+1),1))+1)<C AND
REF(D,BARSLAST(REF(FILTER(BACKSET(REF(D,N)=HHV(D,2*N+1),N+1),N) AND D=HHV(D,N+1),1))+1)>D AND
FILTER(BACKSET(REF(D,N)=HHV(D,2*N+1),N+1),N) AND D=HHV(D,N+1),COLORGREEN,NODRAW;
DRAWLINE(FILTER(BACKSET(REF(D,N)=HHV(D,2*N+1),N+1),N) AND D=HHV(D,N+1),D,FILTER(D顶背>0,5),D,0),
COLORGREEN,DOT;
DRAWTEXT(D顶背,D,'D顶背'),COLOR4080FF;
//{以下是金叉死叉背离}
A2:=BARSLAST(REF(CROSS(K,D),1));
B2:=REF(C,A2+1)>C AND REF(K,A2+1)<K AND CROSS(K,D);
DRAWTEXT((B2>0),-10,'_金叉底背'),COLORRED;
STICKLINE((B2>0),-10,50,0,-1),COLORRED;
DRAWLINE((B2>0),K,B2,K,0),COLORRED,DOT;
//金叉底背画线;
C2:=BARSLAST(REF(CROSS(D,K),1));
D2:=REF(C,C2+1)<C AND REF(K,C2+1)>K AND CROSS(D,K);
DRAWTEXT((D2>0),110,'_死叉顶背'),COLORCYAN;
STICKLINE((D2>0),110,50,0,-1),COLORCYAN;
DRAWLINE((D2>0),K,D2,K,0),COLORGREEN,DOT;//死叉顶背画线;
指标2：
趋势线:MA(C,30),DOT, COLORFF00CC;
IF(趋势线>=REF(趋势线,1),趋势线,NULL),DOT,COLORYELLOW;
回归斜率线A:EMA(SLOPE(C,21)*20+C,42);
回归斜率线B:REF(回归斜率线A,2);
IF(回归斜率线A>REF(回归斜率线A,1),回归斜率线A,NULL),COLORRED;
IF(回归斜率线A<REF(回归斜率线A,1),回归斜率线A,NULL),COLORGREEN;
IF(回归斜率线B>REF(回归斜率线B,1),回归斜率线B,NULL),COLORRED;
IF(回归斜率线B<REF(回归斜率线B,1),回归斜率线B,NULL),COLORGREEN;
经典RL:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
经典K:=SMA(经典RL,3,1);
经典D:=SMA(经典K,3,1);
经典J:=3*经典K-2*经典D;
MAHL1:=100*((EMA((H+L)/2,3)-LLV(EMA((H+L)/2,5),30)-(EMA(H,20)-EMA(L,20))) /(LLV(EMA((H+L)/2,5),30)-(EMA(H,20)-EMA(L,20))));
MAHL2:=IF(EMA(C,2)>回归斜率线A AND MAHL1>0,EMA(C,3),LLV(EMA((H+L)/2,5),30));
MAHL3:=IF(EMA(C,2)>回归斜率线A AND MAHL1>0,LLV(EMA((H+L)/2,5),30),EMA(C,5));
STICKLINE1(CLOSE= REF(CLOSE,1) ,H,L,3,1 ),COLOR999999;
STICKLINE1(CLOSE= REF(CLOSE,1) ,HIGH,LOW,0,0 ),COLORWHITE;
STICKLINE1(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,3,0 ),COLOR555555;
STICKLINE1(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,2.7,0 ),COLOR777777;
STICKLINE1(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,2.1,0 ),COLOR999999;
STICKLINE1(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,1.5,0 ),COLORBBBBBB;
STICKLINE1(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,0.9,0 ),COLORDDDDDD;
STICKLINE1(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,0.3,0 ),COLORFFFFFF;
DRAWICON(CROSS(经典K,经典D),L*0.96,26);
{高亮红}
回归斜率买:IF(CROSS(EMA(C,3),回归斜率线A),(L-(H-L)/3),NULL),POINTDOT,COLOR0000FF;
//{高亮红}
DRAWICON(CROSS(EMA(C,3),回归斜率线A),L*0.98,1);//{买};
回归斜率卖:IF(CROSS(回归斜率线A,EMA(C,2)),(H+(H-L)/3),NULL),POINTDOT,COLOR00CF00;
//{中绿}
DRAWICON(CROSS(回归斜率线A,EMA(C,2)),H*1.03,2);
经典KDJ卖:IF(CROSS(经典D,经典K),(H+(H-L)/2),NULL),CROSSDOT,LINETHICK3,COLOR00CF00;
//{中绿};
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,9,1);
D:=SMA(K,9,1);
J:=3*K-2*D;
X2:=LLV(J,2)=LLV(J,8);
DRAWICON(CROSS(J,REF(J+0.01,1)) AND X2 AND J<20,LOW*0.99,23);
VAR6:=REF(C,1);
VAR7:=SMA(MAX(C-VAR6,0),6,1)/SMA(ABS(C-VAR6),6,1)*100;
DRAWTEXT(CROSS(84,VAR7),H*1.01,'逃顶'),COLORYELLOW ;
AA:=(REF(H,1)-MAX(REF(C,1),REF(O,1)))/(REF(H,1)-REF(L,1))>0.6 AND (MIN(O,C)-L)/(H-L)>0.6 AND VOL<REF(VOL,1);
DRAWTEXT(AA,L*0.99,'揉搓'),COLORRED;
C3:=REF(C,1);
跌停:=IF((C3-C)*100/C3>=(10-0.01*100/C3),1,0);
STICKLINE(跌停,OPEN,CLOSE,3,0),COLORBLUE;
STICKLINE(跌停,OPEN,CLOSE,2,0),COLORGREEN;
涨停:=IF(REF(C,1)*1.095-C<0.01 ,1,0);
STICKLINE(涨停,OPEN,CLOSE,3,0),COLORRED;
STICKLINE(涨停,OPEN,CLOSE,2,0),COLORYELLOW;
M1:=EMA(EMA(C,21),3);
M2:=EMA(EMA(C,34),3);
TT2:=CROSS(C,M1) AND CROSS(C,M2);
DRAWTEXT(TT2,L*0.96,'阳');
谢谢您请参考新帖中回复
