通达信开盘资金竞价选股指标 源码 贴图

{通达信去掉*、S、ST}
WWW:=IF(NAMELIKE('S'),0,1);
AA:=IF(NAMELIKE('*'),0,1);
BB:=DYNAINFO(17)>0;
S4:=IF(CODELIKE('688'),0,1);
去停ST:=WWW AND AA AND BB 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=涨停价)};{股票下载网WWW.GPXIAZAI.COM}
开盘换手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;