软件名称：[B]◆◆◆价格密集区与成本分布之对比◆◆◆（成本分布 筹码移动）[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/
软件语言：简体中文
授权方式：免费版
软件大小：2.00 KB
官方主页：Home Page
更新时间：2013-04-18 05:36:25
软件简介:
1、公式适用于 通达信公式编辑器5.0，tne格式
2、所发主图公式是在右文老师的基础上进行优化而成，水平有限，优化得比较粗糙；
所发附图公式就是西电进出的“成本分布”指标
3、两者公式之对比，如下图，没有文字说明，仁者见仁，智者见智，仅供交流。
第一个公式：
筹码移动
ID:=BARSCOUNT(CLOSE);
高:=HHV(H,ID),COLORWHITE;
低:=LLV(L,ID),COLORWHITE;
XX0A:=REFDATE(高-(高-低)*0.025,DATE),COLORCYAN;
XX0:=REFDATE(高-(高-低)*0.05,DATE),COLORCYAN;
XX0B:=REFDATE(高-(高-低)*0.075,DATE),COLORCYAN;
XX1:=REFDATE(高-(高-低)*0.1,DATE),COLORCYAN;
XX1A:=REFDATE(高-(高-低)*0.125,DATE),COLORCYAN;
XX2:=REFDATE(高-(高-低)*0.15,DATE),COLORCYAN;
XX2A:=REFDATE(高-(高-低)*0.175,DATE),COLORCYAN;
XX3:=REFDATE(高-(高-低)*0.2,DATE),COLORBLUE;
XX3A:=REFDATE(高-(高-低)*0.225,DATE),COLORCYAN;
XX4:=REFDATE(高-(高-低)*0.25,DATE),COLORBLUE;
XX4A:=REFDATE(高-(高-低)*0.275,DATE),COLORCYAN;
XX5:=REFDATE(高-(高-低)*0.3,DATE),COLORYELLOW;
XX5A:=REFDATE(高-(高-低)*0.325,DATE),COLORCYAN;
XX6:=REFDATE(高-(高-低)*0.35,DATE),COLORYELLOW;
XX6A:=REFDATE(高-(高-低)*0.375,DATE),COLORYELLOW;
XX7:=REFDATE(高-(高-低)*0.4,DATE),COLORYELLOW;
XX7A:=REFDATE(高-(高-低)*0.425,DATE),COLORYELLOW;
XX8:=REFDATE(高-(高-低)*0.45,DATE),COLORYELLOW;
XX8A:=REFDATE(高-(高-低)*0.475,DATE),COLORYELLOW;
XX9:=REFDATE(高-(高-低)*0.5,DATE),COLORRED,LINETHICK2;
XX9A:=REFDATE(高-(高-低)*0.525,DATE),COLORRED,LINETHICK2;
XX10:=REFDATE(高-(高-低)*0.55,DATE),COLORRED;
XX10A:=REFDATE(高-(高-低)*0.575,DATE),COLORRED;
XX11:=REFDATE(高-(高-低)*0.6,DATE),COLORGREEN;
XX11A:=REFDATE(高-(高-低)*0.625,DATE),COLORGREEN;
XX12:=REFDATE(高-(高-低)*0.65,DATE),COLORGREEN;
XX12A:=REFDATE(高-(高-低)*0.675,DATE),COLORGREEN;
XX13:=REFDATE(高-(高-低)*0.7,DATE),COLORGREEN;
XX13A:=REFDATE(高-(高-低)*0.725,DATE),COLORGREEN;
XX14:=REFDATE(高-(高-低)*0.75,DATE),COLORGREEN;
XX14A:=REFDATE(高-(高-低)*0.775,DATE),COLORGREEN;
XX15:=REFDATE(高-(高-低)*0.8,DATE),COLORBLUE;
XX15A:=REFDATE(高-(高-低)*0.825,DATE),COLORBLUE;
XX16:=REFDATE(高-(高-低)*0.85,DATE),COLORBLUE;
XX16A:=REFDATE(高-(高-低)*0.875,DATE),COLORBLUE;
XX17:=REFDATE(高-(高-低)*0.9,DATE),COLORCYAN;
XX17A:=REFDATE(高-(高-低)*0.925,DATE),COLORCYAN;
XX18:=REFDATE(高-(高-低)*0.95,DATE),COLORCYAN;
XX18A:=REFDATE(高-(高-低)*0.975,DATE),COLORCYAN;
XX19:=REFDATE(高-(高-低),DATE),COLORCYAN;
MJ:=INTPART((H+L)/2);
ALIGNRIGHT(IF(MJ=INTPART(XX0),MJ,DRAWNULL)),COLORWHITE;
ALIGNRIGHT(IF(MJ=INTPART(XX1),MJ,DRAWNULL)),COLORWHITE;
ALIGNRIGHT(IF(MJ=INTPART(XX2),MJ,DRAWNULL)),COLORWHITE;
ALIGNRIGHT(IF(MJ=INTPART(XX3),MJ,DRAWNULL)),COLORWHITE;
ALIGNRIGHT(IF(MJ=INTPART(XX4),MJ,DRAWNULL)),COLORWHITE;
ALIGNRIGHT(IF(MJ=INTPART(XX5),MJ,DRAWNULL)),COLORWHITE;
ALIGNRIGHT(IF(MJ=INTPART(XX6),MJ,DRAWNULL)),COLORWHITE;
ALIGNRIGHT(IF(MJ=INTPART(XX7),MJ,DRAWNULL)),COLORWHITE;
ALIGNRIGHT(IF(MJ=INTPART(XX8),MJ,DRAWNULL)),COLORWHITE;
ALIGNRIGHT(IF(MJ=INTPART(XX9),MJ,DRAWNULL)),COLORWHITE;
ALIGNRIGHT(IF(MJ=INTPART(XX10),MJ,DRAWNULL)),COLORWHITE;
ALIGNRIGHT(IF(MJ=INTPART(XX11),MJ,DRAWNULL)),COLORWHITE;
ALIGNRIGHT(IF(MJ=INTPART(XX12),MJ,DRAWNULL)),COLORWHITE;
ALIGNRIGHT(IF(MJ=INTPART(XX13),MJ,DRAWNULL)),COLORWHITE;
ALIGNRIGHT(IF(MJ=INTPART(XX14),MJ,DRAWNULL)),COLORWHITE;
ALIGNRIGHT(IF(MJ=INTPART(XX15),MJ,DRAWNULL)),COLORWHITE;
ALIGNRIGHT(IF(MJ=INTPART(XX16),MJ,DRAWNULL)),COLORWHITE;
ALIGNRIGHT(IF(MJ=INTPART(XX17),MJ,DRAWNULL)),COLORWHITE;
ALIGNRIGHT(IF(MJ=INTPART(XX18),MJ,DRAWNULL)),COLORWHITE;
ALIGNRIGHT(IF(MJ=INTPART(XX19),MJ,DRAWNULL)),COLORWHITE;
ALIGNRIGHT(IF(MJ=INTPART(XX0A),MJ,DRAWNULL)),COLORWHITE;
ALIGNRIGHT(IF(MJ=INTPART(XX1A),MJ,DRAWNULL)),COLORWHITE;
ALIGNRIGHT(IF(MJ=INTPART(XX2A),MJ,DRAWNULL)),COLORWHITE;
ALIGNRIGHT(IF(MJ=INTPART(XX3A),MJ,DRAWNULL)),COLORWHITE;
ALIGNRIGHT(IF(MJ=INTPART(XX4A),MJ,DRAWNULL)),COLORWHITE;
ALIGNRIGHT(IF(MJ=INTPART(XX5A),MJ,DRAWNULL)),COLORWHITE;
ALIGNRIGHT(IF(MJ=INTPART(XX6A),MJ,DRAWNULL)),COLORWHITE;
ALIGNRIGHT(IF(MJ=INTPART(XX7A),MJ,DRAWNULL)),COLORWHITE;
ALIGNRIGHT(IF(MJ=INTPART(XX8A),MJ,DRAWNULL)),COLORWHITE;
ALIGNRIGHT(IF(MJ=INTPART(XX9A),MJ,DRAWNULL)),COLORWHITE;
ALIGNRIGHT(IF(MJ=INTPART(XX10A),MJ,DRAWNULL)),COLORWHITE;
ALIGNRIGHT(IF(MJ=INTPART(XX11A),MJ,DRAWNULL)),COLORWHITE;
ALIGNRIGHT(IF(MJ=INTPART(XX12A),MJ,DRAWNULL)),COLORWHITE;
ALIGNRIGHT(IF(MJ=INTPART(XX13A),MJ,DRAWNULL)),COLORWHITE;
ALIGNRIGHT(IF(MJ=INTPART(XX14A),MJ,DRAWNULL)),COLORWHITE;
ALIGNRIGHT(IF(MJ=INTPART(XX15A),MJ,DRAWNULL)),COLORWHITE;
ALIGNRIGHT(IF(MJ=INTPART(XX16A),MJ,DRAWNULL)),COLORWHITE;
ALIGNRIGHT(IF(MJ=INTPART(XX17A),MJ,DRAWNULL)),COLORWHITE;
ALIGNRIGHT(IF(MJ=INTPART(XX18A),MJ,DRAWNULL)),COLORWHITE;
公式名：成本分布 插入主图使用 原作者：锁心葬爱
【源码DZH俺改TDX】在此代小三感谢|
成本分布 插入主图使用 （源码）
HB:=COST(99.9);
LB:=COST(0.1);
B3:=(HB-LB)/50;
B31:=HB-B3;
B32:=HB-2*B3;
B33:=HB-3*B3;
B34:=HB-4*B3;
B35:=HB-5*B3;
B36:=HB-6*B3;
B37:=HB-7*B3;
B38:=HB-8*B3;
B39:=HB-9*B3;
B310:=HB-10*B3;
B311:=HB-11*B3;
B312:=HB-12*B3;
B313:=HB-13*B3;
B314:=HB-14*B3;
B315:=HB-15*B3;
B316:=HB-16*B3;
B317:=HB-17*B3;
B318:=HB-18*B3;
B319:=HB-19*B3;
B320:=HB-20*B3;
B321:=HB-21*B3;
B322:=HB-22*B3;
B323:=HB-23*B3;
B324:=HB-24*B3;
B325:=HB-25*B3;
B326:=HB-26*B3;
B327:=HB-27*B3;
B328:=HB-28*B3;
B329:=HB-29*B3;
B330:=HB-30*B3;
B331:=HB-31*B3;
B332:=HB-32*B3;
B333:=HB-33*B3;
B334:=HB-34*B3;
B335:=HB-35*B3;
B336:=HB-36*B3;
B337:=HB-37*B3;
B338:=HB-38*B3;
B339:=HB-39*B3;
B340:=HB-40*B3;
B341:=HB-41*B3;
B342:=HB-42*B3;
B343:=HB-43*B3;
B344:=HB-44*B3;
B345:=HB-45*B3;
B346:=HB-46*B3;
B347:=HB-47*B3;
B348:=HB-48*B3;
B349:=HB-49*B3;
A1:=WINNER(HB)*100-WINNER(B31)*100;
A2:=WINNER(B31)*100-WINNER(B32)*100;
A3:=WINNER(B32)*100-WINNER(B33)*100;
A4:=WINNER(B33)*100-WINNER(B34)*100;
A5:=WINNER(B34)*100-WINNER(B35)*100;
A6:=WINNER(B35)*100-WINNER(B36)*100;
A7:=WINNER(B36)*100-WINNER(B37)*100;
A8:=WINNER(B37)*100-WINNER(B38)*100;
A9:=WINNER(B38)*100-WINNER(B39)*100;
A10:=WINNER(B39)*100-WINNER(B310)*100;
A11:=WINNER(B310)*100-WINNER(B311)*100;
A12:=WINNER(B311)*100-WINNER(B312)*100;
A13:=WINNER(B312)*100-WINNER(B313)*100;
A14:=WINNER(B313)*100-WINNER(B314)*100;
A15:=WINNER(B314)*100-WINNER(B315)*100;
A16:=WINNER(B315)*100-WINNER(B316)*100;
A17:=WINNER(B316)*100-WINNER(B317)*100;
A18:=WINNER(B317)*100-WINNER(B318)*100;
A19:=WINNER(B318)*100-WINNER(B319)*100;
A20:=WINNER(B319)*100-WINNER(B320)*100;
A21:=WINNER(B320)*100-WINNER(B321)*100;
A22:=WINNER(B321)*100-WINNER(B322)*100;
A23:=WINNER(B322)*100-WINNER(B323)*100;
A24:=WINNER(B323)*100-WINNER(B324)*100;
A25:=WINNER(B324)*100-WINNER(B325)*100;
A26:=WINNER(B325)*100-WINNER(B326)*100;
A27:=WINNER(B326)*100-WINNER(B327)*100;
A28:=WINNER(B327)*100-WINNER(B328)*100;
A29:=WINNER(B328)*100-WINNER(B329)*100;
A30:=WINNER(B329)*100-WINNER(B330)*100;
A31:=WINNER(B330)*100-WINNER(B331)*100;