通达信二代双响副图预警选股 源码

以下是通达信二代双响副图预警选股 源码

{二代双响副图预警选股}
MA1:=MA(CLOSE,5);
 MA2:=MA(CLOSE,10);
 MA3:=MA(CLOSE,20);
 MA4:=MA(CLOSE,30);
 MA5:=MA(CLOSE,60);
强势线:=MA(C,25) + ((MA(C,25) * 20) / 100);
 TC3:=REF(C,1);
涨停:=IF((((C - TC3) * 100) / TC3) >= (10 - ((0.03 * 100) / TC3)),1,0);
跌停:=IF((((TC3 - C) * 100) / TC3) >= (10 - ((0.03 * 100) / TC3)),1,0);
 VAR2:=CLOSE * VOL;
 VAR3:=EMA(((((EMA(VAR2,3) / EMA(VOL,3)) + (EMA(VAR2,6) / EMA(VOL,6))) + (EMA(VAR2,12) / EMA(VOL,12))) + (EMA(VAR2,24) / EMA(VOL,24))) / 4,13);
上:=SMA(HIGH,21,2) * 1.05;
 BMA:=MA(CLOSE,118);
阻挡:=SMA(HIGH,21,2) * 1.05;
 RSV:=((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100;
 K:=SMA(RSV,3,1);
 D:=SMA(K,3,1);
 J:=(3 * K) - (2 * D);
 RSV12:=((CLOSE - LLV(LOW,34)) / (HHV(HIGH,34) - LLV(LOW,34))) * 100;
 K12:=SMA(RSV12,3,1);
 D12:=SMA(K12,3,1);
 J12:=(3 * K12) - (2 * D12);
 RSV24:=((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100;
 K24:=SMA(RSV24,3,1);
 D24:=SMA(K24,3,1);
 J24:=(3 * K24) - (2 * D24);
压力位:=IF(CROSS(J24,J),HIGH,REF(HIGH,BARSLAST(CROSS(J24,J))));
 DF:=BETWEEN(CLOSE / REF(CLOSE,1),1.0983,1.110);
 Z:=(O + H) / 2;
 B1:=((REF(C,3) / REF(C,4)) > 1.09) AND (REF(C,3) > REF(O,3));
 B2:=(((H / REF(C,1)) >= 1.041) AND (((O / REF(O,3)) < 1.05) OR ((REF(O,1) / REF(O,3)) < 1.05))) AND ((REF(C,3) / O) > 1.02);
 XG2:=B1 AND B2;
 C1:=((REF(C,4) / REF(C,5)) > 1.09) AND (REF(C,4) > REF(O,4));
 C2:=(((H / REF(C,1)) >= 1.041) AND (((O / REF(O,4)) < 1.05) OR ((REF(O,1) / REF(O,4)) < 1.05))) AND (O < REF(C,4));
 C3:=(REF(C,4) / O) > 1.02;
 XG3:=(C1 AND C2) AND C3;
 D1:=((REF(C,5) / REF(C,6)) > 1.09) AND (REF(C,5) > REF(O,5));
 D2:=((H / REF(C,1)) > 1.041) AND (BETWEEN(O / REF(O,5),1.05,0.85));
 XG4:=D1 AND D2;
 E1:=((REF(C,6) / REF(C,7)) > 1.09) AND (REF(C,6) > REF(O,6));
 E2:=((H / REF(C,1)) > 1.041) AND (BETWEEN(O / REF(O,6),1.05,0.85));
 XG5:=E1 AND E2;
 F1:=((REF(C,7) / REF(C,8)) > 1.095) AND (REF(C,7) > REF(O,7));
 F2:=((H / REF(C,1)) > 1.041) AND (BETWEEN(O / REF(O,7),1.05,0.85));
 XG6:=F1 AND F2;
 G1:=((REF(C,8) / REF(C,9)) > 1.095) AND (REF(C,8) > REF(O,8));
 G2:=((H / REF(C,1)) > 1.041) AND (BETWEEN(O / REF(O,8),1.05,0.85));
 XG7:=G1 AND G2;
 H1:=((REF(C,9) / REF(C,10)) > 1.095) AND (REF(C,9) > REF(O,9));
 H2:=((C / REF(C,1)) > 1.041) AND (BETWEEN(O / REF(O,9),1.05,0.92));
 H3:=((CROSS(C,MA(C,5)) AND CROSS(C,MA(C,10))) AND (MA(C,10) > MA(C,20))) AND (MA(C,5) > MA(C,20));
 XG8:=(H1 AND H2) AND H3;
 J1:=((REF(C,10) / REF(C,11)) > 1.095) AND (REF(C,10) > REF(O,10));
 J2:=((C / REF(C,1)) > 1.041) AND (BETWEEN(O / REF(O,10),1.05,0.92));
 J3:=((CROSS(C,MA(C,5)) AND CROSS(C,MA(C,10))) AND (MA(C,10) > MA(C,20))) AND (MA(C,5) > MA(C,20));
 XG9:=(J1 AND J2) AND J3;
 L1:=((REF(C,11) / REF(C,12)) > 1.095) AND (REF(C,11) > REF(O,11));
 L2:=((C / REF(C,1)) > 1.041) AND (BETWEEN(O / REF(O,11),1.05,0.92));
 L3:=((CROSS(C,MA(C,5)) AND CROSS(C,MA(C,10))) AND (MA(C,10) > MA(C,20))) AND (MA(C,5) > MA(C,20));
 XG10:=(L1 AND L2) AND L3;
 M1:=(((REF(C,12) / REF(C,13)) > 1.095) AND (REF(C,12) > REF(O,12))) AND ((REF(C,13) / REF(C,14)) < 1.09);
 M2:=((C / REF(C,1)) > 1.041) AND (BETWEEN(O / REF(O,12),1.05,0.92));
 M3:=((CROSS(C,MA(C,5)) AND CROSS(C,MA(C,10))) AND (MA(C,10) > MA(C,20))) AND (MA(C,5) > MA(C,20));
 XG11:=(M1 AND M2) AND M3;
 N1:=((REF(C,13) / REF(C,14)) > 1.095) AND (REF(C,13) > REF(O,13));
 N2:=((H / REF(C,1)) > 1.04) AND (L < REF(C,13));
 N3:=(CROSS(C,MA(C,5)) AND (MA(C,5) > MA(C,20))) AND (C > MA(C,20));
 XG12:=(N1 AND N2) AND N3;
 ZHXG1:=(((((((((XG2 OR XG3) OR XG4) OR XG5) OR XG6) OR XG7) OR XG8) OR XG9) OR XG10) OR XG11) OR XG12;
 PH1:=((REF(C,9) / REF(C,10)) > 1.095) AND (REF(C,9) > REF(O,9));
 PH2:=((H / REF(C,1)) > 1.041) AND (L < REF(C,9));
 PH3:=((CROSS(C,MA(C,5)) AND CROSS(C,MA(C,10))) AND (MA(C,10) > MA(C,20))) AND (MA(C,5) > MA(C,20));
 PXG8:=(PH1 AND PH2) AND PH3;
 PJ1:=((REF(C,10) / REF(C,11)) > 1.095) AND (REF(C,10) > REF(O,10));
 PJ2:=((H / REF(C,1)) > 1.041) AND (L < REF(C,10));
 PJ3:=((CROSS(C,MA(C,5)) AND CROSS(C,MA(C,10))) AND (MA(C,10) > MA(C,20))) AND (MA(C,5) > MA(C,20));
 PXG9:=(PJ1 AND PJ2) AND PJ3;
 PL1:=((REF(C,11) / REF(C,12)) > 1.095) AND (REF(C,11) > REF(O,11));
 PL2:=((H / REF(C,1)) > 1.041) AND (L < REF(C,11));
 PL3:=((CROSS(C,MA(C,5)) AND CROSS(C,MA(C,10))) AND (MA(C,10) > MA(C,20))) AND (MA(C,5) > MA(C,20));
 PXG10:=(PL1 AND PL2) AND PL3;
 PM1:=(((REF(C,12) / REF(C,13)) > 1.095) AND (REF(C,12) > REF(O,12))) AND ((REF(C,13) / REF(C,14)) < 1.09);
 PM2:=((H / REF(C,1)) > 1.041) AND (L < REF(C,12));
 PM3:=((CROSS(C,MA(C,5)) AND CROSS(C,MA(C,10))) AND (MA(C,10) > MA(C,20))) AND (MA(C,5) > MA(C,20));
 PXG11:=(PM1 AND PM2) AND PM3;
 VXG:=(L < 压力位) AND (C > 压力位);
上轨道:=MA(C,25) + ((MA(C,25) * 20) / 100);
 CQSX:=CROSS(C,上轨道);
ZHXG2:=((((PXG8 OR PXG9) OR PXG10) OR PXG11) AND VXG) AND CQSX;
 PDM1:=(((C / REF(C,1)) > 1.07) AND ((C / O) > 1.05)) AND ((H / C) < (C / O));
 PDM2:=((BETWEEN(O / REF(H,1),1.01,1.08)) AND ((C / REF(C,1)) > 1.041)) AND ((REF(C,1) / REF(C,2)) < 1.04);
 PDM3:=(((MA(C,5) > MA(C,10)) AND (MA(C,10) > MA(C,20))) AND (MA(C,10) > MA(C,30))) AND (MA(C,30) > MA(C,60));
 PDM4:=((REF(C,1) / REF(C,2)) < 1.09) AND ((REF(C,2) / REF(C,3)) < 1.09);
 PDXG:=((COUNT(REF(PDM1,1),20) AND PDM2) AND PDM3) AND PDM4;
 YZB1:=((REF(C,3) / REF(C,4)) > 1.09) AND (REF(C,3) = REF(O,3));
 YZB2:=((H / REF(C,1)) >= 1.041) AND (O < REF(C,3));
 YZXG2:=YZB1 AND YZB2;
 YZC1:=((REF(C,4) / REF(C,5)) > 1.09) AND (REF(C,4) = REF(O,4));
 YZC2:=((H / REF(C,1)) >= 1.041) AND (O < REF(C,4));
 YZXG3:=YZC1 AND YZC2;
 YZZH:=YZXG2 OR YZXG3;
 KM1:=((((((((C / REF(C,1)) > 1.095) AND (C = H)) AND (O < MA(C,10))) AND (C > MA(C,10))) AND (O < MA(C,20))) AND (C > MA (C,20))) AND (O < MA(C,30))) AND (C > MA(C,30));
 DM1:=((((((((H / REF(C,1)) > 1.041) AND (L < MA(C,5))) AND (C > MA(C,5))) AND (L < MA(C,10))) AND (C > MA(C,10))) AND (L < MA(C,20))) AND (C > MA(C,20))) AND (((L < MA(C,60)) AND (C > MA(C,60))) OR ((L < MA(C,120)) AND (C > MA(C,120))));
 KDXG:=COUNT(REF(KM1,3),12) AND DM1;
 GKB1:=((REF(C,3) / REF(C,4)) > 1.09) AND (REF(C,3) > REF(O,3));
 GKB2:=(((((((H / REF(C,1)) >= 1.041) AND ((H / REF(C,1)) >= 1.031)) AND (BETWEEN(O / REF(O,3),1.06,0.92))) AND (REF(V,1) < REF(V,2))) AND ((REF(H,2) / MAX(REF(O,2),REF(C,2))) < 1.07)) AND ((MA(C,20) / MA(C,30)) < 1.05)) AND (REF(L,2) < REF(C,3));
 GKXG1:=GKB1 AND GKB2;
 GKC1:=((REF(C,4) / REF(C,5)) > 1.09) AND (REF(C,4) > REF(O,4));
 GKC2:=(((H / REF(C,1)) >= 1.041) AND ((C / REF(C,1)) >= 1.031)) AND (BETWEEN(O / REF(O,4),1.06,0.92));
 GKC3:=((((((REF(V,1) < REF(V,2)) AND (REF(V,2) < REF(V,3))) AND ((REF(H,3) / MAX(REF(O,3),REF(C,3))) < 1.07)) AND (H > MA (C,5))) AND (C > MA(C,10))) AND (C > MA(C,30))) AND (REF(L,3) < REF(C,4));
 GKXG2:=(GKC1 AND GKC2) AND GKC3;
 GKXGXG:=GKXG1 OR GKXG2;
二代双响:(((ZHXG1 OR ZHXG2) OR YZZH) OR KDXG) OR GKXGXG;