以下是通达信短打王送与大家源码
VA:=IF(CLOSE>REF(CLOSE,1),VOL,-VOL);OB:=SUM(IF(CLOSE=REF(CLOSE,1),0,VA),0);
BV:=MA(OB,30);BV1:=MA(OB,13);BV2:=MA(OB,5);TT:=CLOSE>REF(CLOSE,1)*1.035;
TJ:=CROSS(OB,BV2) AND BV2>REF(BV2,1) AND OB/BV<1.021;
TZ:=FILTER(TJ,5);TJ2:=FILTER(CROSS(BV2,BV1),5);GG:=REF(C>O,1) AND C>O;
TX:=COUNT(CROSS(OB,BV2) OR CROSS(OB,BV1) OR CROSS(OB,BV),5)>2 AND BV>REF(BV,1);
TC:=FILTER(TX,5);MJ:=IF(C>O,C,O);MK:=IF(C>O,O,C);ML:=H-MJ;MM:=MK-L;
MB:=ML<MM AND ML<(MJ-MK);QC:=FILTER(COUNT(TZ OR TC OR TJ2,3)>=2,3);
LL:=C>MA(C,10) AND MA(C,10)>=REF(MA(C,10),1) AND MACD>REF(MACD,1);
MB AND QC AND LL AND GG AND TT;