yngs 2006-11-16 00:00
散户版机构公式
散户版机构公式
论坛上常常见到一些自称或被称为机构、机构专用的公式,大多都是说着玩而已,通常机构看盘不需要专用指标。今天我在论坛上看到了一组公式,它的编制思路体现了机构选股的一些模式,可谓“散户版机构公式”。这里我把它推荐给大家看看,希望于你大有裨益!感谢作者和改编的朋友!
飞狐公式
网有战事主图
1.股价在低线之下,一般来讲股价比较低了.
2.股价在中线附近,一般来讲股价比较适中。
3.股价在高线之上,一般来讲股价比较高了,要警惕了!
一、用10周线来判断。当股价在10周线以下时,买股票是危险的:10周线以下是死股,10周线以上是活股股价在10周均线下是死股,对这样的股票你看都不要去看它。他是不可能成为大牛股的。要成为大牛股,股价至少也要站在庄家成本(估算)之上。
二、用60周线来判断。60周以上有可能产生牛股:一般来说,当股价在低位上60周线的股票,是主力要大做的股票。因为60周线,是趋势的转折点,股价在60周线上的,是上升通。股价在60周线下的,还是下降通道。
//DRAWBKBMP(C>0 ,'指标背景'),ALIGN4;
{低位密集}
hhh:=hhv(h,288);
lll:=llv(l,288);
zh:=hhh[DATACOUNT];
zl:=lll[DATACOUNT];
q:=(zh-zl)/5;
c90%:=(cost(95)-cost(5))/(cost(95)+cost(5))*100;
集中度:=IF(c90%<=18{集中度} and c<zh-4*q,100,0);
{庄家成本}
Zcb1:=SUMBARS(VOL ,CAPITAL*1);{累计换手=100%的周期}
Zcb2:=SUM(COST(10),Zcb1)/Zcb1;{在A周期里获利10%的平均价}
Zcb3:=SUM(COST(20),Zcb1)/Zcb1;{在A周期里获利20%的平均价}
Zcb4:=SUM(COST(30),Zcb1)/Zcb1;{在A周期里获利30%的平均价}
Zcb5:=SUM(COST(40),Zcb1)/Zcb1;{在A周期里获利40%的平均价}
Zcb6:=SUM(COST(50),Zcb1)/Zcb1;{在A周期里获利50%的平均价}
庄本:(5*Zcb2+4*Zcb3+3*Zcb4+2*Zcb5+Zcb6)/15,PRECISION2,LINETHICK3,COLORGRAY;{求出庄家成本}
{低位密集}
PARTLINE(集中度>0,庄本),COLORCYAN,linethick3;//低密集:
{阶梯线}
x1:=(C+L+H)/3;
x2:=EMA(x1,6);
x3:=EMA(x2,5);
STICKLINE(x2>=x3,x2,x3,10,1),Color00A6F6;//橙
STICKLINE(x2<x3,x2,x3,10,0),COLORBLUE;//蓝
{黄金分割}
n1:=sysparam(3);
nn:=n1-sysparam(2)+1;
hh:=hhv(H,nn);
ll:=llv(L,nn);
最高:=hh[n1];
最低:=ll[n1];
低:=(最低+(最高-最低)*0.191);
PARTLINE(C,低),POINTDOT,ColorFF8900;
中:=最低+(最高-最低)*0.5;
PARTLINE(C,中),POINTDOT,COLORMAGENTA;
高:=最低+(最高-最低)*0.809;
PARTLINE(C,高),POINTDOT,COLORRED;
DRAWTEXT(BARPOS=SYSPARAM(2),低*0.99,'低: '+NUMTOSTR(低,2)),ColorFF8900;
DRAWTEXT(BARPOS=SYSPARAM(2),中*0.99,'中: '+NUMTOSTR(中,2)),COLORMAGENTA;
DRAWTEXT(BARPOS=SYSPARAM(2),高*0.99,'高: '+NUMTOSTR(高,2)),COLORRED;
{K线}
aa1:=wma(c,2);
bb1:=ema(aa1,2);
a0:=ma(bb1,3);
aa2:=wma((h+c+o)/3,18);
dd3:=a0>=aa2 and c>aa2;
dd4:=a0<aa2 ;
dd5:=a0>aa2 ;
cc1:=((c-ref(ma(c,6),1))/6+ma(c,6))*1.004;
cc2:=cross(c,cc1) and cc1>ref(cc1,1);
STICKLINE((dd4 or dd5) and o<=c ,h,l,0.5,0),Color00cc99;//跌势阳线
STICKLINE((dd4 or dd5) and o<=c ,c,o,7,0),Color00cc99;//跌势阳线
STICKLINE((dd4 or dd5) and o>=c ,h,l,0.5,0),Color3F8C3A;//跌势阴线
STICKLINE((dd4 or dd5) and o>=c ,c,o,7,0),Color3F8C3A;//跌势阴线
STICKLINE((dd3 or c>aa2) and o<=c,c,o,7,0),Colorred;//涨势阳线
STICKLINE((dd3 or c>aa2) and o<=c,h,l,0.5,0),Colorred;//涨势阳线
STICKLINE((dd3 or c>aa2) and o>=c,c,o,7,0),Colorff33ff;//涨势阴线
STICKLINE((dd3 or c>aa2) and o>=c,h,l,0.5,0),Colorff33ff;//涨势阴线
STICKLINE(cc2,h,l,0.5,0),colorwhite;//白
STICKLINE(cc2,o,c,7,0),colorwhite;//白
STICKLINE(MA(C,13)>O and C>MA(C,13) and O<c,O,C,8,0),coloryellow;//黄
STICKLINE(MA(C,13)>O and C>MA(C,13),H,L,0.5,0),coloryellow;//黄
{均线}
ZMA10:ema(C,50),PRECISION2,COLORWHITE;
ZMA55:ema(C,240),PRECISION2,COLORGREEN;
乖离:(C-ZMA10)/ZMA10*100,LINETHICK,PRECISION2,COLORCYAN;//要小于20%—15%
yngs 2006-11-16 00:00
网有战事---蓝筹
{表格横线}
PARTLINE(c,0),colorgray;PARTLINE(c,30),colorgray;
PARTLINE(c,60),colorgray;
PARTLINE(c,90),colorgray;PARTLINE(c,120),colorgray;
{表格竖线}
x:=SYSPARAM(2)=BARPOS;
k:=(SYSPARAM(3)-SYSPARAM(2))/110;
x1:=SYSPARAM(2)+ROUND(26*k)=BARPOS;
x2:=SYSPARAM(2)+ROUND(55*k)=BARPOS;
x3:=SYSPARAM(2)+ROUND(86*k)=BARPOS;
x4:=SYSPARAM(2)+ROUND(110*k)=BARPOS;
VERTLINE(x or x1 or x2 or x3 or x4),colorgray;
正收益率:=if(FINANCE(33)>0.01,FINANCE(33)*6,0);
市盈率:=if(FINANCE(33)>0,DYNAINFO(39),0);
蓝筹系数:(正收益率*市盈率)/2,PRECISION2,LINETHICK0,COLORGREEN;
{使用蓝筹系数排序时,别忘了引入F10资料啊}
DRAWTEXT(x2,113,' 动态市盈率(%) = '+NUMTOSTR(市盈率,2)),COLORYELLOW;
股净资:=FINANCE(34);
DRAWTEXT(x1,22,' 净资产(股) = '+NUMTOSTR(股净资,2)+'元' ),COLORWHITE;
净资产收益率:=FINANCE(37);
DRAWTEXT(x2,83,' 净资产收益率(%) = '+NUMTOSTR(净资产收益率,2)),ColorFF6835;
股收益:=FINANCE(33);
DRAWTEXT(x,83,' 收益(股): '+NUMTOSTR(股收益,2)+'元' ),COLORYELLOW;
股公积:=FINANCE(18);
DRAWTEXT(x,52,' 公积(股): '+NUMTOSTR(股公积,2)+'元' ),COLORGREEN;
股未分:=FINANCE(32);
DRAWTEXT(x,22,' 未分(股): '+NUMTOSTR(股未分,2)+'元' ),COLORMAGENTA;
含金量:=(股净资+股未分+股公积+股收益)-C,LINETHICK,PRECISION2{,Color000000};
A5:=含金量[SYSPARAM(1)];
RA5:=含金量[SYSPARAM(1)-1];
jt5:=if(A5>RA5,'↑','↓');
DRAWTEXT(x,113,' 含金量(股)'+NUMTOSTR(含金量,2)+'元'+jt5 ),COLORRED;
现金流量:=((FINANCE(38)+FINANCE(41)+FINANCE(44))-(FINANCE(39)+FINANCE(42)+FINANCE(45)))/FINANCE(1);
DRAWTEXT(x1,52,' 现金净流量(股):'+NUMTOSTR(现金流量,2)+'元'),Color0098FF;
主营业务增长率:=FINANCE(53);
DRAWTEXT(x1,83,' 主营业务增长率(%):'+NUMTOSTR(主营业务增长率,2)),COLORGREEN;
税后利润增长率:=FINANCE(54);
DRAWTEXT(x2,52,' 税后利润增长率(%):'+NUMTOSTR(税后利润增长率,2)),Color0098FF;
总股本:=FINANCE(1)/10000,PRECISION2,LINETHICK1;
DRAWTEXT(x3,113,' 总股本(亿):'+NUMTOSTR(总股本,3)),Color0098FF;
B股:=FINANCE(5)/10000;
DRAWTEXT(x3,52,' B股(亿):'+NUMTOSTR(B股,3)),ColorFF6835;
H股:=FINANCE(6)/10000;
DRAWTEXT(x3,22,' H股(亿):'+NUMTOSTR(H股,3)),COLORCYAN;
选择:=IF(STRLEFT(STKNAME,1)='G'or STRLEFT(STKLABEL,3)='002',1,0);
流通股数:=IF(选择,FINANCE(1),FINANCE(7));
DRAWTEXT(x3,83,' 流通股(亿):'+NUMTOSTR(流通股数/10000,3)),COLORGREEN;
户均持股:=流通股数*10000/FINANCE(50),PRECISION0;
DRAWTEXT(x2,22,' 户均持股(股):'+NUMTOSTR(户均持股,0)),COLORMAGENTA;
xx1:=if(FINANCE(33)>0,DYNAINFO(39),0),LINETHICK;
xx2:=FINANCE(37),LINETHICK;
比值:=xx1/xx2,LINETHICK;//小于1比较多,则认为价格很便宜.
DRAWTEXT(x1,113,' 比值:'+NUMTOSTR(比值,2)+' (<1,越小越好)' ),COLORWHITE;
yngs 2006-11-16 00:01
网有战事估值
{鹏搏资讯F10资料--取参数}
GDT1:=F10FIND('主要指标',100);
GDT2:=F10TEXT(GDT1+177,9);
GDT3:=F10TEXT(GDT1+180,6);
XXx:=STRTONUM(GDT3);
N:=MAX(MAX(IF(XXx=3,12/3,0),IF(XXx=6, 12/6,0)),MAX(IF(XXx=9,12/9,0),IF(XXx=12,12/12,0)));
{股东增减}
x1:=F10FIND('总户数',500);
x2:=F10FIND('占流通A股比例',500);
x3:=F10FIND('200',x1+40);
x4:=F10FIND('200',x3+40);
大股东本期占:=STRTONUM(STRRIGHT(F10TEXT(x2,20),6));
大股东上期占:=STRTONUM(STRRIGHT(F10TEXT(F10FIND('占流通A股比例',x2+20),20),6));
十大股东增减:=大股东本期占 - 大股东上期占;
//////////{网有战事估值}/////////
净资产:FINANCE(34),PRECISION2,LINETHICK,COLORWHITE;//净资产
净资率:FINANCE(37),PRECISION2,LINETHICK,COLORGREEN;//净资产收益率
NJSL:=净资率*n;//估计年净资产收益率
收益率倍数:IF(NJSL>=36 ,5.65,IF(NJSL>=35 and NJSL<36,5.5,IF(NJSL>=34 and NJSL<35,5.34,
IF(NJSL>=33 and NJSL<34,5.18,IF(NJSL>=32 and NJSL<33,5.02,IF(NJSL>=31 and NJSL<32,4.87,
IF(NJSL>=30 and NJSL<31,4.71,IF(NJSL>=29 and NJSL<30,4.55,IF(NJSL>=28 and NJSL<29,4.4,
IF(NJSL>=27 and NJSL<28,4.24,IF(NJSL>=26 and NJSL<27,4.09,IF(NJSL>=25 and NJSL<26,3.92,
IF(NJSL>=24 and NJSL<25,3.77,IF(NJSL>=23 and NJSL<24,3.61,IF(NJSL>=22 and NJSL<23,3.45,
IF(NJSL>=21 and NJSL<22,3.3,IF(NJSL>=20 and NJSL<21,3.14,IF(NJSL>=19 and NJSL<20,2.98,
IF(NJSL>=18 and NJSL<19,2.83,IF(NJSL>=17 and NJSL<18,2.67,IF(NJSL>=16 and NJSL<17,2.51,
IF(NJSL>=15 and NJSL<16,2.35,IF(NJSL>=14 and NJSL<15,2.2,IF(NJSL>=13 and NJSL<14,2.04,
IF(NJSL>=12 and NJSL<13,1.89,IF(NJSL>=11 and NJSL<12,1.73,IF(NJSL>=10 and NJSL<11,1.57,
IF(NJSL>=9 and NJSL<10,1.41,IF(NJSL>=8 and NJSL<9,1.26,IF(NJSL>=7 and NJSL<8,1.1,
IF(NJSL>=6 and NJSL<7,0.94,IF(NJSL>=5 and NJSL<6,0.74,IF(NJSL>=4 and NJSL<5,0.62,
IF(NJSL>=3 and NJSL<4,0.47,IF(NJSL>=2 and NJSL<3,0.31,0.31)
)))))))))))))))))))))))))))))))))),LINETHICK,COLORYELLOW;
壳子参数:IF(NJSL,1,0),LINETHICK,COLORWHITE;//根据中国的实际情况,7%以下加一元壳子钱.
流通盘:=FINANCE(7){流通A股},LINETHICK,COLORMAGENTA;
小盘倍数:=IF(流通盘<=3000,0.7,IF(流通盘<5000 and 流通盘>3000,0.6,
IF(流通盘<6000 and 流通盘>=5000,0.5,IF(流通盘<7000 and 流通盘>=6000,0.4,
IF(流通盘<8000 and 流通盘>=7000,0.3,IF(流通盘<8000 and 流通盘>=7000,0.3,
IF(流通盘<9000 and 流通盘>=8000,0.2,IF(流通盘>9000,0.1,0.1)))))))),LINETHICK,COLORWHITE;
{流通盘大小的壳子参数}
估值:=(净资产*收益率倍数 + 壳子参数 + 净资产*小盘倍数);
潜力排序:估值-C,PRECISION2,LINETHICK,COLORRED;//估价潜力排序
DRAWTEXT(BARPOS=SYSPARAM(2)+2,c,'该股估值: = '+NUMTOSTR(估值,2)+'元'),ALIGN4,COLORCYAN;
DRAWTEXT(BARPOS=SYSPARAM(2)+2,c,' 流通盘: = '+NUMTOSTR(流通盘,2)+'万股'
+' 小盘倍数'+NUMTOSTR(小盘倍数,2)),ALIGN4,COLORMAGENTA;
DRAWTEXT(BARPOS=SYSPARAM(2)+2,c,' \n \n时间参数: = '+NUMTOSTR(N,0)),ALIGN4,COLORGREEN;
DRAWTEXT(barpos=SYSPARAM(2),10,' \n \n 取数据日期(报表):'+GDT2),ALIGN4,COLORWHITE;
DRAWTEXT(BARPOS=SYSPARAM(2)+2,c,' \n \n \n \n十大股东增减: = '+NUMTOSTR(十大股东增减,2)+'%'),ALIGN4,COLORYELLOW;
大庆老杨 2006-11-16 07:08
不错,谢谢提供!
xgc3322 2006-11-16 09:08
谢谢提供!
天高任鸟飞 2006-11-16 10:36
不错,谢谢提供!
chenjiaq 2006-11-16 14:15
谢谢提供分享
hk2000 2006-11-16 20:06
谢谢提供分享
Aptiva 2006-11-19 01:49
顶!
zhh0 2006-11-19 11:23
谢谢提供!!
ahfyxl 2006-11-19 11:55
谢谢............
ysmygsyk 2006-11-19 13:12
xiexie!
fxj99 2006-11-28 23:22
谢谢提供分享
zxh5110 2006-12-3 17:08
麻烦做一个win 资讯提取公式的.
la0xu 2008-4-6 21:26
谢谢提供分享
shangjing558 2008-4-7 15:42
谢谢提供分享!!
:clap: :clap: :clap:
印泥 2008-4-8 12:41
那个x1还要定义?没法用,求教
cyzpp 2008-4-13 14:05
谢谢提供!:smokin:
页:
[1]