同花顺新决策密码副图源码 EA-万能指标公式

该指标提供大盘的风险系数，蓝线上穿绿线和黄线时为建仓期，反正则减仓，可为投资者的投资交易提供参考依据。

N1:=1;
r IF(n1<1)
r {
r IF(CLOSE>OPEN)
r RETURN "阳";
rELSE IF(CLOSE<OPEN)
r RETURN "阴";
rELSE IF(CLOSE==OPEN AND OPEN>=CLOSE[1])
r RETURN "阳";
rELSE IF(CLOSE==OPEN AND OPEN<=CLOSE[1])
r RETURN "阴";
rMONEY;
r K线换手;
r }
rIF(n1>0)
r {
r Var1=MONEY/VOL;
r A=SMA(Var1,5,1)-SMA(Var1,55,1);
r B=SMA((A-SMA(A,5,1)),5,1);
r风险系数:B;
r aa:=MA(CLOSE,5);
r前非红:=IF(REF(CLOSE,1)<REF(aa,1) OR REF(A,1)<REF(A,2) OR REF(B,1)<REF(B,2),1,2);
r当红:=IF(CLOSE>MA(CLOSE,5) AND A>REF(A,1) AND B>REF(B,1),1,2);
r LOWV1:=LLV(LOW,8);
r HIGHV1:=HHV(HIGH,8);
r RSV1:=EMA((CLOSE-LOWV1)/(HIGHV1-LOWV1)*100,3);
r K11:=EMA(RSV1,3);
r D11:=MA(K11,2);
r LOWV2:=LLV(LOW,21);
r HIGHV2:=HHV(HIGH,21);
r RSV2:=EMA((CLOSE-LOWV2)/(HIGHV2-LOWV2)*100,3);
r K22:=EMA(RSV2,3);
r D22:=MA(K22,2);
r V5:=MA(V,5);
r V18:=MA(V,18);
r IF(V>V5 AND V>V18)
r Ll:=6.5;
r ELSE Ll:=0;
r IF(D11>REF(D11,1))
r dx:=2.1;
r ELSE dx:=0;
r IF(D11<25)
r dz:=7.6;
r ELSE IF(D11<28)
r dz:=6.1;
r ELSE IF(D11<31)
r dz:=4.6;
r ELSE IF(D11<35)
r dz:=3.1;
r ELSE IF(D11<40)
r dz:=1.6;
r IF(D22<25)
r dz2:=7.6;
r ELSE IF(D22<28)
r dz2:=6.1;
r ELSE IF(D22<31)
r dz2:=4.6;
r ELSE IF(D22<35)
r dz2:=3.1;
r ELSE IF(D22<40)
r dz2:=1.6;
r zz:=Ll+dx+dz+dz2;
r MAVOL$0:MA(VOL,2);
r MAVOL$1:MA(VOL,5);
r MAVOL$2:MA(VOL,20);
r RSV1=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
r a1=SMA(RSV1,3,1);
r b1=SMA(a1,3,1);
r e1=3*a1-2*b1;
r IF(前非红=1 AND 当红=1 AND zz>16 AND C>O*0.985 AND C>REF(C,1)*0.98)//23
r RETURN ("yang");
r IF(CLOSE>MA(CLOSE,5) AND A>REF(A,1) AND B>REF(B,1) AND REF(MAVOL$1,1)<MAVOL$1 AND REF(MAVOL$2,1)<MAVOL$2 AND 前非红=1 AND 当红=1 AND b1<80)
r RETURN ("buy");
r IF(CLOSE>MA(CLOSE,5) AND A>REF(A,1) AND B>REF(B,1))
r RETURN ("colorred");
r IF(CLOSE<MA(CLOSE,5) AND A>REF(A,1) AND B>REF(B,1))
r RETURN ("colorwhite");
r IF(A<REF(A,3) AND B<REF(B,3))
r RETURN ("colorgreen");
r IF(A>REF(A,1) AND B<REF(B,1))
r RETURN ("colorwhite");
r IF(A<REF(A,1) AND B>REF(B,1))
r RETURN ("colorwhite");
r }
r DRAWTEXT(CROSS(MAVOL$0,MAVOL$1),MAVOL$0,’始’);
rDRAWTEXT(CROSS(MAVOL$1,MAVOL$0),MAVOL$1,’终’);