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


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

   

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


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

主题:程序代码编写

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


加好友 发短信
等级:论坛游民 帖子:225 积分:0 威望:0 精华:0 注册:2016/8/9 10:55:14
程序代码编写  发帖心情 Post By:2016/8/16 10:36:46    Post IP:218.106.146.122[只看该作者]

当出现连续两根上涨阳线时,且两根阳线中某一根阳线的收盘价减去开盘价大于参数A,且两根阳线的上影线B(B为参数)小于参数A,且两根K线的成交量大于参数C,则在第三根K线开盘时开多单,止损设置在两根K线的最低价,止盈设置为开仓价加某参数D。

请版主帮忙写一下,有什么不足之处请版主指出。谢谢。

 回到顶部
帅哥哟,离线,有人找我吗?
jinzhe
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:罗宾汉 帖子:46311 积分:50819 威望:0 精华:2 注册:2011/3/23 8:50:25
  发帖心情 Post By:2016/8/16 10:43:55    Post IP:180.169.30.6[只看该作者]

a:=5;
b:=10;
cc:=15;
d:=15;
if ref(all(c>o,2) and c>ref(c,1) and any(c-o,2)>a  and all(h-c<b,2) and all(vol>cc,2),1) then buy(holding=0,1,market);
if L<ref(ref(llv(l,2),1),enterbars) then sell(1,0,market);
if c>enterprice+d then sell(1,0,market);



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

客户服务部

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

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

 回到顶部
帅哥哟,离线,有人找我吗?
shisudaoren
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游民 帖子:225 积分:0 威望:0 精华:0 注册:2016/8/9 10:55:14
  发帖心情 Post By:2016/8/16 10:59:00    Post IP:218.106.146.122[只看该作者]

请楼主在代码旁边注释一下,本人比较愚笨,最好用的话注释一下,非常感谢版主。

 回到顶部
帅哥哟,离线,有人找我吗?
jinzhe
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:罗宾汉 帖子:46311 积分:50819 威望:0 精华:2 注册:2011/3/23 8:50:25
  发帖心情 Post By:2016/8/16 11:11:41    Post IP:180.169.30.6[只看该作者]

当出现连续两根上涨阳线时,且两根阳线中某一根阳线的收盘价减去开盘价大于参数A,且两根阳线的上影线B(B为参数)小于参数A,且两根K线的成交量大于参数C,则在第三根K线开盘时开多单,

ref(all(c>o,2) and c>ref(c,1) and any(c-o,2)>a  and all(h-c<b,2) and all(vol>cc,2),1)

 

all(c>o,2) 连续两根阳线 c>ref(c,1)上涨了 any(c-o,2)>a某一根阳线的收盘价减去开盘价大于参数A  all(h-c<b,2)这里不能什么参数b和参数a,上影线是能算出来的,所以当作上影线小于参数b了  all(vol>cc,2)且两根K线的成交量大于参数C 

最外面的ref(,1)用来实现满足前面的条件后在第三根k线开仓

[此贴子已经被作者于2016-8-16 11:12:03编辑过]


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

客户服务部

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

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

 回到顶部
帅哥哟,离线,有人找我吗?
shisudaoren
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游民 帖子:225 积分:0 威望:0 精华:0 注册:2016/8/9 10:55:14
  发帖心情 Post By:2016/8/16 11:17:09    Post IP:218.106.146.122[只看该作者]

a:=5;
b:=10;
cc:=15;
d:=15;
这些是你已经假设的参数是吗?

 回到顶部
帅哥哟,离线,有人找我吗?
jinzhe
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:罗宾汉 帖子:46311 积分:50819 威望:0 精华:2 注册:2011/3/23 8:50:25
  发帖心情 Post By:2016/8/16 11:19:33    Post IP:116.231.251.172[只看该作者]

是的,不然编译不过


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

客户服务部

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

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

 回到顶部
帅哥哟,离线,有人找我吗?
shisudaoren
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游民 帖子:225 积分:0 威望:0 精华:0 注册:2016/8/9 10:55:14
  发帖心情 Post By:2016/8/16 11:32:03    Post IP:218.106.146.122[只看该作者]

当出现连续两根下跌阴线线时,且两根阴线中某一根阴线的开盘价减去收盘价大于参数A,且两根阳线的下影线小于参数A,且两根K线的成交量大于参数C,则在第三根K线开盘时开空单,止损设置在两根K线的最最高价,止盈设置为开仓价加某参数D。
以上是出现阴线的情况,可以把这两种程序一起写出来吗?请版主把这两种程序一起写出来,然后加上注解。非常感谢版主。


 回到顶部
帅哥哟,离线,有人找我吗?
jinzhe
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:罗宾汉 帖子:46311 积分:50819 威望:0 精华:2 注册:2011/3/23 8:50:25
  发帖心情 Post By:2016/8/16 12:55:41    Post IP:180.169.30.6[只看该作者]

按照上面的代码请用户自行翻转


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

客户服务部

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

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

 回到顶部
帅哥哟,离线,有人找我吗?
shisudaoren
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游民 帖子:225 积分:0 威望:0 精华:0 注册:2016/8/9 10:55:14
  发帖心情 Post By:2016/8/16 14:08:48    Post IP:218.106.146.122[只看该作者]

a:=5;
b:=10;
cc:=15;
d:=15;
if ref(all(c>o,2) and c>ref(c,1) and any(c-o,2)>a  and all(h-c<b,2) and all(vol>cc,2),1) then buy(holding=0,1,market);
if L<ref(ref(llv(l,2),1),enterbars) then sell(1,0,market);
if c>enterprice+d then sell(1,0,market);

f ref(all(c<o,2) and c<ref(c,1) and any(o-c,2)>a  and all(c-l<b,2) and all(vol>cc,2),1) then sell(holding=0,1,market);
if h>ref(ref(llv(h,2),1),enterbars) then buy(1,0,market);
if c<enterprice+d then buy(1,0,market);

请版主检查一下是否有错误,谢谢。



 回到顶部
帅哥哟,离线,有人找我吗?
jinzhe
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:罗宾汉 帖子:46311 积分:50819 威望:0 精华:2 注册:2011/3/23 8:50:25
  发帖心情 Post By:2016/8/16 14:32:04    Post IP:180.169.30.6[只看该作者]

 if ref(all(c<o,2) and c<ref(c,1) and any(o-c,2)>a  and all(c-l<b,2) and all(vol>cc,2),1) then buyshort(holding=0,1,market);
if h>ref(ref(hhv(h,2),1),enterbars) then sellshort(1,0,market);
if c>enterprice+d then short(1,0,market);


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

客户服务部

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

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

 回到顶部
总数 94 1 2 3 4 5 6 7 8 9 10 下一页