
等级: 新手上路
- 注册:
- 2025-6-21
- 曾用名:
|
//四、持仓校正(保持市价单)
//(一)剩余时间
RemainSec := REMAININGTIME(0);
//(二)收盘前条件
收盘前10秒 := RemainSec <= 10 AND RemainSec > 0;
//(三)校正逻辑
IF 收盘前10秒 AND CorrectFlag = 0 THEN BEGIN
//1.多头校正
IF HOLDING > 0 AND CLOSE < MA60 THEN BEGIN
//(1)市价平多
SELL(1, HOLDING, MARKETR);
//(2)市价开空
BUYSHORT(1, ShortLots, MARKETR);
//(3)标记已校正
CorrectFlag := 1;
//(4)记录交易
TradeCount := TradeCount + 1;
END;
//2.空头校正
ELSE IF HOLDING < 0 AND CLOSE >= MA60 THEN BEGIN
//(1)市价平空
SELLSHORT(1, -HOLDING, MARKETR);
//(2)市价开多
BUY(1, LongLots, MARKETR);
//(3)标记已校正
CorrectFlag := 1;
//(4)记录交易
TradeCount := TradeCount + 1;
END;
END;
请帮我看下持仓校正有没有逻辑错误或者其他问题,经过多次实盘测试,就是没有执行持仓校正这个模块。 |
|