[通达信] 红肉青骨 -- 飞狐版本，通达信版本，都提供了 飞狐源码 VAR1:=(CLOSE+LOW+HIGH)/3; VAR2:=SUM(((VAR1-REF(LOW,1))-(HIGH-VAR1))*(VOL/100000)/(HIGH-LOW),0); VAR3:=EMA(VAR2,1); ②买:=EMA(VAR3,12)-EMA(VAR3,26),COLORYELLOW; ②价:=EMA(②买,9),COLORRED,LINETHICK2; 价1:EMA(②买,1),COLORLIRED,LINETHICK1; 价2:EMA(②买,2),COLORLIRED,LINETHICK1; 价3:EMA(②买,3),COLORMAGENTA,LINETHICK1; 价4:EMA(②买,4),COLORMAGENTA,LINETHICK1; 价5:EMA(②买,5),COLORRED,LINETHICK2; 庄出:(46.18*EMA(②买,5)-31.82*EMA(②买,3))/14.36,COLORBLUE,LINETHICK1; 庄进:partline(②价>庄出,庄出),COLORYELLOW,LINETHICK1; partline(价5>价1,价1),COLORLIGREEN,LINETHICK1; partline(价5>价2,价2),COLORLIGREEN,LINETHICK1; partline(价5>价3,价3),COLORCYAN,LINETHICK1; partline(价5>价4,价4),COLORCYAN,LINETHICK1; partline(价5< REF(价5,1),价5),COLORGREEN,LINETHICK2; MA3:3*(②价) - (2)*(②买),LINETHICK1,COLORD39D91; MA4:3*(②买) - (2)*(②价),LINETHICK2,COLORLIRED;
通达信源码：
红肉青骨
VAR1:=(CLOSE+LOW+HIGH)/3;
VAR2:=SUM(((VAR1-REF(LOW,1))-(HIGH-VAR1))*(VOL/100000)/(HIGH-LOW),0);
VAR3:=EMA(VAR2,1);
②买:=EMA(VAR3,12)-EMA(VAR3,26),COLORYELLOW;
②价:=EMA(②买,9),COLORRED,LINETHICK2;
价1:EMA(②买,1),COLORLIRED,LINETHICK1;
价2:EMA(②买,2),COLORLIRED,LINETHICK1;
价3:EMA(②买,3),COLORMAGENTA,LINETHICK1;
价4:EMA(②买,4),COLORMAGENTA,LINETHICK1;
价5:EMA(②买,5),COLORRED,LINETHICK2;
庄出:(46.18*EMA(②买,5)-31.82*EMA(②买,3))/14.36,COLORBLUE,LINETHICK1;
庄进:IF(②价>庄出,庄出,DRAWNULL),COLORYELLOW,LINETHICK1;
IF(价5>价1,价1,DRAWNULL),COLORLIGREEN,LINETHICK1;
IF(价5>价2,价2,DRAWNULL),COLORLIGREEN,LINETHICK1;
IF(价5>价3,价3,DRAWNULL),COLORCYAN,LINETHICK1;
IF(价5>价4,价4,DRAWNULL),COLORCYAN,LINETHICK1;
IF(价5< REF(价5,1),价5,DRAWNULL),COLORGREEN,LINETHICK2;
MA3:3*(②价) - (2)*(②买),LINETHICK1,COLORD39D91;
MA4:3*(②买) - (2)*(②价),LINETHICK2,COLORLIRED; {点击看本软件截图： 58股票 公式网 http://www. 58gu. com 整理} |
