通达信RSI周期买卖源码副图

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*2,COLORBROWN,LINETHICK2;

月RSI1叠加:XFX*3,LINETHICK1,COLORRED,LINETHICK3;