为什么限制交易失效，图表上还是多次加仓

800173

variable:nums:=0;

if bpkcond then begin
   sellshort(holding<0,0,thisclose);
   buy(holding=0,lot,thisclose);
   nums:=1;
   end

if spkcond then begin
   sell(holding>0,0,thisclose);
   buyshort(holding=0,lot,thisclose);
   nums:=1;
   end
if  nums<2  then begin
回调加多:buy(多单回调,lot,thisclose);
nums:=2;
end
if  nums<2  then begin
回调加空:sell(空单回调,lot,thisclose);
nums:=2;
end

技术009

如果你这个条件 bpkcond 持续满足的话 你这里就限制不住。因为每次满足时候 都会重置全局变量。

if bpkcond and holding<=0 then begin
   sellshort(holding<0,0,thisclose);
   buy(holding=0,lot,thisclose);
   nums:=1;
   end

800173

技术009 发表于 2023-1-3 08:59
如果你这个条件 bpkcond 持续满足的话 你这里就限制不住。因为每次满足时候 都会重置全局变量。

if bpkc ...

bpkcoond持续满足的话，holding<=0又不可能满足，那怎么办呢？

技术009

这个限制条件 对你if内部的开平无影响。只会限制你全局变量不会被错误重置。你之前那个写法，开仓之后 里面的全局变量 还是会被重置。

800173

技术009 发表于 2023-1-3 09:24
这个限制条件 对你if内部的开平无影响。只会限制你全局变量不会被错误重置。你之前那个写法，开仓之后 里面 ...

那怎么写好呢

技术009

我不是都写出来了？你没看到我加红标记的吗。。

800173

还是不行。。

技术009

你 nums 是不是还有其他重置的语句？你直接贴下代码吧。

800173

技术009 发表于 2023-1-3 11:12
你 nums 是不是还有其他重置的语句？你直接贴下代码吧。

//***********************************//交易系统//***********************************//
variable:nums:=0;

if bpkcond and holding<=0 then begin
   sellshort(holding<0,0,thisclose);
   buy(holding=0,lot,thisclose);
   nums:=1;
   end
   
if spkcond and holding>=0 then begin
   sell(holding>0,0,thisclose);
   buyshort(holding=0,lot,thisclose);
   nums:=1;
   end
////  
多单回调:holding>0 and (底背离 or cross(ma1,c) or cross(0,j)) and enterbars>1;
空单回调:holding<0 and (顶背离 or cross(c,ma1) or cross(j,100)) and enterbars>1;
//多单回调:holding>0 and  cross(0,j);
//空单回调:holding<0 and cross(j,100);
//
if  nums<2  then begin
回调加多:buy(多单回调,lot,thisclose);
nums:=2;
end
if  nums<2  then begin
回调加空:sell(空单回调,lot,thisclose);
nums:=2;
end
//

顶背离止盈卖1/2:sell(holding>0 and 顶背离 ,holding/2,thisclose);
底背离止盈买1/2:sellshort(holding<0 and 底背离  ,holding/2,thisclose);

if   barslast(顶背离)>1 then begin
破ma1清多:sell(holding>0 and c<ma2,0,thisclose);
nums:=0;
end
if     barslast(底背离)>1 then begin
破ma1清空:sellshort(holding<0 and c>ma2 ,0,thisclose);
nums:=0;
end

if  nums>=0 then begin
破ma2清多:sell(holding>0 and c<ma2,0,thisclose);
破ma2清空:sellshort(holding<0 and c>ma2 ,0,thisclose);
nums:=0;
end
//***********************************//资产输出//***********************************//

技术006

[PEL] 复制代码

//***********************************//交易系统//***********************************//
variable:nums:=0;

if bpkcond and holding<=0 then begin
   sellshort(holding<0,0,thisclose);
   buy(holding=0,lot,thisclose);
   nums:=1;
   end
   
if spkcond and holding>=0 then begin
   sell(holding>0,0,thisclose);
   buyshort(holding=0,lot,thisclose);
   nums:=1;
   end
////  
多单回调:holding>0 and (底背离 or cross(ma1,c) or cross(0,j)) and enterbars>1;
空单回调:holding<0 and (顶背离 or cross(c,ma1) or cross(j,100)) and enterbars>1;
//多单回调:holding>0 and  cross(0,j);
//空单回调:holding<0 and cross(j,100);
//
if  nums<2  then begin
回调加多:buy(多单回调,lot,thisclose);
nums:=2;
end
if  nums<2  then begin
回调加空:sell(空单回调,lot,thisclose);
nums:=2;
end
//

顶背离止盈卖1/2:sell(holding>0 and 顶背离 ,holding/2,thisclose);
底背离止盈买1/2:sellshort(holding<0 and 底背离  ,holding/2,thisclose);

//按照之前的写法，只要barslast(顶背离)>1成立，就会修改nums，//但是平仓语句中存在子条件，它不一定同时执行，从而造成之后的再次加仓。（其他几处同理，所以将子条件拆出来放在主干部分）
if   barslast(顶背离)>1 and holding>0 and c<ma2 then begin
破ma1清多:sell(1,0,thisclose);
nums:=0;
end
if  barslast(底背离)>1 and holding<0 and c>ma2  then begin
破ma1清空:sellshort(1,0,thisclose);
nums:=0;
end

if  nums>=0  and holding>0 and c<ma2 then begin
破ma2清多:sell(1,0,thisclose);
nums:=0;
end

if  nums>=0 and holding<0 and c>ma2 then begin
破ma2清空:sellshort(1,0,thisclose);
nums:=0;
end