分析家公式网,提供股票公式,股票软件用户登录  |  用户 注册
当前位置：分析家公式网 → 软件中心 → 股票公式 → 飞狐公式
很多年前竹林老师的原创指标（筹码堆积主图源码+图）喜欢收藏的朋友拿去吧
  • 软件大小：3.00 KB
  • 推荐星级：
  • 更新时间：2012-03-24 01:19:53
  • 软件类别： 国产软件 / 飞狐公式
  • 软件语言：简体中文
  • 授权方式： 免费版
  • 联系方式：暂无联系方式
  • 官方主页： Home Page
  • 点击大图：  【一键转帖到论坛】
  • 插件情况：
  • 运行环境：Win9X/Win2000/WinXP/Win2003/
  • 相关Tags：筹码堆积  
  • (0)0%
    (0)0%

软件介绍

INPUT:t(21,13,250),tt(21,1,100);
{DRAWGBK(EMA((C+L+H)/3,6)>EMA(EMA((C+L+H)/3,6),5), COLORRGB(100,50,0), COLORRGB(100,100,0),0); {涨变红}
DRAWGBK(EMA((C+L+H)/3,6)<EMA(EMA((C+L+H)/3,6),5), COLORRGB(0,110,0 ), COLORRGB(0,0,0),0); {跌变绿}
{量价重心-筹码分布}
W00:=COST(1);W10:=COST(10);W20:=COST(20);
W30:=COST(30);W40:=COST(40);W50:=COST(50);
W60:=COST(60);W70:=COST(70);W80:=COST(80);
W90:=COST(90);W100:=COST(99);
W5:=COST(5);W15:=COST(15);W25:=COST(25);
W35:=COST(35);W45:=COST(45);W55:=COST(55);
W65:=COST(65);W75:=COST(75);W85:=COST(85);W95:=COST(95);
C5:=W5-W00; C10:=W10-W5;C15:=W15-W10;C20:=W20-W15;C25:=W25-W20;
C30:=W30-W25;C35:=W35-W30;C40:=W40-W35;C45:=W45-W40;C50:=W50-W45;
C55:=W55-W50;C60:=W60-W55;C65:=W65-W60;C70:=W70-W65;C75:=W75-W70;
C80:=W80-W75;C85:=W85-W80;C90:=W90-W85;C95:=W95-W90;C100:=W100-W95;
ZX:=MIN(C5,MIN(C10,MIN(C15,MIN(C20,MIN(C25,MIN(C30,MIN(C35,MIN(C40,MIN(C45,MIN(C50,MIN(C55,MIN(C60,MIN(C65,MIN(C70,MIN(C75,MIN(C80,MIN(C85,MIN(C90,MIN(C95,C100))))))))))))))))))) LINETHICK0;
FILLRGN(ZX=C5,W00,W5) COLORGRAY;
FILLRGN(ZX=C10,W10,W5) COLORGRAY;FILLRGN(ZX=C15,W15,W10) COLORGRAY;FILLRGN(ZX=C20,W20,W15) COLORGRAY;
FILLRGN(ZX=C25,W25,W20) COLORGRAY;FILLRGN(ZX=C30,W30,W25) COLORGRAY;FILLRGN(ZX=C35,W35,W30) COLORGRAY;FILLRGN(ZX=C40,W40,W35) COLORGRAY;
FILLRGN(ZX=C45,W45,W40) COLORGRAY;FILLRGN(ZX=C50,W50,W45) COLORGRAY;FILLRGN(ZX=C55,W55,W50) COLORGRAY;FILLRGN(ZX=C60,W60,W55) COLORGRAY;
FILLRGN(ZX=C65,W65,W60) COLORGRAY;FILLRGN(ZX=C70,W70,W65) COLORGRAY;FILLRGN(ZX=C75,W75,W70) COLORGRAY;FILLRGN(ZX=C80,W80,W75) COLORGRAY;
FILLRGN(ZX=C85,W85,W70) COLORGRAY;FILLRGN(ZX=C90,W90,W85) COLORGRAY;FILLRGN(ZX=C95,W95,W90) COLORGRAY;FILLRGN(ZX=C100,W100,W95) COLORGRAY;
{三日转向}
Ay:=HHV(H,3);
By:=LLV(L,3);
kc:=c;
kh:=h;
kl:=l;
for i=1 to datacount do
IF kh[i]>ay[i-1] and kc[i]>kc[i-1] Then E[i]:=By[i];
ELSE IF kl[i]<by[i-1] and kc[i]<kc[i-1] Then E[i]:=Ay[i];
ELSE  E[i]:=E[i-1];
PARTLINE(C,E),LINETHICK3,ColorC3C7C8;}//转向
{均线}
zq:=DATATYPE;
j:=(c*2+h+l)/4;
m:ema(ma(j,3),3),colorffffff;
mm:ema(m,t),color00ffff;
PARTLINE(m>ref(m,1),m),ColorE9D3F8,LINETHICK2;
PARTLINE(mm>ref(mm,1),mm),Color0089FF,LINETHICK2;
{{黄金分割}
n1:=sysparam(3);
n:=n1-sysparam(2)+1;
hh:=hhv(H,n);
ll:=llv(L,n);
最高:=hh[n1];
最低:=ll[n1];
低:最低+(最高-最低)*0.191,POINTDOT,PRECISION2,LINETHICK3,ColorFF8900;
中:最低+(最高-最低)*0.5,LINEDOT,PRECISION2,COLORMAGENTA;
高:最低+(最高-最低)*0.809,LINEDOT,PRECISION2,COLORRED;
{南山K线}
qp1:=wma(c,2);//短加权均线
bb1:=ema(qp1,2);//平滑
qp0:=ma(bb1,3);//平均
qp2:=wma((h+c+o)/3,18);//长加权均线
dd3:=qp0>=qp2 and c>qp2;//短>长,且收>长
dd4:=qp0<qp2 ;//短<长
dd5:=qp0>qp2 ;//短>长
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>qp2) and o<=c,c,o,7,0),Colorred;//涨势阳线
STICKLINE((dd3 or c>qp2) and o<=c,h,l,0.5,0),Colorred;//涨势阳线
STICKLINE((dd3 or c>qp2) and o>=c,c,o,7,0),Colorff33ff;//涨势阴线
STICKLINE((dd3 or c>qp2) and o>=c,h,l,0.5,0),Colorff33ff;//涨势阴线
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.8,1),coloryellow;}//生命线
{个股大盘开关}
上证:=STRCMP(STKLABEL,'1A0001');
深证:=STRCMP(STKLABEL,'399001');
sb:=(上证=1 and 深证=1) or (上证=-1 and 深证=-1);//市场识别
{箱体}
a:=BARPOS;
a1:=SYSPARAM(1);
a2:=SYSPARAM(2);
a3:=SYSPARAM(3);
a4:=SYSPARAM(4);
a5:=SYSPARAM(5);
b:=DATACOUNT;
gd:=(a4-a5)/5;
g1:=hhv(h,tt);
gh:=g1[a1];
gg:=h=gh;
d2:=llv(l,tt*2);
dl2:=d2[a1];
dd2:=l=dl2;
d3:=llv(l,tt*4);
dl3:=d3[a1];
dd3:=l=dl3;
DRAWLINE(dd3,gh*0.98,gg,gh*0.98,0),color00babd,LINEDOT;
zx:=(dl2+gh)/2;
DRAWLINE(dd3,zx,gg,zx,0),color00babd,LINEDOT;
DRAWLINE(dd3,zx,gg,gh*0.98,0),color00babd,LINEDOT;
STICKLINE(dd3,zx*0.98,dl2,0,0),color00babd,LINEDOT;
DRAWLINE(dd3,dl2,gg,dl2,0),color00babd,LINEDOT;
{移动式120日均线}
上证:=STRCMP(STKLABEL,'1A0001');
深证:=STRCMP(STKLABEL,'399001');
sb:=(上证=1 and 深证=1) or (上证=-1 and 深证=-1);//市场识别
ssb:=IF(CAPITAL=0,sb=0,(sb=1 or sb=-1));
gxa4:=SYSPARAM(4);
gxa5:=SYSPARAM(5);
gd45:=(gxa4-gxa5)/5;
总量:=sum(if(BETWEEN(c,gxa4-0*gd45,gxa4-5*gd45),v,0),120);
总额:=sum(if(BETWEEN(c,gxa4-0*gd45,gxa4-5*gd45),AMOUNT,0),120);
dp:=sum(c,120)/120;//个股
df:=总额/总量/0.3;//大盘
PARTLINE(a1<=a,if(ssb,dp[DATACOUNT],df[DATACOUNT])),colorffbbff,SHIFT3;//120日均线
{实时}
DRAWBKBMP(zq=1or zq=0,'lsxz');
实时线:PARTLINE(zq=1or zq=0,c),colorffffff;
r:=OPENMINUTES(TIME);
fh:=IF(VOL=0,1,VOL);
分均:PARTLINE(zq=1or zq=0,sum(fh*c,r)/sum(fh,R)),color00ffff;
VERTLINE(IF(zq=1,r=120,0)),colorffff00,POINTDOT;
VERTLINE(IF(zq=1,r=240,0)),colorred;
go:=FORCAST(FORCAST(l,80),80);
PARTLINE(zq=1,"zb.zb#day"),color00ff00;
PARTLINE(zq=1or zq=0,go),colorred;
{解盘}
tj:=if(a>280,280,b);
hh:=hhv(H,tj);
ll:=llv(L,tj);
zh:=hh[a1];{新改动的}
zl:=ll[a1];{新改动的}
gq:=(zh-zl)/5;
ba1:=sum(if(between(c,zh-0*gq,zh-1*gq),v,0),tj);
ba2:=sum(if(between(c,zh-1*gq,zh-2*gq),v,0),tj);
ba3:=sum(if(between(c,zh-2*gq,zh-3*gq),v,0),tj);
ba4:=sum(if(between(c,zh-3*gq,zh-4*gq),v,0),tj);
ba5:=sum(if(between(c,zh-4*gq,zh-5*gq),v,0),tj);
gd1:=C<zh-0*gq AND C>=zh-1*gq;//高
gd2:=C<zh-1*gq AND C>=zh-2*gq;
gd3:=C<zh-2*gq AND C>=zh-3*gq;//中
gd4:=C<zh-3*gq AND C>=zh-4*gq;
gd5:=C<zh-4*gq AND C>=zh-5*gq;//低
{}
STICKLINE(BACKSET(a=a3,gd1),zh-0*gq,zh-1*gq,1,0),COLOR0000ff,LINETHICK3,SHIFT1;
STICKLINE(BACKSET(a=a3,gd2),zh-1*gq,zh-2*gq,1,0),COLORff00ff,LINETHICK3,SHIFT1;
STICKLINE(BACKSET(a=a3,gd3),zh-2*gq,zh-3*gq,1,0),COLOR00ffff,LINETHICK3,SHIFT1;
STICKLINE(BACKSET(a=a3,gd4),zh-3*gq,zh-4*gq,1,0),COLORffbb00,LINETHICK3,SHIFT1;
STICKLINE(BACKSET(a=a3,gd5),zh-4*gq,zh-5*gq,1,0),COLOR00ff00,LINETHICK3,SHIFT1;
DRAWTEXT(BACKSET(a=a3,gd1),zh-0*gq,'价\n高\n'),color0000ff,SHIFT2;
DRAWTEXT(BACKSET(a=a3,gd2),zh-1*gq,'价\n近\n高'),colorff00ff,SHIFT2;
DRAWTEXT(BACKSET(a=a3,gd3),zh-2*gq,'价\n中\n'),color00ffff,SHIFT2;
DRAWTEXT(BACKSET(a=a3,gd4),zh-3*gq,'价\n近\n低'),colorffbb00,SHIFT2;
DRAWTEXT(BACKSET(a=a3,gd5),zh-4*gq,'价\n低\n'),color00ff00,SHIFT2;
{}
zu:=MAX(ba1,MAX(ba2,MAX(ba3,MAX(ba4,ba5))));
STICKLINE(zu=ba1 and a=a3 ,zh-0*gq,zh-1*gq,1,0),COLOR0000ff,SHIFT1;
STICKLINE(zu=ba2 and a=a3 ,zh-1*gq,zh-2*gq,1,0),COLORff00ff,SHIFT1;
STICKLINE(zu=ba3 and a=a3 ,zh-2*gq,zh-3*gq,1,0),COLOR00ffff,SHIFT1;
STICKLINE(zu=ba4 and a=a3 ,zh-3*gq,zh-4*gq,1,0),COLORffbb00,SHIFT1;
STICKLINE(zu=ba5 and a=a3 ,zh-4*gq,zh-5*gq,1,0),COLOR00ff00,SHIFT1;
DRAWTEXT(zu=ba1 and a=a3,zh-0.6*gq,'密\n集\n高'),color0000ff,SHIFT2;
DRAWTEXT(zu=ba2 and a=a3,zh-1.6*gq,'密\n集\n近\n高'),colorff00ff,SHIFT2;
DRAWTEXT(zu=ba3 and a=a3,zh-2.6*gq,'密\n集\n中'),color00ffff,SHIFT2;
DRAWTEXT(zu=ba

地址


·上一软件：费氏神奇线（周末快乐 源码 贴图 副图指标）
·下一软件：资金趋势－－（副图 源码 贴图）

软件评论评论内容只代表网友观点，与本站立场无关！

   评论摘要(共 0 条，得分 0 分，平均 0 分) 查看完整评论

说明

* 使用方法：点击上面蓝色块，打开新页面按照提示进行

* 本网站提供的各种股票软件，例如大智慧软件，通达信软件，同花顺软件，东方财富通等等，和各种股票公式指标，例如大智慧公式，通达信公式，同花顺公式，文华公式，博易大师公式，股票价格计算公式等等公式指标等，都来源网上公开来源收集

本网提供的公式文件说明：
* alg格式飞狐股票公式，可以用飞狐交易师或者交易师软件导入；
* fnc格式大智慧新一代公式指标，可以用大智慧股票软件使用，少部分可以用分析家股票软件引入使用；
* exp格式大智慧经典版股票公式，仅可以用大智慧经典版股票软件引入使用；
* tni和tnc格式通达信股票公式，仅可以用通达信新引入使用，例如可以用通达信股票软件引入使用；
* tne，tn6格式通达信公式，可以用通达信公式编辑器5.0版导入，推荐通达信金融终端版本；
* hxf格式同花顺股票公式，仅可以用同花顺股票软件引入使用。
以上的各种软件都可以在本网股票软件栏目找到!

* 关于股票公式时间限制,如果在引入大智慧公式，交易师公式或者飞狐公式的时候，发现公式名称栏是空白的，这时候调整电脑时间到1997年，又能出现公式名称，并且能正常显示，可能是公式使用期限已过。
* 关于还原公式源码如果你忘记了自己编写的大智慧公式，通达信公式，同花顺公式,操盘手公式,飞狐公式，博易大师公式，金字塔公式，文华公式和交易师公式等等公式的密码，本网可帮恢复源码，有.偿.服.务无意勿扰，点击在线咨询联系我。

* 关于股票公式源码编辑
本网提供的源码，一般都可以编辑成公式，如果不明白公式的编辑，在本页右侧教程录像可参考，或者找公式教程资料学习，请搜索：教程

* 如果您发现软件内容或者链接错误，请点击报告错误谢谢！
* 站内提供的所有软件包含源码均是由网上搜集，若侵犯了你的版权利益，请联系通知我们!

~

栏目导航

本类热门

相关软件

如何导入公式

关于本站 | 网站帮助 | 广告合作 | 声明 | 友情连接 | 网站地图 |
分析家公式网声明：本站所有股票公式软件资料均网上公开收集，如侵权请联系删帖。站内所有广告，均与本站无关！
Copyright © 2003-2022 fxjgsw.Com. All Rights Reserved .
页面执行时间：9,578.12500 毫秒