|
|
|
回复 #40992 vsunny 的帖子
还是用老大的新公式吧，不过要l2，原帖在29887楼 1495页
小泰坦公式（大智慧L2公式）
{原创：lymanqun}
{数据是6月份以后最新的。包括了小泰坦公式用到的数据。数据源包括两个：万得、港澳资讯}
{各位可以以其中一个为主以自定义数据方式引入，另外一个作补充引入。}
{由于数据包括多个季度的数据，因此需要对原来小泰坦公式稍作调整，如下：}
input:N(20),T(10),M(125),P(60),p1(10);
{以下三个数据需要根据实际情况修改其数值}
{rq:=1070930;} {表示取2007年06月30日的财务数据。}
bbxs:=4/3; {报表系数,1：年报；2：半年报；4/3：第三季报；4：第一季报}
jsxs:=1; {技术指标系数，标准值等于1，可自行定义数值。降低该数值将提高选股数量，数值需要大于零！}
{以下修改成为大智慧L2 专业财务函数}
{主营业务收入:ref(selfdata('主营业务收入'),BARSSINCE(date>=rq));
主营业务利润率:ref(selfdata('主营业务利润率'),BARSSINCE(date>=rq));
资产负债率:ref(selfdata('资产负债率'),BARSSINCE(date>=rq));
每股收益:ref(selfdata('每股收益'),BARSSINCE(date>=rq));
净利润增长率:ref(selfdata('净利润增长率'),BARSSINCE(date>=rq));
股东户数:ref(selfdata('股东户数'),BARSSINCE(date>=rq));
}
主营业务利润率: 100-PFFIN(1656,0);
资产负债率: PFFIN(1701,0 );
每股收益: PFFIN(1001,0 );
净利润增长率: PFFIN(1604,0 );
股东户数: PFFIN(4253,0 );
每股主营收入:=PFFIN(1007,0);
主营业务收入:每股主营收入*finance2(35) ;
{RSP强度}
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);
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);
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);
{line:=80; }
{小泰坦。牛市使用，将市销率扩大到6,其余未改）}
六十日强度:=六十天相对价位/jsxs>80;
半年强度:=半年相对价位/jsxs>75;
二十日强度:=二十天相对价位/jsxs>70;
换手率:=VOL/FINANCE2(37);
换手率和:=SUM(换手率,P1);
当日成交量:=VOL;
五日均量:=ma(vol,5);
Var1:=c*FINANCE2(37)/(主营业务收入*bbxs)<=6 and c*FINANCE2(37)/(主营业务收入*bbxs)>0;{0<市销率<6}
Var3:=FINANCE2(37)*c>=20000 AND FINANCE2(37)*c<=45*10000;{2亿人民币≤流通市值≤45亿元人民币}
Var4:=BARSCOUNT(CLOSE)>1*125;{ 上市时间≥半年 注：适当调整}
Var5:=主营业务利润率>20;{主营业务利润率大于20％}
Var6:=资产负债率<80;{资产负债率行业均值暂取80}
Var7:=c/(每股收益*bbxs)/净利润增长率<=1;{市盈率和收益增长率的比率≤１--PEG比率}
Var8:=100*capital/股东户数>=4500;{流通股东人均持股大于4500}
Var9:=每股收益>-0.25;{最近一期每股收益大于-0.25元}
Var10:=五日均量>当日成交量;
Var11:=换手率和>30;
Var12:=selfdata('07三季基金持股率')>1.5;
Test:Var1 and Var3 and Var4 and Var5 and Var6 and Var7 and Var8 and Var9 and Var10 and Var11 and Var12; {测试用}
小泰坦:Var1 and Var3 and Var4 and Var5 and Var6 and Var7 and Var8 and Var9 and 六十日强度 and 半年强度 and 二十日强度 and Var10 and Var11 and Var12;
十日上榜:COUNT(小泰坦=1,10);
廿日上榜:COUNT(小泰坦=1,20);
月涨幅:(c-ref(c,20))/(ref(c,20))*100;
两月涨幅:(c-ref(c,40))/(ref(c,40))*100;
一年涨幅:(c-ref(c,250))/(ref(c,250))*100;
精选:if((小泰坦=1 and 两月涨幅<70 ),1,0); |
|
|
[复制链接]
发表于 2008-8-4 09:12
楼主
