Phần mềm phân tích kỹ thuật Amibroker 5.40

Chủ đề trong 'Thị trường chứng khoán' bởi stock_banking, 04/04/2012.

4016 người đang online, trong đó có 213 thành viên. 00:25 (UTC+07:00) Bangkok, Hanoi, Jakarta
  1. 1 người đang xem box này (Thành viên: 0, Khách: 1)
Chủ đề này đã có 3823 lượt đọc và 30 bài trả lời
  1. BARN-OWL

    BARN-OWL Thành viên mới

    Tham gia ngày:
    27/03/2012
    Đã được thích:
    0
    và cái này
    //|-----------------------------------------------------------------------------------------
    //|PatternExplorer.com - Fibonacci Recognition
    //|Copyright © 2007, PatternExplorer.com
    //|http://www.PatternExplorer.com
    //|e-mail: support@PatternExplorer.com
    //|-----------------------------------------------------------------------------------------
    FormulaName = "PE - Fibonacci Recognition";

    SetChartOptions(0,chartShowDates|chartShowArrows|chartLogarithmic|chartWrapTitle);
    #pragma nocache
    #include_once
    #include_once "C:\Program Files\AmiBroker\Formulas\PatternExplorer\#Defaults & Mods\PE - Defaults.afl"
    #include_once "C:\Program Files\AmiBroker\Formulas\PatternExplorer\#Defaults & Mods\PE - Mods.afl"
    /*******************************************************************************************/
    AddCustomCodeBeforePE();
    /*******************************************************************************************/
    _SECTION_BEGIN("Main Parameters");
    AddparamUsefromChart(def_UseFromChart);
    Sensitivity = Param("Sensitivity",10,0,100,1);
    if(InChart)StaticVarSet("P0O3U2",Sensitivity);if(inAA AND Usefromchart) Sensitivity = StaticVarGet("P0O3U2");
    Colorstyle = ParamToggle("Color Mode","S/R|Custom",1);
    Color_SL= ParamColor("Support (S/R Mode)",def_Color_SL);
    Color_RL= ParamColor("Resistance (S/R Mode)",def_Color_RL);
    _SECTION_END();
    /*******************************************************************************************/
    _SECTION_BEGIN("Levels");
    Level_1p = Param("Level 1",38.2,0,200,1);
    Level_2p = Param("Level 2",50.0,0,200,1);
    Level_3p = Param("Level 3",61.8,0,200,1);
    Level_4p = Param("Level 4",138.2,0,200,1);
    Level_5p = Param("Level 5",150,0,200,1);
    Level_6p = Param("Level 6",161.8,0,200,1);
    Level_7p = Param("Level 7",200,0,300,1);
    _SECTION_END();
    /*******************************************************************************************/
    _SECTION_BEGIN("Styles");
    SwingLow_style = ParamStyle("Swing Low",styleLine+styleDots,maskAll);
    SwingHigh_style = ParamStyle("Swing High",styleLine+styleDots,maskAll);
    L1_style = ParamStyle("Level 1",styleLine+styleDashed,maskAll);
    L2_style = ParamStyle("Level 2",styleLine,maskAll);
    L3_style = ParamStyle("Level 3",styleLine+styleDashed,maskAll);
    L4_style = ParamStyle("Level 4",styleLine+styleDashed,maskAll);
    L5_style = ParamStyle("Level 5",styleLine,maskAll);
    L6_style = ParamStyle("Level 6",styleLine+styleDashed,maskAll);
    L7_style = ParamStyle("Level 7",styleLine+styleThick+styleDots,maskAll);
    _SECTION_END();
    /*******************************************************************************************/
    _SECTION_BEGIN("Colors");
    SwingLow_color = ParamColor("Swing Low",def_SwingLow_color);
    SwingHigh_color = ParamColor("Swing High",def_SwingHigh_color);
    L1_color = ParamColor("Level 1",def_L1_color);
    L2_color = ParamColor("Level 2",def_L2_color);
    L3_color = ParamColor("Level 3",def_L3_color);
    L4_color = ParamColor("Level 4",def_L4_color);
    L5_color = ParamColor("Level 5",def_L5_color);
    L6_color = ParamColor("Level 6",def_L6_color);
    L7_color = ParamColor("Level 7",def_L7_color);
    _SECTION_END();
    /*******************************************************************************************/
    _SECTION_BEGIN("Selection");
    L1_switch = ParamToggle("Plot Level 1", "Off|On",1);
    L2_switch = ParamToggle("Plot Level 2", "Off|On",1);
    L3_switch = ParamToggle("Plot Level 3", "Off|On",1);
    L4_switch = ParamToggle("Plot Level 4", "Off|On",1);
    L5_switch = ParamToggle("Plot Level 5", "Off|On",1);
    L6_switch = ParamToggle("Plot Level 6", "Off|On",1);
    L7_switch = ParamToggle("Plot Level 7", "Off|On",1);
    _SECTION_END();
    /*******************************************************************************************/
    #include_once
    #include_once
    /*******************************************************************************************/
    Filter = def_Filter AND BarIndex()==LastValue(BarIndex()) AND NOT GroupID()==253;
    /*******************************************************************************************/
    Addefaultcolumns();
    AddColumn(CurrentRT_EXT,"Current RT/EXT %");
    AddColumn(MaxRT_EXT,"Current max. RT/EXT %");
    AddTextColumn(
    WriteIf(Sup_pricejustabove,"Price just above",
    WriteIf(Sup_confirmed,"Confirmed",
    WriteIf(Sup_break,"Break",""))),"Swing Low",1.2,
    IIf(Sup_pricejustabove OR sup_confirmed,colorGreen,colorRed));
    AddTextColumn(
    WriteIf(Res_pricejustbelow,"Price just below",
    WriteIf(Res_confirmed,"Confirmed",
    WriteIf(Res_break,"Break",""))),"Swing High",1.2,
    IIf(Res_pricejustbelow OR Res_confirmed,colorRed,colorGreen));
    AddTextColumn(FullName(),"Full name");
    /*******************************************************************************************/
    Plot(IIf(x>=xa &NOT AnZ,ya,-1e10),"",SLcol,1+8 + 2048);
    Plot(IIf(x>=xb &NOT AnZ,yb,-1e10),"",SHcol,1+8 + 2048);
    Plot(IIf(x>=xab &NOT AnZ,Level_1,-1e10),"",L1col,L1_style+styleNoRescale);
    Plot(IIf(x>=xab &NOT AnZ,Level_2,-1e10),"",L2col,L2_style+styleNoRescale);
    Plot(IIf(x>=xab &NOT AnZ,Level_3,-1e10),"",L3col,L3_style+styleNoRescale);
    Plot(IIf(x>=xab &NOT AnZ,Level_4,-1e10),"",L4col,L4_style+styleNoRescale);
    Plot(IIf(x>=xab &NOT AnZ,Level_5,-1e10),"",L5col,L5_style+styleNoRescale);
    Plot(IIf(x>=xab &NOT AnZ,Level_6,-1e10),"",L6col,L6_style+styleNoRescale);
    Plot(IIf(x>=xab &NOT AnZ,Level_7,-1e10),"",L7col,L7_style+styleNoRescale);
    PlotText(WriteIf(L1_switch,""+Level_1p+" %",""),LastValue(BarIndex()+2),Level_1,L1col,colorDefault);
    PlotText(WriteIf(L2_switch,""+Level_2p+" %",""),LastValue(BarIndex()+2),Level_2,L2col,colorDefault);
    PlotText(WriteIf(L3_switch,""+Level_3p+" %",""),LastValue(BarIndex()+2),Level_3,L3col,colorDefault);
    PlotText(WriteIf(L4_switch,""+Level_4p+" %",""),LastValue(BarIndex()+2),Level_4,L4col,colorDefault);
    PlotText(WriteIf(L5_switch,""+Level_5p+" %",""),LastValue(BarIndex()+2),Level_5,L5col,colorDefault);
    PlotText(WriteIf(L6_switch,""+Level_6p+" %",""),LastValue(BarIndex()+2),Level_6,L6col,colorDefault);
    PlotText(WriteIf(L7_switch,""+Level_7p+" %",""),LastValue(BarIndex()+2),Level_7,L7col,colorDefault);
    PlotText("100 %",LastValue(BarIndex()+2),SwingLow,IIf(LastValue(up),SwingLow_color,SwingHigh_color),colorDefault);
    PlotText("0 %",LastValue(BarIndex()+2),Swinghigh,IIf(LastValue(dn),SwingLow_color,SwingHigh_color),colorDefault);
    /*******************************************************************************************/
    ToolTip = def_ToolTip;
    /*******************************************************************************************/
    AddCustomCodeAfterPE();
    /*******************************************************************************************/
    Title = "PatternExplorer.com - Fibonacci Recognition"+ default_priceTitle + EncodeColor(IIf(NOT AnZ,def_Text2,colorRed))+", Sensitivity = " + WriteVal(Sensitivity,1)+ EncodeColor(colorRed)+WriteIf(NOT AnZ,""," NO POINTS AVAILABLE -> REDUCE SENSITIVITY")+ EncodeColor(IIf(LastValue(L)>0,Color_SL,Color_RL))+", Current Correction = "+WriteVal(CurrentRT_EXT,1.0)+"% ";
  2. joker0x00

    joker0x00 Thành viên gắn bó với f319.com

    Tham gia ngày:
    24/07/2011
    Đã được thích:
    159
    [r23)][r23)][r23)] có 1 mớ
  3. stock_banking

    stock_banking Thành viên gắn bó với f319.com

    Tham gia ngày:
    19/01/2010
    Đã được thích:
    389
    Thật ra hằng ngày có hàng ngàn indicators đc viết ra nhưng tại sao đa số vẫn không thể tồn tại thời gian dài?
    Theo e các bác nên dùng 2-3 indicators nào mà mình hiểu thôi đừng dùng nhiều quá rồi loạn chưởng.
  4. joker0x00

    joker0x00 Thành viên gắn bó với f319.com

    Tham gia ngày:
    24/07/2011
    Đã được thích:
    159
    [r23)][r23)]
    chơi chunng VN ko cần indicator.
    sắm quyển lịch âm dương và dữ liệu ngày là đủ rồi :-"
    mua Ko cần quan tâm giá. chỉ cân quan tâm ngày mua hehe
  5. stock_banking

    stock_banking Thành viên gắn bó với f319.com

    Tham gia ngày:
    19/01/2010
    Đã được thích:
    389
    trường phái nào đây [r2)]
  6. joker0x00

    joker0x00 Thành viên gắn bó với f319.com

    Tham gia ngày:
    24/07/2011
    Đã được thích:
    159
    đông tây y kết hợp bói [r23)]
    mới dc sáng lập bởi nhà nghiên cuu lý số phương đông mr. joker [r23)]
  7. TheLiving

    TheLiving Thành viên này đang bị tạm khóa Đang bị khóa Not Official

    Tham gia ngày:
    04/07/2007
    Đã được thích:
    262
    Thanks [r2)]
  8. namstock

    namstock Thành viên rất tích cực

    Tham gia ngày:
    25/12/2009
    Đã được thích:
    21
    Bác có code Ichimoku không, Mình bị lỗi rồi, giờ làm sao đây?
  9. stock_banking

    stock_banking Thành viên gắn bó với f319.com

    Tham gia ngày:
    19/01/2010
    Đã được thích:
    389
    http://www.amibroker.com/library/detail.php?id=677
    Em ko đánh ichimoku bác thử lên đó xem, phải code bác đang tìm ko
  10. namstock

    namstock Thành viên rất tích cực

    Tham gia ngày:
    25/12/2009
    Đã được thích:
    21
    Cám ơn bác. Để mình thử xem

Chia sẻ trang này