欢迎使用金字塔普通技术服务论坛,您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴,普通区问题处理速度慢,请耐心等待。谢谢您对我们的支持与理解。


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件公式模型编写问题提交 → [求助] 加不了仓,怎么回事

   

欢迎使用金字塔普通技术服务论坛,您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴,普通区问题处理速度慢,请耐心等待。谢谢您对我们的支持与理解。    


  共有6877人关注过本帖平板打印复制链接

主题:[求助] 加不了仓,怎么回事

帅哥哟,离线,有人找我吗?
xiaosa2003
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游民 帖子:117 积分:0 威望:0 精华:0 注册:2014/12/24 22:05:20
  发帖心情 Post By:2014/12/30 15:08:55    Post IP:14.19.143.155[只看该作者]

INPUT: N(20,1,100,1),M(30,1,100,1),X(2,1,100,0.1),Y(0.5,0.1,100,0.1);
//中间变量;
20h :ref (HHV(H,N),1);
20l :ref (LLV(L,n),1);
10h:ref(hhv(h,M),1);
10l:ref(llv(l,m),1);
ATR:="ATR.ATR";
//仓位
A:=ceiling(atr*x)*10;
p: =if(FLOOR (ASSET*0.02/A)=0,1,FLOOR (ASSET*0.02/A));
//做多条件;
KD:=h>20h and holding=0;
//加多条件;
JD:=h>=ENTERPRICE+ATR*y and HOLDING>0;
//止多条件;
if jd<4 then
begin
ZD1:=l<=ENTERPRICE-atr*x and holding>0;
end;
if jd>=4 then
begin
ZD2:=l<10l and 10l>ENTERPRICE-atr*x and HOLDING>0;
end;
//做空条件;
KK:=l<20l and HOLDING=0;
//加空条件;
jk:=l<=ENTERPRICE-atr*y AND HOLDING<0;
//止空条件;
if jk<4 then
begin
zk1:=h>=enterprice+atr*x and holding<0;
end;
if jk>=4 then
begin
zk2:=h>10h and 10h<enterprice+atr*x and holding<0;
end;
if barpos>21 then begin
buy(KD,p,limitr, 20h+MINDIFF);//开多;
if ZD<4,then
begin
buy(jd,p,LIMITR,ENTERPRICE+atr*x);//加多
end;
if zd1 then
BEGIN
sell(ZD1,0,LIMITR,ENTERPRICE-atr*x);//止多
end;
if zd2 then
begin
sell(zd2,0 LIMITR,10l-MINDIFF);
end;
BUYSHORT(kk,p ,limitr ,20l-MINDIFF);//开空
if jk<4 then
begin
BUYSHORT(jk,p,LIMITR,ENTERPRICE-atr*x);//加空
end;
if zk1 then
begin
sellshort(zk1,0,limitr,ENTERPRICE+atr*x);//止空
end;
if zk2 then
begin
SELLSHORT(zk2 0,limitr,10h+MINDIFF);
end;
end;

持仓:holding,linethick0;
资产:asset,noaxis;
可用现金:cash(0),linethick0;
帮我看看哪里不对,测试不通过,说我没有加冒号,我找不到哪错了

 回到顶部
总数 57 1 2 3 4 5 6 下一页