免费【分时龙虎看盘】受法华镇老师前不久发布的分时龙虎榜的启发，制作了这套【龙虎看盘】，共4件：【分时龙虎看盘】（横版）、【分时龙虎看盘】竖版、【龙虎看盘】（横版）、【龙虎看盘】竖版。
新增加了各户的净额、净量、净比例，还增加了各户持仓比例及增仓比例（增仓比例数据在饼图四周）。
原常规饼图中增加了四户中“净买入比例”，红色代表超大户的净买入、橘黄色代表大户的净买入、海蓝色代表中户的净买入、绿色代表散户的净买入。
【分时龙虎看盘】由于从日时数据引入，在引入公式时会误判提示“含未来函数”，其实所有公式与日时【龙虎看盘】完全一样，仅仅是在引入公式的后面加上“#day”而已，与同通常的“未来函数”有本质上的区别，尽可放心使用。
【龙虎看盘】（横版）由于引用了少数“引用公式”，所以在使用过程中非常迟钝，尽量少用。将公式全部引入，在TOP 的“设”置中即可找到所需的【龙虎看盘】。正式用户、雨杨版、免费版、沪深两市均可使用。
雨杨版 正版用 夏班看看这样有问题吗 我试过没问题 要比同时调用三套数据 快些 最好是在上面把 各单的净额都先计算出来 下面直接调用 这样只要计算一次 公式用英文语句 比中文要快点 呵呵 班门弄斧了 请夏班 法老师多指教谢谢{WDLHKPH-【卫东-龙虎看盘】(横幅版)}
REFLINE:0;
TODAY:=DYNAINFO(7)=CLOSE and DYNAINFO(10)=AMOUNT and (ORDER(1)=0 and ORDER(2)=0);
sdn:=IF(TODAY,(1-"DDEDATA@BIGORDER"(1,1)),(1-bigorder(1,1)));
sdm:=IF(TODAY,(1-"DDEDATA@BIGORDER"(2,1)),(1-bigorder(2,1)));
zdn:=IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),(bigorder(1,1)-bigorder(1,2)));
zdm:=IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),(bigorder(2,1)-bigorder(2,2)));
ddn:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),(bigorder(1,2)-bigorder(1,3)));
ddm:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),(bigorder(2,2)-bigorder(2,3)));
tdn:=IF(TODAY,"DDEDATA@BIGORDER"(1,3),bigorder(1,3));
tdm:=IF(TODAY,"DDEDATA@BIGORDER"(2,3),bigorder(2,3));
zln:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)),BIGORDER(1,2));
zlm:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)),BIGORDER(2,2));
{饼图}{13}
tdn,COLOR5454FF;
ddn,COLOR3F3FBF;
zdn,COLOR2A2A7F;
sdn,COLOR15153F;
(tdn-tdm)*2,COLOR0000FF;
(ddn-ddm)*2,color1e90ff;
(zdn-zdm)*2,colorff7f50;
(sdn-sdm)*2,COLOR00FF00;
sdm,COLOR3F3F15;
zdm,COLOR7F7F2A;
ddm,COLORBFBF3F;
tdm,COLORFFFF54;
{26}
DRAWTEXTABS(0,30,'买'+' 卖'),COLOR00FFFF;
DRAWTEXTABS(0,0,'■'+'超大'+NUMTOSTRN((VOL/CAPITAL)*100*(tdn-tdm),2)+'%'),COLOR0000FF;{超净买}
DRAWTEXTABS(75,0,'■'+'大户'+NUMTOSTRN((VOL/CAPITAL)*100*(ddn-ddm),2)+'%'),color1e90ff;{大净买}
DRAWTEXTABS(0,130,'■'+'中户'+NUMTOSTRN((VOL/CAPITAL)*100*(zdn-zdm),2)+'%'),colorff7f50;{中净买}
DRAWTEXTABS(75,130,'■'+'散户'+NUMTOSTRN((VOL/CAPITAL)*100*(sdn-sdm),2)+'%'),COLOR00FF00;{散净买}
{常用数据}{32}
DRAWTEXTABS(160,0,datestr(REF((DATE),0))+' 星期'+REF(WEEKDAY,0)+' '+STKNAME),COLOR00FFFF;
DRAWTEXTABS(150,13,'最新:'+NUMTOSTRN(DYNAINFO(7),2)+' '+'今开:'+NUMTOSTRN(DYNAINFO(4),2)
+' '+'最高:'+NUMTOSTRN(DYNAINFO(5),2)+' '+'最低:'+NUMTOSTRN(DYNAINFO(6),2)
+' '+'涨跌:'+NUMTOSTRN(DYNAINFO(12),2)+' '+'涨幅:'+NUMTOSTRN(DYNAINFO(14)*100,2)+'%'
+' '+'振幅:'+NUMTOSTRN(DYNAINFO(13)*100,2)+'%'+' '+'换手率:'+NUMTOSTRN(DYNAINFO(37)*100,2)+'%'
+' '+'主动率:'+NUMTOSTRN((DYNAINFO(23)-DYNAINFO(22))/(DYNAINFO(22)+DYNAINFO(23))*100,2)+'%'
+' '+'DDX:'+NUMTOSTRN("WDDDX.DDX#day",3)),COLOR2222FF;
{各户买卖数据}{40}
DRAWTEXTABS(150,20,'────────────────────────────────────────────────────────'),COLORRED;
DRAWTEXTABS(150,40,'────────────────────────────────────────────────────────'),COLORRED;
DRAWTEXTABS(150,120,'────────────────────────────────────────────────────────'),COLORRED;
{44}
DRAWTEXTABS(195,31,'委 买 单'),COLOR00FFFF;
DRAWTEXTABS(150,50,'■'),COLOR0000FF;{主买}
DRAWTEXTABS(150,65,'■'),COLOR5454FF;{超买}
DRAWTEXTABS(150,80,'■'),COLOR3F3FBF;{大买}
DRAWTEXTABS(150,95,'■'),COLOR2A2A7F;{中买}
DRAWTEXTABS(150,110,'■'),COLOR15153F;{散买}
DRAWTEXTABS(165,50,'主力买 '+numtostrn((tdn+ddn)*amount/10000,0)+'万'),COLOR0000FF;
DRAWTEXTABS(165,65,'超大买 '+numtostrn(tdn*amount/10000,0)+'万'),COLOR5454FF;
DRAWTEXTABS(165,80,'大户买 '+numtostrn(ddn*amount/10000,0)+'万'),COLOR5454FF;
DRAWTEXTABS(165,95,'中户买 '+numtostrn(zdn*amount/10000,0)+'万'),COLOR5454FF;
DRAWTEXTABS(165,110,'散户买 '+numtostrn(sdn*amount/10000,0)+'万'),COLOR5454FF;
{56}
DRAWTEXTABS(252,50,numtostrn((tdn+ddn)*V,0)+'手'),COLOR0000FF;
DRAWTEXTABS(252,65,numtostrn(tdn*V,0)+'手'),COLOR5454FF;
DRAWTEXTABS(252,80,numtostrn(ddn*V,0)+'手'),COLOR5454FF;
DRAWTEXTABS(252,95,numtostrn(zdn*V,0)+'手'),COLOR5454FF;
DRAWTEXTABS(252,110,numtostrn(sdn*V,0)+'手'),COLOR5454FF;
DRAWTEXTABS(305,50,'占'+numtostrn((tdn+ddn)*100,1)+'%'),COLOR0000FF;
DRAWTEXTABS(305,65,'占'+numtostrn(tdn*100,1)+'%'),COLOR5454FF;
DRAWTEXTABS(305,80,'占'+numtostrn(ddn*100,1)+'%'),COLOR5454FF;
DRAWTEXTABS(305,95,'占'+numtostrn(zdn*100,1)+'%'),COLOR5454FF;
DRAWTEXTABS(305,110,'占'+numtostrn(sdn*100,1)+'%'),COLOR5454FF;
DRAWTEXTABS(346,26,'|'),COLORRED;
DRAWTEXTABS(346,34,'|'),COLORRED;
{69}
DRAWTEXTABS(395,31,'委 卖 单'),COLOR00FFFF;
DRAWTEXTABS(350,50,'■'),COLORFF0000;{主卖}
DRAWTEXTABS(350,65,'■'),COLORFFFF54;{超卖}
DRAWTEXTABS(350,80,'■'),COLORBFBF3F;{大卖}
DRAWTEXTABS(350,95,'■'),COLOR7F7F2A;{中卖}
DRAWTEXTABS(350,110,'■'),COLOR3F3F15;{散卖}
DRAWTEXTABS(365,50,'主力卖 '+numtostrn((tdm+ddm)*amount/10000,0)+'万'),COLORFF5500;
DRAWTEXTABS(365,65,'超大卖 '+numtostrn(tdm*amount/10000,0)+'万'),COLORFFFF80;
DRAWTEXTABS(365,80,'大户卖 '+numtostrn(ddm*amount/10000,0)+'万'),COLORFFFF80;
DRAWTEXTABS(365,95,'中户卖 '+numtostrn(zdm*amount/10000,0)+'万'),COLORFFFF80;
DRAWTEXTABS(365,110,'散户卖 '+numtostrn(sdm*amount/10000,0)+'万'),COLORFFFF80;
{81}
DRAWTEXTABS(452,50,numtostrn((tdm+ddm)*V,0)+'手'),COLORFF5500;
DRAWTEXTABS(452,65,numtostrn(tdm*V,0)+'手'),COLORFFFF80;
DRAWTEXTABS(452,80,numtostrn(ddm*V,0)+'手'),COLORFFFF80;
DRAWTEXTABS(452,95,numtostrn(zdm*V,0)+'手'),COLORFFFF80;
DRAWTEXTABS(452,110,numtostrn(sdm*V,0)+'手'),COLORFFFF80;
DRAWTEXTABS(505,50,'占'+numtostrn((tdm+ddm)*100,1)+'%'),COLORFF5500;
DRAWTEXTABS(505,65,'占'+numtostrn(tdm*100,1)+'%'),COLORFFFF80;
DRAWTEXTABS(505,80,'占'+numtostrn(ddm*100,1)+'%'),COLORFFFF80;
DRAWTEXTABS(505,95,'占'+numtostrn(zdm*100,1)+'%'),COLORFFFF80;
DRAWTEXTABS(505,110,'占'+numtostrn(sdm*100,1)+'%'),COLORFFFF80;
DRAWTEXTABS(546,26,'|'),COLORRED;
DRAWTEXTABS(546,34,'|'),COLORRED;
{94}
DRAWTEXTABS(635,31,'净 买 单'),COLOR00FFFF;
DRAWTEXTABS(550,50,'■'),COLOR00FFFF;{主买}
DRAWTEXTABS(550,65,'■'),COLOR0000FF;{超买}
DRAWTEXTABS(550,80,'■'),color1e90ff;{大买}
DRAWTEXTABS(550,95,'■'),colorff7f50;{中买}
DRAWTEXTABS(550,110,'■'),COLOR00FF00;{散买}
{101}
DRAWTEXTABS(565,50,'主净买 '+numtostrn(((tdn-tdm)+(ddn-ddm))*amount/10000,0)+'万'),COLOR00FFFF;
DRAWTEXTABS(565,65,'超净买 '+numtostrn((tdn-tdm)*amount/10000,0)+'万'),COLOR0000FF;
DRAWTEXTABS(565,80,'大净买 '+numtostrn((ddn-ddm)*amount/10000,0)+'万'),color1e90ff;
DRAWTEXTABS(565,95,'中净买 '+numtostrn((zdn-zdm)*amount/10000,0)+'万'),colorff7f50;
DRAWTEXTABS(565,110,'散净买 '+numtostrn((sdn-sdm)*amount/10000,0)+'万'),COLOR00FF00;
{107}
DRAWTEXTABS(652,50,numtostrn(((tdn-tdm)+(ddn-ddm))*V,0)+'手'),COLOR00FFFF;
DRAWTEXTABS(652,65,numtostrn((tdn-tdm)*V,0)+'手'),COLOR0000FF;
DRAWTEXTABS(652,80,numtostrn((ddn-ddm)*V,0)+'手'),color1e90ff;
DRAWTEXTABS(652,95,numtostrn((zdn-zdm)*V,0)+'手'),colorff7f50;
DRAWTEXTABS(652,110,numtostrn((sdn-sdm)*V,0)+'手'),COLOR00FF00;
{113}
DRAWTEXTABS(705,50,'净'+numtostrn(((tdn-tdm)+(ddn-ddm))*100,1)+'%'),COLOR00FFFF;
DRAWTEXTABS(705,65,'净'+numtostrn((tdn-tdm)*100,1)+'%'),COLOR0000FF;
DRAWTEXTABS(705,80,'净'+numtostrn((ddn-ddm)*100,1)+'%'),color1e90ff;
DRAWTEXTABS(705,95,'净'+numtostrn((zdn-zdm)*100,1)+'%'),colorff7f50;
DRAWTEXTABS(705,110,'净'+numtostrn((sdn-sdm)*100,1)+'%'),COLOR00FF00;
{119}
DRAWTEXTABS(755,50,'持仓 '+NUMTOSTRN(50+Sum((VOL/CAPITAL)*100*((tdn-tdm)+(ddn-ddm)),0),1)+'%'),COLOR00FFFF;
DRAWTEXTABS(755,65,'持仓 '+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(tdn-tdm),0),1)+'%'),COLOR0000FF;
DRAWTEXTABS(755,80,'持仓 '+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(zdn-zdm),0),1)+'%'),color1e90ff;
DRAWTEXTABS(755,95,'持仓 '+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(zdn-zdm),0),1)+'%'),colorff7f50;
DRAWTEXTABS(755,110,'持仓 '+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(sdn-sdm),0),1)+'%'),COLOR00FF00;
{125}
DRAWTEXTABS(150,130,'大盘动态：'+'指数:'+numtostrn(INDEXC,2)
+' 涨跌:'+numtostrn(INDEXC-REF(INDEXC,1),2)+' 涨幅:'+numtostrn((INDEXC-REF(INDEXC,1))/(REF(INDEXC,1))*100,2)+'%'
+' 最高:'+numtostrn(INDEXH,2)+' 最低:'+numtostrn(INDEXL,2)
+' 上涨:'+NUMTOSTRN(DYNAINFO(66),0)+'家'
+' 平盘:'+NUMTOSTRN(DYNAINFO(68),0)+'家'
+' 下跌:'+NUMTOSTRN(DYNAINFO(67),0)+'家'),COLOR1199FF;
 |
