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


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件公式模型编写问题提交 → [求助]转换EasyLanguage语言指标

   

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


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

主题:[求助]转换EasyLanguage语言指标

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


加好友 发短信
等级:新手上路 帖子:2 积分:81 威望:0 精华:0 注册:2009/11/24 20:34:25
[求助]转换EasyLanguage语言指标  发帖心情 Post By:2010/2/24 18:08:46    Post IP:123.116.137.153[只看该作者]

金字塔的各位老大。希望能鼎力帮助一下菜鸟转换一个EasyLanguage语言的指标作为日后学习对照的模板,先叩谢了!

 

Inputs:   Price((H+L)/2),

       N(16);

       {N must be an even number}

                    

Vars:      count(0),

       N1(0),

       N2(0),

       N3(0),

       HH(0),

       LL(0),

       Dimen(0),

       alpha(0),

       Filt(0);


N3 = (Highest(High, N) - Lowest(Low, N)) / N;

HH = High;

LL = Low;

For count = 0 to N / 2 - 1 begin

       If High[count] > HH then HH = High[count];

       If Low[count] < LL then LL = Low[count];

End;

N1 = (HH - LL) / (N / 2);


 

HH = High[N / 2];

LL = Low[N / 2];

For count = N/2 to N - 1 begin

       If High[count] > HH then HH = High[count];

       If Low[count] < LL then LL = Low[count];

End;

N2 = (HH - LL) / (N / 2);


 

If N1 > 0 and  N2 > 0 and N3 > 0 then Dimen = (Log(N1 + N2) - Log(N3)) / Log(2);


 

alpha = ExpValue(-4.6*(Dimen - 1));

If alpha < 0.01 then alpha = 0.01;

If alpha > 1 then alpha = 1;


 

Filt = alpha*Price + (1 - alpha)*Filt[1];

If CurrentBar < N + 1 then Filt = Price;


 

Plot1(Filt);


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


加好友 发短信
等级:新手上路 帖子:2 积分:81 威望:0 精华:0 注册:2009/11/24 20:34:25
  发帖心情 Post By:2010/2/24 18:44:49    Post IP:123.116.137.153[只看该作者]

再贴个简单的模型源码,请帮助转换。谢过了!

Inputs: Length(16),
PH( ( ( (H+L+C) / 3) * 2) - L),
PL( ( ( (H+L+C) / 3) * 2) - H);
{-------- Long Entry --------}
Buy Next Bar at Highest(PH,Length) + 1 Point Stop;
{-------- Short Entry --------}
Sell Next Bar at Lowest(PL,Length) - 1 Point Stop


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


加好友 发短信
等级:管理员 帖子:7302 积分:32559 威望:1000 精华:45 注册:2003/12/30 16:34:32
  发帖心情 Post By:2010/2/24 19:59:28    Post IP:125.34.165.32[只看该作者]

请在置顶帖子里学习金字塔的公式教程,自己尝试转换,转换中有什么问题可以到这里来求助,而不是指望金字塔来全部帮你完成工作

 回到顶部