
等级: 专业版
- 注册:
- 2021-5-20
- 曾用名:
- a103165
|

楼主 |
发表于 2022-9-18 00:17
|
显示全部楼层
请问将上述循环统计修改为统计多、空持仓的平均排序名次,这样修改的代码正确吗?谢谢
zh3:='13434047950';
TH:=THOLDCOUNT(ZH3);
多手:=0;
空手:=0;
多名次:=0;
空名次:=0;
TEMP_STR:='';//保存品种代码集合
FOR I=1 TO TH do
BEGIN
HLABEL:= THOLDINDEXLABEL(I,ZH3);
//判断当前代码集合中是否已经存在,不存在则进行统计。存在则不进入统计模块
if STRFIND( TEMP_STR, ','&HLABEL,1 )=0 then begin
//将不在代码集合中的品种添加到代码集合中。
TEMP_STR:=STRCAT( TEMP_STR, ','&HLABEL );
IF TBUYHOLDINGEX(ZH3,HLABEL,1)>0 THEN BEGIN
多手:=多手+ TBUYHOLDINGEX(ZH3,HLABEL,1);
多名次:=多名次+ TBUYHOLDINGEX(ZH3,HLABEL,1)*SELFDATALABEL('DATA1',HLABEL);
END
IF TSELLHOLDINGEX(ZH3,HLABEL,1)>0 THEN BEGIN
空手:=空手+TSELLHOLDINGEX(ZH3,HLABEL,1);
空名次:=空名次+ TSELLHOLDINGEX(ZH3,HLABEL,1)*SELFDATALABEL('DATA2',HLABEL);
END
end
end
a:多手;
b:空手;
平均名次多:多名次/多手;
平均名次空:空名次/空手; |
|