- 金币:
-
- 奖励:
-
- 热心:
-
- 注册时间:
- 2004-8-9
|
|

楼主 |
发表于 2008-8-3 11:24
|
显示全部楼层
加精的贴啊,最适合我用690页,13786楼的老大谢谢了
我也做点贡献,把依然兄所发布的公式整理一下发上来,供新人使用:
每笔均额:
CJBS:=SELFDATA('BS');
每笔均额:AMOUNT/CJBS,{COLORYELLOW,}STICK,colorred,PRECIS0;
MA1:MA(每笔均额,N1),PRECIS0;
MA2:MA(每笔均额,N2),PRECIS0;
MA3:MA(每笔均额,N3),PRECIS0;
三日乖离:(ma1-ma3)/ma3*100,PRECIS0;
均额变化五:MA1/REF(MA1,N1),PRECIS0;
均额变化十:MA2/REF(MA2,N2),PRECIS0;
额变化二十:MA3/REF(MA3,N3),PRECIS0;
奈尔排名:
SELFDATA('欧奈尔排名');
135均线(部分):
{135均线公式}
ema1:ema(c,p1),colorblue,linethick2;
ema2:ema(c,p2),colorred,linethick2;
ema3:ema(c,p3),colorgreen,linethick2;
ema4:ema(c,p4),colorff00ff;
ema5:ema(c,p5),colorffcc66;
rsp(相对强弱):
{RSP强度(N=20,M=125,T=10,P=60)}
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),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;
主力持筹:
{主力持筹(用于将分笔数据提取后在日线上显示出来)}
大买:=SELFDATA('大买量');
大卖:=SELFDATA('大卖量');
当天增减:(大买-大卖),LINETHICK0,COLOR0000ff,PRECIS0;
主力仓量:sum(大买-大卖,0),LINETHICK2,COLORGRAY,PRECIS0;
三天前仓:=ref(主力仓量,3);
五天前仓:=ref(主力仓量,5);
十天前仓:=ref(主力仓量,10);
{廿天前仓:=ref(主力仓量,20);}
三天增减:主力仓量-三天前仓,LINETHICK0,color003399,PRECIS0;
五天增减:主力仓量-五天前仓,LINETHICK0,color0055ff,PRECIS0;
十天增减:主力仓量-十天前仓,LINETHICK0,color00aaff,PRECIS0;
{廿天增减:主力仓量-廿天前仓,LINETHICK0,colorblack,PRECIS0;}
{FILLRGN(廿天增减,0,廿天增减>0,rgb(255,255,00),廿天增减<0,rgb(00,255,255));}
{廿天增减,COLORWHITE;}
FILLRGN(十天增减,0,十天增减>0,rgb(255,170,00),十天增减<0,rgb(00,170,255));
{十天图:十天增减,COLORWHITE;}
FILLRGN(五天增减,0,五天增减>0,rgb(255,85,00),五天增减<0,rgb(00,85,255));
{五天图:五天增减,COLORWHITE;}
FILLRGN(三天增减,0,三天增减>0,rgb(153,51,00),三天增减<0,rgb(00,51,153));
{三天图:三天增减,COLORWHITE;}
STICKLINE(当天增减>0,当天增减,0,6,0),COLOR0000ff;
STICKLINE(当天增减<0,当天增减,0,6,0),color00ff00;
ma5:MA(主力仓量,5),colorred;
ma10:MA(主力仓量,10),COLORGRAY;
ma20:MA(主力仓量,20),COLORBLUE,linethick2;
ma30:MA(主力仓量,30),colorgreen;
ma50:MA(主力仓量,50),CIRCLEDOT,COLORMAGENTA;
主力增减:当天增减/FINANCE2(37);
drawtext(ma(主力仓量,50)>ref(ma(主力仓量,50),1),ma(主力仓量,50),'o'),COLORblack;
PARTLINE(ma50<ma30 and ma50>ref(ma50,1) and ma30>ref(ma30,1),ma50),color0000ff,CIRCLEDOT;
PARTLINE(ma50<ma30 and (ma50<ref(ma50,1) or ma30<ref(ma30,1)),ma50),color00ffff,CIRCLEDOT;
PARTLINE(ma50>ma30 and ma50>ref(ma50,1) and ma30>ref(ma30,1),ma50),colorff00ff,CIRCLEDOT;
PARTLINE(ma50>ma30 and (ma50<ref(ma50,1) or ma30<ref(ma30,1)),ma50),colorff0000;
当天增减比率:当天增减/CAPITAL*100;
三天增减比率:三天增减/CAPITAL*100;
五天增减比率:五天增减/CAPITAL*100;
十天增减比率:十天增减/CAPITAL*100;
{廿天增减比率:廿天增减/CAPITAL*100;}
仓量斜率三:ma(主力仓量-ref(主力仓量,1),3)/FINANCE2(37),linethick0;
仓量斜率五:ma(主力仓量-ref(主力仓量,1),5)/FINANCE2(37),linethick0;
仓量斜率十:ma(主力仓量-ref(主力仓量,1),10)/FINANCE2(37),linethick0;
仓量斜率廿:ma(主力仓量-ref(主力仓量,1),20)/FINANCE2(37),linethick0;
机构增仓:
机构净入:SELFDATA('机构增仓' ) ,linethick0;
主力仓量:sum(机构净入,0),colorbrown,LINETHICK3;
0,colorred;
三天前仓:=ref(主力仓量,3);
五天前仓:=ref(主力仓量,5);
十天前仓:=ref(主力仓量,10);
廿天前仓:=ref(主力仓量,20);
三天增减:=主力仓量-三天前仓{,LINETHICK0,color003399};
五天增减:=主力仓量-五天前仓{,LINETHICK0,color0055ff};
十天增减:=主力仓量-十天前仓{,LINETHICK0,color00aaff};
廿天增减:=主力仓量-廿天前仓{,LINETHICK0,colorblue};
机构当日增仓率:机构净入/FINANCE2(37);
机构三日增仓率:三天增减/FINANCE2(37);
机构五日增仓率:五天增减/FINANCE2(37);
机构十日增仓率:十天增减/FINANCE2(37);
机构廿日增仓率:廿天增减/FINANCE2(37),colorblue;
机构总持仓率:主力仓量/FINANCE2(37);
仓量斜率3:ma(主力仓量-ref(主力仓量,1),3)/CAPITAL*100,linethick0;
仓量斜率5:ma(主力仓量-ref(主力仓量,1),5)/CAPITAL*100,linethick0;
仓量斜率10:ma(主力仓量-ref(主力仓量,1),10)/CAPITAL*100,linethick0;
仓量斜率20:ma(主力仓量-ref(主力仓量,1),20)/CAPITAL*100,linethick0;
FILLRGN(廿天增减,0,廿天增减>0,rgb(255,255,00),廿天增减<0,rgb(00,255,255));
{廿天增减,COLORWHITE;}
FILLRGN(十天增减,0,十天增减>0,rgb(255,170,00),十天增减<0,rgb(00,170,255));
{十天图:十天增减,COLORWHITE;}
FILLRGN(五天增减,0,五天增减>0,rgb(255,85,00),五天增减<0,rgb(00,85,255));
{五天图:五天增减,COLORWHITE;}
FILLRGN(三天增减,0,三天增减>0,rgb(153,51,00),三天增减<0,rgb(00,51,153));
{三天图:三天增减,COLORWHITE;}
STICKLINE(机构净入>0,机构净入,0,6,0),COLOR0000ff;
STICKLINE(机构净入<0,机构净入,0,6,0),color00ff00;
ma5:MA(主力仓量,5),colorred;
ma10:MA(主力仓量,10),COLORGRAY;
ma20:MA(主力仓量,20),COLORBLUE,linethick4;
ma30:MA(主力仓量,30),colorgreen;
ma50:MA(主力仓量,50),CIRCLEDOT,COLORMAGENTA;
主力增减:机构净入/FINANCE2(37);
drawtext(ma(主力仓量,50)>ref(ma(主力仓量,50),1),ma(主力仓量,50),'o'),COLORgray;
{PARTLINE(ma50,ma50<ma30 and ma50>ref(ma50,1) and ma30>ref(ma30,1),rgb(255,0,0),
ma50<ma30,rgb(255,255,0),
ma50>ma30 and ma50>ref(ma50,1) and ma30>ref(ma30,1),rgb(255,0,255),
1,rgb(0,0,255)),CIRCLEDOT;
}
PARTLINE(ma50<ma30 and ma50>ref(ma50,1) and ma30>ref(ma30,1),ma50),color0000ff,CIRCLEDOT;
PARTLINE(ma50<ma30 and (ma50<ref(ma50,1) or ma30<ref(ma30,1)),ma50),color00ffff,CIRCLEDOT;
PARTLINE(ma50>ma30 and ma50>ref(ma50,1) and ma30>ref(ma30,1),ma50),colorff00ff,CIRCLEDOT;
PARTLINE(ma50>ma30 and (ma50<ref(ma50,1) or ma30<ref(ma30,1)),ma50),colorff0000;
机构持仓:
总持仓率:SELFDATA('机构总持仓率');
二月持仓率:SELFDATA('机构二月持仓率');
机构3日增仓率:SELFDATA('机构3日增仓率');
机构5日增仓率:SELFDATA('机构5日增仓率');
机构10日增仓率:SELFDATA('机构10日增仓率');
机构20日增仓率:SELFDATA('机构20日增仓率');
盘口主力:
{盘口主力}
日增减:SELFDATA('盘口主力' ),LINETHICK0{ ,colorred,COLORSTICK};
主力实仓:sum(日增减,0);
ma1:ma(主力实仓,5);
ma2:ma(主力实仓,30);
{十日主力仓位:ma(主力真实仓位,10);
二十日主力仓位:ma(主力真实仓位,20);};
主力增减:
{利用主力增减(QQ兄的杰作)选股的分析家6.0,分析家5.0通用公式(扩展数据设在"数据8"---自己根据情况可改动,选股时,只要选定"主力增减排名三>0"即可),
ZLZJ选股(主力增减排序法选股)}
{主力持筹公式,取用主力仓量、主力增减、主力仓量ma5、主力仓量ma20指标}
大买:=SELFDATA('大买量');
大卖:=SELFDATA('大卖量');
当天增减:=(大买-大卖);
主力仓量:=sum(大买-大卖,0);
主力增减:当天增减/finance2(37);
主仓五:=MA(主力仓量,5);
主仓二十:=MA(主力仓量,20);
{欧奈尔排名公式,取用gold2指标}
m:=5;
seq:=selfdata('欧奈尔排名'); {当日排名}
{保持排名上升速度明日是否有可能进入前M名}
tom:=(2*seq-ref(seq,1)); {简单预测明日排名}
aft:=(3*seq-2*ref(seq,1)); {简单预测第三日排名}
gold1:=tom<m;
gold2:=aft<m;
f:=not(gold1) and not(gold2);
pre:=BARSLAST(gold1 or gold2); {前面的上榜日}
{pregold1:=(ref(gold1,pre)=1); 前面的上榜日是gold1日还是gold2日}
{netbuy:=stkindi(STKLABEL, 'ZLCC2.当天增减'); {净买}
netbuy:=当天增减;
netsum:=sum(netbuy,pre); {累计净买}
prebuy:=ref(netbuy,pre); {上榜日净买}
good: (gold1 or gold2 or prebuy+netsum>0),linethick0; {上榜,或者良性整理状态}
N1:=7;n2:=14;n3:=21;
LC := REF(CLOSE,1);
RSI1:=SMA(MAX(CLOSE-LC,0),N1,1)/SMA(ABS(CLOSE-LC),N1,1)*100;
nkdj:=9;m1:=3;m2:=3;
RSV:=(CLOSE-LLV(LOW,Nkdj))/(HHV(HIGH,Nkdj)-LLV(LOW,Nkdj))*100;
K:=SMA(RSV,M1,1);
D:=SMA(K,M2,1);
J:=3*K-2*D;
BBI:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
主力增减排名:extdata(4)+1,linethick0;
{廿日最高:=llv(zl排名,20);
yx1:=zl排名<=20;
主力增减排名一:yx1 and ref(yx1,1)=0;
yx2:ddx排名<=18 and 主力仓量>主仓二十 and good and (l<ref(h,1) or o<bbi);
主力增减排名二:=( yx2 and ref(yx2,1)=0 );
}
yx3: 主力增减排名<=20 and 主力仓量>主仓二十 and j>d
and barslast(cross(j,d))<=5 and good=1;
{and (l<ref(h,1) or o<bbi)and 主仓五>主仓二十 }
主力增减排名三:yx3 and ref(yx3,1)=0,colorred;
小泰坦:
{小泰坦公式}
input:N(20),T(10),M(125),P(60),p1(10);
{以下三个数据需要根据实际情况修改其数值}
{rq:=1070630; {表示取2007年06月30日的财务数据。}
rq:=1000000+(yy*10000)+(mm*100)+dd;{报表自定年月日}
bbxs:=bxs; {报表系数,1:年报;2:半年报;4/3:第三季报;4:第一季报}
jsxs:=jxs; {技术指标系数,标准值等于1,可自行定义数值。降低该数值将提高选股数量,数值需要大于零!}
主营业务收入:=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));
{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);
主力K线:
{主力K线}
买入:selfDATA('大买量')/10000,colorgreen,linethick0;{COLORSTICK}
卖出:selfDATA('大卖量')/10000,colorwhite,linethick0;{COLORSTICK}
净买:买入-卖出,colorred,linethick0;
累计持仓:sum(净买,0),colorgreen,linethick2;
stickline(1,累计持仓,累计持仓+买入,4,1),colorgreen;
stickline(1,累计持仓,累计持仓+卖出,4,1),coloryellow;
stickline(净买>0,累计持仓+买入,累计持仓-卖出,4,0),colorred;
stickline(净买<0,累计持仓+卖出,累计持仓-买入,4,0),colorffff00;
卅日持仓:ma(累计持仓,30),pointdot,colorblue;
ma5:MA(累计持仓,5),colorred;
ma10:MA(累计持仓,10),COLORGRAY;
ma30:MA(累计持仓,30),colorgreen;
ma50:MA(累计持仓,50),CIRCLEDOT,COLORMAGENTA;
drawtext(ma(累计持仓,50)>ref(ma(累计持仓,50),1),ma(累计持仓,50),'o'),COLORBLACK;
{line:=80; }
{小泰坦。牛市使用,将市销率扩大到6,其余未改)}
六十日强度:=六十天相对价位/jsxs>80;
半年强度:=半年相对价位/jsxs>75;
二十日强度:=二十天相对价位/jsxs>70;
换手率:=VOL/FINANCE2(37);
换手率和:=SUM(换手率,P1);
当日成交量:=VOL;
五日均量:=ma(vol,5);
xgrq:=1000000+(yy1*10000)+(mm1*100)+dd1;{选股年月日}
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;{市盈率和收益增长率的比率≤1--PEG比率}
Var8:=100*capital/股东户数>=4500;{流通股东人均持股大于4500}
Var9:=每股收益>-0.25;{最近一期每股收益大于-0.25元}
Var10:=五日均量>当日成交量;
Var11:=换手率和>30;
Var12:selfdata('基金持仓率')>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); |
|
|