查看完整版本: 龙虎榜--公式

阿强 2006-12-23 19:13

龙虎榜--公式

盘口分析是K线技术分析的重要补充,盘口分析和K线分析相验证,可以大大提高研判的准确性,盘口分析在短线操作中更为有效。
龙虎看盘通过细分成交、分类统计、综合评测等功能,为投资者提供极其重要的盘口数据。
投资者需要在实践中发现规律,灵活应用。
一、细分成交 龙虎看盘把盘口成交细分为大单买入、大单卖出、小单买入、小单卖出四种成交模式,分类汇总画出柱状图。
二、本数据可以看作是主力通过主动的市场运作吃进或放出的筹码量。
三、大单买入均价和大单卖出均价 买入大单的加权平均价和卖出大单的加权平均价。可以看作是主力买入的平均成本和卖出的平均股价。
四、大单买入笔数、大单卖出笔数和笔数差 这三项数据非常重要,一定要正确理解它们的意义。大单买入笔数是所有买入大单的成交笔数累加值,可以看作是所有大单吃掉的小单数量;大单卖出笔数是所有卖出大单的成交笔数累加值,可以看作是大单抛出导致的小单接单数量。笔数差是大单买入笔数和大单卖出笔数的差值。
五、散户跟风系数 小单买入比例和小单卖出比例的差值,用于衡量小单的主买和主卖程度,反映散户的参与程度。
1. 散户跟风:(小买单—小卖单)/总手×100;
2. 散户跟风,在60以上并且股票上涨,这是散户行情;
3. 散户跟风,在30以下并且股票上涨,这是主力拉抬的结果,说明抛压性的卖单不 多;
4. 散户跟风,在负的30以下并且股价下跌,可能是是主力故意打压或者出伙;
5. 散户跟风,在负的60以上并且股价下跌,则为散户抛售。

mssz103 2006-12-23 19:47

小心啊  弄不好会死机:D

lipin 2006-12-23 20:36

DRAWGBK(C>0,colorRGB(80,100,120),colorRGB(00,00,00),1),color33ff66;
DRAWTEXTEX(c,1,20,30,STKLABEL),LINETHICK6,Colorffff00;
DRAWTEXTEX(c,1,140,30,STKNAME),LINETHICK6,Color00ffff;
DRAWTEXTEX(c,1,750,400,'|'),LINETHICK4,Color00ffff;
DRAWTEXTEX(c,1,750,420,'|'),LINETHICK4,Color00ffff;a
DRAWTEXTEX(c,1,750,500,'郭'),LINETHICK2,Color00ffff;
DRAWTEXTEX(c,1,750,560,'慎'),LINETHICK2,Color00ffff;
DRAWTEXTEX(c,1,750,620,'制'),LINETHICK2,Color00ffff;
DRAWTEXTEX(c,1,750,680,'作'),LINETHICK2,Color00ffff;

DRAWTEXTEX(c,1,810,200,'龙'),LINETHICK6,Color00ff00;
DRAWTEXTEX(c,1,810,360,'虎'),LINETHICK6,Colorffffff;
DRAWTEXTEX(c,1,810,520,'看'),LINETHICK6,Color0000ff;
DRAWTEXTEX(c,1,810,680,'盘'),LINETHICK6,Color0000ff;
DRAWTEXTEX(c,1,20,450,'------------------------------------------------------------------------------------'),LINETHICK1,Coloreeeeee;

a:=BUYVOL*c/100;
bz:=sum(a,0);
b:=c*SELLVOL/100;
sz:=sum(b,0);
z:=bz+sz;
cz:=bz-sz;
xb5:=if(a<=5  ,a,0);b5:=sum(xb5,0);
xs5:=if(b<=5  ,b,0);s5:=sum(xs5,0);
xb10:=if(a<=10 and a>=5 ,a,0);b10:=sum(xb10,0);
xs10:=if(b<=10 and b>=5,b,0);s10:=sum(xs10,0);
xb30:=if(a<=30 and a>=10 ,a,0);b30:=sum(xb30,0);
xs30:=if(b<=30 and b>=10 ,b,0);s30:=sum(xs30,0);
xb50:=if(a<=50 and a>=30 ,a,0);b50:=sum(xb50,0);
xs50:=if(b<=50 and b>=30 ,b,0);s50:=sum(xs50,0);
xb70:=if(a<=70 and a>=50 ,a,0);b70:=sum(xb70,0);
xs70:=if(b<=70 and b>=50 ,b,0);s70:=sum(xs70,0);
xb100:=if(a<=100 and a>=70,a,0);b100:=sum(xb100,0);
xs100:=if(b<=100 and b>=70,b,0);s100:=sum(xs100,0);
xb150:=if(a>=100 ,a,0);b150:=sum(xb150,0);
xs150:=if(b>=100 ,b,0);s150:=sum(xs150,0);
j5:=b5-s5;
j10:=b10-s10;
j30:=b30-s30;
j50:=b50-s50;
j70:=b70-s70;
j100:=b100-s100;
j150:=b150-s150;
DRAWTEXTEX(BARSTATUS=2 and (z),1,320,45,'■总成金额(万元):'+NUMTOSTR(z,2)),LINETHICK4,COLORccffcc;
DRAWTEXTEX(BARSTATUS=2 and (bz),1,30,500,'■■■■■买入:'+NUMTOSTR(bz,2)),LINETHICK1,COLORred;
DRAWTEXTEX(BARSTATUS=2 and (sz),1,250,500,'■■■■■卖出:'+NUMTOSTR(sz,2)),LINETHICK1,COLORgreen;
DRAWTEXTEX(BARSTATUS=2 and (b5),1,30,560,'5 万大单买入:'+NUMTOSTR(b5,2)),LINETHICK1,COLORred;
DRAWTEXTEX(BARSTATUS=2 and (s5),1,250,560,'5 万大单卖出:'+NUMTOSTR(s5,2)),LINETHICK1,COLORgreen;
DRAWTEXTEX(BARSTATUS=2 and (b10),1,30,620,'10 万大单买入:'+NUMTOSTR(b10,2)),LINETHICK1,COLORred;
DRAWTEXTEX(BARSTATUS=2 and (s10),1,250,620,'10 万大单卖出:'+NUMTOSTR(s10,2)),LINETHICK1,COLORgreen;
DRAWTEXTEX(BARSTATUS=2 and (b30),1,30,680,'30 万大单买入:'+NUMTOSTR(b30,2)),LINETHICK1,COLORred;
DRAWTEXTEX(BARSTATUS=2 and (s30),1,250,680,'30 万大单卖出:'+NUMTOSTR(s30,2)),LINETHICK1,COLORgreen;
DRAWTEXTEX(BARSTATUS=2 and (b50),1,30,740,'50 万大单买入:'+NUMTOSTR(b50,2)),LINETHICK1,COLORred;
DRAWTEXTEX(BARSTATUS=2 and (s50),1,250,740,'50 万大单卖出:'+NUMTOSTR(s50,2)),LINETHICK1,COLORgreen;
DRAWTEXTEX(BARSTATUS=2 and (b70),1,30,800,'70 万大单买入:'+NUMTOSTR(b70,2)),LINETHICK1,COLORred;
DRAWTEXTEX(BARSTATUS=2 and (s70),1,250,800,'70 万大单卖出:'+NUMTOSTR(s70,2)),LINETHICK1,COLORgreen;
DRAWTEXTEX(BARSTATUS=2 and (b100),1,30,860,'100 万大单买入:'+NUMTOSTR(b100,2)),LINETHICK1,COLORred;
DRAWTEXTEX(BARSTATUS=2 and (s100),1,250,860,'100 万大单卖出:'+NUMTOSTR(s100,2)),LINETHICK1,COLORgreen;
DRAWTEXTEX(BARSTATUS=2 and (b150),1,30,920,'150 万大单买入:'+NUMTOSTR(b150,2)),LINETHICK1,COLORred;
DRAWTEXTEX(BARSTATUS=2 and (s150),1,250,920,'150 万大单卖出:'+NUMTOSTR(s150,2)),LINETHICK1,COLORgreen;
DRAWTEXTEX(BARSTATUS=2 and (cz),1,500,500,'■■■■总净买入:'+NUMTOSTR(cz,2)),LINETHICK1,COLORccff00;
DRAWTEXTEX(BARSTATUS=2 and (j5),1,500,560,'5万大单净买入'+NUMTOSTR(j5,2)),LINETHICK1,COLORccff00;
DRAWTEXTEX(BARSTATUS=2 and (j10),1,500,620,'10万大单净买入'+NUMTOSTR(j10,2)),LINETHICK1,COLORccff00;
DRAWTEXTEX(BARSTATUS=2 and (j30),1,500,680,'30万大单净买入'+NUMTOSTR(j30,2)),LINETHICK1,COLORccff00;
DRAWTEXTEX(BARSTATUS=2 and (j50),1,500,740,'50万大单净买入'+NUMTOSTR(j50,2)),LINETHICK1,COLORccff00;
DRAWTEXTEX(BARSTATUS=2 and (j70),1,500,800,'70万大单净买入'+NUMTOSTR(j70,2)),LINETHICK1,COLORccff00;
DRAWTEXTEX(BARSTATUS=2 and (j100),1,500,860,'100万大单净买入'+NUMTOSTR(j100,2)),LINETHICK1,COLORccff00;
DRAWTEXTEX(BARSTATUS=2 and (j150),1,500,920,'150万大单净买入'+NUMTOSTR(j150,2)),LINETHICK1,COLORccff00;
dd:=INTPART(LN(FINANCE(7)/(n*10))*ATAN(FINANCE(7))*100);
主动买入:=SUM(BUYVOL,0);
主动卖出:=SUM(SELLVOL,0);
大单买:=if(BUYVOL>=dd,BUYVOL,0);
大单卖:=if(SELLVOL>dd,SELLVOL,0);
大单买入:=SUM(大单买,0);
大单卖出:=SUM(大单卖,0);
小单买入:=主动买入-大单买入;
小单卖出:=主动卖出-大单卖出;
大买金:=sum(if(BUYVOL>=dd,BUYVOL,0)*c,0);
大单买均价:=大买金/大单买入;
大卖金:=sum(if(SELLVOL>dd,SELLVOL,0)*c,0);
大单卖均价:=大卖金/大单卖出;
成交笔数:=sum(if(BUYVOL>0,1,0),0)+sum(if(SELLVOL>0,1,0),0);
大单净量:=大单买入-大单卖出;
DRAWTEXTEX(c,1,30,420,'■ 大单净量:'+NUMTOSTR(大单净量,2)),Color00FFFF,LINETHICK2;
//DRAWTEXTEX(c,1,115,100,''+大单净量),Color00FFFF,LINETHICK2;
DRAWTEXTEX(c,1,300,420,' 占'+NUMTOSTR(FLOOR(大单净量/(主动买入+主动卖出)*100),2)+' %'),Color00FFFF,LINETHICK2;
DRAWTEXTEX(c,1,30,100,'■ 大单买入: '+NUMTOSTR(大单买入,2)),Color8000FF,LINETHICK2;
DRAWTEXTEX(c,1,300,100,' 占'+NUMTOSTR(FLOOR(大单买入/(主动买入+主动卖出)*100),2)+'%'),Color8000FF,LINETHICK2;
DRAWTEXTEX(c,1,500,100,'大单买均价:      '+NUMTOSTR(大单买均价,2)),Color8000FF,LINETHICK2;
DRAWTEXTEX(c,1,30,260,'■ 大单卖出: '+NUMTOSTR(大单卖出,2)),Color00FF00,LINETHICK2;
DRAWTEXTEX(c,1,300,260,' 占'+NUMTOSTR(FLOOR(大单卖出/(主动买入+主动卖出)*100),2)+' %'),Color00FF00,LINETHICK2;
DRAWTEXTEX(c,1,500,180,'大单卖均价:      '+NUMTOSTR(大单卖均价,2)),Color00FF00,LINETHICK2;
DRAWTEXTEX(c,1,30,180,'■ 小单买入: '+NUMTOSTR(小单买入,2)),Color2F73FF,LINETHICK2;
DRAWTEXTEX(c,1,300,180,' 占'+NUMTOSTR(FLOOR(小单买入/(主动买入+主动卖出)*100),2)+' %'),Color2F73FF,LINETHICK2;
DRAWTEXTEX(c,1,30,340,'■ 小单卖出: '+NUMTOSTR(小单卖出,2)),ColorB4B043,LINETHICK2;
DRAWTEXTEX(c,1,300,340,' 占'+NUMTOSTR(FLOOR(小单卖出/(主动买入+主动卖出)*100),2)+' %'),ColorA8A800,LINETHICK2;
DRAWTEXTEX(c,1,500,260,'总成交笔数:      '+NUMTOSTR(成交笔数,2)),ColorFFFFFF,LINETHICK2;
DRAWTEXTEX(c,1,500,340,'每笔成交手:      '+NUMTOSTR(INTPART((主动买入+主动卖出)/成交笔数),2)),LINETHICK2;
DRAWTEXTEX(c,1,500,420,'■大单标准:      '+NUMTOSTR(dd,2)),ColorFFFFFF,LINETHICK2;
总:=DYNAINFO(8);
STICKLINE((总 AND BARSTATUS=2),0,总,200,1),COLORFFFFFF;
STICKLINE((大单买入+大单卖出+小单买入+小单卖出 AND BARSTATUS=2),0,总,200,0),Color8000FF;
STICKLINE((大单卖出+小单买入+小单卖出 AND BARSTATUS=2),0,大单卖出+小单买入+小单卖出,200,0),Color2F73FF;
STICKLINE((小单卖出+大单卖出 AND BARSTATUS=2),0,小单卖出+大单卖出,200,0),Color00FF00;
STICKLINE((小单卖出 AND BARSTATUS=2),0,小单卖出,200,0),ColorB4B043;

lipin 2006-12-23 20:37

n(403,1,10000)

雕得尊 2006-12-23 22:27

搞个分析家的.下面原码是分笔的.

wmlyx 2006-12-23 22:56

4.0版的行吗

天高任鸟飞 2006-12-24 10:44

谢谢

jsw945 2006-12-31 21:46

请教,DRAWTEXTEX不识啊,我的飞狐版本不够?可有修改办法吗?谢谢!

dgzt 2006-12-31 22:06

多谢提供。。。。。。

hdcuijian 2007-1-13 21:33

谢谢

fh8856 2007-1-16 14:27

谢谢

liuxinliu 2007-1-17 01:39

谢谢

wsc1999 2008-6-2 20:36

xiexiexiexie谢谢

pyzyc101 2008-6-4 02:03

成心求学会编制公式的老师

成心求学会编制公式的老师
本人对飞狐的公式非常有兴趣,诚心的想聘请一个会编制程式的老师教我学习编制公式,不需要站用你多少时间,也不需要你手把手的叫,我不会的请教你,你回答我就可以了,月薪你自己定.有意者和我联系:qq:903679163  电话:13603437410

xiuzong 2008-6-6 01:17

回复 14楼 的帖子

我有时间的话可以带你入门

gl542400 2008-9-4 21:48

看贴回贴! 帮你抬贴!在得点积分!
页: [1]
查看完整版本: 龙虎榜--公式