〖趋势回归〗摒弃单一均线改用二次多项式拟合算法源码

	{副图源码如下} 回归线:FORCAST(C,30),DOTLINE;{30周期线性预测基准回归线} S1:=SUM(1,0);{基础常数序列} S3:=S1*S1;{常数序列平方项} M1:=MA(S1,30);{基础序列30周期均值} M3:=MA(S3,30);{平方序列30周期均值} MA30:=MA(CLOSE,30); VAR_P1:=VARP(S1,30)*30; 网:=VARP(S3,30)*30; ZBGS13:=COVAR(S1,S3,30)*(30-1);{两组序列协方差修正} ZBGS1C:=COVAR(S1,CLOSE,30)*(30-1); ZBGS3C:=COVAR(S3,CLOSE,30)*(30-1);{平方序列与收盘价协方差} 方差分母:=VAR_P1*网-ZBGS13*ZBGS13; 系数A:=(ZBGS3C*VAR_P1-ZBGS1C*ZBGS13)/方差分母; 系数B:=(ZBGS1C*网-ZBGS3C*ZBGS13)/方差分母; 常数项:=MA30-系数B*M1-系数A*M3;{拟合方程常数偏移值} 二次回归线:常数项+系数B*S1+系数A*S3; BBZ:二次回归线,COLORRED,LINETHICK3; IF(二次回归线< REF(二次回归线,1),二次回归线,DRAWNULL),COLORGREEN,LINETHICK3; DRAWICON(CROSS(二次回归线,REF(二次回归线,1)),二次回归线,42);{趋势拐头向上} DRAWICON(CROSS(REF(二次回归线,1),二次回归线),二次回归线,43);{趋势拐头向下} {选股源码如下} {二次回归线趋势向上拐头选股公式} S1:=SUM(1,0); S3:=S1*S1; M1:=MA(S1,30); M3:=MA(S3,30); MA30:=MA(CLOSE,30); VAR_P1:=VARP(S1,30)*30; 网:=VARP(S3,30)*30; ZBGS13:=COVAR(S1,S3,30)*(30-1); ZBGS1C:=COVAR(S1,CLOSE,30)*(30-1); ZBGS3C:=COVAR(S3,CLOSE,30)*(30-1); 方差分母:=VAR_P1*网-ZBGS13*ZBGS13; 系数A:=(ZBGS3C*VAR_P1-ZBGS1C*ZBGS13)/方差分母; 系数B:=(ZBGS1C*网-ZBGS3C*ZBGS13)/方差分母; 常数项:=MA30-系数B*M1-系数A*M3; 二次回归线:=常数项+系数B*S1+系数A*S3; {选股条件：二次回归线上穿其昨日值（趋势拐头向上）} 上穿:=CROSS(二次回归线,REF(二次回归线,1)); 上穿; 未