学会这个方法，抓10倍大牛股的概率提升10倍>>

+NUMTOSTRN(mmc75,2)),LINETHICK1,COLOR0000ff;end; 

xzj:=mmc0+mmc5;dzj:=mmc10+mmc75; IF BARSTATUS=2 and (xzj) and xzj<0 THEN BEGIN DRAWTEXTREL(725,640,'小资金流出: '+NUMTOSTRN(ABS(xzj),2)),LINETHICK3,COLORff9900;end; 

IF BARSTATUS=2 and (xzj) and xzj>0 THEN BEGIN DRAWTEXTREL(725,640,'小资金流入: '+NUMTOSTRN(xzj,2)),LINETHICK3,COLOR9966ff;end; 

IF BARSTATUS=2 and (dzj) and dzj<0 THEN BEGIN DRAWTEXTREL(725,734,'大资金流出: '+NUMTOSTRN(ABS(dzj),2)),LINETHICK3,COLORff9900;end; 

IF BARSTATUS=2 and (dzj) and dzj>0 THEN BEGIN DRAWTEXTREL(720,734,'大资金流入: '+NUMTOSTRN(dzj,2)),LINETHICK3,COLOR0000ff;end; 

IF BARSTATUS=2 and (mmc200) and mmc200<0 THEN BEGIN DRAWTEXTREL(479,898,' 大机构减仓: '+NUMTOSTRN(abs(mmc200),2)),LINETHICK4,COLOReeeeee;end; 

IF BARSTATUS=2 and (mmc200) and mmc200<0 THEN BEGIN DRAWTEXTREL(480,899,' 大机构减仓: '+NUMTOSTRN(abs(mmc200),2)),LINETHICK4,COLORff0000;end; 

IF BARSTATUS=2 and (mmc200) and mmc200>0 THEN BEGIN DRAWTEXTREL(479,898,' 大机构增仓: '+NUMTOSTRN(mmc200,2)),LINETHICK4,COLOReeeeee;end; 

IF BARSTATUS=2 and (mmc200) and mmc200>0 THEN BEGIN DRAWTEXTREL(480,899,' 大机构增仓: '+NUMTOSTRN(mmc200,2)),LINETHICK4,COLOR0000ff;end; 

mrl:=SUM(BUYVOL,0);

mcl:=SUM(SELLVOL,0);

dydd:=100*n1;

tddr:=SUM(if(BUYVOL>800,BUYVOL,0),0);

tddc:=SUM(if(SELLVOL>800,SELLVOL,0),0); 

ddr:=SUM(if(BUYVOL>dydd,BUYVOL,0),0);

ddc:=SUM(if(SELLVOL>dydd,SELLVOL,0),0);

xdr:=mrl-ddr;

xdc:=mcl-ddc; 

dr:=sum(if(BUYVOL>dydd,BUYVOL,0)*c,0);

drj:=dr/ddr;

dc:=sum(if(SELLVOL>dydd,SELLVOL,0)*c,0);

dcj:=dc/ddc;

zb:=sum(if(BUYVOL>0,1,0),0)+sum(if(SELLVOL>0,1,0),0); 

DRAWTEXTABS(20,55,' 总买入量: '+mrl),Color0099ff,LINETHICK2;

DRAWTEXTABS(215,55,' 总卖入量: '+mcl),Colorffff66,LINETHICK2; 

DRAWTEXTABS(20,74,'■ 特大买入: '+tddr),Color0000FF,LINETHICK2;

DRAWTEXTABS(170,74,''+FLOOR(tddr/(mrl+mcl)*100)+' %'),Color0000ff,LINETHICK2; 

DRAWTEXTABS(215,74,'■ 特大卖出: '+tddc),Color00ff00,LINETHICK2;

DRAWTEXTABS(365,74,''+FLOOR(tddc/(mrl+mcl)*100)+' %'),Color00ff00,LINETHICK2; 

DRAWTEXTABS(20,93,'■ 大单买入: '+ddr),Colorcc66ff,LINETHICK2;

DRAWTEXTABS(170,93,''+FLOOR(ddr/(mrl+mcl)*100)+' %'),Colorcc66ff,LINETHICK2; 

DRAWTEXTABS(215,93,'■ 大单卖出: '+ddc),Colorff9966,LINETHICK2;

DRAWTEXTABS(365,93,''+FLOOR(ddc/(mrl+mcl)*100)+' %'),Colorff9966,LINETHICK2; 

DRAWTEXTABS(20,112,'■ 小单买入: '+xdr),Color99ccFF,LINETHICK2;

DRAWTEXTABS(170,112,''+FLOOR(xdr/(mrl+mcl)*100)+' %'),Color99ccFF,LINETHICK2; 

DRAWTEXTABS(215,112,'■ 小单卖出: '+xdc),Colorccffcc,LINETHICK2;

DRAWTEXTABS(365,112,''+FLOOR(xdc/(mrl+mcl)*100)+' %'),Colorccffcc,LINETHICK2; 

DRAWTEXTABS(20,131,' 大单买均价: '+drj),Color6600FF,LINETHICK2;

DRAWTEXTABS(215,131,' 大单卖均价: '+dcj),Color99ff33,LINETHICK2; 

DRAWTEXTABS(415,55,' 总成交量: '+(mrl+mcl)),Colorccccff,LINETHICK2;

DRAWTEXTABS(415,74,' 特大净量: '+(tddr-tddc)),Colorcc66ff,LINETHICK2; 

DRAWTEXTABS(415,93,' 大单净量: '+(ddr-ddc)),Colorccff33,LINETHICK2;

DRAWTEXTABS(415,112,' 小单净量: '+(xdr-xdc)),Colorffcc66,LINETHICK2; 

DRAWTEXTABS(415,131,' 总买净量: '+(mrl-mcl)+' 总笔数: '+zb+' 每笔 '+NUMTOSTRN(((mrl+mcl)/zb),0)+' 手'),Color00ffff,LINETHICK2; 

DRAWTEXTABS(562,96,'参数1:'+dydd+' 参数2:'+jg),LINETHICK3,Colorffffff; STICKLINE((DYNAINFO(8) AND DISPSTATUS=2),0,DYNAINFO(8),60,1),COLORFFFFFF; 

STICKLINE((tddr+tddc+ddr+ddc+xdr+xdc AND DISPSTATUS=2),0,DYNAINFO(8),60,0),Color99ccFF; 

STICKLINE((tddr+tddc+ddr+ddc+xdc AND DISPSTATUS=2),0,tddr+tddc+ddr+ddc+xdc,60,0),Colorcc66ff; 

STICKLINE((tddr+tddc+ddc+xdc AND DISPSTATUS=2),0,tddr+tddc+ddc+xdc,60,0),Color0000FF; 

STICKLINE((tddc+ddc+xdc AND DISPSTATUS=2),0,tddc+ddc+xdc,60,0),Color00ff00; 

STICKLINE((ddc+xdc AND DISPSTATUS=2),0,ddc+xdc,60,0),Colorff9966; 

STICKLINE((xdc AND DISPSTATUS=2),0,xdc,60,0),Colorccffcc;