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


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

   

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


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

主题:请教代码编写

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


加好友 发短信
等级:金字塔养老院 帖子:1323 积分:6764 威望:0 精华:0 注册:2011/6/14 17:27:11
  发帖心情 Post By:2013/3/25 10:20:06    Post IP:58.246.57.26[显示全部帖子]

公式A
MA5:=MA(C,5);
MA10:=MA(C,10);

公式B
开仓时间:=time>=092000 and time<=144500;
结束时间:=time=151200;
zs:=10;
A1:=STKINDI('','A.MA5',0,4,-1);
A2:=STKINDI('','A.MA10',0,4,-1);
A3:=STKINDI('','MACD.DIFF',0,4,-1);
A4:=STKINDI('','MACD.DEA',0,4,-1);
A5:=CALLSTOCK(STKLABEL,VTCLOSE,4,-1);

IF A1>A2 AND A3>A4 AND A5>A2 AND REF(CLOSE,1)>REF(BBI,1)  AND  HIGH>REF(HHV(HIGH,2),1) and 开仓时间
THEN BEGIN
BUY(1,1,MARKET);
END

IF A1<A2 AND A3<A4 AND A5<A2 AND REF(CLOSE,1)<REF(BBI,1) AND HIGH<REF(HHV(HIGH,2),1) AND 开仓时间
THEN BEGIN
BUYSHORT(1,1,MARKET);
END

IF 结束时间 then begin
sell(1,0,market);
sellshort(1,0,market);
end

仅供参考




金字塔—专业程序化交易量化投资平台

客户服务部

-----------------------------------------------------------

欢迎您参加我公司的技术培训,具体培训需求请发邮件到service@weistock.com

您的宝贵建议或者投诉,请发往邮箱:weiwei@weistock.com
 回到顶部
帅哥哟,离线,有人找我吗?
just
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:金字塔养老院 帖子:1323 积分:6764 威望:0 精华:0 注册:2011/6/14 17:27:11
  发帖心情 Post By:2013/3/25 10:23:58    Post IP:58.246.57.26[显示全部帖子]


公式A
MA5:=MA(C,5);
MA10:=MA(C,10);

公式B
开仓时间:=time>=092000 and time<=144500;
结束时间:=time=151200;
zs:=10;
A1:=STKINDI('','A.MA5',0,4,-1);
A2:=STKINDI('','A.MA10',0,4,-1);
A3:=STKINDI('','MACD.DIFF',0,4,-1);
A4:=STKINDI('','MACD.DEA',0,4,-1);
A5:=CALLSTOCK(STKLABEL,VTCLOSE,4,-1);

if enterprice-close>10 and holding>0 then begin
多止损:sell(1,holding,market);
end

if close-enterprice>10 and holding<0 then begin
空止损:sellshort(1,holding,market);
end

IF A1>A2 AND A3>A4 AND A5>A2 AND REF(CLOSE,1)>REF(BBI,1)  AND  HIGH>REF(HHV(HIGH,2),1) and 开仓时间
THEN BEGIN
BUY(1,1,MARKET);
END

IF A1<A2 AND A3<A4 AND A5<A2 AND REF(CLOSE,1)<REF(BBI,1) AND HIGH<REF(HHV(HIGH,2),1) AND 开仓时间
THEN BEGIN
BUYSHORT(1,1,MARKET);
END

IF 结束时间 then begin
sell(1,0,market);
sellshort(1,0,market);
end

仅供参考





金字塔—专业程序化交易量化投资平台

客户服务部

-----------------------------------------------------------

欢迎您参加我公司的技术培训,具体培训需求请发邮件到service@weistock.com

您的宝贵建议或者投诉,请发往邮箱:weiwei@weistock.com
 回到顶部