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


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

   

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

  共有2859人关注过本帖树形打印复制链接

主题：请老师帮忙
帅哥哟，离线，有人找我吗？
yongle476
 小大  11楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：81 积分：159 威望：0 精华：0 注册：2010/6/30 2:39:46 		  发帖心情 Post By：2018/3/1 14:13:33    Post IP：182.242.8.230[只看该作者]

SS:=20;
SML:=ma(c,13);
Var4:=(4*C+H+L+O*2)/8;
M1:=MA(Var4,2);
KD:=OPENMINUTES(TIME)=2 AND M1>SML;//开多条件
KK:=OPENMINUTES(TIME)=2 AND M1<SML;//开空条件
PK:=CROSS(m1,sml) OR KD;//平空开多条件
PD:=CROSS(sml,m1) OR KK;//平多开空条件
if (PK) then 
begin
SELLSHORT((HOLDING<=0),HOLDING,MARKET);
if time<185600 then
BUY((HOLDING<=0),SS,MARKET);
end
if (PD) then 
begin
SELL((HOLDING>=0),HOLDING,MARKET);
if time<185600 then
BUYSHORT((HOLDING=0),SS,MARKET);
end
begin
end
if time>=185800 then BEGIN
  收盘平多:sell(1,0,market)；
  收盘平空:sellshort(1,0,market);
end
持仓:HOLDING,COLORMAGENTA,LINETHICK0;
 回到顶部
帅哥哟，离线，有人找我吗？
yongle476
 小大  12楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：81 积分：159 威望：0 精华：0 注册：2010/6/30 2:39:46 		  发帖心情 Post By：2018/3/1 14:14:40    Post IP：182.242.8.230[只看该作者]

老师，麻烦把平空的也给我加上，谢啦

 回到顶部
帅哥哟，离线，有人找我吗？
yongle476
 小大  13楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：81 积分：159 威望：0 精华：0 注册：2010/6/30 2:39:46 		  发帖心情 Post By：2018/3/1 14:37:59    Post IP：182.242.8.230[只看该作者]

怎么刚才贴上去的完整代码不见了？
 回到顶部
帅哥哟，离线，有人找我吗？
yongle476
 小大  14楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：81 积分：159 威望：0 精华：0 注册：2010/6/30 2:39:46 		  发帖心情 Post By：2018/3/1 14:44:39    Post IP：182.242.8.230[只看该作者]

SS:=20;
SML:=ma(c,13);
Var4:=(4*C+H+L+O*2)/8;
M1:=MA(Var4,2);
KD:=OPENMINUTES(TIME)=2 AND M1>SML;//开多条件
KK:=OPENMINUTES(TIME)=2 AND M1<SML;//开空条件
PK:=CROSS(m1,sml) OR KD;//平空开多条件
PD:=CROSS(sml,m1) OR KK;//平多开空条件
if (PK) then 
begin
SELLSHORT((HOLDING<=0),HOLDING,MARKET);
if time<185600 then
BUY((HOLDING<=0),SS,MARKET);
end
if (PD) then 
begin
SELL((HOLDING>=0),HOLDING,MARKET);
if time<185600 then
BUYSHORT((HOLDING=0),SS,MARKET);
end
begin
end
if time>=185800 then BEGIN
  收盘平多:sell(1,0,market)；
  收盘平空:sellshort(1,0,market);
end
持仓:HOLDING,COLORMAGENTA,LINETHICK0;


麻烦老师把平空一半的也给我加进去，谢谢
 回到顶部
帅哥哟，离线，有人找我吗？
FireScript
 小大  15楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：14496 积分：0 威望：0 精华：0 注册：2017/7/4 13:40:18 		  发帖心情 Post By：2018/3/1 16:51:58    Post IP：180.169.30.6[只看该作者]

SS:=20;
SML:=ma(c,13);
Var4:=(4*C+H+L+O*2)/8;
M1:=MA(Var4,2);
KD:=OPENMINUTES(TIME)=2 AND M1>SML;//开多条件
KK:=OPENMINUTES(TIME)=2 AND M1<SML;//开空条件
PK:=CROSS(m1,sml) OR KD;//平空开多条件
PD:=CROSS(sml,m1) OR KK;//平多开空条件

if (PK) then
begin
SELLSHORT((HOLDING<=0),HOLDING,MARKET);
if time<185600 then
BUY((HOLDING<=0),SS,MARKET);
end

T1:c-ENTERPRICE>20*MINDIFF and (EXITBARS>=ENTERBARS or EXITBARS=-1);
if c-ENTERPRICE>20*MINDIFF and (EXITBARS>=ENTERBARS or EXITBARS=-1)  then begin
多仓减半:sell(holding>0,holding/2,market);
end
if (PD) then
begin
SELL((HOLDING>=0),HOLDING,MARKET);
if time<185600 then
BUYSHORT((HOLDING=0),SS,MARKET);
end

T2:ENTERPRICE-c>20*MINDIFF and  (EXITBARS>=ENTERBARS or EXITBARS=-1),NODRAW;
if ENTERPRICE-c>20*MINDIFF and (EXITBARS>=ENTERBARS or EXITBARS=-1)  then begin
空仓减半:sellshort(holding<0,holding/2,market);
end


if time>=185800 then BEGIN
  收盘平多:sell(1,0,market)；
  收盘平空:sellshort(1,0,market);
end
持仓:HOLDING,COLORMAGENTA,LINETHICK0;

 

可以了你试下。我试了应该是OK的。

命数如织，当如磐石。
 回到顶部
帅哥哟，离线，有人找我吗？
yongle476
 小大  16楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：81 积分：159 威望：0 精华：0 注册：2010/6/30 2:39:46 		  发帖心情 Post By：2018/3/1 23:15:44    Post IP：112.112.121.214[只看该作者]

非常满意，十分感谢FireScript老师的辛勤付出，祝老师在新的一年，吉星高照，四季来财，万事如意，再次谢谢！

 回到顶部
总数 16 上一页 1 2
RSS2.0 | Xhtml无图版 | Xslt无图版    Powered By weistock 2012
页面执行时间 0.06201 秒, 6 次数据查询