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


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

   

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


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

主题:老师好

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


加好友 发短信
等级:超级版主 帖子:21598 积分:0 威望:0 精华:1 注册:2010/7/31 16:35:30
  发帖心情 Post By:2016/3/15 15:02:44    Post IP:58.246.57.26[显示全部帖子]

variable:n1=0;
maa:=ma(c,100);
mab:=ma(c,300);
kd:=maa>mab;
jc:=c-maa;

 

//开仓部分

if jc<20 and jc>0 and kd THEN
buy(holding<=5,5,marketr);

 

if jc>20 and jc<30  and kd then
buy(holding<=2,2,marketr);

 

if holding=2 and jc<15 and jc>0  and kd then
buy(holding<=3,1,marketr);

 

//止损
if c<min(maa,mab)-20  THEN
止损:sell(1,holding,marketr);

 

//当有5手持仓时候,价格大于均价40点平一手

if holding=5 and c>AVGENTERPRICE+40 then
sell(1,1,marketr);

 

if holding=4 and c>AVGENTERPRICE+80 then
begin
sell(1,1,marketr);
n1:=1;
end

 

if c<min(maa,mab) and n1=1 then
begin
sell(1,holding,marketr);
end

if n1=1 and c<hhv(c,ENTERBARS)-50 then
begin
buy(holding<=5,1,marketr);
n1:=2;
end

if n1=2 and c<hhv(c,ENTERBARS)-50 then
BEGIN
buy(holding<=5,1,marketr);
n1:=0;
end

 


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


加好友 发短信
等级:超级版主 帖子:21598 积分:0 威望:0 精华:1 注册:2010/7/31 16:35:30
  发帖心情 Post By:2016/3/15 21:34:14    Post IP:122.225.69.54[显示全部帖子]

//我这边几个地方都加有注释,用户能对比注释和代码如有不有可以详细说明下。

//5手持仓只要在开仓部分用holding<5做控制即可

variable:n1=0;
maa:=ma(c,100);
mab:=ma(c,300);
kd:=maa>mab;
jc:=c-maa;

 

//开仓部分

if jc<20 and jc>0 and kd THEN
buy(holding<5,5,marketr);

 

if jc>20 and jc<30  and kd then
buy(holding<=2,2,marketr);

 

if holding=2 and jc<15 and jc>0  and kd then
buy(holding<=3,1,marketr);

 

//止损
if c<min(maa,mab)-20  THEN
止损:sell(1,holding,marketr);

 

//当有5手持仓时候,价格大于开仓价40点平一手
if holding=5 and c>ENTERPRICE+40 then
sell(1,1,marketr);
//当有4手持仓时候,价格大于开仓价80点平一手
if holding=4 and c>enterprice+80 then
begin
sell(1,1,marketr);
n1:=1;
end

if c<min(maa,mab) and n1=1 then
begin
sell(1,holding,marketr);
end

if n1=1 and c<hhv(c,ENTERBARS)-50 then
begin
buy(holding<5,1,marketr);
n1:=2;
end

if n1=2 and c<hhv(c,ENTERBARS)-50 then
BEGIN
buy(holding<5,1,marketr);
n1:=0;
end

 

 

 

[此贴子已经被作者于2016/3/15 21:34:41编辑过]

 回到顶部