共14 条记录, 每页显示 10 条, 页签: [1] [2]

标题：求高手改寫這TB指标成金字塔指标, 謝谢

1楼

annbi 发表于：2014/7/15 15:33:12

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,Wilders_Period);
dar=XAverage(MaAtrRsi,Wilders_Period) * rat;
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",TrLevelSlow);
}

End

2楼

jinzhe 发表于：2014/7/15 15:40:15

注释一下，说明一下是干什么用的，思路是什么

3楼

annbi 发表于：2014/7/15 16:46:05

是rsi変種, 是老外常用的指标被人改了TB版, 我不懂太多, 只知這TB版已是简化了很多了

思路可看(非TB版)http://www.cxh99.com/2012/05/15/848.shtml, 那人寫到一半而已(以上TB版是完整一個指标)

4楼

jinzhe 发表于：2014/7/15 16:54:05

这个用户解释不了代码，我们也无能为力

5楼

annbi 发表于：2014/7/15 16:58:14

也可參考老外原裝说明

下载信息 [文件大小：下载次数： ]
点击浏览该文件:qqe.doc

[此贴子已经被作者于2014/7/15 17:00:05编辑过]

6楼

jinzhe 发表于：2014/7/15 17:03:40

请用户找人翻译下

7楼

annbi 发表于：2014/7/15 17:25:03

遲些上傳

8楼

annbi 发表于：2014/7/15 23:32:31

http://www.cxh99.com/2012/05/15/848.shtml 其實裡面已寫得很清楚了又中文化了, 求高手完成他未能完成的部份, 便可利益大家, 谢谢

9楼

jinzhe 发表于：2014/7/16 9:18:26

如果你实在是想要代码但又不会自己总结翻译的话，我们也没办法帮你

10楼

RogarZ 发表于：2014/7/16 13:30:36

你的TB代码缺少用户函数 IRSI 无法转译

共14 条记录, 每页显示 10 条, 页签: [1] [2]