回复 1# wen98
你好,我在别的地方看到个,你看有用没?
选股指标公式(用于选股):
{M1 1 100 6}
{N2 1 100 20}
{RSI}
LC:=REF(CLOSE,1);
RSIV:=SMA(MAX(CLOSE-LC,0),M1,1)/SMA(ABS(CLOSE-LC),M1,1)*100;
RSI2:=SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100;
RSI3:=SMA(MAX(CLOSE-LC,0),24,1)/SMA(ABS(CLOSE-LC),24,1)*100;
RSIV1:=SMA(MAX(CLOSE-LC,0),M1,1)/SMA(ABS(CLOSE-LC),M1,1)*100;
H_C:=RSIV<REF(RSIV,1) AND REF(RSIV,1)>REF(RSIV,2);
H_N:=CONST(COUNT(H_C,N2));
T_A:=CONST(SUMBARS(COUNT(H_C,1),H_N))+1;
{确认5个高点}
TT1:=CONST(BARSLAST(H_C))+1;
TT2:=CONST(SUMBARS(COUNT(H_C,1),2));
TT3:=CONST(SUMBARS(COUNT(H_C,1),3));
TT4:=CONST(SUMBARS(COUNT(H_C,1),4));
TT5:=CONST(SUMBARS(COUNT(H_C,1),5));
TT6:=CONST(SUMBARS(COUNT(H_C,1),6));
VV1:=CONST(REF(RSIV,TT1));
VV2:=CONST(REF(RSIV,TT2));
VV3:=CONST(REF(RSIV,TT3));
VV4:=CONST(REF(RSIV,TT4));
VV5:=CONST(REF(RSIV,TT5));
VV6:=CONST(REF(RSIV,TT6));
{确认 第1点与第2点 切线}
切线1:=DRAWLINE(BARSLAST(RSIV=VV2)=0,RSIV,BARSLAST(RSIV=VV1)=0,RSIV,3);
{确认 最高点及最近5高点中的高点 切线}
V0:=CONST(HHV(RSIV,N2));
T0:=BARSLAST(RSIV=V0)+1;
MAXV:=MAX(VV1,MAX(VV2,MAX(VV3,MAX(VV4,VV5))));
MAXT:=BARSLAST(RSIV=MAXV);
切线2:=DRAWLINE(BARSLAST(RSIV=V0)=0,RSIV,BARSLAST(RSIV=MAXV)=0,RSIV,3);
{确认 最高点及第1高点 切线}
切线3:=DRAWLINE(BARSLAST(RSIV=V0)=0,RSIV,BARSLAST(RSIV=VV1)=0,RSIV,3);
未穿越:=NOT(HHV(RSIV,T0-1)>REF(切线3,BARSLAST(RSIV=HHV(RSIV,T0-1))=0));
{确认 最高点及前3高点的高点 切线}
MAXV1:=MAX(VV1,MAX(VV2,VV3));
MAXT1:=BARSLAST(RSIV=MAXV);
切线4:=DRAWLINE(BARSLAST(RSIV=V0)=0,RSIV,BARSLAST(RSIV=MAXV1)=0,RSIV,3);
{确认短期内是否背离}
VV7:=MAX(VV1,MAX(VV2,VV3));
TT7:=BARSLAST(RSIV=VV7)+1;
VV8:=MAX(VV4,MAX(VV5,VV6));
TT8:=BARSLAST(RSIV=VV8)+1;
同向1:=VV7>=VV8 AND REF(C,TT7)>=REF(C,TT8);
同向2:=VV7<VV8 AND REF(C,TT7)<REF(C,TT8);
{同向1:=V0>=MAX(RSIV,VV1) AND REF(C,T0)>=MAX(C,REF(C,TT1));
同向2:=V0>=MAX(RSIV,VV1) AND REF(C,T0)<MAX(C,REF(C,TT1));}
同向:=同向1 OR 同向2;
{确认突破切线}
上穿1:=VV2>VV1 AND CROSS(RSIV,切线1);
上穿2:=T0>MAXT AND CROSS(RSIV,切线2);
上穿3:=T0>TT1 AND 未穿越 AND CROSS(RSIV,切线3);
上穿4:=T0>MAXT1 AND CROSS(RSIV,切线4);
上穿:=上穿1 OR 上穿2 OR 上穿3 OR 上穿4;
{确认启动点位置}
启动:=RSIV<80 AND RSIV>REF(RSIV,1) AND (CROSS(RSIV,50) OR REF(RSIV,1)<50);
SELECT:启动 AND 同向 AND 上穿;
RSI切线指标公式(用于显示画线,也可综合选股中设定select达到80实现选股):
{M1 1 100 6}
{N2 1 100 20}
{RSI}
LC:=REF(CLOSE,1);
RSIV:SMA(MAX(CLOSE-LC,0),M1,1)/SMA(ABS(CLOSE-LC),M1,1)*100;
RSI2:SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100;
RSI3:SMA(MAX(CLOSE-LC,0),24,1)/SMA(ABS(CLOSE-LC),24,1)*100;
RSIV1:=SMA(MAX(CLOSE-LC,0),M1,1)/SMA(ABS(CLOSE-LC),M1,1)*100;
H_C:=RSIV<REF(RSIV,1) AND REF(RSIV,1)>REF(RSIV,2);
H_N:=CONST(COUNT(H_C,N2));
T_A:=CONST(SUMBARS(COUNT(H_C,1),H_N))+1;
{确认5个高点}
TT1:=CONST(BARSLAST(H_C))+1;
TT2:=CONST(SUMBARS(COUNT(H_C,1),2));
TT3:=CONST(SUMBARS(COUNT(H_C,1),3));
TT4:=CONST(SUMBARS(COUNT(H_C,1),4));
TT5:=CONST(SUMBARS(COUNT(H_C,1),5));
TT6:=CONST(SUMBARS(COUNT(H_C,1),6));
VV1:=CONST(REF(RSIV,TT1));
VV2:=CONST(REF(RSIV,TT2));
VV3:=CONST(REF(RSIV,TT3));
VV4:=CONST(REF(RSIV,TT4));
VV5:=CONST(REF(RSIV,TT5));
VV6:=CONST(REF(RSIV,TT6));
{确认 第1点与第2点 切线}
切线1RAWLINE(BARSLAST(RSIV=VV2)=0,RSIV,BARSLAST(RSIV=VV1)=0,RSIV,3);
{确认 最高点及最近5高点中的高点 切线}
V0:=CONST(HHV(RSIV,N2));
T0:=BARSLAST(RSIV=V0)+1;
MAXV:=MAX(VV1,MAX(VV2,MAX(VV3,MAX(VV4,VV5))));
MAXT:=BARSLAST(RSIV=MAXV);
切线2RAWLINE(BARSLAST(RSIV=V0)=0,RSIV,BARSLAST(RSIV=MAXV)=0,RSIV,3);
{确认 最高点及第1高点 切线}
切线3RAWLINE(BARSLAST(RSIV=V0)=0,RSIV,BARSLAST(RSIV=VV1)=0,RSIV,3);
未穿越:=NOT(HHV(RSIV,T0-1)>REF(切线3,BARSLAST(RSIV=HHV(RSIV,T0-1))=0));
{确认 最高点及前3高点的高点 切线}
MAXV1:=MAX(VV1,MAX(VV2,VV3));
MAXT1:=BARSLAST(RSIV=MAXV);
切线4RAWLINE(BARSLAST(RSIV=V0)=0,RSIV,BARSLAST(RSIV=MAXV1)=0,RSIV,3);
{确认短期内是否背离}
VV7:=MAX(VV1,MAX(VV2,VV3));
TT7:=BARSLAST(RSIV=VV7)+1;
VV8:=MAX(VV4,MAX(VV5,VV6));
TT8:=BARSLAST(RSIV=VV8)+1;
同向1:=VV7>=VV8 AND REF(C,TT7)>=REF(C,TT8);
同向2:=VV7<VV8 AND REF(C,TT7)<REF(C,TT8);
同向:=同向1 OR 同向2;
{确认突破切线}
上穿1:=VV2>VV1 AND CROSS(RSIV,切线1);
上穿2:=T0>MAXT AND CROSS(RSIV,切线2);
上穿3:=T0>TT1 AND 未穿越 AND CROSS(RSIV,切线3);
上穿4:=T0>MAXT1 AND CROSS(RSIV,切线4);
上穿:=上穿1 OR 上穿2 OR 上穿3 OR 上穿4;
{确认启动点位置}
启动:=RSIV<80 AND RSIV>REF(RSIV,1) AND (CROSS(RSIV,50) OR REF(RSIV,1)<50);
SELECT:IF(启动 AND 同向 AND 上穿,80,20); |