筹码分布公式源码

‘壹’ 分时筹码峰指标公式

公式：
峰1:=COST(50)，COLORWHITE；
峰10:EMA(峰1，10)，COLORLIBLUE，CROSSDOT；{WWW.GPXIAZAI.COM}
DRAWTEXT_FIX(1，0.40，0.00，0，'白 >黄 >蓝 ：看涨，逢低买进')COLOR0000FF；
DRAWTEXT_FIX(1，0.40，0.05，0，'黄 >蓝 >白 ：震荡，逢低买逢高卖')COLOR0000FF；
DRAWTEXT_FIX(1，0.40，0.1，0，'蓝 >黄 >白 ：看跌，逢高卖出')COLOR0000FF；
DRAWTEXT_FIX(1，0.40，0.15，0，'白 >蓝 >黄 ：洗盘：量能萎缩或背离')COLOR0000FF。
【拓展资料】
在筹码分布图中，在去除了90%的，余下的就是10%的筹码，我们把这个10%的筹码分成了两个5%，一个5%是筹码分布图最上面的那部分，另一个5%是筹码分布图最下面的那部分。
对于这两个5%，筹码的位置就有两个价位，一高一低，这两个价位的差值与这两个价位的和值的比值就是成本集中度。
简单来说，如果高价位是A，低价位是B，那么成本集中度就是（A-B）/（A+B）。
成本集中度是一个很重要的数值，这个数值理论上在0到100之间，成本集中度这个数值越小，表明这个股票的成本越集中，这个集中指的是持有这个股票的投资者不管是谁，持有者的股票成本相差不大；反之，如果股票的成本集中度的度值越大，表明股票筹码的成本越分散，这个分散，指的是各股票持有者手中的股票成本相差较大。
通常来说，股票的筹码是经历一个筹码从分散到集中，再分散，然后再集中的过程：
这个股票90%的筹码集中度连续小于10，说明筹码集中。
（软件中，对于集中度小于10的情况，会用蓝色条加以提示）
筹码峰：
筹码峰是专门用于分析、研判目标股票内部仓位结构分布的特色指标。
投资者可以通过该指标，清晰地发现目标股票内部各价格阶段、各时间阶段的筹码沉淀状态，以及市场的综合平均成本等，投资者可依据此一信息，结合相关的交易技术，做出正确的投资决策。
如果一只股票在高价格区沉淀的筹码越多，则套牢盘越多。
如果一只股票在低价格区沉淀的筹码越多，则获利盘越多。
该技术的局限性：仅仅从单一峰值来观察持仓的分布结构，并不能真实反映股票真正的持仓状况。
但是该指标有一定的参考价值，结合其他技术分析手法，有很强的指导意义。

‘贰’ 求通达信主图筹码分布公式，若得以实现，再追加50分

看你提的问题，水平不错，非常希望认识你，和你交流。你提出的问题我建议你看雪峰的 股市分析实战技法 这本书。我的QQ号码是361488535。欢迎交流。

‘叁’ 求大智慧自带的筹码分布源码

a1:COST(95);
a2:COST(5);
a3:COST(90);
a4:COST(20);
集中度90:(a1-a2)*100/(a1+a2),COLORred,LINETHICK2;
集中度70:(a3-a4)*100/(a3+a4),colorwhite,LINETHICK2;
jZFx:集中度90-ref(集中度90,1),LINETHICK0;
5,dotline;
DRAWTEXT((CROSS(5,集中度70)),集中度90,'极'),coloryellow;
DRAWTEXTABS(0,0,'筹码动态分析');

‘肆’ 如何调整筹码分布的计算公式

股价的涨跌，在一定程度上是由该股筹码的分布状况以及介入资金量的大小决定的：动用的资金量越大、筹码越集中，走势便较为稳定，不易受大盘所左右；动用的资金量越小、筹码分散在大多数散户手中，股价走势涨难叠易，难有大的作为，如何估算庄家仓位轻重呢？如何判断筹码是集中还是分散，主要通过以下的方法判断：

1、根据底部周期的长短判断。对底部周期明显的个股，笔者的经验是将底部周期内每天的成交量乘以底部运行时间，即可大致估算出庄家的持仓量，庄家持仓量＝底部周期×主动性买入量（忽略散户的买入量）。底部周期越长，庄家持仓量越大；主动性买入量越大，庄家吸货越多。因此，若投资者看到底部长期横盘整理的个股，通常为资金默默吸纳。主力为了降低进货成本所以高抛低吸并且不断清洗短线客；但仍有一小部长线资金介入。因此，这段时期主力吸到的货。至多也只达到总成交量的1/3－1/2左右。所以忽略散户的买入量的主动性买入量可以结算为总成交量×1/3或总成交量×1/2 。例如，有一个5000万的中盘股，在长期下跌过程后进入横盘整理。最近一段时期出现成交活跃的现象，经过走势图上分析，确定前期最低价为主力吸筹的起始日，并从这个起始日起至250日均线附近已经有90个交易日，累计成交量5500万股，主动性买入量为1700或2700万股左右，那么我们就可以估计得出这段时期主力吸筹的数量为1700－2700万股之间，但分析时最好以低持仓作为基点，以免受其误导。
2、根据阶段换手率判断。在低位出现成交活跃、换手率较高、而股价涨幅不大（设定标准为阶段涨幅小于50%，最好为小于30%）的个股，通常为庄家吸货。此间换手率越大，主力吸筹越充分，投资者可重点关注“价”暂时落后于“量”的个股。笔者的经验是换手率以50%为基数，每经过倍数阶段如2、3、4等，股价走势就进入新的阶段，也预示着庄家持仓发生变化，利用换手率计算庄家持仓的公式：个股流通盘×（个股某段时期换手率－同期大盘换手率）；计算结果除以3，此公式的实战意义是主力资金以超越大盘换手率的买入量（即平均买入量）的数额通常为先知先觉资金的介入，一般适用于长期下跌的冷门股。因此，主力一旦对冷门股持续吸纳，我们就能相对容易地测算出主力手中的持仓量。所取时间一般以60－120个交易日为宜。因为一个波段庄家的建仓周期通常在55天左右。例如：某股流通盘为8000万股，2003年年低至2004年初某股连续90个交易日的换手率为250％，而同期大盘的换手率为160％，据此可算出：（1）8000万×（250％－160％）＝7200万股；7200万股／3＝2400万股。因此，庄家实际持股数可能在2400万股之间。也主就是说，庄家的持仓量可能处于流通盘的30％左右，据此分析，我们可以得出主力参与的时间较短，股价仍有波折。
3、根据大盘整理期该股的表现来分析。有些个股吸货期不明显，或是盘中老庄卷土重来，或是庄家边拉边吸，或在下跌过程中不断吸货，难以明确划分吸货期。这些个股庄家持仓量可通过其在整理期的表现来判断，杉杉股份（600884）2003年年逐波下行，吸货期不明显，5－6月份的震荡明显属于庄家行为，7－9月份大盘调整，而该股持续调整，成家量萎缩较为明显，庄家介入程度深，明显被套；近期大盘调整，该股强势上扬，再看该股流通股达22800万，对这样的大盘股主力调控自如，持筹量可见一斑。
4、从分时走势和单笔成交来判断。若分时走势极不连贯、单笔成交量小，通常庄家持仓量较大、筹码集中度通常较高，如ST东锅（600786）前期分时走势上上下下，波动不连续，成交稀落，成交时间间隔长，有时数分钟过去才成交一两笔，5400万的流通盘有时每天仅成交数百手，这是典型的筹码被主力通吃（持仓在60%），涨跌完全取决于主力意愿，大盘走势对其影响甚微。
5、从价量背离来判断。若上升过程中成交并未放大，保持均衡状态，甚至价量背离的个股，筹码通常已集中在主力手中，如海正药业（600267）从去年6月份上升以来，随着股价不断上涨，成交量却在不断萎缩，股价创出上市以来的新高，量能亦未明显放大，分时走势上只要放出小量即可把股价推高，筹码锁定性良好，主力持仓为稳步推高，不存在吸筹期，持仓通常为60%以上。
6、配股除权后能迅速填权。2月04日为000401冀东水泥配股除权日，当天成交并未出现异常，2月27日配股上市，该股却能逆市而上，显示筹码已被充分锁定，主力持仓较重。随后该股连续放量上攻。
7、通过人均持股与大股东持股数判断庄家持仓。笔者经验为人均持股在2400左右，十大股东持股占流通盘的5%以上，可以判断主力初步持仓，如600585海螺水泥在2003年6月后，通过半年报分析，人均持股在5000多股，大股东持股在8%左右，可以判断主力持仓教重。 (您想天天免费看到如此海量的证券资讯吗？1、点击此处将东方财富网设为您的上网首页 2、点击此处将东方财富网添加到您的收藏夹。)

‘伍’ 请教高手通达信筹码分布90%成本集中度小于10的选股公式怎么写.

参数： n

公式如下：

LCS:=COST((100-n)/2);
LCE:=COST(n+(100-n)/2);

SCROK:((LCE-LCS)/(LCE+LCS)*100/2)<10;

{ 直接粘贴到新建的选股公式中就可以了。其中，参数 n 就是筹码分布成本的百分比, 例 n＝90 时，就是筹码分布 90%成本集中度小于10的选股公式； n＝80时，就是筹码分布 80%成本集中度小于10的选股公式 。}

‘陆’ 求一个通达信主图筹码分布公式，能够移动的与软件右边的要一样

通达信指标主图显示筹码峰暂时只能显示如此。可能不尽如人意。希望找到更好的，TS:=130;N:=99;M:=3;DA1:=IF(TS>TOTALBARSCOUNT,TOTALBARSCOUNT,TS);DA:=IF(CURRBARSCOUNT>DA1,0,DA1);HI:=REFDATE(HHV(H,DA),DATE);LO:=REFDATE(LLV(L,DA),DATE);C1:=IF(CURRBARSCOUNT<=DA,C,DRAWNULL);GZ:=EXP(LN(HI/LO)/10); LH1:=SUM(IF(C1>=(HI/GZ),V,0),DA);LH2:=SUM(IF(C1>=(HI/POW(GZ,2)) AND C1<(HI/GZ),V,0),DA);LH3:=SUM(IF(C1>=(HI/POW(GZ,3)) AND C1<(HI/POW(GZ,2)),V,0),DA);LH4:=SUM(IF(C1>=(HI/POW(GZ,4)) AND C1<(HI/POW(GZ,3)),V,0),DA);LH5:=SUM(IF(C1>=(HI/POW(GZ,5)) AND C1<(HI/POW(GZ,4)),V,0),DA);LH6:=SUM(IF(C1>=(HI/POW(GZ,6)) AND C1<(HI/POW(GZ,5)),V,0),DA);LH7:=SUM(IF(C1>=(HI/POW(GZ,7)) AND C1<(HI/POW(GZ,6)),V,0),DA);LH8:=SUM(IF(C1>=(HI/POW(GZ,8)) AND C1<(HI/POW(GZ,7)),V,0),DA);LH9:=SUM(IF(C1>=(LO*GZ) AND C1<LO*POW(GZ,2),V,0),DA);LH10:=SUM(IF(C1>=LO AND C1<LO*GZ,V,0),DA);L1:=REFDATE(HHV(LH1,DA),DATE),LINETHICK0;L2:=REFDATE(HHV(LH2,DA),DATE),LINETHICK0;L3:=REFDATE(HHV(LH3,DA),DATE),LINETHICK0;L4:=REFDATE(HHV(LH4,DA),DATE);L5:=REFDATE(HHV(LH5,DA),DATE);L6:=REFDATE(HHV(LH6,DA),DATE);L7:=REFDATE(HHV(LH7,DA),DATE);L8:=REFDATE(HHV(LH8,DA),DATE);L9:=REFDATE(HHV(LH9,DA),DATE);L10:=REFDATE(HHV(LH10,DA),DATE);SS:=(L1+L2+L3+L4+L5+L6+L7+L8+L9+L10);STICKLINE(CEILING(DA*L1/SS)*3>=CURRBARSCOUNT,HI*N/100,HI/GZ,9,0)COLOR252525,LINETHICK1;STICKLINE(CEILING(DA*L2/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,1)*N/100,HI/POW(GZ,2),9,0)COLOR252525,LINETHICK1;STICKLINE(CEILING(DA*L3/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,2)*N/100,HI/POW(GZ,3),9,0)COLOR252525,LINETHICK1;STICKLINE(CEILING(DA*L4/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,3)*N/100,HI/POW(GZ,4),9,0)COLOR252525,LINETHICK1;STICKLINE(CEILING(DA*L5/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,4)*N/100,HI/POW(GZ,5),9,0)COLOR252525,LINETHICK1;STICKLINE(CEILING(DA*L6/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,5)*N/100,HI/POW(GZ,6),9,0)COLOR252525,LINETHICK1;STICKLINE(CEILING(DA*L7/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,6)*N/100,HI/POW(GZ,7),9,0)COLOR252525,LINETHICK1;STICKLINE(CEILING(DA*L8/SS)*3>=CURRBARSCOUNT,LO*POW(GZ,2),LO*POW(GZ,3)*N/100,9,0)COLOR252525,LINETHICK1;STICKLINE(CEILING(DA*L9/SS)*3>=CURRBARSCOUNT,LO*POW(GZ,1),LO*POW(GZ,2)*N/100,9,0)COLOR252525,LINETHICK1;STICKLINE(CEILING(DA*L10/SS)*3>=CURRBARSCOUNT,LO,LO*POW(GZ,1)*N/100,9,0)COLOR252525,LINETHICK1;DRAWKLINE(H,O,L,C); 参数{TS:1 1000 350/N:1 1000 95}如果自己喜欢可以修改参数DA1:=IF(TS>TOTALBARSCOUNT,TOTALBARSCOUNT,TS);DA:=IF(CURRBARSCOUNT>DA1,0,DA1);HI:=REFDATE(HHV(H,DA),DATE);{最高价}LO:=REFDATE(LLV(L,DA),DATE);C1:=IF(CURRBARSCOUNT<=DA,C,DRAWNULL);GZ:=EXP(LN(HI/LO)/15); {对数格值}LH1:=SUM(IF(C1>=(HI/GZ),V,0),DA);LH2:=SUM(IF(C1>=(HI/POW(GZ,2)) AND C1<(HI/GZ),V,0),DA);LH3:=SUM(IF(C1>=(HI/POW(GZ,3)) AND C1<(HI/POW(GZ,2)),V,0),DA);LH4:=SUM(IF(C1>=(HI/POW(GZ,4)) AND C1<(HI/POW(GZ,3)),V,0),DA);LH5:=SUM(IF(C1>=(HI/POW(GZ,5)) AND C1<(HI/POW(GZ,4)),V,0),DA);LH6:=SUM(IF(C1>=(HI/POW(GZ,6)) AND C1<(HI/POW(GZ,5)),V,0),DA);LH7:=SUM(IF(C1>=(HI/POW(GZ,7)) AND C1<(HI/POW(GZ,6)),V,0),DA);LH8:=SUM(IF(C1>=(HI/POW(GZ,8)) AND C1<(HI/POW(GZ,7)),V,0),DA);LH9:=SUM(IF(C1>=(HI/POW(GZ,9)) AND C1<LO*POW(GZ,7),V,0),DA);LH10:=SUM(IF(C1>=(LO*POW(GZ,5)) AND C1<LO*POW(GZ,6),V,0),DA);LH11:=SUM(IF(C1>=(LO*POW(GZ,4)) AND C1<LO*POW(GZ,5),V,0),DA);LH12:=SUM(IF(C1>=(LO*POW(GZ,3)) AND C1<LO*POW(GZ,4),V,0),DA);LH13:=SUM(IF(C1>=(LO*POW(GZ,2)) AND C1<LO*POW(GZ,3),V,0),DA);LH14:=SUM(IF(C1>=(LO*GZ) AND C1<LO*POW(GZ,2),V,0),DA);LH15:=SUM(IF(C1>=LO AND C1<LO*GZ,V,0),DA);L1:=REFDATE(HHV(LH1,DA),DATE);L2:=REFDATE(HHV(LH2,DA),DATE);L3:=REFDATE(HHV(LH3,DA),DATE);L4:=REFDATE(HHV(LH4,DA),DATE);L5:=REFDATE(HHV(LH5,DA),DATE);L6:=REFDATE(HHV(LH6,DA),DATE);L7:=REFDATE(HHV(LH7,DA),DATE);L8:=REFDATE(HHV(LH8,DA),DATE);L9:=REFDATE(HHV(LH9,DA),DATE);L10:=REFDATE(HHV(LH10,DA),DATE);L11:=REFDATE(HHV(LH11,DA),DATE);L12:=REFDATE(HHV(LH12,DA),DATE);L13:=REFDATE(HHV(LH13,DA),DATE);L14:=REFDATE(HHV(LH14,DA),DATE);L15:=REFDATE(HHV(LH15,DA),DATE);SS:=(L1+L2+L3+L4+L5+L6+L7+L8+L9+L10+L11+L12+L13+L14+L15);STICKLINE(CEILING(DA*L1/SS)*3>=CURRBARSCOUNT,HI*N/100,HI/GZ,0.1,1)COLORA5555A;STICKLINE(CEILING(DA*L2/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,1)*N/100,HI/POW(GZ,2),0.1,1)COLORA7777A;STICKLINE(CEILING(DA*L3/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,2)*N/100,HI/POW(GZ,3),0.1,1)COLORA5555A;STICKLINE(CEILING(DA*L4/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,3)*N/100,HI/POW(GZ,4),0.1,1)COLORA7777A;STICKLINE(CEILING(DA*L5/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,4)*N/100,HI/POW(GZ,5),0.1,1)COLORA5555A;STICKLINE(CEILING(DA*L6/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,5)*N/100,HI/POW(GZ,6),0.1,1)COLORA7777A;STICKLINE(CEILING(DA*L7/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,6)*N/100,HI/POW(GZ,7),0.1,1)COLORA5555A;STICKLINE(CEILING(DA*L8/SS)*3>=CURRBARSCOUNT,LO*POW(GZ,7),LO*POW(GZ,8)*N/100,0.1,1)COLORA7777A;STICKLINE(CEILING(DA*L9/SS)*3>=CURRBARSCOUNT,LO*POW(GZ,6),LO*POW(GZ,7)*N/100,0.1,1)COLORA5555A;STICKLINE(CEILING(DA*L10/SS)*3>=CURRBARSCOUNT,LO*POW(GZ,5),LO*POW(GZ,6)*N/100,0.1,1)COLORA7777A;STICKLINE(CEILING(DA*L11/SS)*3>=CURRBARSCOUNT,LO*POW(GZ,4),LO*POW(GZ,5)*N/100,0.1,1)COLORA5555A;STICKLINE(CEILING(DA*L12/SS)*3>=CURRBARSCOUNT,LO*POW(GZ,3),LO*POW(GZ,4)*N/100,0.1,1)COLORA7777A;STICKLINE(CEILING(DA*L13/SS)*3>=CURRBARSCOUNT,LO*POW(GZ,2),LO*POW(GZ,3)*N/100,0.1,1)COLORA5555A;STICKLINE(CEILING(DA*L14/SS)*3>=CURRBARSCOUNT,LO*POW(GZ,1),LO*POW(GZ,2)*N/100,0.1,1)COLORA7777A;STICKLINE(CEILING(DA*L15/SS)*3>=CURRBARSCOUNT,LO,LO*POW(GZ,1)*N/100,0.0001,1)COLORA5555A;DRAWKLINE(HIGH,OPEN,LOW,CLOSE);