后台程序化

技术010

需要看下交易日志，看是哪里触发的平仓动作呢。按理如果对篮子手动开仓，那也只会有开仓动作啊，不会触发成平仓啊。

曲全福

请问老师，后台程序化开的单子，我手动平仓，马上，后台又重开了单子，应如何避免后台再开单子

曲全福

代码如前

曲全福

如何能让后台像图表那样，只认第一个信号，忽略其它信号

技术010

后台是监控实际账户持仓的啊，你手动平了仓，那tholding就为0了，又满足了开仓条件，自然就开仓了。你人为干预持仓，是对策略运行有影响的啊。

曲全福

我有一些平仓条件无法量化，老师，可以在代码上实现上面的需求吗

技术010

那你是什么需求呢？是要即使手动平完仓位，也不要再开仓，等触发了策略的平仓条件后，才可以再次开仓？

曲全福

是的

曲全福

下面是代码


ss:=intpart(20000/(c*multiplier*taccount(41)));

a10:=jdma20>0.62 and jdupper>0 and jdma5>1 and h>upper and (c-ref(c,1))/ref(c,1)*100>=0.08 and (h-ref(c,1))/ref(c,1)*100>=0.12;

a21:=jdma20<=0 and jdma5<=0;
a22:=c<ref(l,tenterbars+1) and l<ma5;

tbuy(a10 and tbuyholding(1)=0 ,ss ,mkt);
if c<tenterprice then tsell(a22 ,tbuyholding(1) ,mkt);
if c<tenterprice then tsell(a21 ,tbuyholding(1) ,mkt);
if c>tenterprice then tsell(a21 ,tbuyholding(1) ,mkt);

b10:=jdma20<-0.62 and jdlower<-0 and jdma5<-1 and l<lower and (ref(c,1)-c)/c*100>=0.08 and (ref(c,1)-c)/c*100>=0.12 ;
b21:=jdma20>=0 and jdma5>=0;
b22:=c>ref(h,tenterbars+1) and h>ma5;

tbuyshort(b10 and tsellholding(1)=0 ,ss ,mkt);
if c>tenterprice then tsellshort(b22 ,tsellholding(1) ,mkt);
if c>tenterprice then tsellshort(b21 ,tsellholding(1) ,mkt);
if c<tenterprice then tsellshort(b21 ,tsellholding(1) ,mkt);

技术010

那就不要用tholding来作为开仓条件的判断了，可以使用全局变量来控制，参考如下结构，例如：
globalvariable:kg=0;

ss:=intpart(20000/(c*multiplier*taccount(41)));

a10:=jdma20>0.62 and jdupper>0 and jdma5>1 and h>upper and (c-ref(c,1))/ref(c,1)*100>=0.08 and (h-ref(c,1))/ref(c,1)*100>=0.12;

a21:=jdma20<=0 and jdma5<=0;
a22:=c<ref(l,tenterbars+1) and l<ma5;

if a10 and kg=0 then begin
  tbuy(1 ,ss ,mkt);  kg:=1;
  end

if c<tenterprice then begin
   tsell(a22 ,tbuyholding(1) ,mkt);
   kg:=0;
   end
   
if c<tenterprice then begin
   tsell(a21 ,tbuyholding(1) ,mkt);
   kg:=0;
   end
   
if c>tenterprice then begin
   tsell(a21 ,tbuyholding(1) ,mkt);
   kg:=0;
   end

b10:=jdma20<-0.62 and jdlower<-0 and jdma5<-1 and l<lower and (ref(c,1)-c)/c*100>=0.08 and (ref(c,1)-c)/c*100>=0.12 ;
b21:=jdma20>=0 and jdma5>=0;
b22:=c>ref(h,tenterbars+1) and h>ma5;

if b10 and kg=0 then begin
   tbuyshort(1 ,ss ,mkt);
   kg:=1;
   end

if c>tenterprice then begin
   tsellshort(b22 ,tsellholding(1) ,mkt);
   kg:=0;
   end
   
if c>tenterprice then begin
   tsellshort(b21 ,tsellholding(1) ,mkt);
   kg:=0;
   end
   
if c<tenterprice then begin
   tsellshort(b21 ,tsellholding(1) ,mkt);
   kg:=0;
   end