虎口拨牙-通用的变换参数的KDJ(飞狐)

　　说明：
1、与kdL基本一致，本质上就是变换了一下参数，信号反应较kdj多数情况下灵敏。这里的灵敏并不是说比传统的KDJ好。有利就有弊。
2、添加了很多信号，所有提示信号都是参考，准确率不是很高，在六七十吧，感兴趣的可自行测试。
3、“跌幅较大”，是指在20天内，跌幅达到20%左右的，一般来说，会有反弹。
4、“无限风光”，取之“无限风光在险峰”之意。出现提示后，多为股势走强之势，但随时会面临变盘的风险。
5、“二次金叉”是指在15天内出现两次金叉，且金叉的位置较前一次提高。
还有很多提示，不用解释，一看便知。最后说一句，会用KDJ的，自然会用这个指标。
为了通用，未加任何修饰。
A0:=(2*C+H+L)/4;
均线:=ma(A0,3)>ref(ma(A0,3),1);
A1:=(CLOSE-LLV(LOW,7))/(HHV(HIGH,7)-LLV(LOW,7))*100;
A2:=EMA(WINNER(C)*100,5);
A3:=MA(SMA(C-REF(C,1),3,1)/SMA(H-REF(C,1),3,1),3)*100;
K:MA(3*SMA(A1,6,1)-2*SMA(SMA(A1,5,1),5,1),3),LINETHICK2,colorf00ff0;
D:MA(K,3),colorff0000,LINETHICK2;
J:3*K-2*D,LINETHICK2;
A4:=SMA(MAX(C-REF(C,2),0),6,1)/SMA(Abs(C-REF(C,2)),6,1)*100;
A5:=MA(3*SMA((C-LLV(L,21))/(HHV(H,21)-LLV(L,21))*100,5,1)-2*SMA(SMA((C-LLV(L,21))/(HHV(H,21)-LLV(L,21))*100,5,1),3,1),3);
低吸:if(cross(A4,14) or A5>ref(A5,1) and cross(K,A2)and K<40,10,0);
if(A2>80 and cross(95,K),85,100);
跌幅较大:K<5 and llv(c,3)/hhv(c,20)<0.8,color00ff00;
STICKLINE(跌幅较大,0,abs(K*7),6,0),color00ff00;
A6:=count(cross(K,A2),2)=1 and cross(K,A5)and A5/ref(A5,1)>0.9 and K<50;
A7:=cross(K,D)AND D<10 or cross(K,D)AND cross(K,A5)AND D<18;
DRAWTEXT(FILTER((A6 OR A7)and K>ref(K,1),5)and 均线 ,D,'金叉');
DRAWTEXT(cross(D,K)AND cross(A5,K)AND D>85,D,'死叉');
DRAWTEXT(FILTER(K>ref(K,1)and (cross(K,10)or cross(K,A2))and count(A4<14,3)>=1,3),15,'虎口拔牙');
无限风光:A2>85 and K>85 or A2>90 or K>90,LINETHICK0,colorffff00;
STICKLINE(无限风光,max(A2,K),100,6,1),colorffff00;
DRAWICON(cross(A3,-300)and K<10,5,1);
A8:=BArslAST(REF(CROSS(K,D),1));
二次金叉:=(A8<15 AND D<50 AND K>REF(K,A8+1) AND CROSS(K,D)AND A5<60);
DRAWTEXT(二次金叉 and 均线,K,'二次金叉');
A9:=LLV(C,2)<ref(LLV(C,15),2);
DRAWTEXT(二次金叉 and A9,K,'底背离'),COLORMAGENTA;
DRAWTEXT(LONGCROSS(J,K,7)AND CROSS(J,A2)AND A2<30 AND A2>REF(A2,1),K,'穿三线');
DRAWTEXT(CROSS(84,A4)AND CROSS(K,A4),90,'虎口脱险'),COLOR00FF00;
A10:=MA((A0-MA(A0,13))/(0.15*AVEDEV(A0,13)),3);
DRAWICON(CROSS(A10,-15)AND J>REF(J,1),5,1);
DRAWICON(CROSS(20,A10),100,2);

根据反馈的意见，修改了一句，通达信的如下：
A0:=(2*C+H+L)/4;
均线:=MA(A0,3)>REF(MA(A0,3),1);
A1:=(CLOSE-LLV(LOW,7))/(HHV(HIGH,7)-LLV(LOW,7))*100;
A2:=EMA(WINNER(C)*100,5);
A3:=MA(SMA(C-REF(C,1),3,1)/SMA(H-REF(C,1),3,1),3)*100;
K:MA(3*SMA(A1,6,1)-2*SMA(SMA(A1,5,1),5,1),3),LINETHICK2,COLORF00FF0;
D:MA(K,3),COLORFF0000,LINETHICK2;
J:3*K-2*D,LINETHICK2;
A4:=SMA(MAX(C-REF(C,2),0),6,1)/SMA(ABS(C-REF(C,2)),6,1)*100;
A5:=MA(3*SMA((C-LLV(L,21))/(HHV(H,21)-LLV(L,21))*100,5,1)-2*SMA(SMA((C-LLV(L,21))/(HHV(H,21)-LLV(L,21))*100,5,1),3,1),3);
低吸:IF(CROSS(A4,14) OR A5>REF(A5,1) AND CROSS(K,A2)AND K<40,10,0);
IF(A2>80 AND CROSS(95,K),85,100);
跌幅较大:K<5 AND LLV(C,3)/HHV(C,20)<0.8,COLOR00FF00;
STICKLINE(跌幅较大,0,30,3,0),COLOR00FF00;
A6:=COUNT(CROSS(K,A2),2)=1 AND CROSS(K,A5)AND A5/REF(A5,1)>0.9 AND K<50;
A7:=CROSS(K,D)AND D<10 OR CROSS(K,D)AND CROSS(K,A5)AND D<18;
DRAWTEXT(FILTER((A6 OR A7)AND K>REF(K,1),5)AND 均线 ,D,'金叉');
DRAWTEXT(CROSS(D,K)AND CROSS(A5,K)AND D>85,D,'死叉');
DRAWTEXT(FILTER(K>REF(K,1)AND (CROSS(K,10)OR CROSS(K,A2))AND COUNT(A4<14,3)>=1,3),15,'虎口拔牙');
无限风光:A2>85 AND K>85 OR A2>90 OR K>90,LINETHICK0,COLORFFFF00;
STICKLINE(无限风光,MAX(A2,K),100,6,1),COLORFFFF00;
DRAWICON(CROSS(A3,-300)AND K<10,5,1);
A8:=BARSLAST(REF(CROSS(K,D),1));
二次金叉:=(A8<15 AND D<50 AND K>REF(K,A8+1) AND CROSS(K,D)AND A5<60);
DRAWTEXT(二次金叉 AND 均线,K,'二次金叉');
A9:=LLV(C,2)<REF(LLV(C,15),2);
DRAWTEXT(二次金叉 AND A9,K,'底背离'),COLORMAGENTA;
DRAWTEXT(LONGCROSS(J,K,7)AND CROSS(J,A2)AND A2<30 AND A2>REF(A2,1),K,'穿三线');
DRAWTEXT(CROSS(84,A4)AND CROSS(K,A4),90,'虎口脱险'),COLOR00FF00;
A10:=MA((A0-MA(A0,13))/(0.15*AVEDEV(A0,13)),3);
DRAWICON(CROSS(A10,-15)AND J>REF(J,1),5,1);
DRAWICON(CROSS(20,A10),100,2);