以文本方式查看主题 - 金字塔客服中心 - 专业程序化交易软件提供商 (http://weistock.com/bbs/index.asp) -- 公式模型编写问题提交 (http://weistock.com/bbs/list.asp?boardid=4) ---- 求高手改寫這TB指标成金字塔指标, 謝谢 (http://weistock.com/bbs/dispbbs.asp?boardid=4&id=67412) |
||||
-- 作者:annbi -- 发布时间:2014/7/15 15:33:12 -- 求高手改寫這TB指标成金字塔指标, 謝谢 Params Numeric SF(5); Numeric RSI_Period(14); Numeric rat(4.236); Vars NumericSeries TrLevelSlow(0); NumericSeries AtrRsi(0); NumericSeries MaAtrRsi(0); NumericSeries Rsi(0); NumericSeries RsiMa(0); Numeric Wilders_Period(0); Numeric dar(0); NumericSeries smin(0); NumericSeries smax(0); NumericSeries p; Begin Wilders_Period=RSI_Period * 2 - 1; If(BarStatus==0) { TrLevelSlow=0; AtrRsi=0; MaAtrRsi=0; Rsi=0; RsiMa=0; p=0; } if(CurrentBar>RSI_Period) { Rsi=iRSI(Close,RSI_Period); RsiMa=XAverage(Rsi,SF); AtrRsi=Abs(RsiMa[1] - RsiMa); MaAtrRsi=XAverage(AtrRsi, dar=XAverage(MaAtrRsi,Wilders_ smax=RsiMa+dar; smin=RsiMa-dar; p=p[1]; if (RsiMa>smax[1]) {p=1; } if (RsiMa<smin[1]) {p=-1;} if(p>0) { if(smin<smin[1]) smin=smin[1]; TrLevelSlow=smin; if(TrLevelSlow<TrLevelSlow[1]) TrLevelSlow=TrLevelSlow[1]; } Else { if(smax>smax[1]) smax=smax[1]; TrLevelSlow=smax; if(TrLevelSlow>TrLevelSlow[1]) TrLevelSlow=TrLevelSlow[1]; } PlotNumeric("RsiMa",RsiMa); PlotNumeric("TrLevelSlow", } End |
||||
-- 作者:jinzhe -- 发布时间:2014/7/15 15:40:15 -- 注释一下,说明一下是干什么用的,思路是什么 |
||||
-- 作者:annbi -- 发布时间:2014/7/15 16:46:05 -- 是rsi変種, 是老外常用的指标被人改了TB版, 我不懂太多, 只知這TB版已是简化了很多了 思路可看(非TB版)http://www.cxh99.com/2012/05/15/848.shtml, 那人寫到一半而已(以上TB版是完整一個指标)
|
||||
-- 作者:jinzhe -- 发布时间:2014/7/15 16:54:05 -- 这个用户解释不了代码,我们也无能为力 |
||||
-- 作者:annbi -- 发布时间:2014/7/15 16:58:14 -- 也可參考老外原裝说明
[此贴子已经被作者于2014/7/15 17:00:05编辑过]
|
||||
-- 作者:jinzhe -- 发布时间:2014/7/15 17:03:40 -- 请用户找人翻译下 |
||||
-- 作者:annbi -- 发布时间:2014/7/15 17:25:03 -- 遲些上傳 |
||||
-- 作者:annbi -- 发布时间:2014/7/15 23:32:31 -- http://www.cxh99.com/2012/05/15/848.shtml 其實裡面已寫得很清楚了又中文化了, 求高手完成他未能完成的部份, 便可利益大家, 谢谢 |
||||
-- 作者:jinzhe -- 发布时间:2014/7/16 9:18:26 -- 如果你实在是想要代码但又不会自己总结翻译的话,我们也没办法帮你 |
||||
-- 作者:RogarZ -- 发布时间:2014/7/16 13:30:36 -- 你的TB代码 缺少用户函数 IRSI 无法转译 |