持仓同步

103897

请老师在下面的持仓同步策略中增加一个条件：
持有多单或空单，现价和实际持仓（不是图表持仓——因为会有账户存在持仓而信号消失的情况）成本比较，亏损的时候才允许执行同步，盈利状态不执行

//策略理论持仓
ho1:stkindiex(stklabel,'BOLL布林带交易系统.ho',0,1,0,500);
//上一根k线的理论持仓
before_ho1:stkindiex(stklabel,'BOLL布林带交易系统.ho',0,1,-1,500);
//账户多头持仓
tbuyho:tbuyholdingex('',STKLABEL,1);
//账户空头持仓
tsellho:tsellholdingex('',STKLABEL,1);
//是否有未成交单,返回1表示有未成交
is_order:TGLOBALSUBMITEX(0,'',stklabel,0);

//如果当前品种有挂单或者理论策略的当根k理论持仓有变化，就不执行
if is_order or (ho1<>before_ho1) then exit;
else
BEGIN
        //多头部分                       
        if ho1>=0 and tsellho>0 then tsellshort(1,tsellho,mkt);
        //理论持仓大于0，补仓
        if ho1>0 and ho1>tbuyho then
        BEGIN
                tbuy(1,ho1-tbuyho,mkt);
        END
        //理论持仓大于0，减仓
        if ho1>0 and ho1<tbuyho then
        BEGIN
                tsell(1,tbuyho-ho1,mkt);
        END

        //空头部分
        if ho1<=0 and tbuyho>0 then tsell(1,tbuyho,mkt);
        //理论持仓小于0，补仓
        if ho1<0 and abs(ho1)>tsellho then
        BEGIN
                tbuyshort(1,abs(ho1)-tsellho,mkt);
        END
        //理论持仓小于0，减仓
        if ho1<0 and abs(ho1)<tsellho then
        BEGIN
                tsellshort(1,tsellho-abs(ho1),mkt);
        END                        
END

技术008

//策略理论持仓
ho1:stkindiex(stklabel,'BOLL布林带交易系统.ho',0,1,0,500);
//上一根k线的理论持仓
before_ho1:stkindiex(stklabel,'BOLL布林带交易系统.ho',0,1,-1,500);
//账户多头持仓
tbuyho:tbuyholdingex('',STKLABEL,1);
//账户空头持仓
tsellho:tsellholdingex('',STKLABEL,1);
//是否有未成交单,返回1表示有未成交
is_order:TGLOBALSUBMITEX(0,'',stklabel,0);

//如果当前品种有挂单或者理论策略的当根k理论持仓有变化，就不执行
if is_order or (ho1<>before_ho1) then exit;
else
BEGIN
        //多头部分                       
        if ho1>=0 and tsellho>0 then tsellshort(1,tsellho,mkt);
        //理论持仓大于0，补仓
        if ho1>0 and ho1>tbuyho then
        BEGIN
                tbuy(TOPENPROFITEX('','',1,0)<0,ho1-tbuyho,mkt);
        END
        //理论持仓大于0，减仓
        if ho1>0 and ho1<tbuyho then
        BEGIN
                tsell(TOPENPROFITEX('','',1,0)<0,tbuyho-ho1,mkt);
        END

        //空头部分
        if ho1<=0 and tbuyho>0 then tsell(1,tbuyho,mkt);
        //理论持仓小于0，补仓
        if ho1<0 and abs(ho1)>tsellho then
        BEGIN
                tbuyshort(TOPENPROFITEX('','',2,0)<0,abs(ho1)-tsellho,mkt);
        END
        //理论持仓小于0，减仓
        if ho1<0 and abs(ho1)<tsellho then
        BEGIN
                tsellshort(TOPENPROFITEX('','',2,0)<0,tsellho-abs(ho1),mkt);
        END                        
END

103897

技术008 发表于 2024-6-12 16:03
//策略理论持仓
ho1:stkindiex(stklabel,'BOLL布林带交易系统.ho',0,1,0,500);
//上一根k线的理论持仓

TOPENPROFITEX——显示未定义？

技术008

这个要最新版才有，点帮助升级检测，或者官网直接下载最新安装包覆盖安装

103897

技术008 发表于 2024-6-12 16:18
这个要最新版才有，点帮助升级检测，或者官网直接下载最新安装包覆盖安装

最新安装包覆盖安装——麻烦给个链接 谢谢

技术008

https://www.weistock.com/load.html