等级: 免费版
- 注册:
- 2021-6-6
- 曾用名:
|

楼主 |
发表于 2021-7-21 13:40
|
显示全部楼层
我自己写的一段代码如下,不知道有无bug啊 有无更好的的代码啊
//**************************日K线结束前5秒执行开平仓*****************************
T1:=timetot0(150000)-timetot0(dynainfo(207));
abb:=(T1<=5 AND T1>=0) OR NOT(ISLASTBAR);
IF NOT(abb) THEN GOTO Skip1;
//仓位--平仓
IF CC1>0 AND PDTJ THEN BEGIN
平多:SELL(CC1>0,CC1,THISCLOSE);
CC1:=0;CP1:=0;
END
IF CC1<0 AND PKTJ THEN BEGIN
平空:SELLSHORT(CC1<0,ABS(CC1),THISCLOSE);
CC1:=0;CP1:=0;
END
//仓位--开仓
IF CC1=0 AND KDTJ THEN BEGIN
开多:BUY(CC1=0,TN,THISCLOSE);
CC1:=TN;CP1:=C;
END
IF CC1=0 AND KKTJ THEN BEGIN
开空:BUYSHORT(CC1=0,TN,THISCLOSE);
CC1:=-TN;CP1:=C;
END
skip1@ ;
资产:ASSET,NOAXIS,COLORMAGENTA,PRECISION0; |
|