通达信海啸辐射未加密选股指标公式源码

源码正文：

ma1:=MA(C,5);MA2:=MA(C,10);MA3:=MA(C,20);MA4:=MA(C,40);MA5:=MA(C,60){XG51};
M1:=5;M2:=10;M3:=20;M4:=60;P:=vol;M5:=MA(P,M1){XG51};
M10:=MA(P,M2);M20:=MA(P,M3);M60:=MA(P,M4){XG51};
放牛郎系统公式:=IF(MA(P,M1)>MA(P,M4)*0.95,22,0)COLORFF33CC,LINETHICK3{XG51};
VOLUME:=VOL{XG51};
大地震:=VOL/REF(MA(VOL,5),1)COLORCYAN{XG51};
LONG:=26;SHORT:=12;M:=9{XG51};
difF:=ema(CLOSE,12)-EMA(CLOSE,26){XG51};
DEA:=EMA(DIFF,9){XG51};
macd:=2*(DIFF-DEA){XG51};
A1:=BArslAst(REF(crOSS(DIFF,DEA),1)){XG51};
宫城县:=REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1)
AND CROSS(DIFF,DEA),LINETHICK3{XG51};
A2:=BARSLAST(REF(CROSS(DEA,DIFF),1)){XG51};
福岛:=REF(CLOSE,A2+1)<CLOSE AND REF(DIFF,A2+1)>DIFF
AND CROSS(DEA,DIFF){XG51};
B1:=BARSLAST(REF(CROSS(MA2,MA3),1)){XG51};
第一核电站:=IF(MA3<REF(MA3,B1+1) AND MA2<REF(MA2,B1+1)
AND CROSS(MA2,MA3),20,1)COLORCYAN,LINETHICK3{XG51};
核爆炸:IF((CROSS(MA2,MA3*0.993) OR CROSS(MA2,MA3))
AND (MA1<MA5 OR REF(MA1,1)<MA5 OR REF(MA1,1)<MA5)
AND MA2<MA5 AND MA3<MA5,888,0)COLORCYAN,LINETHICK5{XG51};
海啸来了:IF(核爆炸 AND REF(EXIST(核爆炸=888,40),8)
AND C>MA3 AND MA2<MA5 AND MA3<MA5 AND (第一核电站=20 OR REF(第一核电站=20,1))
AND MA1>REF(MA1,1) AND REF(MA1,1)>REF(MA1,2) AND MA2>REF(MA2,1)
AND LAST(C<MA5*1.005,30,5) AND LAST(MA2<MA5,20,1) AND LAST(MA3<MA5,20,1)
,311,0)COLORWHITE,LINETHICK8{XG51};
B2:=BARSLAST(REF(CROSS(MA2,MA3),1)){XG51};
第二核电站:=IF(MA3>REF(MA3,B1+1) AND MA2>REF(MA2,B1+1)
AND CROSS(MA2,MA3*0.998),1500,1)COLORBLUE,LINETHICK3{XG51};
核泄漏:=IF((CROSS(MA2,MA3*0.998) OR CROSS(MA2,MA3) OR CROSS(MA2,MA3*1.003))
AND C>MA2 AND MA1>MA5 AND MA2>MA5 AND MA3>MA5
AND MA2>REF(MA2,1) AND MA3>REF(MA3,1)
AND MA5>REF(MA5,1),888,0)COLORRED,LINETHICK5{XG51};
CL:=(大地震>5 OR REF(大地震>5,1)) AND C>REF(C,HHVBARS(C,60)){XG51};
核辐射:IF(核泄漏 AND REF(EXIST(核泄漏=888,40),6)
AND (LAST(福岛=0,10,1) OR C>REF(C,HHVBARS(C,120)) OR CL)
AND (第二核电站=1500 OR REF(第二核电站=1500,1))
AND LAST(MA2>MA5*0.998,30,1) AND LAST(MA3>MA5*0.998,30,1)
AND C>MA2 AND MA1>MA5 AND MA2>MA5 AND MA3>MA5
AND MA2>REF(MA2,1) AND MA3>REF(MA3,1) AND MA5>REF(MA5,1)
AND HHV(MA3,20)/LLV(MA3,20)<1.13
,444,0)COLORBLUE,LINETHICK7{X_G~5~1_C_N_{};

源码正文：

RV:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100{XG51};
RG:=(CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100{XG51};
J0:=(HIGH+LOW)/2;QJ:=ema(J0,3){XG51};
J1:=IF(CLOSE>QJ,vol,0);J2:=IF(CLOSE<QJ,VOL,0){XG51};
量能:=IF(CAPITAL<1,ma(VOL,74),MA(SUM(J1-J2,22),3)){XG51};
趋势:=IF(CAPITAL<1,EMA(量能,360),EMA(量能,21)){XG51};
VAR3:=(量能-趋势);VAR4:=SMA(RV,3,1){XG51};
VAR5:=SMA(VAR4,3,1){XG51};
AA:=crOSS(VAR4,VAR5) AND VAR5<30{XG51};
KK:=EMA(SMA(RG,3,1),2);DD:=SMA(KK,3,1){XG51};
共振点:=(CROSS(VAR4,VAR5) AND CROSS(KK,DD)){XG51};
XG:AA AND 共振点{X=G-5_1=C=N={};