盈利限制加仓

a103923

股票后台
盈利（TAVGENTERPRICEEX2 ）20%只加仓1次。
再盈利30%也只加仓1次。
怎么写呢，多谢~

技术006

基本结构如下，使用全局变量控制实现

[PEL] 复制代码

GLOBALVARIABLE:FLAG=0;

IF 开仓条件 and FLAG=0 and TBUYHOLDING(1)=0 then BEGIN
        buy();
        FLAG:=1;
END
JJ:=TAVGENTERPRICEEX2('',STKLABEL,0);

//首次加仓
if (CLOSE-JJ)/JJ>=0.2 and (CLOSE-JJ)/JJ<0.3 and FLAG=1 then  BEGIN
        buy();
        FLAG:=2;
END

//二次加仓
if (CLOSE-JJ)/JJ>=0.3 and  FLAG=2  BEGIN
        buy();
        FLAG:=3;
END

a103923

技术006 发表于 2021-12-7 10:08
基本结构如下，使用全局变量控制实现[mw_shl_code=pel,true]GLOBALVARIABLE:FLAG=0;

IF 开仓条件 and FL ...

平仓后要重置为0吗？

技术006

要的，否者全局变量就没法在开仓了。

a103923

盈利（TAVGENTERPRICEEX2 ）20%只加仓1次。仍不受控制，当天只要达到20%就多次开仓，必需控制只加仓1次才行。

a103923

技术006 发表于 2021-12-7 10:08
基本结构如下，使用全局变量控制实现[mw_shl_code=pel,true]GLOBALVARIABLE:FLAG=0;

IF 开仓条件 and FL ...

这个问题没解决，多谢~

技术009

有点问题。

范例里面
这2个地方 加上持仓的判断
//首次加仓
if (CLOSE-JJ)/JJ>=0.2 and (CLOSE-JJ)/JJ<0.3 and FLAG=1 and TBUYHOLDINGEX('','',1)>0 then  BEGIN
        tbuy();
        FLAG:=2;
END

//二次加仓
if (CLOSE-JJ)/JJ>=0.3 and  FLAG=2 and TBUYHOLDINGEX('','',1)>0  BEGIN
        tbuy();
        FLAG:=3;
END

a103923

技术009 发表于 2021-12-13 10:46
有点问题。

范例里面

还是没有控制，一下子买了5万，应该是买1万的。

技术009

是连续触发多个下单？还是单笔下成这样的。
把你本地运行的下单部分代码贴下。

a103923

技术009 发表于 2021-12-14 10:24
是连续触发多个下单？还是单笔下成这样的。
把你本地运行的下单部分代码贴下。

没输出信号，不知道是不是连续触发，有时股票能控制，就是只要比较火的就不受控制的买入
代码这样的
Byk:=DYNAINFO(7)/TAVGENTERPRICEEX2(ZH1,'',0);
    IF byk>1.20 and byk<1.3 and FLAG=1 and EXTGBDATA('CT2_'+S2)<=0 and TBUYHOLDINGEX(ZH1,'',1)>100 then begin
TBUY(kd3 and cd  AND TTOTALDAYTRADE<1  AND TISREMAINEX(1,ZH1,STKLABEL)<1,S2,MKT,CLOSE,1,ZH1,'');
    FLAG:=2;
end

补充内容 (2021-12-14 10:38):
没有用DEBUGFILE输出