{周月RSI引用}
N1:=6; N2:=12; N3:=24;
LC:REF(CLOSE,1);
YN11:SMA(MAX(CLOSE-LC,0),N1,1);
YN12:SMA(ABS(CLOSE-LC),N1,1);
YN21:SMA(MAX(CLOSE-LC,0),N2,1);
YN22:SMA(ABS(CLOSE-LC),N2,1);
YN31:SMA(MAX(CLOSE-LC,0),N3,1);
YN32:SMA(ABS(CLOSE-LC),N3,1);
{分析家公式网www.fxjgsw.com}
{涨跌超前预知}
N1:=6; N2:=12; N3:=24;
YLC:=周月RSI引用.LC#MONTH;
YY11:=周月RSI引用.YN11#MONTH;
YY12:=周月RSI引用.YN12#MONTH;
ZLC:=周月RSI引用.LC#WEEK;
ZY11:=周月RSI引用.YN11#WEEK;
ZY12:=周月RSI引用.YN12#WEEK;
YRSI1:=((MAX(C-YLC,0)+YY11*(N1-1))/N1)/((ABS(C-YLC)+YY12*(N1-1))/N1)*100;
ZRSI1:=((MAX(C-ZLC,0)+YY11*(N1-1))/N1)/((ABS(C-ZLC)+ZY12*(N1-1))/N1)*100;
月RI1:=YRSI1,COLORWHITE;
周RI1:=ZRSI1,COLORWHITE;

零:0,COLORBROWN,DOTLINE;
N:=50;
沧海行周J:="KDJ.J#WEEK" ,COLORGREEN,LINETHICK2;
沧海行周D:="KDJ.D#WEEK" ,COLOR33AAAA,LINETHICK1;
沧海行周MA:=50*"MACD.MACD#WEEK" ,COLORLIGREEN,DOTLINE;

零点:=(CONST(LLV(沧海行周MA,90))+CONST(HHV(沧海行周MA,90)))/2;
DI:=月RI1;
F分:=CONST(LLV(DI,90));
F百:=CONST(HHV(DI,90))-F分;
点:=CONST(LLV(沧海行周MA,90));
基:=CONST(HHV(沧海行周MA,90))-点;
F比:=(DI-F分)/F百;
XFX:=F比*基+点;

周零点:=(CONST(LLV(沧海行周MA,90))+CONST(HHV(沧海行周MA,90)))/2;
周DI:=周RI1;{月RSI1叠加}
周F分:=CONST(LLV(周DI,90));
周F百:=CONST(HHV(周DI,90))-周F分;
周点:=CONST(LLV(沧海行周MA,90));
周基:=CONST(HHV(沧海行周MA,90))-周点;
周F比:=(周DI-周F分)/周F百;
周XFX:=周F比*周基+周点;
月RSI1叠加:XFX*3,LINETHICK1,COLORRED,LINETHICK3;

老师做好的选股源码
X:="涨跌超前预知.月RSI1叠加 #MONTH";
选股:X>REF(X,90) AND REF(NOT(X>REF(X,90)),90)&&CROSS(X,0);