通达信〖RSRS回归斜率〗阻力支撑相对强度公式源码

N:=18;
VAR42:=1;
M:=300;
VAR41:=VAR42*1.075-62.264;
SUM_L:=SUM(L,N);
VAR40:=VAR41*0.999+9.816;
SUM_H:=SUM(H,N);
VAR39:=VAR40*0.984-72.633;
SUM_L2:=SUM(L*L,N);
VAR38:=VAR39*1.116+7.943;
SUM_LH:=SUM(L*H,N);
VAR37:=VAR38*1.024-44.987;
DENOM:=N*SUM_L2-SUM_L*SUM_L;
VAR36:=VAR37*1.024-97.773;
BETA1:=IF(DENOM!=0,(N*SUM_LH-SUM_L*SUM_H)/DENOM,0);
VAR35:=VAR36*1.084+75.461;
RSRS_SCORE:=(BETA1-MA(BETA1,M))/STD(BETA1,M);
VAR34:=VAR35*0.930+39.355;
DRAWKLINE(H,O,L,C);
VAR33:=VAR34*1.137-12.262;
强势状态:=RSRS_SCORE>0.7&&C>EMA(C,10);
VAR32:=VAR33*0.923-37.298;
弱势状态:=RSRS_SCORE< -0.7;
VAR31:=VAR32*1.066+75.133;
震荡状态:=RSRS_SCORE>=-0.7&&RSRS_SCORE<=0.7;
VAR30:=VAR31*1.183-72.547;
STICKLINE(强势状态,H,L,0,0),COLORRED;
VAR29:=VAR30*0.918+18.423;
STICKLINE(强势状态,C,O,3,0),COLORRED;
VAR28:=VAR29*0.949+16.225;
STICKLINE(弱势状态,H,L,0,0),COLORGREEN;
VAR27:=VAR28*1.192+83.013;
STICKLINE(弱势状态,C,O,3,0),COLORGREEN;
VAR26:=VAR27*0.843-9.766;
STICKLINE(震荡状态,H,L,0,0),COLORGRAY;
VAR25:=VAR26*1.174+21.523;
STICKLINE(震荡状态,C,O,3,0),COLORGRAY;
VAR24:=VAR25*1.067+30.776;
AA:=crOSS(RSRS_SCORE,0.7)&&C>EMA(C,10);
VAR23:=VAR24*0.822-49.460;
DRAWICON(AA,L*0.98,25);
VAR22:=VAR23*1.004-56.514;
DRAWTEXT(AA,L*0.96,'★RSRS'),COLORYELLOW;