软件名称：[B]把十五单做在主图中，看清筹码间的流动（学习贴，欢迎指正）源码[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/
软件语言：简体中文
授权方式：免费版
软件大小：10.0 KB
官方主页：Home Page
更新时间：2013-04-22 02:53:56
软件简介:

W:=BARSLAST(DISPSTATUS=1);
P:=BACKSET(DISPSTATUS=2,W/2+1);
K:=BARSLAST(CROSS(P,0.5));
KJ:=HHVALL(HIGH)-LLVALL(LOW);
VERTLINE(CROSS(P,0.5),4),COLOR00FFFF;
平衡:LLVALL(LOW)+KJ/2,COLOR00FF00,DOTLINE,PRECIS2;
压力:IF(K>=0,HHVALL(HIGH)-KJ*0.191,平衡),COLORFF00FF,DOTLINE,PRECIS2;
支撑:IF(K>=0,LLVALL(LOW)+KJ*0.191,平衡),COLOR00FF00,DOTLINE,PRECIS2;
A3:=("ZBDATA@RD"(3,28)-"ZBDATA@RD"(4,28))/v/30+("ZBDATA@RD"(3,30)-"ZBDATA@RD"(4,30))/v/30+
("ZBDATA@RD"(3,29)-"ZBDATA@RD"(4,29))/v/30;
A4:=("ZBDATA@RD"(3,27)-"ZBDATA@RD"(4,27))/v/30;
A5:=("ZBDATA@RD"(3,26)-"ZBDATA@RD"(4,26))/v/30;
A6:=("ZBDATA@RD"(3,25)-"ZBDATA@RD"(4,25))/v/30;
A7:=("ZBDATA@RD"(3,24)-"ZBDATA@RD"(4,24))/v/30;
A8:=("ZBDATA@RD"(3,23)-"ZBDATA@RD"(4,23))/v/30;
A9:=("ZBDATA@RD"(3,22)-"ZBDATA@RD"(4,22))/v/30;
A10:=("ZBDATA@RD"(3,21)-"ZBDATA@RD"(4,21))/v/30;
A11:=("ZBDATA@RD"(3,20)-"ZBDATA@RD"(4,20))/v/30;
A12:=("ZBDATA@RD"(3,19)-"ZBDATA@RD"(4,19))/v/30;
A13:=("ZBDATA@RD"(3,18)-"ZBDATA@RD"(4,18))/v/30;
A14:=("ZBDATA@RD"(3,17)-"ZBDATA@RD"(4,17))/v/30 +("ZBDATA@RD"(3,16)-"ZBDATA@RD"(4,16))/v/30;
最大值:=150/(MAX(A3,A4,A5,A6,A7,A8,A9,A10,A11,A12,A13,A14));
A3买:=140+ABS(A3*最大值);
A4买:=140+ABS(A4*最大值);
A5买:=140+ABS(A5*最大值);
A6买:=140+ABS(A6*最大值);
A7买:=140+ABS(A7*最大值);
A8买:=140+ABS(A8*最大值);
A9买:=140+ABS(A9*最大值);
A10买:=140+ABS(A10*最大值);
A11买:=140+ABS(A11*最大值);
A12买:=140+ABS(A12*最大值);
A13买:=140+ABS(A13*最大值);
A14买:=140+ABS(A14*最大值);

DRAWTEXTABS(0,5,'当日各单动态'),COLOR1199FF;
DRAWTEXTABS(30,20,'0-10手'),COLOR00FFFF;
DRAWTEXTABS(30,35,'10-30手'),COLOR00FFFF;
DRAWTEXTABS(30,50,'30-50手'),COLOR00FFFF;
DRAWTEXTABS(30,65,'50-70手'),COLOR00FFFF;
DRAWTEXTABS(30,80,'70-1B手'),COLOR00FFFF;
DRAWTEXTABS(30,95,'1B-2B手'),COLOR00FFFF;
DRAWTEXTABS(30,110,'2B-3B手'),COLOR00FFFF;
DRAWTEXTABS(30,125,'3B-5B手'),COLOR00FFFF;
DRAWTEXTABS(30,140,'5B-7B手'),COLOR00FFFF;
DRAWTEXTABS(30,155,'7B-1K手'),COLOR00FFFF;
DRAWTEXTABS(30,170,'1K-1.5K手'),COLOR00FFFF;
DRAWTEXTABS(30,185,'1.5K+手'),COLOR00FFFF;
DRAWRECTABS(100,20,ABS(A14买),35,(IF((A14 >= 0),RGB(255,0,0),RGB(0,200,0)))),COLOR000000,LAYER0;
DRAWRECTABS(100,35,ABS(A13买),50,(IF((A13 >= 0),RGB(255,0,0),RGB(0,200,0)))),COLOR000000,LAYER0;
DRAWRECTABS(100,50,ABS(A12买),65,(IF((A12 >= 0),RGB(255,0,0),RGB(0,200,0)))),COLOR000000,LAYER0;
DRAWRECTABS(100,65,ABS(A11买),80,(IF((A11 >= 0),RGB(255,0,0),RGB(0,200,0)))),COLOR000000,LAYER0;
DRAWRECTABS(100,80,ABS(A10买),95,(IF((A10 >= 0),RGB(255,0,0),RGB(0,200,0)))),COLOR000000,LAYER0;
DRAWRECTABS(100,95,ABS(A9买),110,(IF((A9 >= 0),RGB(255,0,0),RGB(0,200,0)))),COLOR000000,LAYER0;
DRAWRECTABS(100,110,ABS(A8买),125,(IF((A8 >= 0),RGB(255,0,0),RGB(0,200,0)))),COLOR000000,LAYER0;
DRAWRECTABS(100,125,ABS(A7买),140,(IF((A7 >= 0),RGB(255,0,0),RGB(0,200,0)))),COLOR000000,LAYER0;
DRAWRECTABS(100,140,ABS(A6买),155,(IF((A6 >= 0),RGB(255,0,0),RGB(0,200,0)))),COLOR000000,LAYER0;
DRAWRECTABS(100,155,ABS(A5买),170,(IF((A5 >= 0),RGB(255,0,0),RGB(0,200,0)))),COLOR000000,LAYER0;
DRAWRECTABS(100,170,ABS(A4买),185,(IF((A14 >= 0),RGB(255,0,0),RGB(0,200,0)))),COLOR000000,LAYER0;
DRAWRECTABS(100,185,ABS(A3买),200,(IF((A3 >= 0),RGB(255,0,0),RGB(0,200,0)))),COLOR000000,LAYER0;

[url=http://www.70822.com/soft/sort013/sort03/down-61796.html]把十五单做在主图中，看清筹码间的流动（学习贴，欢迎指正）源码[/url]