{通達(dá)信去掉創(chuàng)業(yè)板*ST}
S1:=IF(CODELIKE('300'),0,1);
{通達(dá)信去掉*、S、ST}
S2:=IF(NAMELIKE('S'),0,1);
S3:=IF(NAMELIKE('*'),0,1);
{通達(dá)信去掉停牌}
S4:=DYNAINFO(17)>0;
{ST:S1 AND S2 AND S3 AND S4;}
{XG:=S1 AND S2 AND S3 AND S4 AND TJ1 AND TJ2;}
{E88:EXIST(XG,1);}
{量比}
VAR0:=REF(V,1)+REF(V,2)+REF(V,3)+REF(V,4)+REF(V,5);
VAR1:=VAR0/5;
量比:=V/VAR1;
{45底上升}
X1:=(C+L+H)/3;
BB13:=ATAN(EMA(X1,13)-REF(EMA(X1,13),1))*3.1416*10;
EMA8:=EMA(C,8);
TJ1:=FILTER(BB13>1 AND EMA(X1,13)>REF(EMA(X1,8),1),10);
TJ2:=量比>2.9;
XG:=S1 AND S2 AND S3 AND S4 AND TJ1 AND TJ2 ;{量比>2.9同時(shí)45度角上升}
選股:EXIST(XG,1);


望 高手 修改一下該選股 預(yù)警 公式。
謝謝！ 通達(dá)信 軟件

 

{⊙放量+45度角上升⊙}
{量比}
VAR0:=REF(V,1)+REF(V,2)+REF(V,3)+REF(V,4)+REF(V,5);
VAR1:=VAR0/5;
量比:=V/VAR1;
{45底上升}
X1:=(C+L+H)/3;
BB13:=ATAN(EMA(X1,13)-REF(EMA(X1,13),1))*3.1416*10;
EMA8:=EMA(C,8);
TJ1:=FILTER(BB13>1 AND EMA(X1,13)>REF(EMA(X1,8),1),10);
TJ2:=量比>2.9;
XG1:=TJ1 AND TJ2 ;{量比>2.9同時(shí)45度角上升}
{+++++以下各模塊可以自行修改OR刪減+++++}
{⊙通達(dá)信去掉創(chuàng)業(yè)板*ST⊙}
S1:=IF(CODELIKE('300'),0,1);
{通達(dá)信去掉*、S、ST}
S2:=IF(NAMELIKE('S'),0,1);
{S2:=EXIST((C/REF(C,1)-1)*100>5.6,60);}
{兩種去除S或者ST的判別方法，都是一樣的}
{一種方法是判別股票名稱前是否有"S", OR "ST"}
{另一種方法是判別現(xiàn)價(jià)比昨日收盤價(jià)高出最高5.6%}
{眾所周知S股和ST股漲幅不能超過5%}
{我個(gè)人比較習(xí)慣偏向使用S2:=IF(NAMELIKE('S'),0,1);}

{通達(dá)信去掉*、S、ST}
S3:=IF(NAMELIKE('*'),0,1);

{通達(dá)信去掉停牌}
S4:=DYNAINFO(17)>0;

{收盤價(jià)小于35元,具體數(shù)字可以自己修改}
S5:=C<35;
{如果想選20元以下的股票,就可以改成S5:=C<20;}

{流通盤小于5億,具體數(shù)字可以自己修改}
S6:=FINANCE(7)<500000000;
{如果想選流通盤小于2億以下的股票,就可以改成S6:=FINANCE(7)<200000000;}

XG:=S1 AND S2 AND S3 AND S4 AND S5 AND S6 AND XG1;
選股:EXIST(XG,1);

{已經(jīng)傻瓜式教學(xué)般的清楚了,夠認(rèn)真負(fù)責(zé)任了吧!}
{附件所帶是我正在使用的這個(gè)公式}


我是用的通達(dá)信5.68,V611券商版，使用得非常好。
“TCALC.DLL”，公式管理器的版本是V4.10或者是V4.11。
如果有問題，是否您的版本過低。
順便說一下：我已經(jīng)是不惑之人，不會輕信一個(gè)公式，
我發(fā)的這個(gè)公式是經(jīng)過自己的檢測了一段時(shí)間以后，才發(fā)上來。
否則就是害人害己極度不負(fù)責(zé)任；就等于是輕易拿錢入場去賭博。