通达信短线抄底001 提供源码

vN:=9;M1:=3;M2:=3;P:=9;
 AA:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;
 BB:=SMA(AA,M1,1);
 ELIA:=SMA(BB,M2,1);
 ELIB:=IF(BARSLAST(CROSS(BB,ELIA))<P AND CROSS(BB,ELIA) AND BB<20,90,0);
 LC:=REF(CLOSE,1);
 RSI:=SMA(MAX(CLOSE-LC,0),4,1)/SMA(ABS(CLOSE-LC),4,1)*100;
 CC:=CROSS(RSI,11)*80;
 Q:=CC OR ELIB;
 X:=MA(AMOUNT,5)/MA(V,5)/100;
 VAR3:=(X-MA(AMOUNT,125)/MA(V,125)/100)/X;
 VAR4:=MA((LLV(L,45)-C)/(HHV(H,45)-LLV(L,45))*100,3);
 VAR5:=C/MA(C,60)-1;
 Q1:=IF(CROSS(-5,VAR4) AND VAR3<-0.4,-0.01,-1);
 RR8:=MA(CLOSE,27);
 RR9:=(CLOSE-RR8)/RR8*100;
 RRA:=MA(RR9,2);

 RRB:=BARSLAST(CROSS(-10,RRA)=1);
 RRD1:=RRA<-25 AND RRB>6;
 RRD5:=RRA<-30 AND RRB>3;
 RRD2:=RRA<-20 AND RRB>6;
 RRD3:=RRA<-15 AND RRB>3;
 RRD4:=RRA<-10 AND RRB>3;
 Q2:=IF(RRD4,22,0),LINETHICK1;
 VL:=REF(LOW,1);
 VAR12:=(SMA(ABS(LOW-VL),13,1))/(SMA(MAX(LOW-VL,0),13,1))*100;
 VAR14:=MA(VAR12,13);
 VAR15:=LLV(LOW,34);
 VAR18:=EMA(IF(LOW<=VAR15,VAR14,0),3);
 VAR110:=SMA(SMA((CLOSE-LLV(LOW,54))/(HHV(HIGH,54)-LLV(LOW,54))*100,7,1),5,1);
 VAR111:=SMA((CLOSE-LLV(LOW,54))/(HHV(HIGH,54)-LLV(LOW,54))*100,7,1)*16.18-VAR110*10.9;
 T:=FILTER(IF(VAR111<=VAR110 AND VAR18>REF(VAR18,1),VAR18*8,0),20);
 VAR21:=(CLOSE-LLV(LOW,36))/(HHV(HIGH,36)-LLV(LOW,36))*100;
 VAR22:=SMA(VAR21,3,1);
 VAR23:=SMA(VAR22,3,1);
 VAR24:=SMA(VAR23,3,1);
 VAR25:=CROSS(VAR23,VAR24) AND VAR23<20;
 VAR29:=CROSS(VAR24,VAR23) AND VAR23>80;
 MTM:=C-REF(C,1);
 DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);
 Q3:=IF(LLV(DX,2)=LLV(DX,7)AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2)),2,0);
 A:=DMA((((HIGH + LOW) + (CLOSE * 2)) / 4.15),0.9);
 A1:=REF(EMA(A,3),1);
 RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
 K:=SMA(RSV,3,1);
 D:=SMA(K,3,1);
 J:=3*K-2*D;
 A3:= J<50;
 Q4:=CROSS(CLOSE,A1) AND A3,colorred ;
 XG:Q and Q1 and Q2 and Q3 and Q4;