共7 条记录, 每页显示 10 条, 页签:
[1]
[浏览完整版]
标题：[注意]平今对锁
1楼
qwer123 发表于：2017/3/1 10:24:53平今对锁功能用了几天，总的说不错，但有一点不好。
现在我账户情况是这样的（图片无法上传，各种浏览器都不行）
今持 总持
RB1705 28
RB1705 -63 -63
RB1705 -70
RB1705 133 133
这个是实盘账户的持仓情况，看了很乱，并且实际持仓28手但保证金要100多万。
所以建议开仓时先平掉老仓。比如开-63手单子的时候，可以先平掉28手，在开-35手。
只前我是自己写的程序，做对锁交易，源码如下：
//不平日内开仓,且控制日内开仓不超过10手。
r1:=todaybar-1;
tn:=1;//每次交易手数，要和主程序的一致
r4:=stkindiex('if00','htcs.持仓(1)',0,22,20,0),linethick0;//
//r5:=stkindiex('iF00','qq24.持仓(1)',0,21,3,0),linethick0;//
r6:=r4,linethick0;
rr:=r6-ref(r6,1),noaxis;
k1:=tbuyholding(0)=0;
k2:=tsellholding(0)=0;
r10:=tbuyholding(1);
r11:=abs(tsellholding(1));
//********************
GLOBALVARIABLE:a1=0;
if r1=0 then
begin
a1:=0;
end
nn1:=10;
//********************
if rr>0 and k2 then
begin
if r11>=rr then
begin
tsellshort(1,rr,lmt,c);
end
if r11<rr and r11>0 then
begin
tsellshort(1,r11,lmt,c);
tbuy(1,rr-r11,lmt,c);
a1:=a1+rr-r11;
end
if r11=0 then
begin
tbuy(1,rr,lmt,c);
a1:=a1+rr;
end
end
if rr<0 and k1 then
begin
if r10>=abs(rr) then
begin
tsell(1,abs(rr),lmt,c);
end
if r10<abs(rr) and r10>0 then
begin
tsell(1,r10,lmt,c);
tbuyshort(1,abs(rr)-r10,lmt,c);
a1:=a1+abs(rr)-r10;
end
if r10=0 then
begin
tbuyshort(1,abs(rr),lmt,c);
a1:=a1+abs(rr);
end
end
//************************
if rr>0 and not(k2) and a1<=nn1-rr then
begin
tbuy(1,rr,lmt,c);
a1:=a1+rr;
end
if rr>0 and not(k2) and a1>nn1-rr and a1<nn1 then
begin
r13:=nn1-a1;
tbuy(1,r13,lmt,c);
a1:=nn1;
end
//---------------------------
if rr<0 and not(k1) and a1<=nn1-abs(rr) then
begin
tbuyshort(1,abs(rr),lmt,c);
a1:=a1+abs(rr);
end
if rr<0 and not(k1) and a1>nn1-abs(rr) and a1<nn1 then
begin
r14:=nn1-a1;
tbuyshort(1,r14,lmt,c);
a1:=nn1;
end
//-----------a1=nn1 时第3种处理方法-------------
if a1=nn1 and rr=0 and r10<>r11 then
begin
if r10>r11 then
begin
tsell(1,r10-r11,lmt,c);
end
if r10<r11 then
begin
tsellshort(1,r11-r10,lmt,c);
end
end
//第二天同步，
r15:=tholding;
if rr=0 and k1 and k2 and r6<>r15 then
begin
if r15>r6 then
begin
tsell(1,r15-r6,lmt,c);
end
if r15<r6 then
begin
tsellshort(1,r6-r15,lmt,c);
end
end
//---------------------------
DEBUGOUT('日交易次数IF.....%.0f',a1);
DEBUGOUT('理论持仓IF.......%.0f',r6);
DEBUGOUT('实际持仓IF.......%.0f',tholding);
2楼
shq 发表于：2017/3/1 10:43:08关于对平仓对锁的建议，我们团队内部会详细讨论下该建议的情况，感谢对金字塔的支持。
3楼
qwer123 发表于：2017/3/1 10:46:48//不平日内开仓,且控制日内开仓不超过10手。
r1:=todaybar-1;
tn:=1;//每次交易手数，要和主程序的一致
r4:=stkindiex('if00','htcs.持仓(1)',0,22,20,0),linethick0;//
//r5:=stkindiex('iF00','qq24.持仓(1)',0,21,3,0),linethick0;//
r6:=r4,linethick0;
rr:=r6-ref(r6,1),noaxis;
k1:=tbuyholding(0)=0;
k2:=tsellholding(0)=0;
r10:=tbuyholding(1);
r11:=abs(tsellholding(1));
//********************
GLOBALVARIABLE:a1=0;
if r1=0 then
begin
a1:=0;
end
nn1:=10;
//********************
if rr>0 and k2 then
begin
if r11>=rr then
begin
tsellshort(1,rr,lmt,c);
end
if r11<rr and r11>0 then
begin
tsellshort(1,r11,lmt,c);
tbuy(1,rr-r11,lmt,c);
a1:=a1+rr-r11;
end
if r11=0 then
begin
tbuy(1,rr,lmt,c);
a1:=a1+rr;
end
end
if rr<0 and k1 then
begin
if r10>=abs(rr) then
begin
tsell(1,abs(rr),lmt,c);
end
if r10<abs(rr) and r10>0 then
begin
tsell(1,r10,lmt,c);
tbuyshort(1,abs(rr)-r10,lmt,c);
a1:=a1+abs(rr)-r10;
end
if r10=0 then
begin
tbuyshort(1,abs(rr),lmt,c);
a1:=a1+abs(rr);
end
end
[此贴子已经被作者于2017-3-1 10:47:23编辑过]
4楼
qwer123 发表于：2017/3/1 10:46:59//************************
if rr>0 and not(k2) and a1<=nn1-rr then
begin
tbuy(1,rr,lmt,c);
a1:=a1+rr;
end
if rr>0 and not(k2) and a1>nn1-rr and a1<nn1 then
begin
r13:=nn1-a1;
tbuy(1,r13,lmt,c);
a1:=nn1;
end
//---------------------------
if rr<0 and not(k1) and a1<=nn1-abs(rr) then
begin
tbuyshort(1,abs(rr),lmt,c);
a1:=a1+abs(rr);
end
if rr<0 and not(k1) and a1>nn1-abs(rr) and a1<nn1 then
begin
r14:=nn1-a1;
tbuyshort(1,r14,lmt,c);
a1:=nn1;
end
//-----------a1=nn1 时第3种处理方法-------------
if a1=nn1 and rr=0 and r10<>r11 then
begin
if r10>r11 then
begin
tsell(1,r10-r11,lmt,c);
end
if r10<r11 then
begin
tsellshort(1,r11-r10,lmt,c);
end
end
//第二天同步，
r15:=tholding;
if rr=0 and k1 and k2 and r6<>r15 then
begin
if r15>r6 then
begin
tsell(1,r15-r6,lmt,c);
end
if r15<r6 then
begin
tsellshort(1,r6-r15,lmt,c);
end
end
//---------------------------
DEBUGOUT('日交易次数IF.....%.0f',a1);
DEBUGOUT('理论持仓IF.......%.0f',r6);
DEBUGOUT('实际持仓IF.......%.0f',thold
5楼
netfox 发表于：2017/3/1 14:00:28
楼主好啊，现在日内还有盼头？ 自从手续费提高成目前日内就给交易所打工了。。。已经苦逼的一塌糊涂了。
6楼
qwer123 发表于：2017/3/1 15:13:08你好，netfox,股指期货没有交易了，现在交易螺纹钢，还行，感觉螺纹钢好交易一些。
7楼
netfox 发表于：2017/3/1 15:15:31以下是引用qwer123在2017-3-1 15:13:08的发言：
你好，netfox,股指期货没有交易了，现在交易螺纹钢，还行，感觉螺纹钢好交易一些。
你好，netfox,股指期货没有交易了，现在交易螺纹钢，还行，感觉螺纹钢好交易一些。
螺纹苦逼手续费也高了。。。 不算手续费我还有70块1次算上手续费。。。 汗了，简直给交易所打工了。
HC跳的太快，进出点位不好 。。。 感觉黑色系自从手续费调高后一直苦逼。
可怜我还努力好久才从趋势择时跳到的日内 -__-
共7 条记录, 每页显示 10 条, 页签:
[1]