论坛 › 系统交易 › TB自带ZIGZAG，求注释变量

karle1983 发表于 2013-9-15 10:46:06

TB自带ZIGZAG，求注释变量

有好心人帮忙注释下ZIGZAG的代码吗？
Vars       
        NumericSeries SwingPrice;
        Numeric SwingHighPrice;
        Numeric SwingLowPrice;
        NumericSeries PreBar(0);
        NumericSeries UpDn(0);
        Bool SaveSwing(False);
        Bool NewTL(False);
        Bool UpdateTL(False);
begin
注释下变量

wfwf1977 发表于 2016-7-29 23:28:23

//------------------------------------------------------------------------
// 简称: ZigZag
// 名称: 之字转向
// 类别: 公式应用
// 类型: 内建应用
//------------------------------------------------------------------------

Params
        Numeric RetracePct(2);
Vars       
        NumericSeries SwingPrice;
        Numeric SwingHighPrice;
        Numeric SwingLowPrice;
        NumericSeries PreBar(0);
        NumericSeries UpDn(0);
        Bool SaveSwing(False);
        Bool NewTL(False);
        Bool UpdateTL(False);
begin
        If(CurrentBar == 0)
                SwingPrice = Close;
       
        SwingHighPrice = SwingHigh( 1, h, 1, 2); //求波峰点
        SwingLowPrice = SwingLow  ( 1, l, 1, 2 );//求波谷点j
         
         
        If (SwingHighPrice <> -1)  //波峰点<>-1
        {
                If(UpDn <=0 && SwingHighPrice >= SwingPrice +RetracePct*AvgTrueRange(60))  //如果方向还是向下，且涨得比较急
                {
                        UpDn = 1; //修改方向为向上
                        NewTL = True;  //新的zz
                        SaveSwing = True;  //保存什么
                }Else If(UpDn == 1 && SwingHighPrice >= SwingPrice)   //如果方向向上，且涨得比较急
                {
                        UpdateTL = True; //更新zz
                        SaveSwing = True;//保存什么
                }

                If(SaveSwing)   //保存
                {
                        SwingPrice = SwingHighPrice; //拐点向上的值
                        PreBar = CurrentBar;//当前Bar的索引值。
                }
        }
        Else If(SwingLowPrice <> -1)  //波谷点<>-1
        {
                If(UpDn >=0 && SwingLowPrice <=SwingPrice-RetracePct*AvgTrueRange(60)) //如果方向还是向上，且跌得比较急
                {
                        UpDn = -1; //向下
                        NewTL = True;//新的zz
                        SaveSwing = True;
                }Else If(UpDn == -1 && SwingLowPrice <= SwingPrice)
                {
                        UpdateTL = True; //更新zz
                        SaveSwing = True;//保存什么
                }

                If(SaveSwing ) //保存
                {
                        SwingPrice = SwingLowPrice;//拐点向下的值
                        PreBar = CurrentBar;//当前Bar的索引值。
                }               
        }
               
        If( NewTL)    //新的zz
        {
                PlotNumeric("ZigZag",SwingPrice,0,-1,1);  //画zz
        }Else If(UpdateTL)  //更新zz
        {
                If (UpDn == UpDn) //zz方向没变
                {
                        Unplot("ZigZag",PreBar - PreBar+1);   //擦去之前的输出
                        PlotNumeric("ZigZag",SwingPrice,0,-1,1);  //画zz
                       
                }Else
                {
                        PlotNumeric("ZigZag",SwingPrice,0,-1,1); //画zz
                }
        }               

        //PlotNumeric("Zi42g5Z5a6g",wfzig(2));
End

//------------------------------------------------------------------------
// 编译版本        GS2016.06.03
// 版权所有        TradeBlazer Software 2003－2010
// 更改声明        TradeBlazer Software保留对TradeBlazer平
//                        台每一版本的TradeBlazer公式修改和重写的权利
//------------------------------------------------------------------------

superbwill 发表于 2016-10-26 14:59:37

wfwf1977 发表于 2016-7-29 23:28 static/image/common/back.gif
//------------------------------------------------------------------------
// 简称: ZigZag
// 名称:  ...

多谢

看起来好多了

查看完整版本: TB自带ZIGZAG，求注释变量