Phân tích kỹ thuật - Hướng phát triển mới
  • Thông báo


    Kết quả 1 đến 20 của 34

    Threaded View

    1. #15
      Ngày tham gia
      Oct 2009
      Bài viết
      1,925
      Được cám ơn 617 lần trong 428 bài gởi

      Mặc định Phân tích kỹ thuật - Point & Figure

      - Ở nước ngoài đồ thị Point and Figure rất nổi tiếng và nhiều người sử dụng, họ còn có cả hội đầu tư bằng phương pháp phân tích kỹ thuật Point and Figure, tất nhiên thành viên của hội này phải đóng phí hằng tháng khá đắt, nhưng được cái rất hiệu quả trong đầu tư.
      - Ở VN rất ít sử dụng đồ thị này, nguyên nhân chủ yếu là do đặc thù của thị trường VN là có biên độ giao dịch, và code của đồ thị này được viết tính bằng 1USD/box, vì vậy việc ứng dụng đồ thị Point and Figure vào thị trường VN là không hiệu quả.
      - Tuy nhiên hiện nay đã có một số bác đã nghiên cứu và xây dựng đồ thị này phù hợp với đặc thù của VN và cũng rất thành công trong đầu tư, tuy nhiên code vẫn được giữ bí mật..
      - Mình cũng đã tìm hiểu và lóm được vài ý tưởng, nhưng e vẫn chưa hoàn thành được code, mong các cao thủ trong forum giúp sức để có thêm một đường chỉ báo mới lạ trong đầu tư.

      Mặc định:
      . Box = 1% của giá đóng cửa
      . PFL: Point and Figure thấp nhất
      . PFH: Point and Figure cao nhất nhất

      1. y/c 1:
      Th1: giá đóng cửa hôm nay <= PFL phiên trước
      --> PFL hôm nay = với giá đóng cửa

      Th2: giá đóng cửa hôm nay >= PFL phiên trước
      --> . PFL hôm nay = PFL phiên trước
      . PFH hôm nay = giá đóng cửa
      . PFL và PFH tất cả các phiên trước đểu giảm 1 Box (phần này e chưa viết code được)

      Th3: giá đóng cửa >= PFH phiên trước
      --> PFH = giá đóng cửa

      Th4: giá đóng cửa <= PFH phiên trước
      --> . PFH hôm nay = PFH phiên trước
      . PFL hôm nay = giá đóng cửa
      . PFL và PFH tất cả các phiên trước đó đều tăng 1 Box (phần này e chưa viết code được)


      2. Y/C 2
      lưới mặc định có sẳn

      3. Y/C 3
      thay các ký hiệu O,X thành những con số: tháng 1: 1, tháng 2: 2 .... tháng 9: 9, tháng 10: A, tháng 11: B, tháng 12: C. tăng màu xanh, giảm màu đỏ

      Đoạn code tham khảo:

      _SECTION_BEGIN( "Point & Figure" );

      GfxSetTextColor( colorOrange );
      GfxSelectFont("Times New Roman", 10, 700, True );
      GfxTextOut("name", 10 , 0 );

      GraphXSpace = 5;

      SetChartBkColor( ParamColor( "BackGroundColor", colorBlack) );

      //GraphColor = ParamColor("GarphColor",colorLightGrey);

      GridColor = ParamColor( "GridColor", colorLightGrey );

      Box = Param( "Box ", 1, 0.2, 10, 0.1 ) / 100 * LastValue( C );

      shiftChart = 0;
      shiftLastClose = 1;
      shiftGrid = 7;
      shiftPriceAxis = 2;

      Reverse = Param( "Reverse", 1, 1, 5 );

      j = 0;

      PFL[0] = Box * ceil( Close[0] / Box ) + Box;

      PFH[0] = Box * floor( Close[0] / Box );

      direction = 0;

      for ( i = 1; i < BarCount; i++ )

      **

      if ( direction[j] == 0 )

      **

      if ( Close <= PFL[j] )

      **


      PFL[j] = Box * ceil( Close / Box );

      }


      else

      **

      if ( Close >= PFL[j] )

      **

      j++;

      direction[j] = 1;

      PFH[j] = Box * floor( Close / Box );

      PFL[j] = PFL[j - 1];
      PFL[j - 1] = PFL[j] - Box;
      PFH[j - 1] = PFH[j - 1] - Box;


      }

      }

      }



      else

      **

      if ( Close >= PFH[j] )

      **

      PFH[j] = Box * floor( Close / Box );

      }

      else

      **

      if ( Close <= PFH[j] )

      **

      j++;

      direction[j] = 0;

      PFH[j] = PFH[j - 1];
      PFH[j - 1] = PFH[j] + Box;
      PFL[j - 1] = PFL[j -1] + Box;

      PFL[j] = Box * ceil( Close / Box );
      }

      }

      }

      }


      delta = BarCount - j - 1;

      direction = Ref( direction, - delta );

      Hi = Ref( PFH, -delta ) + Box / 2;

      Lo = Ref( PFL, -delta ) - Box / 2;

      Cl = IIf( direction == 1, Hi, Lo );

      Op = IIf( direction == 1, Cl - Box, Cl + Box );

      Graphcolor = IIf( direction == 1, ParamColor( "X_Color",colorBrightGreen ),

      ParamColor( "O_Color", colorRed ) );

      PlotOHLC( Op, Hi, Lo, Cl, "", GraphColor , stylePointAndFigure | styleNoLabel, 0, 0 , shiftChart );

      PlotOHLC( Op, Hi, Lo, Cl, "", GraphColor , stylePointAndFigure | styleNoLabel, 0, 0 , shiftChart );

      Last = Ref( LastValue( C ), -( BarCount - 1 ) );

      Plot( Last, "", colorGold, styleNoLine | styleDots, 0 , 0,shiftLastClose );
      Plot( PFH[j], "", colorBlue, styleNoLine | styleDots, 0 , 0,shiftLastClose );
      Plot( PFL[j], "", colorRed, styleNoLine | styleDots, 0 , 0,shiftLastClose );


      // selected value

      Value = IIf( direction > 0, SelectedValue( Hi ) - box / 2,SelectedValue( Lo ) + box / 2 );


      //----------------------------------------------------------// GRID CONSTRUCTION//----------------------------------------------------------

      PlotGridLines = ParamToggle( "PlotdGrid", "Yes! |No", 1 ) ;

      if ( PlotGridLines ==1)

      **

      begin = SelectedValue( BarIndex() );

      end = LastValue( BarIndex() );

      period = end - begin + 1;

      if ( begin < end )

      **

      ScreenHigh = LastValue( HHV( cl, period ) );

      ScreenLow = LastValue( LLV( Cl, period ) );

      top = LineArray( begin - shiftGrid, screenHigh, end, screenhigh, 0 ,
      1 );

      Bot = LineArray( begin - shiftGrid, screenlow, end, screenLow, 0, 1 );

      Plot( top, "", gridColor, styleLine | styleNoLabel , 0, 0, shiftGrid );

      //Plot( bot, "", gridColor,styleLine|styleNoLabel, 0 , 0 , shiftGrid);

      VerticalGrid = IIf ( BarIndex() >= begin, IIf( direction == 1,
      screenHigh,
      screenLow ), Null );

      Plot ( VerticalGrid, "", gridColor, styleStaircase | styleNoLabel,
      0, 0, 1
      );

      format = 8.2;

      for ( n = LastValue( bot ); n < LastValue( top ) - 0.5*box; n = n +
      box )

      **

      Plot( bot , "", gridColor, styleLine | styleNoLabel, 0, 0 , shiftGrid );

      text = NumToStr( LastValue( bot ) + 0.5 * box, format );

      xposition = BarCount + shiftPriceaxis;

      yPosition = LastValue( bot ) + 0.27 * box;

      PlotText( text, xPosition , yPosition, colorWhite );

      bot = bot + box;

      Graphcolor = IIf( direction == 1, ParamColor( "X_Color",
      colorBrightGreen ),

      ParamColor( "O_Color", colorRed ) );

      PlotOHLC( Op, Hi, Lo, Cl, "", GraphColor , stylePointAndFigure | styleNoLabel, 0, 0 , shiftChart );

      }

      }

      }



      //----------------------------------------------------------// TITLE//----------------------------------------------------------Title = "\n" +

      " Instrument : " + Name() + FullName() + "\n " +

      "Formula : " + " Point & Figure (High/Low Range)" + "\n " +

      "Box : " + NumToStr( Box, 4.4 ) + " " +

      "Reverse : " + NumToStr( Reverse, 2.0 ) + "\n " +

      "ATR : " + WriteVal( LastValue( ATR( 100 ) ), format = 4.4 );

      _SECTION_END();

    2. Những thành viên sau đã cám ơn :
      kabeo (25-02-2015)

    Thông tin của chủ đề

    Users Browsing this Thread

    Có 2 thành viên đang xem chủ đề này. (0 thành viên và 2 khách vãng lai)

       

    Similar Threads

    1. Phân tích kỹ thuật: Những kinh nghiệm và định hướng trong tương lai
      By nhuma in forum Kiến thức về Phân tích kỹ thuật
      Trả lời: 59
      Bài viết cuối: 20-09-2018, 02:27 PM
    2. IJC Công ty Cổ phần Phát triển Hạ tầng Kỹ thuật
      By giaphu68 in forum Doanh nghiệp sàn HoSE
      Trả lời: 281
      Bài viết cuối: 13-11-2013, 10:07 PM
    3. Trả lời: 1
      Bài viết cuối: 06-02-2013, 01:30 PM
    4. Phân tích kỹ thuật – lý thuyết, ứng dụng và phản biện
      By tigeran in forum Nhận định Thị trường
      Trả lời: 4
      Bài viết cuối: 13-08-2010, 04:19 PM

    Bookmarks

    Quyền viết bài

    • Bạn Không thể gửi Chủ đề mới
    • Bạn Không thể Gửi trả lời
    • Bạn Không thể Gửi file đính kèm
    • Bạn Không thể Sửa bài viết của mình