ADR Levels from Open

Viewing 2 posts - 1 through 2 (of 2 total)
  • Author
    Posts
  • #77130 quote
    Khutx0Khutx0
    Participant
    New

    Please help me convert this code to run on prt.

     

     

    //+——————————————————————+
    //| (T_S_R)-Daily Range Display#2.mq4 |
    //| Copyright © 2006, MetaQuotes Software Corp. |
    //| http://www.metaquotes.net |
    //| Programming : CJA (forex-tsd forum) |
    //| Develloped for: FXiGoR |
    //+——————————————————————+
    #property copyright “Copyright © 2006, MetaQuotes Software Corp.”
    #property link “http://www.metaquotes.net”
    #property link “Display by cja”
    // Thanks to the coders who supplied some of the code Daily_Open Indicator
    // & Xdard777 for his MM labels code.

    #property indicator_chart_window
    #property indicator_buffers 1
    #property indicator_color1 DarkBlue
    #property indicator_width1 2

    //—- indicator buffers

    #define Daily “Daily”
    #define Daily1 “Daily1”
    #define Daily2 “Daily2″

    extern color DailyColor =Maroon;//C’99,39,11′
    extern color DailyColor1 =DarkGreen;//C’0,49,09′
    extern color DailyColor2= C’0,44,09′;

    double TodayOpenBuffer[];
    extern int TimeZoneOfData= 0;

    //—- input parameters
    int shift=0,i2=0,WorkTime=0,Periods=0,CurPeriod=0,nTime=0;
    //+——————————————————————+
    //| Custom indicator initialization function |
    //+——————————————————————+
    int init()
    {
    SetIndexStyle(0,DRAW_LINE,STYLE_SOLID);
    SetIndexBuffer(0,TodayOpenBuffer);
    SetIndexLabel(0,”Open”);
    SetIndexEmptyValue(0,0.0);
    return(0);
    }
    //+——————————————————————+
    //| Custom indicator deinitialization function |
    //+——————————————————————+
    int deinit()
    {
    //—-
    ObjectsDeleteAll();
    //—-
    return(0);
    }
    //+——————————————————————+
    //| Custom indicator iteration function |
    //+——————————————————————+

    int start()
    {
    int lastbar;
    int counted_bars= IndicatorCounted();

    if (counted_bars>0) counted_bars–;
    lastbar = Bars-counted_bars;
    DailyOpen(0,lastbar);
    CreateHL();
    }

    void CreateObj(string objName, double start, double end, color clr)
    {
    ObjectCreate(objName, OBJ_RECTANGLE, 0, iTime(NULL,1440,0), start, Time[0], end);
    ObjectSet(objName, OBJPROP_COLOR, clr);
    ObjectCreate(objName, OBJ_RECTANGLE, 0, iTime(NULL,1440,0), 0, Time[0],0);
    ObjectSet(objName, OBJPROP_COLOR, clr);
    }
    void DeleteObjects()
    {
    ObjectDelete(Daily);
    ObjectDelete(DailyColor);
    ObjectDelete(Daily1);
    ObjectDelete(DailyColor1);
    ObjectDelete(Daily2);
    ObjectDelete(DailyColor2);

    }
    void CreateHL()
    {
    DeleteObjects();
    double HI2 = iHigh(NULL,1440,0);
    double LOW2 = iLow(NULL,1440,0);
    double HI3 = iHigh(NULL,1440,1);
    double LOW3 = iLow(NULL,1440,1);
    double HI4 = iHigh(NULL,1440,0);
    double LOW4 = iLow(NULL,1440,0);
    double HI5 = iHigh(NULL,1440,2);
    double LOW5 = iLow(NULL,1440,2);
    double HI6 = iHigh(NULL,1440,3);
    double LOW6 = iLow(NULL,1440,3);
    double HI7 = iHigh(NULL,1440,4);
    double LOW7 = iLow(NULL,1440,4);
    double HI8 = iHigh(NULL,1440,5);
    double LOW8 = iLow(NULL,1440,5);
    double HI9 = iHigh(NULL,1440,6);
    double LOW9 = iLow(NULL,1440,6);
    double HI10 = iHigh(NULL,1440,7);
    double LOW10 = iLow(NULL,1440,7);
    double HI11 = iHigh(NULL,1440,8);
    double LOW11 = iLow(NULL,1440,8);
    double HI12 = iHigh(NULL,1440,9);
    double LOW12 = iLow(NULL,1440,9);
    double HI13 = iHigh(NULL,1440,10);
    double LOW13 = iLow(NULL,1440,10);
    double HI14 = iHigh(NULL,1440,11);
    double LOW14 = iLow(NULL,1440,11);
    double HI15 = iHigh(NULL,1440,12);
    double LOW15 = iLow(NULL,1440,12);
    double HI16 = iHigh(NULL,1440,13);
    double LOW16 = iLow(NULL,1440,13);
    double HI17 = iHigh(NULL,1440,14);
    double LOW17 = iLow(NULL,1440,14);
    double HI18 = iHigh(NULL,1440,15);
    double LOW18 = iLow(NULL,1440,15);
    double HI19 = iHigh(NULL,1440,16);
    double LOW19 = iLow(NULL,1440,16);
    double HI20 = iHigh(NULL,1440,17);
    double LOW20 = iLow(NULL,1440,17);
    double HI21 = iHigh(NULL,1440,18);
    double LOW21 = iLow(NULL,1440,18);
    double HI22 = iHigh(NULL,1440,19);
    double LOW22 = iLow(NULL,1440,19);
    double HI23 = iHigh(NULL,1440,20);
    double LOW23 = iLow(NULL,1440,20);

    double OPEN = iOpen(NULL,1440,0);
    double CLOSE = iClose(NULL,1440,0);

    double ONE = (HI3-LOW3)/2;

    double FIVE = ((HI3-LOW3)+(HI5-LOW5)+(HI6-LOW6)+(HI7-LOW7)+(HI8-LOW8))/10;

    double TEN = ((HI3-LOW3)+(HI5-LOW5)+(HI6-LOW6)+(HI7-LOW7)+(HI8-LOW8)+
    (HI9-LOW9)+(HI10-LOW10)+(HI11-LOW11)+(HI12-LOW12)+(HI13-LOW13))/20;

    double TWENTY = ((HI3-LOW3)+(HI5-LOW5)+(HI6-LOW6)+(HI7-LOW7)+(HI8-LOW8)+
    (HI9-LOW9)+(HI10-LOW10)+(HI11-LOW11)+(HI12-LOW12)+(HI13-LOW13)+
    (HI14-LOW14)+(HI15-LOW15)+(HI16-LOW16)+(HI17-LOW17)+(HI18-LOW18)+
    (HI19-LOW19)+(HI20-LOW20)+(HI21-LOW21)+(HI22-LOW22)+(HI23-LOW23))/40;

    double AV = (FIVE+TEN+TWENTY)/3;// New SettingAV = (FIVE+TEN+TWENTY)/3;

    double AV2 = ((FIVE+TEN+TWENTY)/3)*20000;

    double HIDaily = iHigh(NULL,1440,0)-(AV);
    double LOWDaily = iLow(NULL,1440,0)+(AV);
    double HIDaily1 = iHigh(NULL,1440,0);
    double LOWDaily1 =iLow(NULL,1440,0);
    double HIDaily2 = iHigh(NULL,1440,0)-(AV)*2;
    double LOWDaily2 =iLow(NULL,1440,0)+(AV)*2;

    //Today’s High
    if(ObjectFind(“HIDaily3”) != 0)
    {
    ObjectCreate(“HIDaily3”, OBJ_TEXT, 0, Time[0], HI4);
    ObjectSetText(“HIDaily3″, ” High “, 9, “Verdana”, YellowGreen);
    }
    else
    {
    ObjectMove(“HIDaily3”, 0, Time[0], HI4);
    }

    //Todays Low
    if(ObjectFind(“HIDaily4”) != 0)
    {
    ObjectCreate(“HIDaily4”, OBJ_TEXT, 0, Time[0], LOW4);
    ObjectSetText(“HIDaily4″, ” Low “, 9, “Verdana”, YellowGreen);
    }
    else
    {
    ObjectMove(“HIDaily4”, 0, Time[0], LOW4);
    }

    //Open
    if(ObjectFind(“HIDaily5”) != 0)
    {
    ObjectCreate(“HIDaily5”, OBJ_TEXT, 0, Time[0], OPEN);
    ObjectSetText(“HIDaily5″, ” Open “, 9, “Verdana”,SandyBrown);
    }
    else
    {
    ObjectMove(“HIDaily5”, 0, Time[0], OPEN);
    }

    //Bottom of Daily Range
    if(ObjectFind(“HIDaily6”) != 0)
    {
    ObjectCreate(“HIDaily6”, OBJ_TEXT, 0, Time[8],HIDaily2);
    ObjectSetText(“HIDaily6″, ” Bottom Daily Range”, 9, “Verdana”,SandyBrown);
    }
    else
    {
    ObjectMove(“HIDaily6”, 0, Time[8], HIDaily2);
    }
    //TOP of Daily Range
    if(ObjectFind(“HIDaily7”) != 0)
    {
    ObjectCreate(“HIDaily7”, OBJ_TEXT, 0, Time[7],LOWDaily2);
    ObjectSetText(“HIDaily7″, ” Top Daily Range”, 9, “Verdana”,SandyBrown);
    }
    else
    {
    ObjectMove(“HIDaily7”, 0, Time[7], LOWDaily2);
    }

    {
    if( (WorkTime != Time[0]) || (Periods != Period()) ) {
    CreateObj(Daily, HIDaily, LOWDaily, DailyColor);
    CreateObj(Daily1, HIDaily1, LOWDaily1, DailyColor1);
    CreateObj(Daily2, HIDaily2, LOWDaily2, DailyColor2);}

    }

    Comment(“\n”, “TODAYS RANGE: “, (HI2-LOW2)/Point,”\n”,”\n”,”AVG. Daily Average; “,AV2,”\n”,”\n”,”Open: “, OPEN,”\n”,”\n”, “Today’s Hi: “, HI2,” Low: “, LOW2,”\n”, “\n”, “Pips from Open: “, (CLOSE-OPEN),”\n”,
    “\n”,”Top Daily Range; “,(LOWDaily2),”\n”,”\n”,”Bottom Daily Range; “,(HIDaily2));

    return(0);
    }
    //+——————————————————————+

    int DailyOpen(int offset, int lastbar)
    {
    int shift;
    int tzdiffsec= TimeZoneOfData * 3600;
    double barsper30= 1.0*PERIOD_M30/Period();
    bool ShowDailyOpenLevel= True;
    // lastbar+= barsperday+2; // make sure we catch the daily open
    lastbar= MathMin(Bars-20*barsper30-1, lastbar);

    for(shift=lastbar;shift>=offset;shift–){
    TodayOpenBuffer[shift]= 0;
    if (ShowDailyOpenLevel){
    if(TimeDayOfWeek(Time[shift]-tzdiffsec) != TimeDayOfWeek(Time[shift+1]-tzdiffsec)){ // day change
    TodayOpenBuffer[shift]= Open[shift];
    TodayOpenBuffer[shift+1]= 0; // avoid stairs in the line
    }
    else{
    TodayOpenBuffer[shift]= TodayOpenBuffer[shift+1];
    }
    }
    }
    return(0);
    }

    #77230 quote
    robertogozzirobertogozzi
    Moderator
    Legend
Viewing 2 posts - 1 through 2 (of 2 total)
  • You must be logged in to reply to this topic.
ProRealAI ProRealAI New

Stuck on this ProBuilder code?

Describe what this topic is trying to build, in plain English, and ProRealAI writes the ProRealTime™ indicator, screener or system for you.

Available in 7 languages
Try ProRealAI

ADR Levels from Open


ProOrder: Automated Strategies & Backtesting

New Reply
Author
author-avatar
Khutx0 @khutx0 Participant
Summary

This topic contains 1 reply,
has 2 voices, and was last updated by robertogozzirobertogozzi
8 years, 2 months ago.

Topic Details
Forum: ProOrder: Automated Strategies & Backtesting
Language: English
Started: 07/31/2018
Status: Active
Attachments: No files
ProRealCode ProRealCode
Loading...