K线+资金 源码

drawtextabs(0,0,'红色逐单净买'),colorred;
drawtextabs(0,20,'黄色逐笔净买'),coloryellow;
drawtextabs(0,40,'蓝色逐单净卖'),colorffff00;
drawtextabs(0,60,'绿色逐笔净卖'),colorgreen;
总额:=AMOUNT/10000;

大单买入:=BIGORDER(1,2)*v;
大单卖出:=BIGORDER(2,2)*v;

逐笔大买:=SELFDATA('主买大单')+SELFDATA('主买特大');
逐笔大卖:=SELFDATA('主卖大单')+SELFDATA('主卖特大');

大单买入比:=100*大单买入/CAPITAL;
大单卖出比:=100*大单卖出/CAPITAL;

逐笔主买比:=100*逐笔大买/CAPITAL;
逐笔主卖比:=100*逐笔大卖/CAPITAL;

大单净买:大单买入-大单卖出,linethick0;
逐笔净买:逐笔大买-逐笔大卖,linethick0;

大单净买比:大单买入比-大单卖出比,linethick0;
逐笔净买比:逐笔主买比-逐笔主卖比,linethick0;

逐单净额:大单净买比*总额,colorred,linethick0;
逐笔净额:逐笔净买比*总额,coloryellow,linethick0;

dw:=(c+ref(c,1))/2;

stickline(1,dw,dw+c*0.05,5,-101),COLOR626262;
stickline(1,dw,dw-c*0.05,5,-101),COLOR626262;

stickline(逐单净额>=0,dw+c*0.05,dw+c*0.05-大单净买比/10,3,-400),colorred;
stickline(逐单净额<0,dw-c*0.05,dw-c*0.05-大单净买比/10,3,-400),colorffff00;
stickline(逐笔净额>=0,dw+c*0.05,dw+c*0.05-逐笔净买比/10,3,400),coloryellow;
stickline(逐笔净额<0,dw-c*0.05,dw-c*0.05-逐笔净买比/10,3,400),colorgreen;