{通達(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同時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同時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)價比昨日收盤價高出最高5.6%}
{眾所周知S股和ST股漲幅不能超過5%}
{我個人比較習(xí)慣偏向使用S2:=IF(NAMELIKE('S'),0,1);}
{通達(dá)信去掉*、S、ST}
S3:=IF(NAMELIKE('*'),0,1);
{通達(dá)信去掉停牌}
S4:=DYNAINFO(17)>0;
{收盤價小于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é)任了吧!}
{附件所帶是我正在使用的這個公式}
我是用的通達(dá)信5.68,V611券商版，使用得非常好。
“TCALC.DLL”，公式管理器的版本是V4.10或者是V4.11。
如果有問題，是否您的版本過低。
順便說一下：我已經(jīng)是不惑之人，不會輕信一個公式，
我發(fā)的這個公式是經(jīng)過自己的檢測了一段時間以后，才發(fā)上來。
否則就是害人害己極度不負(fù)責(zé)任；就等于是輕易拿錢入場去賭博。
