买卖净量（源码 图 无未来）

废话不多说了，直接上原码。

买卖净量

{XDB:="虎拓圣龙.买入力度";
XDS:="虎拓圣龙.卖出力度";
}
MM:=H-REF(C,1);
SS:=REF(C,1)-L;
S:=IF(SS>0,SS,0.01);
M:=IF(MM>0,MM,0.01);
HJ:=M+S;

买入力度:=M/HJ*AMOUNT/CAPITAL;
卖出力度:=S/HJ*AMOUNT/CAPITAL;
净买:(买入力度-卖出力度),LINETHICK0;
SH:=净买;
出货位:45,CROSSDOT,COLOR009900;
STICKLINE(SH>=45,0,SH,2,0),COLORCCCCCC;
STICKLINE(SH>=0 AND SH<20,0,SH,2,0),COLOR0000AA;
STICKLINE(SH>=20 AND SH<45,0,SH,2,0),COLOR0000FF;
STICKLINE(SH<0,0,SH,2,0),COLOR009900;