Opening 2 different databases simultaneously

Discussion in 'AmiBroker' started by addadutta, Oct 3, 2010.

  1. addadutta

    addadutta Member

    Joined:
    May 12, 2006
    Messages:
    38
    Likes Received:
    8
    Trophy Points:
    8
    Is there a way to open 2 different databases in same instance on amibroker? I want to compare EOD and Intraday movement of the same stock.

    I don't want to open 2 different instances for this purpose due to certain practical problem.

    Suggestion will be highly appreciated.
     
  2. rajeabc

    rajeabc Well-Known Member

    Joined:
    Jan 9, 2008
    Messages:
    1,701
    Likes Received:
    2,552
    Trophy Points:
    113
    I am not sure whether you can open in same instance but if you open another instance you can keep two databases open. BUT it would create problem if you are updating live as there would be two BROKER.exe running .
     
  3. kaly422000

    kaly422000 Well-Known Member

    Joined:
    Nov 21, 2009
    Messages:
    914
    Likes Received:
    347
    Trophy Points:
    63
    may be possible but tricky one. may try realtime using manshi but i am not sure. . better use another software like chartnexus for eod
     
  4. J_D

    J_D Member

    Joined:
    Nov 14, 2006
    Messages:
    120
    Likes Received:
    23
    Trophy Points:
    18
    Open a blank chart for Daily timeframe and symbol link both the charts.. You can observe both daily and intraday timeframe of your choice simultaneously updated for the same symbol.

    JD
     
    bloodmoney likes this.
  5. kaly422000

    kaly422000 Well-Known Member

    Joined:
    Nov 21, 2009
    Messages:
    914
    Likes Received:
    347
    Trophy Points:
    63
    jd after opening a blank chart for an afl i could not return to my previous setting. wud u pls say how to do that
     
  6. addadutta

    addadutta Member

    Joined:
    May 12, 2006
    Messages:
    38
    Likes Received:
    8
    Trophy Points:
    8
    JD,
    I am facing the same issue as noted by Kaly422000.

    My daily data is from a database NSE Daily.
    My intraday RT data is from DB ManshiRT ( pulled using ManshiRT software).

    When am not able to pull data simultaneously in same instance from 2 diff. DB,either I am able use NSE Daily or ManshiRT. If I open a blank chart in NSE Daily and change DB to ManshiRT for this chart, the whole instance changes to ManshiRT only and vice versa.

    Cannot use 2 instances also in this case a ManshiRT closes all other AB instances.

    Do you know a solution for this situation?
     

  7. rajeabc

    rajeabc Well-Known Member

    Joined:
    Jan 9, 2008
    Messages:
    1,701
    Likes Received:
    2,552
    Trophy Points:
    113
    it is never going to work...you can not open two database in same instance of Ami. if you need two database open two instance of Amibroker but then you can not update it live.

    What other guy mentioned here and what you got from his post is totlly different.
    He tried to say that if you have Intraday data then if you change time frame(click right button on your mouse and change your time frame.) on the same chart you can see daily chart as well . or you can do the same in new chart. BUT DATABASE IS SUPPOSE TO BE SAME. IF YOU WANT TWO DATABASE OPEN TWO INSTANCE. BUT THEN YOU CAN NOT UPDATE LIVE.
     
  8. vaenu

    vaenu New Member

    Joined:
    Jun 4, 2008
    Messages:
    17
    Likes Received:
    0
    Trophy Points:
    1
    any body plz modify this metaquote camrilla afl to amibroker 5.00 afl.

    //+------------------------------------------------------------------+
    //| camarilladt.mq4 |
    //| Copyright 2005, MetaQuotes Software Corp. |
    //| http://www.metaquotes.net |
    //+------------------------------------------------------------------+
    #property copyright "Copyright 2005, MetaQuotes Software Corp."
    #property link "http://www.metaquotes.net"
    #include <stdlib.mqh>
    #property indicator_chart_window
    //---- input parameters
    extern bool Alerts = false;
    extern double GMTshiftSun=0; //sun into mon cams use this corrected value for fri data
    extern double GMTshift=1;
    extern bool Pivot = true;
    extern bool CamTargets = true;
    extern bool ListCamTargets = true;
    extern color PivotColor = LimeGreen;
    extern color PivotFontColor = White;
    extern int PivotFontSize = 8;
    extern int PivotWidth = 1;
    extern int PipDistance = 20;
    extern color CamFontColor = Gray;
    extern int CamFontSize = 10;
    extern bool Fibs = true;
    extern color FibColorRes = SeaGreen;
    extern color FibColorSup = Brown;
    extern color FibFontColor = Gray;
    extern int FibFontSize = 8;
    extern bool DisplayFibLevels_1_3 = false;
    extern double FibLevel1 = 0.236;
    extern double FibLevel2 = 0.382;
    extern double FibLevel3 = 0.50;
    extern bool DisplayFibLevels_4_6 = true;
    extern double FibLevel4 = 0.618;
    extern double FibLevel5 = 0.764;
    extern double FibLevel6 = 0.99;
    extern bool DisplayFibLevels_7_16 = true;
    extern double FibLevel7 = 1.27;
    extern double FibLevel8 = 1.618;
    extern double FibLevel9 = 1.99;
    extern double FibLevel10 = 2.236;
    extern double FibLevel11 = 2.618;
    extern double FibLevel12 = 2.99;
    extern double FibLevel13 = 3.236;
    extern double FibLevel14 = 3.618;
    extern double FibLevel15 = 3.99;
    extern double FibLevel16 = 4.236;
    extern bool StandardPivots = true;
    extern bool ListStandardPivots = true;
    extern color StandardFontColor = Gray;
    extern int StandardFontSize = 8;
    extern color SupportColor = Brown;
    extern color ResistanceColor = SeaGreen;
    extern bool MidPivots = false;
    extern color MidPivotColor = White;
    extern int MidFontSize = 8;

    double P, H3, H4, H5;
    double L3, L4, L5;
    double LastHigh,LastLow,x;
    bool firstL3=true;
    bool firstH3=true;

    double D1=0.091667;
    double D2=0.183333;
    double D3=0.2750;
    double D4=0.55;


    // Fib variables

    double yesterday_high=0;
    double yesterday_low=0;
    double yesterday_close=0;
    double p=0;
    double r1=0,r2=0,r3=0,r4=0,r5=0,r6=0,r7=0,r8=0,r9=0,r10=0,r11=0,r12=0,r13=0,r14=0,r15=0,r16=0;
    double s1=0,s2=0,s3=0,s4=0,s5=0,s6=0,s7=0,s8=0,s9=0,s10=0,s11=0,s12=0,s13=0,s14=0,s15=0,s16=0;
    double R;

    //+------------------------------------------------------------------+
    //| Custom indicator initialization function |
    //+------------------------------------------------------------------+
    int init()
    {

    //----

    //---- indicators
    //----

    return(0);
    }
    //+------------------------------------------------------------------+
    //| Custor indicator deinitialization function |
    //+------------------------------------------------------------------+
    int deinit()
    {

    //---- TODO: add your code here
    if (Fibs)
    {ObjectDelete("FibR1 Label");
    ObjectDelete("FibR1 Line");
    ObjectDelete("FibR2 Label");
    ObjectDelete("FibR2 Line");
    ObjectDelete("FibR3 Label");
    ObjectDelete("FibR3 Line");
    ObjectDelete("FibR4 Label");
    ObjectDelete("FibR4 Line");
    ObjectDelete("FibR5 Label");
    ObjectDelete("FibR5 Line");
    ObjectDelete("FibR6 Label");
    ObjectDelete("FibR6 Line");
    ObjectDelete("FibR7 Label");
    ObjectDelete("FibR7 Line");
    ObjectDelete("FibR8 Label");
    ObjectDelete("FibR8 Line");
    ObjectDelete("FibR9 Label");
    ObjectDelete("FibR9 Line");
    ObjectDelete("FibR10 Label");
    ObjectDelete("FibR10 Line");
    ObjectDelete("FibR11 Label");
    ObjectDelete("FibR11 Line");
    ObjectDelete("FibR12 Label");
    ObjectDelete("FibR12 Line");
    ObjectDelete("FibR13 Label");
    ObjectDelete("FibR13 Line");
    ObjectDelete("FibR14 Label");
    ObjectDelete("FibR14 Line");
    ObjectDelete("FibR15 Label");
    ObjectDelete("FibR15 Line");
    ObjectDelete("FibR16 Label");
    ObjectDelete("FibR16 Line");
    ObjectDelete("FibS1 Label");
    ObjectDelete("FibS1 Line");
    ObjectDelete("FibS2 Label");
    ObjectDelete("FibS2 Line");
    ObjectDelete("FibS3 Label");
    ObjectDelete("FibS3 Line");
    ObjectDelete("FibS4 Label");
    ObjectDelete("FibS4 Line");
    ObjectDelete("FibS5 Label");
    ObjectDelete("FibS5 Line");
    ObjectDelete("FibS6 Label");
    ObjectDelete("FibS6 Line");
    ObjectDelete("FibS7 Label");
    ObjectDelete("FibS7 Line");
    ObjectDelete("FibS8 Label");
    ObjectDelete("FibS8 Line");
    ObjectDelete("FibS9 Label");
    ObjectDelete("FibS9 Line");
    ObjectDelete("FibS10 Label");
    ObjectDelete("FibS10 Line");
    ObjectDelete("FibS11 Label");
    ObjectDelete("FibS11 Line");
    ObjectDelete("FibS12 Label");
    ObjectDelete("FibS12 Line");
    ObjectDelete("FibS13 Label");
    ObjectDelete("FibS13 Line");
    ObjectDelete("FibS14 Label");
    ObjectDelete("FibS14 Line");
    ObjectDelete("FibS15 Label");
    ObjectDelete("FibS15 Line");
    ObjectDelete("FibS16 Label");
    ObjectDelete("FibS16 Line");
    }
    if (Pivot)
    {
    ObjectDelete("P Label");
    ObjectDelete("P Line");
    }
    if (CamTargets)
    {
    ObjectDelete("H5 Label");
    ObjectDelete("H5 Line");
    ObjectDelete("H4 Label");
    ObjectDelete("H4 Line");
    ObjectDelete("H3 Label");
    ObjectDelete("H3 Line");
    ObjectDelete("L3 Label");
    ObjectDelete("L3 Line");
    ObjectDelete("L4 Label");
    ObjectDelete("L4 Line");
    ObjectDelete("L5 Label");
    ObjectDelete("L5 Line");
    }
    //----
    if (StandardPivots)
    {
    ObjectDelete("R1 Label");
    ObjectDelete("R1 Line");
    ObjectDelete("R2 Label");
    ObjectDelete("R2 Line");
    ObjectDelete("R3 Label");
    ObjectDelete("R3 Line");
    ObjectDelete("R4 Label");
    ObjectDelete("R4 Line");
    ObjectDelete("R5 Label");
    ObjectDelete("R5 Line");
    ObjectDelete("S1 Label");
    ObjectDelete("S1 Line");
    ObjectDelete("S2 Label");
    ObjectDelete("S2 Line");
    ObjectDelete("S3 Label");
    ObjectDelete("S3 Line");
    ObjectDelete("S4 Label");
    ObjectDelete("S4 Line");
    ObjectDelete("S5 Label");
    ObjectDelete("S5 Line");
    }
    if (MidPivots)
    {
    ObjectDelete("M5 Label");
    ObjectDelete("M5 Line");
    ObjectDelete("M4 Label");
    ObjectDelete("M4 Line");
    ObjectDelete("M3 Label");
    ObjectDelete("M3 Line");
    ObjectDelete("M2 Label");
    ObjectDelete("M2 Line");
    ObjectDelete("M1 Label");
    ObjectDelete("M1 Line");
    ObjectDelete("M0 Label");
    ObjectDelete("M0 Line");

    }

    return(0);
    }



    int DoAlerts()
    {
    double DifAboveL3,PipsLimit;
    double DifBelowH3;

    DifBelowH3 = H3 - Close[0];
    DifAboveL3 = Close[0] - L3;
    PipsLimit = PipDistance*Point;

    if (DifBelowH3 > PipsLimit) firstH3 = true;
    if (DifBelowH3 <= PipsLimit && DifBelowH3 > 0)
    {
    if (firstH3)
    {
    Alert("Below Cam H3 Line by ",DifBelowH3, " for ", Symbol(),"-",Period());
    PlaySound("alert.wav");
    firstH3=false;
    }
    }

    if (DifAboveL3 > PipsLimit) firstL3 = true;
    if (DifAboveL3 <= PipsLimit && DifAboveL3 > 0)
    {
    if (firstL3)
    {
    Alert("Above Cam L3 Line by ",DifAboveL3," for ", Symbol(),"-",Period());
    Sleep(2000);
    PlaySound("timeout.wav");
    firstL3=false;
    }
    }

    }


    //+------------------------------------------------------------------+
    //| Custom indicator iteration function |
    //+------------------------------------------------------------------+
    int start()
    {
    int counted_bars=IndicatorCounted();
    //---- TODO: add your code here
    double day_high=0;
    double day_low=0;
    double yesterday_open=0;
    double today_open=0;
    double Q=0,S=0,R=0,M2=0,M3=0,S1=0,R1=0,M1=0,M4=0,S2=0,R2=0,M0=0,M5=0,S3=0,R3=0,nQ=0,nD=0,D=0,R4=0,S4=0,R5=0,S5=0;
    double shift_corrected;
    int cnt=720;
    double cur_day=0;
    double prev_day=0;

    double rates_d1[2][6];

    //---- exit if period is greater than daily charts
    if(Period() > 1440)
    {
    Print("Error - Chart period is greater than 1 day.");
    return(-1); // then exit
    }

    //---- Get new daily prices & calculate pivots
    if (DayOfWeek()==1) shift_corrected=GMTshiftSun;
    else if ((DayOfWeek()==2) && (Minute() >= 5)) shift_corrected=GMTshift;
    //else if ((DayOfWeek()==2) && (Hour() > GMTshift)) shift_corrected=GMTshift;
    else shift_corrected=GMTshift;

    while (cnt!= 0)
    {
    cur_day = TimeDay(Time[cnt]- (shift_corrected*3600));

    if (prev_day != cur_day)
    {
    yesterday_close = Close[cnt+1];
    today_open = Open[cnt];
    yesterday_high = day_high;
    yesterday_low = day_low;

    day_high = High[cnt];
    day_low = Low[cnt];

    prev_day = cur_day;
    }


    if (High[cnt]>day_high)
    {
    day_high = High[cnt];
    }
    if (Low[cnt]<day_low)
    {
    day_low = Low[cnt];
    }

    cnt--;

    }



    D = (day_high - day_low);
    Q = (yesterday_high - yesterday_low);
    //------ Pivot Points ------

    P = (yesterday_high + yesterday_low + yesterday_close)/3;//Pivot
    //---- To display all 8 Camarilla pivots remove comment symbols below and
    // add the appropriate object functions below
    H5 = (yesterday_high/yesterday_low)*yesterday_close;
    H4 = ((yesterday_high - yesterday_low)* D4) + yesterday_close;
    H3 = ((yesterday_high - yesterday_low)* D3) + yesterday_close;
    //H2 = ((yesterday_high - yesterday_low) * D2) + yesterday_close;
    //H1 = ((yesterday_high - yesterday_low) * D1) + yesterday_close;

    //L1 = yesterday_close - ((yesterday_high - yesterday_low)*(D1));
    //L2 = yesterday_close - ((yesterday_high - yesterday_low)*(D2));
    L3 = yesterday_close - ((yesterday_high - yesterday_low)*(D3));
    L4 = yesterday_close - ((yesterday_high - yesterday_low)*(D4));
    L5 = yesterday_close - (H5 - yesterday_close);

    if (Fibs)
    {
    R = yesterday_high - yesterday_low;//range
    p = (yesterday_high + yesterday_low + yesterday_close)/3;// Standard Pivot
    if (DisplayFibLevels_1_3){
    r1 = p + (R * FibLevel1);
    r2 = p + (R * FibLevel2);
    r3 = p + (R * FibLevel3);
    s1 = p - (R * FibLevel1);
    s2 = p - (R * FibLevel2);
    s3 = p - (R * FibLevel3);}
    if (DisplayFibLevels_4_6){
    r4 = p + (R * FibLevel4);
    r5 = p + (R * FibLevel5);
    r6 = p + (R * FibLevel6);
    s4 = p - (R * FibLevel4);
    s5 = p - (R * FibLevel5);
    s6 = p - (R * FibLevel6);}
    if (DisplayFibLevels_7_16){
    r7 = p + (R * FibLevel7);
    r8 = p + (R * FibLevel8);
    r9 = p + (R * FibLevel9);
    r10 = p + (R * FibLevel10);
    r11 = p + (R * FibLevel11);
    r12 = p + (R * FibLevel12);
    r13 = p + (R * FibLevel13);
    r14 = p + (R * FibLevel14);
    r15 = p + (R * FibLevel15);
    r16 = p + (R * FibLevel16);
    s7 = p - (R * FibLevel7);
    s8 = p - (R * FibLevel8);
    s9 = p - (R * FibLevel9);
    s10 = p - (R * FibLevel10);
    s11 = p - (R * FibLevel11);
    s12 = p - (R * FibLevel12);
    s13 = p - (R * FibLevel13);
    s14 = p - (R * FibLevel14);
    s15 = p - (R * FibLevel15);
    s16 = p - (R * FibLevel16);}
    }

    if (StandardPivots)
    {
    R1 = (2*P)-yesterday_low;
    S1 = (2*P)-yesterday_high;
    R2 = P-S1+R1;
    S2 = P-R1+S1;
    R3 = (2*P)+(yesterday_high-(2*yesterday_low));
    S3 = (2*P)-((2* yesterday_high)-yesterday_low);
    R4 = (3*P)+(yesterday_high-(3*yesterday_low));
    S4 = (3*P)-((3* yesterday_high)-yesterday_low);
    R5 = (4*P)+(yesterday_high-(4*yesterday_low));
    S5 = (4*P)-((4* yesterday_high)-yesterday_low);
    }
    if (MidPivots)
    {
    M0 = (S2+S3)/2;
    M1 = (S1+S2)/2;
    M2 = (P+S1)/2;
    M3 = (P+R1)/2;
    M4 = (R1+R2)/2;
    M5 = (R2+R3)/2;
    }

    //comment on OHLC and daily range

    if (Q > 5)
    {
    nQ = Q;
    }
    else
    {
    nQ = Q*10000;
    }

    if (D > 5)
    {
    nD = D;
    }
    else
    {
    nD = D*10000;
    }

    if (StringSubstr(Symbol(),3,3)=="JPY")
    {
    nQ=nQ/100;
    nD=nD/100;
    }

    if ((CamTargets) && (ListCamTargets) && (StandardPivots) && (ListStandardPivots))
    {
    Comment("High= ",yesterday_high," Previous Days Range= ",nQ,"\nLow= ",yesterday_low," Current Days Range= ",nD,"\nClose= ",yesterday_close,
    "\n\nH5 ",H5,"\nH4 ",H4,"\nH3 ",H3,"\n\nL3 ",L3,"\nL4 ",L4,"\nL5 ",L5,
    "\n\n\n\nR5 ",R5,"\nR4 ", R4,"\nR3 ", R3,"\nR2 ", R2,"\nR1 ", R1,"\nPivot ", P,"\nS1 ", S1,"\nS2 ", S2,"\nS3 ", S3,"\nS4 ", S4,"\nS5 ",S5);
    }
    else if ((CamTargets) && (ListCamTargets) && (StandardPivots) && !(ListStandardPivots))
    {
    Comment("High= ",yesterday_high," Previous Days Range= ",nQ,"\nLow= ",yesterday_low," Current Days Range= ",nD,"\nClose= ",yesterday_close,
    "\n\nH5 ",H5,"\nH4 ",H4,"\nH3 ",H3,"\n\nL3 ",L3,"\nL4 ",L4,"\nL5 ",L5);
    }
    else if ((CamTargets) && (ListCamTargets) && !(StandardPivots))
    {
    Comment("High= ",yesterday_high," Previous Days Range= ",nQ,"\nLow= ",yesterday_low," Current Days Range= ",nD,"\nClose= ",yesterday_close,
    "\n\nH5 ",H5,"\nH4 ",H4,"\nH3 ",H3,"\n\nL3 ",L3,"\nL4 ",L4,"\nL5 ",L5);
    }
    else if (!(CamTargets) && (StandardPivots) && (ListStandardPivots))
    {
    Comment("High= ",yesterday_high," Previous Days Range= ",nQ,"\nLow= ",yesterday_low," Current Days Range= ",nD,"\nClose= ",yesterday_close,
    "\n\nR5 ",R5,"\nR4 ", R4,"\nR3 ", R3,"\nR2 ", R2,"\nR1 ", R1,"\nPivot ", P,"\nS1 ", S1,"\nS2 ", S2,"\nS3 ", S3,"\nS4 ", S4,"\nS5 ",S5);
    }
    else
    {
    Comment("High= ",yesterday_high," Previous Days Range= ",nQ,"\nLow= ",yesterday_low," Current Days Range= ",nD,"\nClose= ",yesterday_close);
    }

    //---- Set line labels on chart window
    if (Pivot)
    {

    if(ObjectFind("P label") != 0)
    {
    ObjectCreate("P label", OBJ_TEXT, 0, Time[0], P);
    ObjectSetText("P label", "Pivot", PivotFontSize, "Arial", PivotFontColor);
    }
    else
    {
    ObjectMove("P label", 0, Time[0], P);
    }

    //--- Draw Pivot lines on chart

    if(ObjectFind("P line") != 0)
    {
    ObjectCreate("P line", OBJ_HLINE, 0, Time[40], P);
    ObjectSet("P line", OBJPROP_STYLE, STYLE_DASH);
    ObjectSet("P line", OBJPROP_COLOR, PivotColor);
    }
    else
    {
    ObjectMove("P line", 0, Time[40], P);
    }

    }

    if (StandardPivots)
    {
    if(ObjectFind("R1 label") != 0)
    {
    ObjectCreate("R1 label", OBJ_TEXT, 0, Time[20], R1);
    ObjectSetText("R1 label", " R1", StandardFontSize, "Arial", StandardFontColor);
    }
    else
    {
    ObjectMove("R1 label", 0, Time[20], R1);
    }

    if(ObjectFind("R2 label") != 0)
    {
    ObjectCreate("R2 label", OBJ_TEXT, 0, Time[20], R2);
    ObjectSetText("R2 label", " R2", StandardFontSize, "Arial", StandardFontColor);
    }
    else
    {
    ObjectMove("R2 label", 0, Time[20], R2);
    }

    if(ObjectFind("R3 label") != 0)
    {
    ObjectCreate("R3 label", OBJ_TEXT, 0, Time[20], R3);
    ObjectSetText("R3 label", " R3", StandardFontSize, "Arial", StandardFontColor);
    }
    else
    {
    ObjectMove("R3 label", 0, Time[20], R3);
    }

    if(ObjectFind("R4 label") != 0)
    {
    ObjectCreate("R4 label", OBJ_TEXT, 0, Time[20], R4);
    ObjectSetText("R4 label", " R4", StandardFontSize, "Arial", StandardFontColor);
    }
    else
    {
    ObjectMove("R4 label", 0, Time[20], R4);
    }
    if(ObjectFind("R5 label") != 0)
    {
    ObjectCreate("R5 label", OBJ_TEXT, 0, Time[20], R5);
    ObjectSetText("R5 label", " R5", StandardFontSize, "Arial", StandardFontColor);
    }
    else
    {
    ObjectMove("R5 label", 0, Time[20], R5);
    }

    if(ObjectFind("S1 label") != 0)
    {
    ObjectCreate("S1 label", OBJ_TEXT, 0, Time[20], S1);
    ObjectSetText("S1 label", "S1", StandardFontSize, "Arial", StandardFontColor);
    }
    else
    {
    ObjectMove("S1 label", 0, Time[20], S1);
    }

    if(ObjectFind("S2 label") != 0)
    {
    ObjectCreate("S2 label", OBJ_TEXT, 0, Time[20], S2);
    ObjectSetText("S2 label", "S2", StandardFontSize, "Arial", StandardFontColor);
    }
    else
    {
    ObjectMove("S2 label", 0, Time[20], S2);
    }

    if(ObjectFind("S3 label") != 0)
    {
    ObjectCreate("S3 label", OBJ_TEXT, 0, Time[20], S3);
    ObjectSetText("S3 label", "S3", StandardFontSize, "Arial", StandardFontColor);
    }
    else
    {
    ObjectMove("S3 label", 0, Time[20], S3);
    }

    if(ObjectFind("S4 label") != 0)
    {
    ObjectCreate("S4 label", OBJ_TEXT, 0, Time[20], S4);
    ObjectSetText("S4 label", "S4", StandardFontSize, "Arial", StandardFontColor);
    }
    else
    {
    ObjectMove("S4 label", 0, Time[20], S4);
    }
    if(ObjectFind("S5 label") != 0)
    {
    ObjectCreate("S5 label", OBJ_TEXT, 0, Time[20], S5);
    ObjectSetText("S5 label", "S5", StandardFontSize, "Arial", StandardFontColor);
    }
    else
    {
    ObjectMove("S5 label", 0, Time[20], S5);
    }

    //--- Draw Pivot lines on chart
    if(ObjectFind("S1 line") != 0)
    {
    ObjectCreate("S1 line", OBJ_HLINE, 0, Time[40], S1);
    ObjectSet("S1 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("S1 line", OBJPROP_COLOR, SupportColor);
    }
    else
    {
    ObjectMove("S1 line", 0, Time[40], S1);
    }

    if(ObjectFind("S2 line") != 0)
    {
    ObjectCreate("S2 line", OBJ_HLINE, 0, Time[40], S2);
    ObjectSet("S2 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("S2 line", OBJPROP_COLOR, SupportColor);
    }
    else
    {
    ObjectMove("S2 line", 0, Time[40], S2);
    }

    if(ObjectFind("S3 line") != 0)
    {
    ObjectCreate("S3 line", OBJ_HLINE, 0, Time[40], S3);
    ObjectSet("S3 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("S3 line", OBJPROP_COLOR, SupportColor);
    }
    else
    {
    ObjectMove("S3 line", 0, Time[40], S3);
    }

    if(ObjectFind("S4 line") != 0)
    {
    ObjectCreate("S4 line", OBJ_HLINE, 0, Time[40], S4);
    ObjectSet("S4 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("S4 line", OBJPROP_COLOR, SupportColor);
    }
    else
    {
    ObjectMove("S4 line", 0, Time[40], S4);
    }
    if(ObjectFind("S5 line") != 0)
    {
    ObjectCreate("S5 line", OBJ_HLINE, 0, Time[40], S5);
    ObjectSet("S5 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("S5 line", OBJPROP_COLOR, SupportColor);
    }
    else
    {
    ObjectMove("S5 line", 0, Time[40], S5);
    }

    if(ObjectFind("R1 line") != 0)
    {
    ObjectCreate("R1 line", OBJ_HLINE, 0, Time[40], R1);
    ObjectSet("R1 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("R1 line", OBJPROP_COLOR, ResistanceColor);
    }
    else
    {
    ObjectMove("R1 line", 0, Time[40], R1);
    }

    if(ObjectFind("R2 line") != 0)
    {
    ObjectCreate("R2 line", OBJ_HLINE, 0, Time[40], R2);
    ObjectSet("R2 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("R2 line", OBJPROP_COLOR, ResistanceColor);
    }
    else
    {
    ObjectMove("R2 line", 0, Time[40], R2);
    }

    if(ObjectFind("R3 line") != 0)
    {
    ObjectCreate("R3 line", OBJ_HLINE, 0, Time[40], R3);
    ObjectSet("R3 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("R3 line", OBJPROP_COLOR, ResistanceColor);
    }
    else
    {
    ObjectMove("R3 line", 0, Time[40], R3);
    }

    if(ObjectFind("R4 line") != 0)
    {
    ObjectCreate("R4 line", OBJ_HLINE, 0, Time[40], R4);
    ObjectSet("R4 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("R4 line", OBJPROP_COLOR, ResistanceColor);
    }
    else
    {
    ObjectMove("R4 line", 0, Time[40], R4);
    }
    if(ObjectFind("R5 line") != 0)
    {
    ObjectCreate("R5 line", OBJ_HLINE, 0, Time[40], R5);
    ObjectSet("R5 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("R5 line", OBJPROP_COLOR, ResistanceColor);
    }
    else
    {
    ObjectMove("R5 line", 0, Time[40], R5);
    }
    }

    if (MidPivots)
    {
    if(ObjectFind("M5 label") != 0)
    {
    ObjectCreate("M5 label", OBJ_TEXT, 0, Time[20], M5);
    ObjectSetText("M5 label", " M5", MidFontSize, "Arial", MidPivotColor);
    }
    else
    {
    ObjectMove("M5 label", 0, Time[20], M5);
    }

    if(ObjectFind("M4 label") != 0)
    {
    ObjectCreate("M4 label", OBJ_TEXT, 0, Time[20], M4);
    ObjectSetText("M4 label", " M4", MidFontSize, "Arial", MidPivotColor);
    }
    else
    {
    ObjectMove("M4 label", 0, Time[20], M4);
    }

    if(ObjectFind("M3 label") != 0)
    {
    ObjectCreate("M3 label", OBJ_TEXT, 0, Time[20], M3);
    ObjectSetText("M3 label", " M3", MidFontSize, "Arial", MidPivotColor);
    }
    else
    {
    ObjectMove("M3 label", 0, Time[20], M3);
    }

    if(ObjectFind("M2 label") != 0)
    {
    ObjectCreate("M2 label", OBJ_TEXT, 0, Time[20], M2);
    ObjectSetText("M2 label", " M2", MidFontSize, "Arial", MidPivotColor);
    }
    else
    {
    ObjectMove("M2 label", 0, Time[20], M2);
    }

    if(ObjectFind("M1 label") != 0)
    {
    ObjectCreate("M1 label", OBJ_TEXT, 0, Time[20], M1);
    ObjectSetText("M1 label", " M1", MidFontSize, "Arial", MidPivotColor);
    }
    else
    {
    ObjectMove("M1 label", 0, Time[20], M1);
    }

    if(ObjectFind("M0 label") != 0)
    {
    ObjectCreate("M0 label", OBJ_TEXT, 0, Time[20], M0);
    ObjectSetText("M0 label", " M0", MidFontSize, "Arial", MidPivotColor);
    }
    else
    {
    ObjectMove("M0 label", 0, Time[20], M0);
    }


    if(ObjectFind("M5 line") != 0)
    {
    ObjectCreate("M5 line", OBJ_HLINE, 0, Time[40], M5);
    ObjectSet("M5 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("M5 line", OBJPROP_COLOR, MidPivotColor);
    }
    else
    {
    ObjectMove("M5 line", 0, Time[40], M5);
    }

    if(ObjectFind("M4 line") != 0)
    {
    ObjectCreate("M4 line", OBJ_HLINE, 0, Time[40], M4);
    ObjectSet("M4 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("M4 line", OBJPROP_COLOR, MidPivotColor);
    }
    else
    {
    ObjectMove("M4 line", 0, Time[40], M4);
    }

    if(ObjectFind("M3 line") != 0)
    {
    ObjectCreate("M3 line", OBJ_HLINE, 0, Time[40], M3);
    ObjectSet("M3 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("M3 line", OBJPROP_COLOR, MidPivotColor);
    }
    else
    {
    ObjectMove("M3 line", 0, Time[40], M3);
    }

    if(ObjectFind("M2 line") != 0)
    {
    ObjectCreate("M2 line", OBJ_HLINE, 0, Time[40], M2);
    ObjectSet("M2 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("M2 line", OBJPROP_COLOR, MidPivotColor);
    }
    else
    {
    ObjectMove("M2 line", 0, Time[40], M2);
    }

    if(ObjectFind("M1 line") != 0)
    {
    ObjectCreate("M1 line", OBJ_HLINE, 0, Time[40], M1);
    ObjectSet("M1 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("M1 line", OBJPROP_COLOR, MidPivotColor);
    }
    else
    {
    ObjectMove("M1 line", 0, Time[40], M1);
    }

    if(ObjectFind("M0 line") != 0)
    {
    ObjectCreate("M0 line", OBJ_HLINE, 0, Time[40], M0);
    ObjectSet("M0 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("M0 line", OBJPROP_COLOR, MidPivotColor);
    }
    else
    {
    ObjectMove("M0 line", 0, Time[40], M0);
    }
    }

    if (Fibs)
    {
    // Fibs 1-3
    if (DisplayFibLevels_1_3)
    {
    if(ObjectFind("FibR1 label") != 0)
    {
    ObjectCreate("FibR1 label", OBJ_TEXT, 0, 0, 0);
    ObjectSetText("FibR1 label", "Fib R1", FibFontSize, "Arial", FibFontColor);
    }
    else
    {
    ObjectMove("FibR1 label", 0, Time[0], r1);
    }
    if(ObjectFind("FibR2 label") != 0)
    {
    ObjectCreate("FibR2 label", OBJ_TEXT, 0, 0, 0);
    ObjectSetText("FibR2 label", "Fib R2", FibFontSize, "Arial", FibFontColor);
    }
    else
    {
    ObjectMove("FibR2 label", 0, Time[0], r2);
    }
    if(ObjectFind("FibR3 label") != 0)
    {
    ObjectCreate("FibR3 label", OBJ_TEXT, 0, 0, 0);
    ObjectSetText("FibR3 label", "Fib R3", FibFontSize, "Arial", FibFontColor);
    }
    else
    {
    ObjectMove("FibR3 label", 0, Time[0], r3);
    }
    if(ObjectFind("FibS1 label") != 0)
    {
    ObjectCreate("FibS1 label", OBJ_TEXT, 0, 0, 0);
    ObjectSetText("FibS1 label", "Fib S1", FibFontSize, "Arial", FibFontColor);
    }
    else
    {
    ObjectMove("FibS1 label", 0, Time[0], s1);
    }
    if(ObjectFind("FibS2 label") != 0)
    {
    ObjectCreate("FibS2 label", OBJ_TEXT, 0, 0, 0);
    ObjectSetText("FibS2 label", "Fib S2", FibFontSize, "Arial", FibFontColor);
    }
    else
    {
    ObjectMove("FibS2 label", 0, Time[0], s2);
    }
    if(ObjectFind("FibS3 label") != 0)
    {
    ObjectCreate("FibS3 label", OBJ_TEXT, 0, 0, 0);
    ObjectSetText("FibS3 label", "Fib S3", FibFontSize, "Arial", FibFontColor);
    }
    else
    {
    ObjectMove("FibS3 label", 0, Time[0], s3);
    }
    }
    // Fibs 4-6
    if (DisplayFibLevels_4_6)
    {
    if(ObjectFind("FibR4 label") != 0)
    {
    ObjectCreate("FibR4 label", OBJ_TEXT, 0, 0, 0);
    ObjectSetText("FibR4 label", "Fib R4", FibFontSize, "Arial", FibFontColor);
    }
    else
    {
    ObjectMove("FibR4 label", 0, Time[0], r4);
    }
    if(ObjectFind("FibR5 label") != 0)
    {
    ObjectCreate("FibR5 label", OBJ_TEXT, 0, 0, 0);
    ObjectSetText("FibR5 label", "Fib R5", FibFontSize, "Arial", FibFontColor);
    }
    else
    {
    ObjectMove("FibR5 label", 0, Time[0], r5);
    }
    if(ObjectFind("FibR6 label") != 0)
    {
    ObjectCreate("FibR6 label", OBJ_TEXT, 0, 0, 0);
    ObjectSetText("FibR6 label", "Fib R6", FibFontSize, "Arial", FibFontColor);
    }
    else
    {
    ObjectMove("FibR6 label", 0, Time[0], r6);
    }
    if(ObjectFind("FibS4 label") != 0)
    {
    ObjectCreate("FibS4 label", OBJ_TEXT, 0, 0, 0);
    ObjectSetText("FibS4 label", "Fib S4", FibFontSize, "Arial", FibFontColor);
    }
    else
    {
    ObjectMove("FibS4 label", 0, Time[0], s4);
    }
    if(ObjectFind("FibS5 label") != 0)
    {
    ObjectCreate("FibS5 label", OBJ_TEXT, 0, 0, 0);
    ObjectSetText("FibS5 label", "Fib S5", FibFontSize, "Arial", FibFontColor);
    }
    else
    {
    ObjectMove("FibS5 label", 0, Time[0], s5);
    }
    if(ObjectFind("FibS6 label") != 0)
    {
    ObjectCreate("FibS6 label", OBJ_TEXT, 0, 0, 0);
    ObjectSetText("FibS6 label", "Fib S6", FibFontSize, "Arial", FibFontColor);
    }
    else
    {
    ObjectMove("FibS6 label", 0, Time[0], s6);
    }
    }

    if (DisplayFibLevels_7_16)
    {
    if(ObjectFind("FibR7 label") != 0)
    {
    ObjectCreate("FibR7 label", OBJ_TEXT, 0, 0, 0);
    ObjectSetText("FibR7 label", "Fib R7", FibFontSize, "Arial", FibFontColor);
    }
    else
    {
    ObjectMove("FibR7 label", 0, Time[0], r7);
    }
    if(ObjectFind("FibR8 label") != 0)
    {
    ObjectCreate("FibR8 label", OBJ_TEXT, 0, 0, 0);
    ObjectSetText("FibR8 label", "Fib R8", FibFontSize, "Arial", FibFontColor);
    }
    else
    {
    ObjectMove("FibR8 label", 0, Time[0], r8);
    }
    if(ObjectFind("FibR9 label") != 0)
    {
    ObjectCreate("FibR9 label", OBJ_TEXT, 0, 0, 0);
    ObjectSetText("FibR9 label", "Fib R9", FibFontSize, "Arial", FibFontColor);
    }
    else
    {
    ObjectMove("FibR9 label", 0, Time[0], r9);
    }
    if(ObjectFind("FibR10 label") != 0)
    {
    ObjectCreate("FibR10 label", OBJ_TEXT, 0, 0, 0);
    ObjectSetText("FibR10 label", "Fib R10", FibFontSize, "Arial", FibFontColor);
    }
    else
    {
    ObjectMove("FibR10 label", 0, Time[0], r10);
    }
    if(ObjectFind("FibR11 label") != 0)
    {
    ObjectCreate("FibR11 label", OBJ_TEXT, 0, 0, 0);
    ObjectSetText("FibR11 label", "Fib R11", FibFontSize, "Arial", FibFontColor);
    }
    else
    {
    ObjectMove("FibR11 label", 0, Time[0], r11);
    }
    if(ObjectFind("FibR12 label") != 0)
    {
    ObjectCreate("FibR12 label", OBJ_TEXT, 0, 0, 0);
    ObjectSetText("FibR12 label", "Fib R12", FibFontSize, "Arial", FibFontColor);
    }
    else
    {
    ObjectMove("FibR12 label", 0, Time[0], r12);
    }
    if(ObjectFind("FibR13 label") != 0)
    {
    ObjectCreate("FibR13 label", OBJ_TEXT, 0, 0, 0);
    ObjectSetText("FibR13 label", "Fib R13", FibFontSize, "Arial", FibFontColor);
    }
    else
    {
    ObjectMove("FibR13 label", 0, Time[0], r13);
    }
    if(ObjectFind("FibR14 label") != 0)
    {
    ObjectCreate("FibR14 label", OBJ_TEXT, 0, 0, 0);
    ObjectSetText("FibR14 label", "Fib R14", FibFontSize, "Arial", FibFontColor);
    }
    else
    {
    ObjectMove("FibR14 label", 0, Time[0], r14);
    }
    if(ObjectFind("FibR15 label") != 0)
    {
    ObjectCreate("FibR15 label", OBJ_TEXT, 0, 0, 0);
    ObjectSetText("FibR15 label", "Fib R15", FibFontSize, "Arial", FibFontColor);
    }
    else
    {
    ObjectMove("FibR15 label", 0, Time[0], r15);
    }
    if(ObjectFind("FibR16 label") != 0)
    {
    ObjectCreate("FibR16 label", OBJ_TEXT, 0, 0, 0);
    ObjectSetText("FibR16 label", "Fib R16", FibFontSize, "Arial", FibFontColor);
    }
    else
    {
    ObjectMove("FibR16 label", 0, Time[0], r16);
    }
    if(ObjectFind("FibS7 label") != 0)
    {
    ObjectCreate("FibS7 label", OBJ_TEXT, 0, 0, 0);
    ObjectSetText("FibS7 label", "Fib S7", FibFontSize, "Arial", FibFontColor);
    }
    else
    {
    ObjectMove("FibS7 label", 0, Time[0], s7);
    }
    if(ObjectFind("FibS8 label") != 0)
    {
    ObjectCreate("FibS8 label", OBJ_TEXT, 0, 0, 0);
    ObjectSetText("FibS8 label", "Fib S8", FibFontSize, "Arial", FibFontColor);
    }
    else
    {
    ObjectMove("FibS8 label", 0, Time[0], s8);
    }
    if(ObjectFind("FibS9 label") != 0)
    {
    ObjectCreate("FibS9 label", OBJ_TEXT, 0, 0, 0);
    ObjectSetText("FibS9 label", "Fib S9", FibFontSize, "Arial", FibFontColor);
    }
    else
    {
    ObjectMove("FibS9 label", 0, Time[0], s9);
    }
    if(ObjectFind("FibS10 label") != 0)
    {
    ObjectCreate("FibS10 label", OBJ_TEXT, 0, 0, 0);
    ObjectSetText("FibS10 label", "Fib S10", FibFontSize, "Arial", FibFontColor);
    }
    else
    {
    ObjectMove("FibS10 label", 0, Time[0], s10);
    }
    if(ObjectFind("FibS11 label") != 0)
    {
    ObjectCreate("FibS11 label", OBJ_TEXT, 0, 0, 0);
    ObjectSetText("FibS11 label", "Fib S11", FibFontSize, "Arial", FibFontColor);
    }
    else
    {
    ObjectMove("FibS11 label", 0, Time[0], s11);
    }
    if(ObjectFind("FibS12 label") != 0)
    {
    ObjectCreate("FibS12 label", OBJ_TEXT, 0, 0, 0);
    ObjectSetText("FibS12 label", "Fib S12", FibFontSize, "Arial", FibFontColor);
    }
    else
    {
    ObjectMove("FibS12 label", 0, Time[0], s12);
    }
    if(ObjectFind("FibS13 label") != 0)
    {
    ObjectCreate("FibS13 label", OBJ_TEXT, 0, 0, 0);
    ObjectSetText("FibS13 label", "Fib S13", FibFontSize, "Arial", FibFontColor);
    }
    else
    {
    ObjectMove("FibS13 label", 0, Time[0], s13);
    }
    if(ObjectFind("FibS14 label") != 0)
    {
    ObjectCreate("FibS14 label", OBJ_TEXT, 0, 0, 0);
    ObjectSetText("FibS14 label", "Fib S14", FibFontSize, "Arial", FibFontColor);
    }
    else
    {
    ObjectMove("FibS14 label", 0, Time[0], s14);
    }
    if(ObjectFind("FibS15 label") != 0)
    {
    ObjectCreate("FibS15 label", OBJ_TEXT, 0, 0, 0);
    ObjectSetText("FibS15 label", "Fib S15", FibFontSize, "Arial", FibFontColor);
    }
    else
    {
    ObjectMove("FibS15 label", 0, Time[0], s15);
    }
    if(ObjectFind("FibS16 label") != 0)
    {
    ObjectCreate("FibS16 label", OBJ_TEXT, 0, 0, 0);
    ObjectSetText("FibS16 label", "Fib S16", FibFontSize, "Arial", FibFontColor);
    }
    else
    {
    ObjectMove("FibS16 label", 0, Time[0], s16);
    }
    }

    //---- Set lines on chart window for Fibs
    // Fibs 1-3
    if (DisplayFibLevels_1_3)
    {
    if(ObjectFind("FibR1 line") != 0)
    {
    ObjectCreate("FibR1 line", OBJ_HLINE, 0, 0, 0);
    ObjectSet("FibR1 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("FibR1 line", OBJPROP_COLOR, FibColorRes);
    }
    else
    {
    ObjectMove("FibR1 line", 0, Time[0], r1);
    }
    if(ObjectFind("FibR2 line") != 0)
    {
    ObjectCreate("FibR2 line", OBJ_HLINE, 0, 0, 0);
    ObjectSet("FibR2 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("FibR2 line", OBJPROP_COLOR, FibColorRes);
    }
    else
    {
    ObjectMove("FibR2 line", 0, Time[0], r2);
    }
    if(ObjectFind("FibR3 line") != 0)
    {
    ObjectCreate("FibR3 line", OBJ_HLINE, 0, 0, 0);
    ObjectSet("FibR3 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("FibR3 line", OBJPROP_COLOR, FibColorRes);
    }
    else
    {
    ObjectMove("FibR3 line", 0, Time[0], r3);
    }
    if(ObjectFind("FibS1 line") != 0)
    {
    ObjectCreate("FibS1 line", OBJ_HLINE, 0, 0, 0);
    ObjectSet("FibS1 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("FibS1 line", OBJPROP_COLOR, FibColorSup);
    }
    else
    {
    ObjectMove("FibS1 line", 0, Time[0], s1);
    }
    if(ObjectFind("FibS2 line") != 0)
    {
    ObjectCreate("FibS2 line", OBJ_HLINE, 0, 0, 0);
    ObjectSet("FibS2 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("FibS2 line", OBJPROP_COLOR, FibColorSup);
    }
    else
    {
    ObjectMove("FibS2 line", 0, Time[0], s2);
    }
    if(ObjectFind("FibS3 line") != 0)
    {
    ObjectCreate("FibS3 line", OBJ_HLINE, 0, 0, 0);
    ObjectSet("FibS3 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("FibS3 line", OBJPROP_COLOR, FibColorSup);
    }
    else
    {
    ObjectMove("FibS3 line", 0, Time[0], s3);
    }
    }
    // Fibs 4-6
    if (DisplayFibLevels_4_6)
    {
    if(ObjectFind("FibR4 line") != 0)
    {
    ObjectCreate("FibR4 line", OBJ_HLINE, 0, 0, 0);
    ObjectSet("FibR4 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("FibR4 line", OBJPROP_COLOR, FibColorRes);
    }
    else
    {
    ObjectMove("FibR4 line", 0, Time[0], r4);
    }
    if(ObjectFind("FibR5 line") != 0)
    {
    ObjectCreate("FibR5 line", OBJ_HLINE, 0, 0, 0);
    ObjectSet("FibR5 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("FibR5 line", OBJPROP_COLOR, FibColorRes);
    }
    else
    {
    ObjectMove("FibR5 line", 0, Time[0], r5);
    }
    if(ObjectFind("FibR6 line") != 0)
    {
    ObjectCreate("FibR6 line", OBJ_HLINE, 0, 0, 0);
    ObjectSet("FibR6 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("FibR6 line", OBJPROP_COLOR, FibColorRes);
    }
    else
    {
    ObjectMove("FibR6 line", 0, Time[0], r6);
    }
    if(ObjectFind("FibS4 line") != 0)
    {
    ObjectCreate("FibS4 line", OBJ_HLINE, 0, 0, 0);
    ObjectSet("FibS4 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("FibS4 line", OBJPROP_COLOR, FibColorSup);
    }
    else
    {
    ObjectMove("FibS4 line", 0, Time[0], s4);
    }
    if(ObjectFind("FibS5 line") != 0)
    {
    ObjectCreate("FibS5 line", OBJ_HLINE, 0, 0, 0);
    ObjectSet("FibS5 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("FibS5 line", OBJPROP_COLOR, FibColorSup);
    }
    else
    {
    ObjectMove("FibS5 line", 0, Time[0], s5);
    }
    if(ObjectFind("FibS6 line") != 0)
    {
    ObjectCreate("FibS6 line", OBJ_HLINE, 0, 0, 0);
    ObjectSet("FibS6 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("FibS6 line", OBJPROP_COLOR, FibColorSup);
    }
    else
    {
    ObjectMove("FibS6 line", 0, Time[0], s6);
    }
    }

    // Fibs 7-16
    if (DisplayFibLevels_7_16)
    {
    if(ObjectFind("FibR7 line") != 0)
    {
    ObjectCreate("FibR7 line", OBJ_HLINE, 0, 0, 0);
    ObjectSet("FibR7 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("FibR7 line", OBJPROP_COLOR, FibColorRes);
    }
    else
    {
    ObjectMove("FibR7 line", 0, Time[0], r7);
    }
    if(ObjectFind("FibR8 line") != 0)
    {
    ObjectCreate("FibR8 line", OBJ_HLINE, 0, 0, 0);
    ObjectSet("FibR8 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("FibR8 line", OBJPROP_COLOR, FibColorRes);
    }
    else
    {
    ObjectMove("FibR8 line", 0, Time[0], r8);
    }
    if(ObjectFind("FibR9 line") != 0)
    {
    ObjectCreate("FibR9 line", OBJ_HLINE, 0, 0, 0);
    ObjectSet("FibR9 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("FibR9 line", OBJPROP_COLOR, FibColorRes);
    }
    else
    {
    ObjectMove("FibR9 line", 0, Time[0], r9);
    }
    if(ObjectFind("FibR10 line") != 0)
    {
    ObjectCreate("FibR10 line", OBJ_HLINE, 0, 0, 0);
    ObjectSet("FibR10 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("FibR10 line", OBJPROP_COLOR, FibColorRes);
    }
    else
    {
    ObjectMove("FibR10 line", 0, Time[0], r10);
    }
    if(ObjectFind("FibR11 line") != 0)
    {
    ObjectCreate("FibR11 line", OBJ_HLINE, 0, 0, 0);
    ObjectSet("FibR11 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("FibR11 line", OBJPROP_COLOR, FibColorRes);
    }
    else
    {
    ObjectMove("FibR11 line", 0, Time[0], r11);
    }
    if(ObjectFind("FibR12 line") != 0)
    {
    ObjectCreate("FibR12 line", OBJ_HLINE, 0, 0, 0);
    ObjectSet("FibR12 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("FibR12 line", OBJPROP_COLOR, FibColorRes);
    }
    else
    {
    ObjectMove("FibR12 line", 0, Time[0], r12);
    }
    if(ObjectFind("FibR13 line") != 0)
    {
    ObjectCreate("FibR13 line", OBJ_HLINE, 0, 0, 0);
    ObjectSet("FibR13 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("FibR13 line", OBJPROP_COLOR, FibColorRes);
    }
    else
    {
    ObjectMove("FibR13 line", 0, Time[0], r13);
    }
    if(ObjectFind("FibR14 line") != 0)
    {
    ObjectCreate("FibR14 line", OBJ_HLINE, 0, 0, 0);
    ObjectSet("FibR14 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("FibR14 line", OBJPROP_COLOR, FibColorRes);
    }
    else
    {
    ObjectMove("FibR14 line", 0, Time[0], r14);
    }
    if(ObjectFind("FibR15 line") != 0)
    {
    ObjectCreate("FibR15 line", OBJ_HLINE, 0, 0, 0);
    ObjectSet("FibR15 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("FibR15 line", OBJPROP_COLOR, FibColorRes);
    }
    else
    {
    ObjectMove("FibR15 line", 0, Time[0], r15);
    }
    if(ObjectFind("FibR16 line") != 0)
    {
    ObjectCreate("FibR16 line", OBJ_HLINE, 0, 0, 0);
    ObjectSet("FibR16 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("FibR16 line", OBJPROP_COLOR, FibColorRes);
    }
    else
    {
    ObjectMove("FibR16 line", 0, Time[0], r16);
    }
    if(ObjectFind("FibS7 line") != 0)
    {
    ObjectCreate("FibS7 line", OBJ_HLINE, 0, 0, 0);
    ObjectSet("FibS7 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("FibS7 line", OBJPROP_COLOR, FibColorSup);
    }
    else
    {
    ObjectMove("FibS7 line", 0, Time[0], s7);
    }
    if(ObjectFind("FibS8 line") != 0)
    {
    ObjectCreate("FibS8 line", OBJ_HLINE, 0, 0, 0);
    ObjectSet("FibS8 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("FibS8 line", OBJPROP_COLOR, FibColorSup);
    }
    else
    {
    ObjectMove("FibS8 line", 0, Time[0], s8);
    }
    if(ObjectFind("FibS9 line") != 0)
    {
    ObjectCreate("FibS9 line", OBJ_HLINE, 0, 0, 0);
    ObjectSet("FibS9 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("FibS9 line", OBJPROP_COLOR, FibColorSup);
    }
    else
    {
    ObjectMove("FibS9 line", 0, Time[0], s9);
    }
    if(ObjectFind("FibS10 line") != 0)
    {
    ObjectCreate("FibS10 line", OBJ_HLINE, 0, 0, 0);
    ObjectSet("FibS10 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("FibS10 line", OBJPROP_COLOR, FibColorSup);
    }
    else
    {
    ObjectMove("FibS10 line", 0, Time[0], s10);
    }
    if(ObjectFind("FibS11 line") != 0)
    {
    ObjectCreate("FibS11 line", OBJ_HLINE, 0, 0, 0);
    ObjectSet("FibS11 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("FibS11 line", OBJPROP_COLOR, FibColorSup);
    }
    else
    {
    ObjectMove("FibS11 line", 0, Time[0], s11);
    }
    if(ObjectFind("FibS12 line") != 0)
    {
    ObjectCreate("FibS12 line", OBJ_HLINE, 0, 0, 0);
    ObjectSet("FibS12 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("FibS12 line", OBJPROP_COLOR, FibColorSup);
    }
    else
    {
    ObjectMove("FibS12 line", 0, Time[0], s12);
    }
    if(ObjectFind("FibS13 line") != 0)
    {
    ObjectCreate("FibS13 line", OBJ_HLINE, 0, 0, 0);
    ObjectSet("FibS13 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("FibS13 line", OBJPROP_COLOR, FibColorSup);
    }
    else
    {
    ObjectMove("FibS13 line", 0, Time[0], s13);
    }
    if(ObjectFind("FibS13 line") != 0)
    {
    ObjectCreate("FibS13 line", OBJ_HLINE, 0, 0, 0);
    ObjectSet("FibS13 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("FibS13 line", OBJPROP_COLOR, FibColorSup);
    }
    else
    {
    ObjectMove("FibS14 line", 0, Time[0], s14);
    }
    if(ObjectFind("FibS15 line") != 0)
    {
    ObjectCreate("FibS15 line", OBJ_HLINE, 0, 0, 0);
    ObjectSet("FibS15 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("FibS15 line", OBJPROP_COLOR, FibColorSup);
    }
    else
    {
    ObjectMove("FibS15 line", 0, Time[0], s15);
    }
    if(ObjectFind("FibS16 line") != 0)
    {
    ObjectCreate("FibS16 line", OBJ_HLINE, 0, 0, 0);
    ObjectSet("FibS16 line", OBJPROP_STYLE, STYLE_DASHDOTDOT);
    ObjectSet("FibS16 line", OBJPROP_COLOR, FibColorSup);
    }
    else
    {
    ObjectMove("FibS16 line", 0, Time[0], s16);
    }
    }

    }

    // --- THE CAMARILLA ---
    if (CamTargets)
    {
    if(ObjectFind("H5 label") != 0)
    {
    ObjectCreate("H5 label", OBJ_TEXT, 0, Time[20], H5);
    ObjectSetText("H5 label", " H5 LB TARGET", CamFontSize, "Arial", CamFontColor);
    }
    else
    {
    ObjectMove("H5 label", 0, Time[20], H5);
    }

    if(ObjectFind("H4 label") != 0)
    {
    ObjectCreate("H4 label", OBJ_TEXT, 0, Time[20], H4);
    ObjectSetText("H4 label", " H4 LONG BREAKOUT", CamFontSize, "Arial", CamFontColor);
    }
    else
    {
    ObjectMove("H4 label", 0, Time[20], H4);
    }

    if(ObjectFind("H3 label") != 0)
    {
    ObjectCreate("H3 label", OBJ_TEXT, 0, Time[20], H3);
    ObjectSetText("H3 label", " H3 SHORT", CamFontSize, "Arial", CamFontColor);
    }
    else
    {
    ObjectMove("H3 label", 0, Time[20], H3);
    }

    if(ObjectFind("L3 label") != 0)
    {
    ObjectCreate("L3 label", OBJ_TEXT, 0, Time[20], L3);
    ObjectSetText("L3 label", " L3 LONG", CamFontSize, "Arial", CamFontColor);
    }
    else
    {
    ObjectMove("L3 label", 0, Time[20], L3);
    }

    if(ObjectFind("L4 label") != 0)
    {
    ObjectCreate("L4 label", OBJ_TEXT, 0, Time[20], L4);
    ObjectSetText("L4 label", " L4 SHORT BREAKOUT", CamFontSize, "Arial", CamFontColor);
    }
    else
    {
    ObjectMove("L4 label", 0, Time[20], L4);
    }

    if(ObjectFind("L5 label") != 0)
    {
    ObjectCreate("L5 label", OBJ_TEXT, 0, Time[20], L5);
    ObjectSetText("L5 label", " L5 SB TARGET", CamFontSize, "Arial", CamFontColor);
    }
    else
    {
    ObjectMove("L5 label", 0, Time[20], L5);
    }

    //---- Draw Camarilla lines on Chart
    if(ObjectFind("H5 line") != 0)
    {
    ObjectCreate("H5 line", OBJ_HLINE, 0, Time[40], H5);
    ObjectSet("H5 line", OBJPROP_STYLE, STYLE_SOLID);
    ObjectSet("H5 line", OBJPROP_COLOR, SpringGreen);
    ObjectSet("H5 line", OBJPROP_WIDTH, 1);
    }
    else
    {
    ObjectMove("H5 line", 0, Time[40], H5);
    }

    if(ObjectFind("H4 line") != 0)
    {
    ObjectCreate("H4 line", OBJ_HLINE, 0, Time[40], H4);
    ObjectSet("H4 line", OBJPROP_STYLE, STYLE_SOLID);
    ObjectSet("H4 line", OBJPROP_COLOR, SpringGreen);
    ObjectSet("H4 line", OBJPROP_WIDTH, 1);
    }
    else
    {
    ObjectMove("H4 line", 0, Time[40], H4);
    }

    if(ObjectFind("H3 line") != 0)
    {
    ObjectCreate("H3 line", OBJ_HLINE, 0, Time[40], H3);
    ObjectSet("H3 line", OBJPROP_STYLE, STYLE_SOLID);
    ObjectSet("H3 line", OBJPROP_COLOR, SpringGreen);
    ObjectSet("H3 line", OBJPROP_WIDTH, 2);
    }
    else
    {
    ObjectMove("H3 line", 0, Time[40], H3);
    }

    if(ObjectFind("L3 line") != 0)
    {
    ObjectCreate("L3 line", OBJ_HLINE, 0, Time[40], L3);
    ObjectSet("L3 line", OBJPROP_STYLE, STYLE_SOLID);
    ObjectSet("L3 line", OBJPROP_COLOR, Red);
    ObjectSet("L3 line", OBJPROP_WIDTH, 2);
    }
    else
    {
    ObjectMove("L3 line", 0, Time[40], L3);
    }

    if(ObjectFind("L4 line") != 0)
    {
    ObjectCreate("L4 line", OBJ_HLINE, 0, Time[40], L4);
    ObjectSet("L4 line", OBJPROP_STYLE, STYLE_SOLID);
    ObjectSet("L4 line", OBJPROP_COLOR, Red);
    ObjectSet("L4 line", OBJPROP_WIDTH, 1);
    }
    else
    {
    ObjectMove("L4 line", 0, Time[40], L4);
    }

    if(ObjectFind("L5 line") != 0)
    {
    ObjectCreate("L5 line", OBJ_HLINE, 0, Time[40], L5);
    ObjectSet("L5 line", OBJPROP_STYLE, STYLE_SOLID);
    ObjectSet("L5 line", OBJPROP_COLOR, Red);
    ObjectSet("L5 line", OBJPROP_WIDTH, 1);
    }
    else
    {
    ObjectMove("L5 line", 0, Time[40], L5);
    }
    }
    //---- done
    // Now check for Alert

    if (Alerts) DoAlerts();

    //----
    return(0);
    }
    //+------------------------------------------------------------------+
     
  9. kaly422000

    kaly422000 Well-Known Member

    Joined:
    Nov 21, 2009
    Messages:
    914
    Likes Received:
    347
    Trophy Points:
    63
    i also use manshi rt and for eod i use import metastock option. i am using trial version of amibroker . if u have updated metastock data then there is no problem i think. and i think dont try to use blank chart if u use various afl.copy paste it through analysis>formula editer.
    matter is u want to see eod chart at the same time , keep open another software for that.
     
    Last edited: Oct 4, 2010
  10. bijoy2526

    bijoy2526 Member

    Joined:
    Mar 30, 2008
    Messages:
    134
    Likes Received:
    22
    Trophy Points:
    18
    yes possible...run two amibroker at the same time..one for eod and other for intra...if the amibroker using for eod changes to intra..change the data base again for eod
     
Loading...

Share This Page