以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://222.73.7.161/bbs/index.asp)
--  金字塔软件问题提交  (http://222.73.7.161/bbs/list.asp?boardid=2)
----  [注意]平今对锁  (http://222.73.7.161/bbs/dispbbs.asp?boardid=2&id=148387)
--  作者：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);
--  作者：shq
--  发布时间：2017/3/1 10:43:08
--  
关于对平仓对锁的建议，我们团队内部会详细讨论下该建议的情况，感谢对金字塔的支持。
--  作者：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编辑过]
--  作者：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
--  作者：netfox
--  发布时间：2017/3/1 14:00:28
--  
图片点击可在新窗口打开查看 楼主好啊，现在日内还有盼头？ 自从手续费提高成目前日内就给交易所打工了。。。已经苦逼的一塌糊涂了。
--  作者：qwer123
--  发布时间：2017/3/1 15:13:08
--  
你好，netfox,股指期货没有交易了，现在交易螺纹钢，还行，感觉螺纹钢好交易一些。
--  作者：netfox
--  发布时间：2017/3/1 15:15:31
--  
以下是引用qwer123在2017-3-1 15:13:08的发言：
你好，netfox,股指期货没有交易了，现在交易螺纹钢，还行，感觉螺纹钢好交易一些。

螺纹苦逼手续费也高了。。。 不算手续费我还有70块1次算上手续费。。。 汗了，简直给交易所打工了。

 HC跳的太快，进出点位不好 。。。   感觉黑色系自从手续费调高后一直苦逼。

 

可怜我还努力好久才从趋势择时跳到的日内 -__-