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


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件公式模型编写问题提交 → 最高点回撤最低点,再上调10跳加仓

   

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


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

主题:最高点回撤最低点,再上调10跳加仓

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


加好友 发短信
等级:超级版主 帖子:14496 积分:0 威望:0 精华:0 注册:2017/7/4 13:40:18
  发帖心情 Post By:2019/2/27 14:03:35    Post IP:180.169.30.6[显示全部帖子]

 试下这样:
max_Locate:HHVBARS(h,len);//最高点距离现在的位置
min_P:hhv(l,max_Locate+1);//最高点位置到现在的最低价
cond:holding>0 and c-min_p>=10*MINDIFF;//最新价比上面最低点回升10个点
if cond then buy(holding>0,10,market);


命数如织,当如磐石。
 回到顶部
帅哥哟,离线,有人找我吗?
FireScript
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:14496 积分:0 威望:0 精华:0 注册:2017/7/4 13:40:18
  发帖心情 Post By:2019/2/28 9:57:31    Post IP:180.169.30.6[显示全部帖子]

 漏掉了。
len:=ENTERBARS+2;


命数如织,当如磐石。
 回到顶部
帅哥哟,离线,有人找我吗?
FireScript
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:14496 积分:0 威望:0 精华:0 注册:2017/7/4 13:40:18
  发帖心情 Post By:2019/2/28 13:08:28    Post IP:180.169.30.6[显示全部帖子]

 if buycond then begin
sellshort(holding<0,HOLDING,MARKETR,(H+L)/2)IGNORECHECKPRICE;
buy(holding=0,手数,LIMITR,(H+L)/2)IGNORECHECKPRICE;
end

if cond and holding>0 then buy(1,1,market);

加仓不要和开仓混淆在一起的。分开写2个语句。


命数如织,当如磐石。
 回到顶部
帅哥哟,离线,有人找我吗?
FireScript
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:14496 积分:0 威望:0 精华:0 注册:2017/7/4 13:40:18
  发帖心情 Post By:2019/3/4 9:07:28    Post IP:180.169.30.6[显示全部帖子]

 cond:holding<0 and c-min_p<=10*MINDIFF

这里应该是小于吧。空头盈利回升不应该是现在价格比之前最低点低10个点么。


命数如织,当如磐石。
 回到顶部
帅哥哟,离线,有人找我吗?
FireScript
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:14496 积分:0 威望:0 精华:0 注册:2017/7/4 13:40:18
  发帖心情 Post By:2019/3/4 13:55:54    Post IP:180.169.30.6[显示全部帖子]

 做了些修正,供参考:
input:p1(5,1,150,1),p2(6,1,300,1),手数(1,1,200,1);
Var1:=(C+L+H)/3;
Var2:=EMA(Var1,p1);
Var3:=EMA(Var2,p2);
Var4:=eMA(Var3,12);
Var5:=eMA(Var4,5);
生命线:=eMA(Var3,2),COLORRED,POINTDOT;


DRAWICON((C-5)>生命线,生命线,10);
DRAWICON((C+5)<生命线,生命线,11);

 //交易条件:
sellcond:=(C+5)<生命线;
buycond:=(C-5)>生命线;
//交易系统


if buycond then begin
sellshort(holding<0,HOLDING,MARKETR,(H+L)/2)IGNORECHECKPRICE;
buy(holding=0,手数,LIMITR,(H+L)/2)IGNORECHECKPRICE;
end

if sellcond then
begin
sell(holding>0,HOLDING,MARKETR,(H+L)/2)IGNORECHECKPRICE;
buyshort(holding=0,手数,LIMITR,(H+L)/2)IGNORECHECKPRICE;
end

len:BARSLAST(sellcond and ref(holding>=0,1))+1;//初次开空仓距离现在的位置
max_Locate:LLVBARS(l,len)+1;//最高盈利点距离现在的位置
min_P:hhv(l,max_Locate);//最高盈利点位置到当前位置之间的盈利最低点
cond:holding>=-5 and c-min_p<20*MINDIFF and c-ENTERPRICE<0;//最新价比上面最低点回升20个点,且当前是盈利

加仓:BUYSHORT(holding>-5 and cond,1,market);


命数如织,当如磐石。
 回到顶部