通达信看长炒短公式 这是组合力作

源码

ADVANCE,COLORRED,NODRAW;
 DECLINE,COLORRED,NODRAW;
 BTIQ:=100*ADVANCE/(ADVANCE+DECLINE);
判明大盘:=MA(BTIQ,5);
买入:=判明大盘<30,NODRAW,COLORYELLOW;
 DRAWICON(买入,30*0.99,1);
 25,COLORLICYAN;
 80,COLORLIRED;

N:=9;
 M1:=3;
 M2:=3;
 RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;
 K:=SMA(RSV,M1,1);
 D:=SMA(K,M2,1);
 J:=3*K-2*D;
 CJ_K:MA(K,15),LINETHICK3;
 CJ_D:MA(D,15),LINETHICK3;
 CJ_J:MA(J,15),LINETHICK3;
 DRAWICON(CROSS(CJ_K,CJ_D)&&CJ_D<30,CJ_K*0.80,11);
 DRAWICON(CROSS(CJ_D,CJ_K)&&CJ_D>70,CJ_K*1.05,12);
 VAR1:=1;
 VAR2:=((((2*CLOSE)+HIGH)+LOW) / 4);
高位:90,COLORFFFF00;
低位:20,COLORFFFF00;
 VAR4:=LLV(LOW,5);
 VAR5:=HHV(HIGH,4);
 C1:(EMA((((VAR2-VAR4)/(VAR5-VAR4))*100),4)*VAR1),COLORFF00FF;
 C2:(EMA(((0.667*REF(C1,1))+(0.333*C1)),2)*VAR1),COLORFFFFFF;
 DRAWICON(CROSS(C1,C2) AND C2>0,C2,1);
 DRAWICON(CROSS(C2,C1) AND C2<-100,C1,2);
 DRAWICON(CROSS(C1,C2) AND C2<0,C2,1);
 DRAWICON(CROSS(C2,C1) AND C2>-100,C1,2);
条件:=CROSS(C1,C2) AND C1<40;
条件0:=CROSS(C2,C1) AND C1>90;
 TJ1:=CROSS(C1,C2);
 TJ2:=CROSS(C2,C1);
 TJ3:=CROSS(C1,C2) AND REF(C1,1)<20;
 TJ4:=CROSS(C2,C1) AND REF(C1,1)>80;
 DRAWTEXT(FILTER((REF(条件,1) AND (REF(LOW,1)>LOW OR TJ2)) OR (REF(条件,2) AND (REF(LOW,2)>LLV(LOW,3) OR TJ2))
 OR (REF(条件,3) AND (REF(LOW,3)>LLV(LOW,4) OR TJ2)),4),50,'止'),COLORGREEN;
 DRAWTEXT(条件,20,'买'),COLORWHITE;
 DRAWTEXT(条件0,85,'卖'),COLORYELLOW;
 DRAWTEXT(CROSS(C1,75),70,'危险区'),COLORBLUE;
 DRAWTEXT(TJ3,65,'安'),COLORRED;
 DRAWTEXT(TJ3,56,'全'),COLORRED;
 DRAWTEXT(TJ3,47,'买'),COLORRED;
 DRAWTEXT(TJ4,85,'逃顶'),COLORYELLOW;
 DRAWTEXT(ISLASTBAR,88,'清仓'),COLORYELLOW;
 DRAWTEXT(ISLASTBAR,80,'减仓'),COLORYELLOW;
 DRAWTEXT(ISLASTBAR,50,'控盘'),COLORWHITE;
 DRAWTEXT(ISLASTBAR,20,'吸筹'),COLORGREEN;
 {MA2爆点}
VAR41:=(CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2));
 VARK:=(CLOSE  VARL:=(REF(VARK,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
 VARX:=(REF(VARL,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
 VAR30:=(REF(VARX,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
 VAR31:=(REF(VAR30,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
 VAR32:=(REF(VAR31,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
 VAR33:=(REF(VAR32,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
 VAR34:=(REF(VAR33,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
 VAR35:=(REF(VAR34,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
 VAR36:=(REF(VAR35,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
 VAR37:=(REF(VAR36,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));
 VAR38:=(REF(VAR37,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));
 VAR39:=REF(VARK OR VARL OR VARX OR VAR30 OR VAR31 OR VAR32 OR VAR33 OR VAR34 OR VAR35 OR VAR36 OR VAR37 OR VAR38,1) AND VAR41;
 DIFF:=EMA(DCLOSE,12)-EMA(DCLOSE,26);{来自经典副B}
 DEA:=EMA(DIFF,9),COLORFFFF00;
 MACD:=(DIFF-DEA)*2;
 A10:=BARSLAST(REF(CROSS(DIFF,DEA),1));
 A11:=BARSLAST(REF(CROSS(DEA,DIFF),1));
底背离:=REF(CLOSE,A10+1)>CLOSE AND DIFF> REF(DIFF,A10+1) AND CROSS(DIFF,DEA);
顶背离:=REF(CLOSE,A11+1)< CLOSE AND REF(DIFF,A11+1)>DIFF AND CROSS(DEA,DIFF);
 {爆}
LC:=R