
等级: 标准版
- 注册:
- 2023-2-16
- 曾用名:
|

楼主 |
发表于 2025-8-22 08:35
|
显示全部楼层
n:=taccountcount;
variable:平多仓位[n]=0;
variable:平多信号[n]=0;
variable:开多信号[n]=0;
variable:账号[n]=0;
variable:holdingvar2[n]=0;
for i=1 to n do
begin
id:=taccountindex(i);
账号[i]:=taccountindex(i);
总仓位:=TACCOUNT2( 28,id)/TACCOUNT2( 6,id);
dtss:=TBUYHOLDINGEX(id,'',2);
holdingvar2[i]:=dtss;
holdingvar0:=dtss=0;
holdingvarp0:=dtss>0;
holdingvard0:=dtss<0;
holdingvar:=dtss;
xdssd1:=Intpart(TACCOUNT2(6,id)*kcss/close/100)*100;//下单手数
xdssd:=if(xdssd1>0,xdssd1,100);
开多仓位[i]:=xdssd;
pccwd:=if(pd7_4 or pd9 or timepd or kptyzs or pd10 or pd7_5 or pd7_3,holdingvar,
(if(pd19 or pd25 or pd26 ,holdingvar*0.5,
holdingvar*0.5)));
pccwd:=if(pccwd>=holdingvar,holdingvar, Intpart(pccwd/100)*100);//下单手数
//把id传入taccount2( , ) 读取指定的账户 字段值,这里暂时取总的权益,建议根据实际情况自行调整需要读取的值
平多仓位[i]:=pccwd;
dtbzj:=c*holdingvar;
dtbl:=dtbzj/TACCOUNT2( 6,id);
jcgttj:=dtbl>0.01 ;
//PDOBV1:= pd7_4 or pd9 or pd19 or pd25 or pd26 or pd10 or pd23 or pd7_3 or pd7_5 or kptyzs;
pdcwtj:=if(pd7_4 or pd9 or timepd or kptyzs or pd10 or pd7_5 or pd7_3 or pd26 or pd24,holdingvarp0,
(if(pd19 ,(jcgttj or pd19zyjg>=ycxdjg423) and holdingvarp0,
(if(pd23 ,(jcgttj ) and holdingvarp0,
(if(pd25 ,(jcgttj ) and holdingvarp0,
holdingvarp0)))))));
平多信号[i]:=平多信号1 and pdcwtj;
zcwtj:=if(isauto=1,总仓位<=zcw/100,1);
开多信号[i]:=开多信号1 and holdingvar0 and zcwtj;
end |
|