VAR4:=(2 * C + H + L) / 4;
VAR5:=LLV(L,34);
VAR6:=HHV(H,34);
VAR7:=EMA((((VAR4) - (VAR5)) / ((VAR6) - (VAR5))) * (100),9); //有点kdJ线的9天移动平均线的感觉
VAR8:=EMA((0.667) * (REF(VAR7,1)) + (0.333) * (VAR7),3); //有点VAR7线的5天移动平均线的感觉
VAR9:=EMA((((VAR4) - (VAR5)) / ((VAR6) - (VAR5))) * (100),30); //有点kdj线的9天移动平均线的感觉
VAR10:=EMA(VAR9,5); //有点VAR9线的5天移动平均线的感觉
STICKLINE((VAR9) > (VAR10),VAR9-50,VAR10-50,4,1),colorred;
STICKLINE((VAR9) < (VAR10),VAR9-50,VAR10-50,4,1),colorgreen;
LC:=REF(CLOSE,1);
rsi6:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(Abs(CLOSE-LC),6,1)*100; //rsi6的摆动公式
RSI12:=SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100; //rsi12的摆动公式
RSV=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100; //kdj的摆动函数公式
k:=SMA(RSV,3,1); ////中速
d:=SMA(k,3,1); //最慢
j:=3*k-2*d; //最快
STICKLINE((VAR7) < (VAR8),VAR7-50,VAR8-50,9,0),COLORFF5B00; ///条件成立时，多画几个框，让图标显示渐变色。
STICKLINE((VAR7) < (VAR8),VAR7-50,VAR8-50,7,0),COLORFF6C00; ///条件成立时，多画几个框，让图标显示渐变色。
STICKLINE((VAR7) < (VAR8),VAR7-50,VAR8-50,6,0),COLORFF7B00;
STICKLINE((VAR7) < (VAR8),VAR7-50,VAR8-50,5,0),COLORFF9C00; ///条件成立时，多画几个框，让图标显示渐变色。
STICKLINE((VAR7) < (VAR8),VAR7-50,VAR8-50,4,0),COLORFFBE00;
STICKLINE((VAR7) < (VAR8),VAR7-50,VAR8-50,2.5,0),COLORFFCC00;
STICKLINE((VAR7) < (VAR8),VAR7-50,VAR8-50,1.5,0),colorcyan; ///条件成立时，在VAR7和VAR8之间画青色的实体框。
STICKLINE((VAR7) >= (VAR8),VAR7-50,VAR8-50,9,0),colormagenta; ///条件成立时，在VAR7和VAR8之间画洋红色的实体框。
STICKLINE((VAR7) >= (VAR8),VAR7-50,VAR8-50,7,0),COLORFF22FF;
STICKLINE((VAR7) >= (VAR8),VAR7-50,VAR8-50,6,0),COLORFF44FF;
STICKLINE((VAR7) >= (VAR8),VAR7-50,VAR8-50,5,0),COLORFF66FF;
STICKLINE((VAR7) >= (VAR8),VAR7-50,VAR8-50,4,0),COLORFF88FF;
STICKLINE((VAR7) >= (VAR8),VAR7-50,VAR8-50,3,0),COLORFF99FF;
STICKLINE((VAR7) >= (VAR8),VAR7-50,VAR8-50,2,0),COLORFFAAFF;
STICKLINE((VAR7) >= (VAR8),VAR7-50,VAR8-50,1,0),COLORFFBBFF;
VARck:=EMA((((VAR4) - (VAR5)) / ((VAR6) - (VAR5))) * (100),7);
VARck12:=EMA((((VAR4) - (VAR5)) / ((VAR6) - (VAR5))) * (100),12);
VAR7j8:=VAR7-VAR8;
sc6:=crOSS(RSI12,RSI6); //rsi快线跌破慢线，反向死叉。
qtr:= REF(RSI6,IF (sC6>0,1,0));
//下面是找 死叉，摆空R。
fhtj1:=(MA(C,20)>REF(MA(C,20),1) AND MA(C,30)>REF(MA(C,30),1) AND (ABS(C/MA(C,20)-1)<0.0065 OR ABS(C/MA(C,30)-1 )<0.0065 )) OR (VAR7j8>2.7 AND MA(C,40)>REF(MA(C,40),1) AND MA(C,30)>REF(MA(C,30),1)) ;
sC1:= sc6 AND (RSI12>54 OR qtr>58) AND (j<REF(j,1)) AND (MA(C,5)<REF(MA(C,5),1) OR MA(C,9)<REF(MA(C,9),1) OR MA(C,15)<REF(MA(C,15),1) ) AND (VARck<REF(VARck,1) OR VARck12<REF(VARck12,1)) ; //rsi6死叉rsi12，并且rsi12>40或者前一天rsi6>52.并且5天均线或10天或15天均线，至少一个走坏，并且天剑8天值变差。
SC11:=IF(fhtj1,0,sc1); //去掉那种20和30天均线多头时，股价打到20和30均线很近，并且20和30均线也很近时。 去掉均线多头时，天剑值上升很大的。
反空r:-sC11 *56,LINETHICK2,colorgreen;
DRAWTEXT(sc11,-51,'反空R '),colorgreen;
sC7:=CROSS(d,j); //快线j线死叉d线。反向摆空K。
sC2:=sC7 AND (d>65 ) AND (RSI6<REF(RSI6,1) AND RSI12<REF(RSI12,1))AND (MA(C,5)<REF(MA(C,5),1) OR MA(C,9)<REF(MA(C,9),1) OR MA(C,15)<REF(MA(C,15),1) ) AND (RSI6<REF(RSI6,1) AND RSI12<REF(RSI12,1) ) AND (VARck<REF(VARck,1) OR VARck12<REF(VARck12,1)) ; //kdj金叉，并且d<40 或者 前一天的J<33，并且5天均线或10天均线至少一个走坏；
//去掉那种20和30天均线多头时，股价打到20和30均线很近，并且20和30均线也很近时。
SC21:=IF(fhtj1 ,0,SC2);
反空k:-sC21*62,LINETHICK2,colorgreen;
DRAWTEXT(sC21,-57,'反空K '),colorgreen;
////下面是找 金叉 摆多R。
JC8:=CROSS(RSI6,RSI12); //rsi快线上穿慢线，反向金叉。
qtr8:= REF(RSI6,IF (JC8>0,1,0));
fhtj2:=(MA(C,20)<REF(MA(C,20),1) AND MA(C,30)<REF(MA(C,30),1) AND (ABS(C/MA(C,20)-1)<0.0065 OR ABS(C/MA(C,30)-1 )<0.0065 )) OR (VAR7j8<(-2.7) AND MA(C,40)<REF(MA(C,40),1) AND MA(C,30)<REF(MA(C,30),1) );
JC1:= JC8 AND (RSI12<46 OR qtr8<42 ) AND (j>REF(j,1)) AND (MA(C,5)>REF((MA(C,5)),1) OR MA(C,9)>REF((MA(C,9)),1) OR MA(C,15)>REF((MA(C,15)),1) ) AND (VARck>REF(VARck,1) OR VARck12>REF(VARck12,1)); //rsi6金叉rsi12，并且rsi12<56或者前一天rsi6<33.并且5天均线或10天均线，至少一个走升。 rsi40为标准值。
jC11:=IF(fhtj2 ,0,jc1); //去掉那种20和30天均线空头时，股价打到20和30均线很近，并且20和30均线也很近时。 去掉均线空头排列，天剑值跌放大的。
反多r:(JC11 ) *56,LINETHICK2,colorred;
DRAWTEXT(JC11,51,'反多R '),colorred;
////下面是金叉 摆多K
JC9:=CROSS(j,d); //快线j线金叉d线。反向
JC2:=JC9 AND (d<35 ) AND (RSI6>REF(RSI6,1) AND RSI12>REF(RSI12,1)) AND (MA(C,5)>REF((MA(C,5)),1) OR MA(C,9)>REF((MA(C,9)),1) OR MA(C,15)>REF((MA(C,15)),1) ) AND (RSI6>REF(RSI6,1) AND RSI12>REF(RSI12,1) ) AND (VARck>REF(VARck,1) OR VARck12>REF(VARck12,1)) ;
jC21:=IF(fhtj2,0,JC2);
反多k:JC21*62,LINETHICK2,colorred;
DRAWTEXT(JC21,57,'反多K '),colorred;
N:=LLVBARS(L,6); //求X的N周期内的最低价到现在的天数；
M:= HHVBARS(H,6); // 求X的N周期内的最高价到现在的天数；
Dj7:=MA(L,(N+1) ); //从最低价到现在的移动平均线
gj7:=MA(H,(M+1)); //从最高价到现在的移动平均线
tj1:=(MA(C,30)<REF(MA(C,30),1) OR MA(C,15)<REF(MA(C,15),1)) OR (CLOSE<MA(C,15) OR CLOSE<MA(C,30)); //均线至少一根向下，并且股价跌到一根下方。
xhcx1:=IF(C<REF(Dj7,1),1,0) AND tj1; //均线趋势向下，并且当前价低于前面最低价到昨天的移动平均线。
趋空:-(xhcx1 ) *30,LINETHICK2,colorgreen;
tj2:=(MA(C,30)>REF(MA(C,30),1) OR MA(C,15)>REF(MA(C,15),1)) OR (CLOSE>MA(C,15) OR CLOSE>MA(C,30)) ; //均线趋势至少一根向好，并且股价站一根上面。
xhcx2:=IF(C>REF(gj7,1),1,0) AND tj2;
趋多:xhcx2*30,LINETHICK2,colorred;
