软件名称：[B]席位全景图大放送（四）自选股全景[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/
软件语言：简体中文
授权方式：解密版
软件大小：22.0 KB
官方主页：Home Page
更新时间：2009-09-10 03:03:25
软件简介:
本公式需要自己设置自定义数据，
引用王子的基金、QFII、券商、特席、普通的买入卖出共十个汇总数据。不包括重游的买入卖出（因为重游计算需要74个数据，公式运算实在太慢了，要显示十五个自选股全景显示巨慢，故放弃）
自选股全景图显示的是上述几个综合的主力净额=基金净额+QFII净额+券商净额+特席净额（也就是我们常用的五大主力净额，只不过少了重游），虽然我把它归纳为席位全景图系列之 四，但是跟前三个席位全景图实质完全不同。因为前三个是通过公式计算74个席位数据得出某个席位在一段时间的交易，也就是席位跟踪的功能。现在的这个公式对若干个股票的主力净额一目了然，不用一个个翻股票。
大家看到这个图，也许有人想到了，可以做成权重股全景，也可以做成你关注的若干个自选股票的全景图。大家可以自己修改源码，CTRL+C或 CTRL+V替换股票代码和名称就行。
注意：公式有两个，一个是Z自选股1，作为副图显示用，可自由替换里面的股票名称和代码（你也可以另外设计Z自选股2，前提以速度为主）。另外一个是净额引用（辅助使用，前面的公式会通过这个公式计算主力净额），不建议更改名称和内容。
好了，大家可以自已动手吧，再不会我也没办法了
主公式：Z自选股1
参数：图形缩放：=30
B1:=STKINDI('SH600016','净额引用.主力净额');
B2:=STKINDI('SH600019','净额引用.主力净额');
B3:=STKINDI('SH601328','净额引用.主力净额');
B4:=STKINDI('SH601398','净额引用.主力净额');
B5:=STKINDI('SH600050','净额引用.主力净额');
B6:=STKINDI('SH601939','净额引用.主力净额');
B7:=STKINDI('SH600028','净额引用.主力净额');
B8:=STKINDI('SH600018','净额引用.主力净额');
B9:=STKINDI('SH600036','净额引用.主力净额');
B10:=STKINDI('SH600030','净额引用.主力净额');
B11:=STKINDI('SH601988','净额引用.主力净额');
B12:=STKINDI('SH600000','净额引用.主力净额');
B13:=STKINDI('SH601390','净额引用.主力净额');
B14:=STKINDI('SH601991','净额引用.主力净额');
B15:=STKINDI('SH601857','净额引用.主力净额');
A1:=if(B1-ref(B1,1)=0,0,B1);
A2:=if(B2-ref(B2,1)=0,0,B2);
A3:=if(B3-ref(B3,1)=0,0,B3);
A4:=if(B4-ref(B4,1)=0,0,B4);
A5:=if(B5-ref(B5,1)=0,0,B5);
A6:=if(B6-ref(B6,1)=0,0,B6);
A7:=if(B7-ref(B7,1)=0,0,B7);
A8:=if(B8-ref(B8,1)=0,0,B8);
A9:=if(B9-ref(B9,1)=0,0,B9);
A10:=if(B10-ref(B10,1)=0,0,B10);
A11:=if(B11-ref(B11,1)=0,0,B11);
A12:=if(B12-ref(B12,1)=0,0,B12);
A13:=if(B13-ref(B13,1)=0,0,B13);
A14:=if(B14-ref(B14,1)=0,0,B14);
A15:=if(B15-ref(B15,1)=0,0,B15);
stickline(A1>0,A1/100/图形缩放-20,-20,6,0) ,colorRED;
stickline(A1<0,A1/100/图形缩放-20,-20,6,0) ,colorffaa00;
stickline(A1=0,A1/100/图形缩放-20,-20,12,0) ,color444444;
stickline(A2>0,A2/100/图形缩放-40,-40,6,0) ,colorRED;
stickline(A2<0,A2/100/图形缩放-40,-40,6,0) ,colorffaa00;
stickline(A2=0,A2/100/图形缩放-40,-40,12,0) ,color444444;
stickline(A3>0,A3/100/图形缩放-60,-60,6,0) ,colorRED;
stickline(A3<0,A3/100/图形缩放-60,-60,6,0) ,colorffaa00;
stickline(A3=0,A3/100/图形缩放-60,-60,12,0) ,color444444;
stickline(A4>0,A4/100/图形缩放-80,-80,6,0) ,colorRED;
stickline(A4<0,A4/100/图形缩放-80,-80,6,0) ,colorffaa00;
stickline(A4=0,A4/100/图形缩放-80,-80,12,0) ,color444444;
stickline(A5>0,A5/100/图形缩放-100,-100,6,0) ,colorRED;
stickline(A5<0,A5/100/图形缩放-100,-100,6,0) ,colorffaa00;
stickline(A5=0,A5/100/图形缩放-100,-100,12,0) ,color444444;
stickline(A6>0,A6/100/图形缩放-120,-120,6,0) ,colorRED;
stickline(A6<0,A6/100/图形缩放-120,-120,6,0) ,colorffaa00;
stickline(A6=0,A6/100/图形缩放-120,-120,12,0) ,color444444;
stickline(A7>0,A7/100/图形缩放-140,-140,6,0) ,colorRED;
stickline(A7<0,A7/100/图形缩放-140,-140,6,0) ,colorffaa00;
stickline(A7=0,A7/100/图形缩放-140,-140,12,0) ,color444444;
stickline(A8>0,A8/100/图形缩放-160,-160,6,0) ,colorRED;
stickline(A8<0,A8/100/图形缩放-160,-160,6,0) ,colorffaa00;
stickline(A8=0,A8/100/图形缩放-160,-160,12,0) ,color444444;
stickline(A9>0,A9/100/图形缩放-180,-180,6,0) ,colorRED;
stickline(A9<0,A9/100/图形缩放-180,-180,6,0) ,colorffaa00;
stickline(A9=0,A9/100/图形缩放-180,-180,12,0) ,color444444;
stickline(A10>0,A10/100/图形缩放-200,-200,6,0) ,colorRED;
stickline(A10<0,A10/100/图形缩放-200,-200,6,0) ,colorffaa00;
stickline(A10=0,A10/100/图形缩放-200,-200,12,0) ,color444444;
stickline(A11>0,A11/100/图形缩放-220,-220,6,0) ,colorRED;
stickline(A11<0,A11/100/图形缩放-220,-220,6,0) ,colorffaa00;
stickline(A11=0,A11/100/图形缩放-220,-220,12,0) ,color444444;
stickline(A12>0,A12/100/图形缩放-240,-240,6,0) ,colorRED;
stickline(A12<0,A12/100/图形缩放-240,-240,6,0) ,colorffaa00;
stickline(A12=0,A12/100/图形缩放-240,-240,12,0) ,color444444;
stickline(A13>0,A13/100/图形缩放-260,-260,6,0) ,colorRED;
stickline(A13<0,A13/100/图形缩放-260,-260,6,0) ,colorffaa00;
stickline(A13=0,A13/100/图形缩放-260,-260,12,0) ,color444444;
stickline(A14>0,A14/100/图形缩放-280,-280,6,0) ,colorRED;
stickline(A14<0,A14/100/图形缩放-280,-280,6,0) ,colorffaa00;
stickline(A14=0,A14/100/图形缩放-280,-280,12,0) ,color444444;
stickline(A15>0,A15/100/图形缩放-300,-300,6,0) ,colorRED;
stickline(A15<0,A15/100/图形缩放-300,-300,6,0) ,colorffaa00;
stickline(A15=0,A15/100/图形缩放-300,-300,12,0) ,color444444;
DRAWTEXT(1,-10,'600016 民生银hang'),coloryellow;
DRAWTEXT(1,-30,'600019 宝钢股份'),coloryellow;
DRAWTEXT(1,-50,'601328 交通银hang'),coloryellow;
DRAWTEXT(1,-70,'601398 工商银hang'),coloryellow;
DRAWTEXT(1,-90,'600050 中国联通'),coloryellow;
DRAWTEXT(1,-110,'601939 建设银hang'),coloryellow;
DRAWTEXT(1,-130,'600028 中国石化'),coloryellow;
DRAWTEXT(1,-150,'600018 上港集团'),coloryellow;
DRAWTEXT(1,-170,'600036 招商银hang'),coloryellow;
DRAWTEXT(1,-190,'600030 中信证券'),coloryellow;
DRAWTEXT(1,-210,'601988 中国银hang'),coloryellow;
DRAWTEXT(1,-230,'600000 浦发银hang'),coloryellow;
DRAWTEXT(1,-250,'601390 中国中铁'),coloryellow;
DRAWTEXT(1,-270,'601991 大唐发电'),coloryellow;
DRAWTEXT(1,-290,'601857 中国石油'),coloryellow;
DRAWTEXT(1,-310,''),coloryellow;
DRAWFLAGTEXT(A1>0,-150,'600016 民生银hang 主力一日买入'+NUMTOSTRN(A1,0)+'万'),COLORRED;
DRAWFLAGTEXT(A1<0,-150,'600016 民生银hang 主力一日卖出'+NUMTOSTRN(A1,0)+'万'),COLORgreen;
DRAWFLAGTEXT(A2>0,-150,'600019 宝钢股份 主力一日买入'+NUMTOSTRN(A2,0)+'万'),COLORRED;
DRAWFLAGTEXT(A2<0,-150,'600019 宝钢股份 主力一日卖出'+NUMTOSTRN(A2,0)+'万'),COLORgreen;
DRAWFLAGTEXT(A3>0,-150,'601328 交通银hang 主力一日买入'+NUMTOSTRN(A3,0)+'万'),COLORRED;
DRAWFLAGTEXT(A3<0,-150,'601328 交通银hang 主力一日卖出'+NUMTOSTRN(A3,0)+'万'),COLORgreen;
DRAWFLAGTEXT(A4>0,-150,'601398 工商银hang 主力一日买入'+NUMTOSTRN(A4,0)+'万'),COLORRED;
DRAWFLAGTEXT(A4<0,-150,'601398 工商银hang 主力一日卖出'+NUMTOSTRN(A4,0)+'万'),COLORgreen;
DRAWFLAGTEXT(A5>0,-150,'600050 中国联通 主力一日买入'+NUMTOSTRN(A5,0)+'万'),COLORRED;
DRAWFLAGTEXT(A5<0,-150,'600050 中国联通 主力一日卖出'+NUMTOSTRN(A5,0)+'万'),COLORgreen;
DRAWFLAGTEXT(A6>0,-150,'601939 建设银hang 主力一日买入'+NUMTOSTRN(A6,0)+'万'),COLORRED;
DRAWFLAGTEXT(A6<0,-150,'601939 建设银hang 主力一日卖出'+NUMTOSTRN(A6,0)+'万'),COLORgreen;
DRAWFLAGTEXT(A7>0,-150,'600028 中国石化 主力一日买入'+NUMTOSTRN(A7,0)+'万'),COLORRED;
DRAWFLAGTEXT(A7<0,-150,'600028 中国石化 主力一日卖出'+NUMTOSTRN(A7,0)+'万'),COLORgreen;
DRAWFLAGTEXT(A8>0,-150,'600018 上港集团 主力一日
[url=http://www.70822.com/soft/sort013/sort03/down-12524.html]席位全景图大放送（四）自选股全景[/url]