请问如何取当前账户持仓品种有多少个品种是开多的，有多少个开空的

105057

如题

做投资组合，请问如何取当前账户持仓品种有多少个品种是开多的，有多少个开空的？ Tholdcount函数好像只可以取全部品种，不分开多开空

资深技术02

//只在最后周期有效，防止逐K线模式前面K线刷新进入，可以提高效率。对序列模式不影响。

IF NOT(ISLASTBAR) THEN
EXIT;

N:=0;
K:=0;
//取得当前活动账户的总持仓品种数量

HC:=THOLDCOUNT('');
//MSGOUT(1,NUMTOSTR(HC,0));
//循环取得持仓
FOR I = 1 TO HC do
BEGIN
//获取第I个序号的账户持仓品种代码
HLABEL:= THOLDINDEXLABEL(I,'');
if tbuyholdingex('','',1)>0 then D:=D+1;
if tsellholdingex('','',1)>0 then K:=K+1;
end

d和k就是对应多和空的数量