开仓平仓写法

tfrskzj

老师，帮忙写一下如下开平仓，程序加载在5分钟周期上。

开仓：A>30 买开  B>30 卖开  如果同根K线上A和B都满足条件那么取大的那个值执行开仓。

平仓：如果持有多单，那么满足B>30平多开空；如果持有空单，那么满足A>30平空开多。

每根K线只要满足条件都要执行开平仓指令。

如果前面有持仓，在每段最后一根K线（就是2300，1130，1500这三根K线）全部平仓。

技术008

// 参数设置
INPUT:A_THRESHOLD(30,1,100,1);  // A指标阈值
INPUT:B_THRESHOLD(30,1,100,1);  // B指标阈值

// 判断是否为收盘K线（2300、1130、1500）
IS_CLOSE_K := TIME = 230000 OR TIME = 113000 OR TIME = 150000;

// 开仓信号
BUY_SIGNAL := A > A_THRESHOLD;
SELL_SIGNAL := B > B_THRESHOLD;

// 同根K线同时满足时的处理
IF BUY_SIGNAL AND SELL_SIGNAL THEN BEGIN
    IF A > B THEN BEGIN
        BUY_SIGNAL := 1;
        SELL_SIGNAL := 0;
    END ELSE BEGIN
        BUY_SIGNAL := 0;
        SELL_SIGNAL := 1;
    END;
END;

// 交易执行逻辑
// 强制平仓
IF IS_CLOSE_K AND HOLDING > 0 THEN BEGIN
    SELL(1, HOLDING, MARKET);
END;
IF IS_CLOSE_K AND HOLDING < 0 THEN BEGIN
    SELLSHORT(1, HOLDING, MARKET);
END;

// 正常开平仓逻辑
IF HOLDING = 0 THEN BEGIN
    // 无持仓时开仓
    IF BUY_SIGNAL THEN BEGIN
        BUY(1, 1, MARKET);
    END;
    IF SELL_SIGNAL THEN BEGIN
        BUYSHORT(1, 1, MARKET);
    END;
END ELSE IF HOLDING > 0 THEN BEGIN
    // 持有多单时平多开空
    IF SELL_SIGNAL THEN BEGIN
        SELL(1, HOLDING, MARKET);
        BUYSHORT(1, 1, MARKET);
    END;
END ELSE IF HOLDING < 0 THEN BEGIN
    // 持有空单时平空开多
    IF BUY_SIGNAL THEN BEGIN
        SELLSHORT(1, HOLDING, MARKET);
        BUY(1, 1, MARKET);
    END;
END;