改模型谢谢 - 公式模型编写问题提交 - 金字塔客服中心 - 专业程序化交易软件提供商

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

金字塔客服中心 - 专业程序化交易软件提供商 → 金字塔软件 → 公式模型编写问题提交 → 改模型谢谢

共有3397人关注过本帖树形打印复制链接主题：改模型谢谢

期货一生

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：新手上路帖子：5 积分：0 威望：0 精华：0 注册：2017/7/5 15:34:57

改模型谢谢

Post By：2017/7/13 22:11:23 Post IP：125.127.183.122[只看该作者]

CC:=(C+L+O+H)/4;
MA1:MA(CC,N1);
MA2:MA(CC,N2);
MA3:=MA(CC,N3);
MA4:=MA(CC,N4);

BB1:=MA1>REF(MA1,1)&&MA2>REF(MA2,1)&&MA3>REF(MA3,1)&&MA4>REF(MA4,1);
SS1:=MA1<REF(MA1,1)&&MA2<REF(MA2,1)&&MA3<REF(MA3,1)&&MA4<REF(MA4,1);
C>REF(H,1)&&BB1,BPK;
C<REF(L,1)&&SS1,SPK;

BKPRICE-CLOSE>=REF(MA(C,30),1)*0.0382&&BKPRICE>0&&BKVOL>0,SP;
CLOSE-SKPRICE>=REF(MA(C,30),1)*0.0382&&SKPRICE>0&&SKVOL>0,BP;
AUTOFILTER;
TRADE_OTHER('AUTO');自动换主力合约
CLOSEKLINE(2,45);//每根K线提前45秒
SETALLSIGPRICETYPE(TRACING_ORDER);//该模型中所有信号根据连续追价的设置进行委托
SETMOVEOPIPRICE(TRACING_ORDER);

wenarm

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：管理员帖子：26631 积分：0 威望：0 精华：7 注册：2015/4/9 14:59:07

Post By：2017/7/14 9:21:01 Post IP：180.169.30.6[只看该作者]

正在处理

编程无捷径，技巧靠积累。

wenarm

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：管理员帖子：26631 积分：0 威望：0 精华：7 注册：2015/4/9 14:59:07

Post By：2017/7/14 9:28:15 Post IP：180.169.30.6[只看该作者]

CC:=(C+L+O+H)/4;
MA1:MA(CC,N1);
MA2:MA(CC,N2);
MA3:=MA(CC,N3);
MA4:=MA(CC,N4);

BB1:=MA1>REF(MA1,1)andMA2>REF(MA2,1)andMA3>REF(MA3,1)andMA4>REF(MA4,1);
SS1:=MA1<REF(MA1,1)andMA2<REF(MA2,1)andMA3<REF(MA3,1)andMA4<REF(MA4,1);

if C>REF(H,1) and BB1 and HOLDING<=0 then begin
SELLSHORT(1,1,MARKET);
buy(1,1,MARKET);
end

if C<REF(L,1)and SS1 and HOLDING>=0 then begin
sell(1,1,MARKET);
BUYVOL(1,1,MARKET);

end

if ENTERPRICE-CLOSE>=REF(MA(C,30),1)*0.0382 and ENTERPRICE>0andBKVOL>0 and HOLDING<0 then sell(1,1,MARKET);
if CLOSE-EXITPRICE>=REF(MA(C,30),1)*0.0382 and EXITPRICE>0andSKVOL>0 and HOLDING>0 then SELLSHORT(1,1,MARKET);

//TRADE_OTHER('AUTO');自动换主力合约这个目前没有相关函数。需要使用后台通过算法实现。（正在考虑具体方式）

下面2句话可以通过专业版的设置功能完成。
CLOSEKLINE(2,45);//每根K线提前45秒
SETALLSIGPRICETYPE(TRACING_ORDER);//该模型中所有信号根据连续追价的设置进行委托

SETMOVEOPIPRICE(TRACING_ORDER);//这个目前没有相关函数。需要使用后台通过算法实现。（正在考虑具体方式）

编程无捷径，技巧靠积累。

期货一生

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：新手上路帖子：5 积分：0 威望：0 精华：0 注册：2017/7/5 15:34:57

Post By：2017/7/14 9:42:12 Post IP：125.127.189.223[只看该作者]

无法通过

pyd

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：8439 积分：0 威望：0 精华：0 注册：2014/7/14 13:43:36

Post By：2017/7/14 9:54:11 Post IP：180.169.30.6[只看该作者]

CC:=(C+L+O+H)/4;
MA1:MA(CC,N1);
MA2:MA(CC,N2);
MA3:=MA(CC,N3);
MA4:=MA(CC,N4);

BB1:=MA1>REF(MA1,1) AND MA2>REF(MA2,1) AND MA3>REF(MA3,1)AND MA4>REF(MA4,1);
SS1:=MA1<REF(MA1,1) AND MA2<REF(MA2,1) AND MA3<REF(MA3,1)AND MA4<REF(MA4,1);

ABB:=(TIME0-TIMETOT0(DYNAINFO(207))<=45) OR NOT(ISLASTBAR);
IF ABB AND C>REF(H,1) AND BB1 AND HOLDING<=0 THEN BEGIN
SELLSHORT(1,1,MARKET);
BUY(1,1,MARKET);
END

IF ABB AND C<REF(L,1)AND SS1 AND HOLDING>=0 THEN BEGIN
SELL(1,1,MARKET);
BUYSHORT(1,1,MARKET);

END

IF ABB AND ENTERPRICE-CLOSE>=REF(MA(C,30),1)*0.0382 AND ENTERPRICE>0 AND HOLDING>0 THEN SELL(1,1,MARKET);
IF ABB AND CLOSE-EXITPRICE>=REF(MA(C,30),1)*0.0382 AND EXITPRICE>0 AND HOLDING<0 THEN SELLSHORT(1,1,MARKET);

[此贴子已经被作者于2017/7/14 9:54:45编辑过]