{"id":19788,"date":"2020-05-04T00:15:54","date_gmt":"2020-05-03T16:15:54","guid":{"rendered":"https:\/\/www.lixiangluntan.com\/19788.html"},"modified":"2020-05-04T00:15:54","modified_gmt":"2020-05-03T16:15:54","slug":"%e5%a4%a7%e6%99%ba%e6%85%a7%e8%82%a1%e7%a5%a8%e5%85%ac%e5%bc%8f%ef%bc%9a%e7%9b%98%e5%8f%a3%e5%88%86%e6%9e%90","status":"publish","type":"post","link":"https:\/\/www.lixiangluntan.com\/?p=19788","title":{"rendered":"\u5927\u667a\u6167\u80a1\u7968\u516c\u5f0f\uff1a\u76d8\u53e3\u5206\u6790"},"content":{"rendered":"
\n

\u5927\u667a\u6167\u80a1\u7968\u516c\u5f0f\uff1a\u62c9\u5347\u8d44\u91d1\u6307\u6807<\/p>\n

\u3000\u3000
\n<\/strong>\u6709\u54ea\u4e9b\uff1f\u5927\u667a\u6167\u80a1\u7968\u516c\u5f0f\u662f\u4ec0\u4e48\uff1f\u4e0b\u9762\u80a1\u7968\u8d44\u6e90\u9986\u4e3a\u60a8\u4ecb\u7ecd\uff1a\u5927\u667a\u6167\u80a1\u7968\u516c\u5f0f\u3002<\/p>\n<\/blockquote>\n

     <\/p>\n

\u3000\u3000<\/strong>\u6709\u54ea\u4e9b\uff1f\u5927\u667a\u6167\u80a1\u7968\u516c\u5f0f\u662f\u4ec0\u4e48\uff1f\u4e0b\u9762\u80a1\u7968\u8d44\u6e90\u9986\u4e3a\u60a8\u4ecb\u7ecd\uff1a\u5927\u667a\u6167\u80a1\u7968\u516c\u5f0f\u3002<\/p>\n

\u8bf4\u660e:
\u526f\u56fe\uff0c\u9002\u7528\uff1a\u5206\u7b14\u3002
\u603b\u4e70\u3001\u603b\u5356\u3001\u5927\u5355\u3001\u5c0f\u5355\u3001\u8fdb\u51fa\u7b49\u4e00\u6e05\u4e8c\u695a\uff01<\/span><\/p>\n

input:n1(2,1,50),n2(18,1,100); 
DRAWTEXTREL(29,29,STKLABEL),LINETHICK6,Colorcc99ff;
DRAWTEXTREL(144,29,STKNAME),LINETHICK6,Colorff0000; 
DRAWTEXTREL(30,30,STKLABEL),LINETHICK6,Colorffff00;
DRAWTEXTREL(145,30,STKNAME),LINETHICK6,Color00ffff; 
DRAWTEXTREL(746,189,'\u76d8 \u53e3 \u5206 \u6790'),LINETHICK6,Color00ffff;
DRAWTEXTREL(748,191,'\u76d8 \u53e3 \u5206 \u6790'),LINETHICK6,Color0000ff; 
DRAWTEXTREL(295,45,'\u6d41\u901a:'+NUMTOSTRN(FINANCE2(37),0)+' \u6536\u76ca:'+NUMTOSTRN(FINANCE2(3),2)+' \u5e02\u76c8:'+NUMTOSTRN(DYNAINFO(39),2)+' \u5e02\u51c0:'+NUMTOSTRN(DYNAINFO(58),2)+' \u6362\u624b:'+NUMTOSTRN(DYNAINFO(37),2)),LINETHICK3,Color9999ff; 
DRAWTEXTREL(20,120,'---------------------------------------------------------'),LINETHICK3,Colorffffff; 
mr:=BUY*c\/100;
zmr:=sum(mr,0);
mc:=SELLVOL*c\/100;
zmc:=sum(mc,0);
rch:=zmr+zmc;
rcc:=zmr-zmc; 
mr0:=if(mr<5 ,mr,0);
zmr0:=sum(mr0,0);
mc0:=if(mc<5 ,mc,0);
zmc0:=sum(mc0,0); 
mr5:=if(mr<10 and mr>=5 ,mr,0);
zmr5:=sum(mr5,0);
mc5:=if(mc<10 and mc>=5,mc,0);
zmc5:=sum(mc5,0); 
mr10:=if(mr<25 and mr>=10 ,mr,0);
zmr10:=sum(mr10,0);
mc10:=if(mc<25 and mc>=10 ,mc,0);
zmc10:=sum(mc10,0); 
mr25:=if(mr<50 and mr>=25 ,mr,0);
zmr25:=sum(mr25,0);
mc25:=if(mc<50 and mc>=25 ,mc,0);
zmc25:=sum(mc25,0); 
mr50:=if(mr<75 and mr>=50 ,mr,0);
zmr50:=sum(mr50,0);
mc50:=if(mc<75 and mc>=50 ,mc,0);
zmc50:=sum(mc50,0); 
mr75:=if(mr<100 and mr>=75,mr,0);
zmr75:=sum(mr75,0);
mc75:=if(mc<100 and mc>=75,mc,0);
zmc75:=sum(mc75,0); 
mr100:=if(mr>=100 ,mr,0);
zmr100:=sum(mr100,0);
mc100:=if(mc>=100 ,mc,0);
zmc100:=sum(mc100,0); 
jg:=10*n2;mr200:=if(mr>jg ,mr,0);
zmr200:=sum(mr200,0);
mc200:=if(mc>jg,mc,0);
zmc200:=sum(mc200,0);
mmc200:=zmr200-zmc200; 
mmc0:=zmr0-zmc0;
mmc5:=zmr5-zmc5;
mmc10:=zmr10+zmr25+zmr50-zmc10-zmc25-zmc50;
mmc75:=zmr75+zmr100-zmc75-zmc100; 
DRAWTEXTREL(20,492,'---------------------------------------------------------'),LINETHICK3,Colorffffff; 
IF BARSTATUS=2 and (zmr) THEN BEGIN DRAWTEXTREL(34,545,' \u603b: '+NUMTOSTRN(zmr,2)),LINETHICK2,COLORff00ff;end; 
IF BARSTATUS=2 and (zmc) THEN BEGIN DRAWTEXTREL(261,545,' \u603b: '+NUMTOSTRN(zmc,2)),LINETHICK2,COLORffff00;end; 
IF BARSTATUS=2 and (zmr0) THEN BEGIN DRAWTEXTREL(17,608,' 5\u4e07\u4e0b\u5c0f\u5355\u4e70\u5165: ' +NUMTOSTRN(zmr0,2)),LINETHICK1,COLOR0000ff;end; 
IF BARSTATUS=2 and (zmc0) THEN BEGIN DRAWTEXTREL(264,608,' 5\u4e07\u4e0b\u5c0f\u5355\u5356\u51fa: '+NUMTOSTRN(zmc0,2)),LINETHICK1,COLOR00ff00;end; 
IF BARSTATUS=2 and (zmr5) THEN BEGIN DRAWTEXTREL(17,660,' 5 \u4e07\u4e2d\u5355\u4e70\u5165: '+NUMTOSTRN(zmr5,2)),LINETHICK1,COLOR9900ff;end; 
IF BARSTATUS=2 and (zmc5) THEN BEGIN DRAWTEXTREL(264,660,' 5 \u4e07\u4e2d\u5355\u5356\u51fa: '+NUMTOSTRN(zmc5,2)),LINETHICK1,COLOR99ff00;end; 
IF BARSTATUS=2 and (zmr10) THEN BEGIN DRAWTEXTREL(17,712,' 10 \u4e07\u5927\u5355\u4e70\u5165: '+NUMTOSTRN(zmr10,2)),LINETHICK1,COLOR0000ff;end; 
IF BARSTATUS=2 and (zmc10) THEN BEGIN DRAWTEXTREL(264,712,' 10 \u4e07\u5927\u5355\u5356\u51fa: '+NUMTOSTRN(zmc10,2)),LINETHICK1,COLOR00ff00;end; 
IF BARSTATUS=2 and (zmr25) THEN BEGIN DRAWTEXTREL(17,764,' 25 \u4e07\u5927\u5355\u4e70\u5165: '+NUMTOSTRN(zmr25,2)),LINETHICK1,COLOR9900ff;end; 
IF BARSTATUS=2 and (zmc25) THEN BEGIN DRAWTEXTREL(264,764,' 25 \u4e07\u5927\u5355\u5356\u51fa: '+NUMTOSTRN(zmc25,2)),LINETHICK1,COLOR99ff00;end; 
IF BARSTATUS=2 and (zmr50) THEN BEGIN DRAWTEXTREL(17,816,' 50 \u4e07\u5927\u5355\u4e70\u5165: '+NUMTOSTRN(zmr50,2)),LINETHICK1,COLOR0000ff;end; 
IF BARSTATUS=2 and (zmc50) THEN BEGIN DRAWTEXTREL(264,816,' 50 \u4e07\u5927\u5355\u5356\u51fa: '+NUMTOSTRN(zmc50,2)),LINETHICK1,COLOR00ff00;end; 
IF BARSTATUS=2 and (zmr75) THEN BEGIN DRAWTEXTREL(17,868,' 75 \u4e07\u5927\u5355\u4e70\u5165: '+NUMTOSTRN(zmr75,2)),LINETHICK1,COLOR9900ff;end; 
IF BARSTATUS=2 and (zmc75) THEN BEGIN DRAWTEXTREL(264,868,' 75 \u4e07\u5927\u5355\u5356\u51fa: '+NUMTOSTRN(zmc75,2)),LINETHICK1,COLOR99ff00;end; 
IF BARSTATUS=2 and (zmr100) THEN BEGIN DRAWTEXTREL(17,920,'100 \u4e07\u5927\u5355\u4e70\u5165: '+NUMTOSTRN(zmr100,2)),LINETHICK1,COLOR0000ff;end;
IF BARSTATUS=2 and (zmc100) THEN BEGIN DRAWTEXTREL(264,920,' 100 \u4e07\u5927\u5355\u5356\u51fa: '+NUMTOSTRN(zmc100,2)),LINETHICK1,COLOR00ff00;end; 
IF BARSTATUS=2 and (zmr+zmc) THEN BEGIN DRAWTEXTREL(475,545,' \u6210\u4ea4\u603b\u989d: '+NUMTOSTRN(zmr+zmc,2)),LINETHICK2,COLOR6699ff;end; 
IF BARSTATUS=2 and (rcc) and rcc<0 THEN BEGIN DRAWTEXTREL(480,608,' \u603b\u6210\u4ea4\u51c0\u989d: '+NUMTOSTRN(rcc,2)),LINETHICK1,COLORffff00;end; 
IF BARSTATUS=2 and (rcc) and rcc>0 THEN BEGIN DRAWTEXTREL(480,608,' \u603b\u6210\u4ea4\u51c0\u989d: '+NUMTOSTRN(rcc,2)),LINETHICK1,COLOR9966ff;end; 
IF BARSTATUS=2 and (mmc0) and mmc0<0 THEN BEGIN DRAWTEXTREL(480,660,' \u5c0f\u5355\u51c0\u989d: '+NUMTOSTRN(mmc0,2)),LINETHICK1,COLORff9900;end; 
IF BARSTATUS=2 and (mmc0) and mmc0>0 THEN BEGIN DRAWTEXTREL(480,660,' \u5c0f\u5355\u51c0\u989d: '+NUMTOSTRN(mmc0,2)),LINETHICK1,COLOR9966ff;end; 
IF BARSTATUS=2 and (mmc5) and mmc5<0 THEN BEGIN DRAWTEXTREL(480,712,' \u4e2d\u5355\u51c0\u989d: '+NUMTOSTRN(mmc5,2)),LINETHICK1,COLORff6600;end; 
IF BARSTATUS=2 and (mmc5) and mmc5>0 THEN BEGIN DRAWTEXTREL(480,712,' \u4e2d\u5355\u51c0\u989d: '+NUMTOSTRN(mmc5,2)),LINETHICK1,COLOR9966ff;end; 
IF BARSTATUS=2 and (mmc10) and mmc10<0 THEN BEGIN DRAWTEXTREL(480,764,' \u5927\u5355\u51c0\u989d: '+NUMTOSTRN(mmc10,2)),LINETHICK1,COLORff9900;end; 
IF BARSTATUS=2 and (mmc10) and mmc10>0 THEN BEGIN DRAWTEXTREL(480,764,' \u5927\u5355\u51c0\u989d: '+NUMTOSTRN(mmc10,2)),LINETHICK1,COLOR0000ff;end; 
IF BARSTATUS=2 and (mmc75) and mmc75<0 THEN BEGIN DRAWTEXTREL(480,816,' \u7279\u5927\u51c0\u989d: '+NUMTOSTRN(mmc75,2)),LINETHICK1,COLORff6600;end; 
IF BARSTATUS=2 and (mmc75) and mmc75>0 THEN BEGIN DRAWTEXTREL(480,816,' \u7279\u5927\u51c0\u989d: '+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,'\u5c0f\u8d44\u91d1\u6d41\u51fa: '+NUMTOSTRN(ABS(xzj),2)),LINETHICK3,COLORff9900;end;
IF BARSTATUS=2 and (xzj) and xzj>0 THEN BEGIN DRAWTEXTREL(725,640,'\u5c0f\u8d44\u91d1\u6d41\u5165: '+NUMTOSTRN(xzj,2)),LINETHICK3,COLOR9966ff;end; 
IF BARSTATUS=2 and (dzj) and dzj<0 THEN BEGIN DRAWTEXTREL(725,734,'\u5927\u8d44\u91d1\u6d41\u51fa: '+NUMTOSTRN(ABS(dzj),2)),LINETHICK3,COLORff9900;end; 
IF BARSTATUS=2 and (dzj) and dzj>0 THEN BEGIN DRAWTEXTREL(720,734,'\u5927\u8d44\u91d1\u6d41\u5165: '+NUMTOSTRN(dzj,2)),LINETHICK3,COLOR0000ff;end; 
IF BARSTATUS=2 and (mmc200) and mmc200<0 THEN BEGIN DRAWTEXTREL(479,898,' \u5927\u673a\u6784\u51cf\u4ed3: '+NUMTOSTRN(abs(mmc200),2)),LINETHICK4,COLOReeeeee;end; 
IF BARSTATUS=2 and (mmc200) and mmc200<0 THEN BEGIN DRAWTEXTREL(480,899,' \u5927\u673a\u6784\u51cf\u4ed3: '+NUMTOSTRN(abs(mmc200),2)),LINETHICK4,COLORff0000;end; 
IF BARSTATUS=2 and (mmc200) and mmc200>0 THEN BEGIN DRAWTEXTREL(479,898,' \u5927\u673a\u6784\u589e\u4ed3: '+NUMTOSTRN(mmc200,2)),LINETHICK4,COLOReeeeee;end; 
IF BARSTATUS=2 and (mmc200) and mmc200>0 THEN BEGIN DRAWTEXTREL(480,899,' \u5927\u673a\u6784\u589e\u4ed3: '+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,' \u603b\u4e70\u5165\u91cf: '+mrl),Color0099ff,LINETHICK2;
DRAWTEXTABS(215,55,' \u603b\u5356\u5165\u91cf: '+mcl),Colorffff66,LINETHICK2; 
DRAWTEXTABS(20,74,'\u25a0 \u7279\u5927\u4e70\u5165: '+tddr),Color0000FF,LINETHICK2;
DRAWTEXTABS(170,74,''+FLOOR(tddr\/(mrl+mcl)*100)+' %'),Color0000ff,LINETHICK2; 
DRAWTEXTABS(215,74,'\u25a0 \u7279\u5927\u5356\u51fa: '+tddc),Color00ff00,LINETHICK2;
DRAWTEXTABS(365,74,''+FLOOR(tddc\/(mrl+mcl)*100)+' %'),Color00ff00,LINETHICK2; 
DRAWTEXTABS(20,93,'\u25a0 \u5927\u5355\u4e70\u5165: '+ddr),Colorcc66ff,LINETHICK2;
DRAWTEXTABS(170,93,''+FLOOR(ddr\/(mrl+mcl)*100)+' %'),Colorcc66ff,LINETHICK2; 
DRAWTEXTABS(215,93,'\u25a0 \u5927\u5355\u5356\u51fa: '+ddc),Colorff9966,LINETHICK2;
DRAWTEXTABS(365,93,''+FLOOR(ddc\/(mrl+mcl)*100)+' %'),Colorff9966,LINETHICK2; 
DRAWTEXTABS(20,112,'\u25a0 \u5c0f\u5355\u4e70\u5165: '+xdr),Color99ccFF,LINETHICK2;
DRAWTEXTABS(170,112,''+FLOOR(xdr\/(mrl+mcl)*100)+' %'),Color99ccFF,LINETHICK2; 
DRAWTEXTABS(215,112,'\u25a0 \u5c0f\u5355\u5356\u51fa: '+xdc),Colorccffcc,LINETHICK2;
DRAWTEXTABS(365,112,''+FLOOR(xdc\/(mrl+mcl)*100)+' %'),Colorccffcc,LINETHICK2; 
DRAWTEXTABS(20,131,' \u5927\u5355\u4e70\u5747\u4ef7: '+drj),Color6600FF,LINETHICK2;
DRAWTEXTABS(215,131,' \u5927\u5355\u5356\u5747\u4ef7: '+dcj),Color99ff33,LINETHICK2; 
DRAWTEXTABS(415,55,' \u603b: '+(mrl+mcl)),Colorccccff,LINETHICK2;
DRAWTEXTABS(415,74,' \u7279\u5927\u51c0\u91cf: '+(tddr-tddc)),Colorcc66ff,LINETHICK2; 
DRAWTEXTABS(415,93,' \u5927\u5355\u51c0\u91cf: '+(ddr-ddc)),Colorccff33,LINETHICK2;
DRAWTEXTABS(415,112,' \u5c0f\u5355\u51c0\u91cf: '+(xdr-xdc)),Colorffcc66,LINETHICK2; 
DRAWTEXTABS(415,131,' \u603b\u4e70\u51c0\u91cf: '+(mrl-mcl)+' \u603b\u7b14\u6570: '+zb+' \u6bcf\u7b14 '+NUMTOSTRN(((mrl+mcl)\/zb),0)+' \u624b'),Color00ffff,LINETHICK2; 
DRAWTEXTABS(562,96,'\u53c2\u65701:'+dydd+' \u53c2\u65702:'+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;<\/span><\/p>\n

\u66f4\u591a\u5927\u667a\u6167\u80a1\u7968\u516c\u5f0f<\/span>\u77e5\u8bc6\u8bf7\u5173\u6ce8\u80a1\u7968\u8d44\u6e90\u9986<\/span><\/p>\n

\uff08\u80a1\u7968\u8d44\u6e90\u9986lixiangluntan.com\uff09\u80a1\u7968\u516c\u5f0f\u7f51<\/a><\/p>\n

\n

\u5927\u667a\u6167\u80a1\u7968\u516c\u5f0f\uff1a\u4e3b\u529b\u5b9a\u4f4d<\/p>\n

\u3000\u3000
\n<\/strong>\u6709\u54ea\u4e9b\uff1f\u5927\u667a\u6167\u80a1\u7968\u516c\u5f0f\u662f\u4ec0\u4e48\uff1f\u4e0b\u9762\u80a1\u7968\u8d44\u6e90\u9986\u4e3a\u60a8\u4ecb\u7ecd\uff1a\u5927\u667a\u6167\u80a1\u7968\u516c\u5f0f\u3002<\/p>\n<\/blockquote>\n","protected":false},"excerpt":{"rendered":"

\u3000\u3000
\n<\/strong>\u6709\u54ea\u4e9b\uff1f\u5927\u667a\u6167\u80a1\u7968\u516c\u5f0f\u662f\u4ec0\u4e48\uff1f\u4e0b\u9762\u80a1\u7968\u8d44\u6e90\u9986\u4e3a\u60a8\u4ecb\u7ecd\uff1a\u5927\u667a\u6167\u80a1\u7968\u516c\u5f0f\u3002<\/p>\n","protected":false},"author":7,"featured_media":0,"comment_status":"closed","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[131],"tags":[132],"class_list":["post-19788","post","type-post","status-publish","format-standard","hentry","category-dzhgs","tag-132"],"_links":{"self":[{"href":"https:\/\/www.lixiangluntan.com\/index.php?rest_route=\/wp\/v2\/posts\/19788","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/www.lixiangluntan.com\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.lixiangluntan.com\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.lixiangluntan.com\/index.php?rest_route=\/wp\/v2\/users\/7"}],"replies":[{"embeddable":true,"href":"https:\/\/www.lixiangluntan.com\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=19788"}],"version-history":[{"count":0,"href":"https:\/\/www.lixiangluntan.com\/index.php?rest_route=\/wp\/v2\/posts\/19788\/revisions"}],"wp:attachment":[{"href":"https:\/\/www.lixiangluntan.com\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=19788"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.lixiangluntan.com\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=19788"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.lixiangluntan.com\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=19788"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}