开拓者期货期权程序化系统交易论坛

标题: zigzag指标请教!!! [打印本页]

作者: lilei19733    时间: 2008-10-26 11:50:49     标题: zigzag指标请教!!!

请TB的老师对如下的zigzag加一点注释,便于在下阅读理解。非常感谢

Params
        Numeric RetracePct(5);
Vars       
        NumericSeries SwingPrice;
        Numeric NewSwingPrice;
        NumericSeries PreBar(0);
        NumericSeries UpDn(0);
        Bool SaveSwing(False);
        Bool NewTL(False);
        Bool UpdateTL(False);
begin
        If (CurrentBar > 0)
        {
                UpDn = UpDn[1];
                PreBar = PreBar[1];
                SwingPrice = SwingPrice[1];
        }Else
        {
                SwingPrice = Close;
        }
               
        NewSwingPrice = SwingHigh( 1, Close, 1,2) ;       
        If (NewSwingPrice <> InvalidNumeric)
        {
                If (NewSwingPrice <> -1)
                {
                        If(UpDn <=0 && NewSwingPrice >= SwingPrice * (1+RetracePct*0.01))
                        {
                                UpDn = 1;
                                NewTL = True;
                                SaveSwing = True;
                        }Else If(UpDn == 1 && NewSwingPrice >= SwingPrice)
                        {
                                UpdateTL = True;
                                SaveSwing = True;
                        }
                }Else
                {
                        NewSwingPrice = SwingLow( 1, Close, 1, 2 ) ;
                        If (NewSwingPrice <> -1)
                        {
                                If(UpDn >=0 && NewSwingPrice <= SwingPrice * (1-RetracePct*0.01))
                                {
                                        UpDn = -1;
                                        NewTL = True;
                                        SaveSwing = True;
                                }Else If(UpDn == -1 && NewSwingPrice <= SwingPrice)
                                {
                                        UpdateTL = True;
                                        SaveSwing = True;
                                }
                        }
                }
               
                If(SaveSwing )
                {
                        SwingPrice = NewSwingPrice;
                        PreBar = CurrentBar;
                }
               
                If( NewTL)
                {
                        PlotNumeric("ZigZag",SwingPrice,-1,1);
                }Else If(UpdateTL)
                {
                        If (UpDn == UpDn[1])
                        {
                                Unplot("ZigZag",PreBar - PreBar[1]+1);
                                PlotNumeric("ZigZag",SwingPrice,-1,1);                               
                        }Else
                        {
                                PlotNumeric("ZigZag",SwingPrice,-1,1);                       
                        }
                }               
        }
End
作者: lilei19733    时间: 2008-10-30 09:47:58     标题: zigzag指标请教

请TB的老师在代码的关键处加点注释可否?
作者: nopain    时间: 2008-10-30 13:03:59

具体说起来比较复杂,要解释清楚也有点费劲,如果是学习公式,大可不必来研究这个公式的写法。
如果是想实现 功能,您可以把你的想法提出来,看看能不能帮上忙。

这个公式的 主要思路就是求线段的两个点,第一个点求出之后是固定的,第二个点还会随着行情的变化而移动。




欢迎光临 开拓者期货期权程序化系统交易论坛 (http://bbs.tb18.net/) Powered by Discuz! X2