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


金字塔客服中心 - 专业程序化交易软件提供商 → 金字塔软件 → 策略编写求助区 → 求助后台程式化交易公式编写

   

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

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

主题：求助后台程式化交易公式编写
帅哥哟，离线，有人找我吗？
26327756l
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：黑侠 帖子：676 积分：2548 威望：0 精华：3 注册：2011/4/13 16:18:50 		  发帖心情 Post By：2011/11/10 8:47:21 [显示全部帖子]

仅供参考

input:M(26,5,300,30),N(2,0.1,10,1);

MID :  MA(CLOSE,M);
UPPER: MID + N*STD(CLOSE,M);
LOWER: MID - N*STD(CLOSE,M);
//最新价上穿下轨时（持仓为零）或最新价高于开盘价时（持仓为零）即开多单，
if (cross(c,lower) or c>o) then tbuy(tholding=0,1);
//最新价上穿上轨时（持仓为零）或最新价低于开盘价时（持仓为零）即开空单。
if (cross(c,upper) or c<o) then tbuy(tholding=0,1);
//反手动作：在日内任何时间段，最新价高于或低于开仓价20点时做反手（包括当根K线内做反手）。
if c<TENTERPRICE+20*mindiff then
begin
tsell(holding>0,0);
tbuyshort(holding=0,1);
end

if c>TEXITPRICE+20*mindiff then
begin
tsellshort(holding<0,0);
tbuy(holding=0,1);
end

//清      仓：在14点58分全部平仓。
 if time>145800 then
 begin
 tsell(holding>0,0);
 tsellshort(holding<0,0);
 end

 

[此贴子已经被作者于2011-11-10 9:08:16编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
26327756l
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：黑侠 帖子：676 积分：2548 威望：0 精华：3 注册：2011/4/13 16:18:50 		  发帖心情 Post By：2011/11/10 9:29:24 [显示全部帖子]

修改后


input:M(26,5,300,30),N(2,0.1,10,1);
MID := MA(CLOSE,M);
UPPER: MID + N*STD(CLOSE,M);
LOWER: MID - N*STD(CLOSE,M);
oo:=ref(o,BARSLAST(date<>ref(date,1)));
//最新价上穿下轨时（持仓为零）或最新价高于开盘价时（持仓为零）即开多单，
if (cross(c,lower) or c>oo) then tbuy(tholding=0,1,MKT);
//最新价上穿上轨时（持仓为零）或最新价低于开盘价时（持仓为零）即开空单。
if (cross(c,upper) or c<oo) then tbuy(tholding=0,1,MKT);
//反手动作：在日内任何时间段，最新价高于或低于开仓价20点时做反手（包括当根K线内做反手）。
if c>TENTERPRICE+20*mindiff and THOLDING>0 then
begin
tSELL(1,0,MKT),ORDERQUEUE;
tBUYSHORT(1, 1,MKT),ORDERQUEUE;
end
if c<TENTERPRICE-20*mindiff and THOLDING<0 then
begin
tSELLSHORT(1,0,MKT),ORDERQUEUE;
tBUY(1,1,MKT),ORDERQUEUE;
end


//清      仓：在14点58分全部平仓。
 if CURRENTTIME>145800 then
 begin
 tsell(tholding>0,0,MKT);
 tsellshort(tholding<0,0,MKT);
 end

 

[此贴子已经被作者于2011-11-10 9:36:59编辑过]
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版    Powered By weistock 2012
页面执行时间 0.67188 秒, 6 次数据查询