- 金币:
-
- 奖励:
-
- 热心:
-
- 注册时间:
- 2007-3-21
|
|
发表于 2007-9-5 01:05
|
小泰的公式和数据算是完成了,但是用最新的数据选不出股票..郁闷
不知道依然老师用小泰公式的选股结果如何
在公式中有一个疑问,变量var7中设置的要求是<=1,那如果某年一个股票的净利润增长率是负的,那也可以入选?按常理,一个公司的净利润增长率是负的,似乎不是什么好事.忘老师能解疑.
我的编码如下,如果老师有时间,希望能看一下有没有错.呵呵.
公式中的数据如果明天上传,如果有人需要的话.
另,公式中的选股条件感觉好苛刻.:*18*:
刚刚把rsp,负债率,还有基金持仓率(这个指标我想应该是用老师的指标算出的吧,偷懒不用了),才选出两个股票来:
000910
000963
- input:N(20),T(10),M(125),P(60),p1(10);
- AA:=(CLOSE-LLV(LOW,N))*100/(HHV(HIGH,N)-LLV(LOW,N));
- BB:=(CLOSE-LLV(LOW,BARSCOUNT(CLOSE)))*100/(HHV(HIGH,BARSCOUNT(CLOSE))-LLV(LOW,BARSCOUNT(CLOSE)));
- CC:=BARSCOUNT(CLOSE);
- 二十天相对价位:IF(CC<=N,BB,AA),COLORBLACK;
- GG:=(CLOSE-LLV(LOW,T))*100/(HHV(HIGH,T)-LLV(LOW,T));
- HH:=(CLOSE-LLV(LOW,BARSCOUNT(CLOSE)))*100/(HHV(HIGH,BARSCOUNT(CLOSE))-LLV(LOW,BARSCOUNT(CLOSE)));
- II:=BARSCOUNT(CLOSE);
- 十天相对价位:IF(II<=T,HH,GG);
- FF:=(CLOSE-LLV(LOW,M))*100/(HHV(HIGH,M)-LLV(LOW,M));
- DD:=(CLOSE-LLV(LOW,BARSCOUNT(CLOSE)))*100/(HHV(HIGH,BARSCOUNT(CLOSE))-LLV(LOW,BARSCOUNT(CLOSE)));
- EE:=BARSCOUNT(CLOSE);
- 半年相对价位:IF(EE<=M,DD,FF),COLORRED;
- JJ:=(CLOSE-LLV(LOW,P))*100/(HHV(HIGH,P)-LLV(LOW,P));
- KK:=(CLOSE-LLV(LOW,BARSCOUNT(CLOSE)))*100/(HHV(HIGH,BARSCOUNT(CLOSE))-LLV(LOW,BARSCOUNT(CLOSE)));
- MM:=BARSCOUNT(CLOSE);
- 六十天相对价位:IF(MM<=P,KK,JJ),COLORBLUE;
- line:80;
- {07小泰坦(P1=10)}
- 流通A股:=selfdata('流通股本');
- 主营收入:=selfdata('主营收入');
- 主营利润:=selfdata('主营利润');
- 当日收盘价:=c;
- 六十日强度:=六十天相对价位>80;
- 半年强度:=半年相对价位>75;
- 二十日强度:=二十天相对价位>70;
- 换手率:=VOL/流通A股;
- 换手率和:=SUM(换手率,P1);
- 成交量:=VOL;
- 五日均量:=ma(vol,5);
- 主营收入利润率:=100*主营利润/主营收入;
- 资产负债比率:=selfdata('资产负债比率');
- 每股收益:=selfdata('每股收益');
- 七二季:=selfdata('07二季度净利润');
- 六二季:=selfdata('06二季度净利润');
- 净利润增长率:=100*(七二季-六二季)/六二季;
- 股东户数:=selfdata('股东户数');
- Var1:=当日收盘价*流通A股/(主营收入*2)<=1 and 当日收盘价*流通A股/(主营收入*2)>0;{0<市销率<1}
- Var3:=流通A股*当日收盘价>=20000 AND 流通A股*当日收盘价<=45*10000;
- {2亿人民币≤流通市值≤45亿元人民币}
- Var4:=BARSCOUNT(CLOSE)>1*125;{ 上市时间≥半年 注:适当调整}
- Var5:=主营收入利润率>20;{主营业务利润率大于20%}
- Var6:=资产负债比率<55;{资产负债率行业均值暂取55}
- Var7:=(当日收盘价/每股收益)/净利润增长率<=1;{市盈率和收益增长率的比率≤1--PEG比率}
- Var8:=100*capital/股东户数>=4500;{流通股东人均持股大于4500}
- Var9:=每股收益>-0.25;{最近一期每股收益大于-0.25元}
- Var10:=ma(vol,5)>vol;
- Var11:=换手率和>30;
- Var1 and Var3 and Var4 and Var5 and Var6 and Var7 and Var8 and Var9 and
- 六十日强度 and 半年强度 and 二十日强度 and Var10 and Var11;
复制代码
[ 本帖最后由 逛鼠 于 2007-9-5 01:18 编辑 ] |
|
|