通达信开盘资金竞价预警 副图排序源码

现在竞价排序很流行，拿出收藏的排序分享给大家，希望能给大家助力

{通达信去掉*、S、ST}
WWW:=IF(NAMELIKE('S'),0,1);
GSZX:=IF(NAMELIKE('*'),0,1);
COM:=DYNAINFO(17)>0;
S4:=IF(CODELIKE('688'),0,1);
去停ST:=WWW AND GSZX AND COM AND S4;{去科创板,去ST，去停牌};

涨幅:=100*(C-REF(C,1))/REF(C,1);
开幅:=100*(O-REF(C,1))/REF(C,1);

ZTJ:=INTPART((REF(C,1)*1.1+0.005)*100)/100.0;
DTJ:=INTPART((REF(C,1)*0.9+0.005)*100)/100.0;
涨停:=ZTJ=C;
跌停:=DTJ=C;
A:=REF(涨停,1);{昨日收盘价>=9.8}

涨停价:=IF(NAMELIKE('S') OR NAMELIKE('*'),ZTPRICE(REF(C,1),0.05),ZTPRICE(REF(C,1),0.1));
跌停价:=IF(NAMELIKE('S') OR NAMELIKE('*'),DTPRICE(REF(C,1),0.05),DTPRICE(REF(C,1),0.1));
去开板:=NOT(OPEN=涨停价);{NOT(OPEN=涨停价)};

开盘换手Z:=DYNAINFO(15)/OPEN/FINANCE(46)*100;{今日开盘换手Z>=0.9--2区间}
G1:=REF(COUNT(ZTJ=H AND C<H,3)=1,1);{去前3日其中一日盘中最高涨幅>=9.8，收盘价小于9.8}
G2:=REF(COUNT(ZTJ=C,3)>=2,1);{去前3日有过2次以涨停价收盘的}
G3:=REF(ZTJ=O AND ZTJ=C AND L<C,1);{去昨日一字板开过板收盘以涨停价收盘的}
G4:=FINANCE(46)/100000000<0.4;{去流通Z<4000万}

开盘资金:=DYNAINFO(15)/10000;{去当日开盘成交额低于1000万}

昨开幅:=REF((OPEN-REF(CLOSE,1))/REF(CLOSE,1)*100,1);

换手Z:=REF(IF(FINANCE(46)>1,VOL/FINANCE(46)*10000,VOL/10000),1)>4;

涨幅排名:=HORCALC(HYBLOCK,105,1,DRAWNULL)<=5;

高值:去停ST AND RANGE(开盘换手Z,0.195,100)  AND 开盘资金>1500  AND 去开板 AND 换手Z AND 昨开幅<=3 AND 涨幅排名 AND G2=0;

1643322525.png

1643422385.png

1643522313.png