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


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件公式模型编写问题提交 → 以上是TB版的卡夫曼自适应均线求翻译成金字塔版本 谢谢!

   

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


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

主题:以上是TB版的卡夫曼自适应均线求翻译成金字塔版本 谢谢!

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


加好友 发短信
等级:新手上路 帖子:26 积分:155 威望:0 精华:0 注册:2013/2/27 13:54:47
以上是TB版的卡夫曼自适应均线求翻译成金字塔版本 谢谢!  发帖心情 Post By:2013/2/27 13:59:35    Post IP:117.136.10.195[只看该作者]

Params

Numeric EffRatioLength(10);
Numeric FastAvgLength(2);
Numeric SlowAvgLength(30);
Vars
Numeric NetChg(0);
Numeric TotChg(0);
Numeric EffRatio(0);
Numeric ScaledSFSqr(0);
NumericSeries AMAValue;
Numeric SFDiff;
Begin
if(CurrentBar == 0)//当前第一根K线金子塔barpos
{
AMAValue = close;
}Else//从第二根K线开始计算
{
NetChg = Abs( close - close[EffRatioLength] );当前收盘价与前十根K线的收盘价之差的绝对值
TotChg = Summation( Abs( Price - Price[1] ), EffRatioLength ); 前十个周期的前后收盘价之差的绝对值之和
EffRatio = IIF(TotChg > 0, NetChg / TotChg, 0);
SFDiff = 2 / ( FastAvgLength + 1 ) - 2 / ( SlowAvgLength + 1 );
ScaledSFSqr = Sqr( 2 / ( SlowAvgLength + 1 ) + EffRatio * SFDiff );sqr是求平方
AMAValue = AMAValue[1] + ScaledSFSqr * ( Price - AMAValue[1] );
}
End
//[]指的是回溯周期数
以上是TB版的卡夫曼自适应均线求翻译成金字塔版本
谢谢!


查看使用道具详细信息
获赠金币帖,共获得 0 个金币
 回到顶部
帅哥哟,离线,有人找我吗?
jinzhe
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

上面那一串是用来干什么的?


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

客户服务部

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

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

赠送楼主:0个金币
 回到顶部
帅哥哟,离线,有人找我吗?
qjj3344
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:26 积分:155 威望:0 精华:0 注册:2013/2/27 13:54:47
  发帖心情 Post By:2013/2/27 14:15:10    Post IP:117.136.10.195[只看该作者]

定义参数变量

赠送楼主:0个金币
 回到顶部
帅哥哟,离线,有人找我吗?
qjj3344
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:26 积分:155 威望:0 精华:0 注册:2013/2/27 13:54:47
  发帖心情 Post By:2013/2/27 14:16:57    Post IP:117.136.10.195[只看该作者]

Params下的是常量
var 是变量
Numeric是简单的数值变量
NumericSeries序列变量类似全局变量

赠送楼主:0个金币
 回到顶部
帅哥哟,离线,有人找我吗?
qjj3344
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:26 积分:155 威望:0 精华:0 注册:2013/2/27 13:54:47
  发帖心情 Post By:2013/2/27 14:59:05    Post IP:117.136.10.195[只看该作者]

比较急,求大侠帮助啊!!!!

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


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

n:=10;
n2:=2;
n3:=30;
cn:=ref(c,n);
s1:=sum(abs(close-ref(close,1)),n);
variable:amavalue=0;
a1:=ref(amavalue,1);
if barpos=1 then amavalue:=close;

else then begin
 netchg:=abs(c-cn);
 totchg:=s1;
 effratio:=if(totchg>0,netchg,0);
 sfdiff:=2/(n2+1)-2/(n3+1);
 scaledsfsqr:=SQRT(2/(n3+1)+effratio*sfdiff);
 amavalue:=a1+scaledsfsqr*(close-a1);
end



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

客户服务部

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

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

赠送楼主:0个金币
 回到顶部
帅哥哟,离线,有人找我吗?
qjj3344
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:26 积分:155 威望:0 精华:0 注册:2013/2/27 13:54:47
  发帖心情 Post By:2013/2/27 15:16:56    Post IP:117.136.10.195[只看该作者]

你好,这个均线值 amavalue 没啊?

赠送楼主:0个金币
 回到顶部
帅哥哟,离线,有人找我吗?
qjj3344
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:26 积分:155 威望:0 精华:0 注册:2013/2/27 13:54:47
  发帖心情 Post By:2013/2/27 15:30:03    Post IP:117.136.10.195[只看该作者]

这个均线值 amavalue不存在。。。

赠送楼主:0个金币
 回到顶部
帅哥哟,离线,有人找我吗?
jinzhe
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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



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

客户服务部

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

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

赠送楼主:0个金币
 回到顶部