| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560156115621563156415651566156715681569157015711572157315741575157615771578157915801581158215831584158515861587158815891590159115921593159415951596159715981599160016011602160316041605160616071608160916101611161216131614161516161617161816191620162116221623162416251626162716281629163016311632163316341635163616371638163916401641164216431644164516461647164816491650165116521653165416551656165716581659166016611662166316641665166616671668166916701671167216731674167516761677167816791680168116821683168416851686168716881689169016911692169316941695169616971698169917001701170217031704170517061707170817091710171117121713171417151716171717181719172017211722172317241725172617271728172917301731173217331734173517361737173817391740174117421743174417451746174717481749175017511752175317541755175617571758175917601761176217631764176517661767176817691770177117721773177417751776177717781779178017811782178317841785178617871788178917901791179217931794179517961797179817991800180118021803180418051806180718081809181018111812181318141815181618171818181918201821182218231824182518261827182818291830183118321833183418351836183718381839184018411842184318441845184618471848184918501851185218531854185518561857185818591860186118621863186418651866186718681869187018711872187318741875187618771878187918801881188218831884188518861887188818891890189118921893189418951896189718981899190019011902190319041905190619071908190919101911191219131914191519161917191819191920192119221923192419251926192719281929193019311932193319341935193619371938193919401941194219431944194519461947194819491950195119521953195419551956195719581959196019611962196319641965196619671968196919701971197219731974197519761977197819791980198119821983198419851986198719881989199019911992199319941995199619971998199920002001200220032004200520062007200820092010201120122013201420152016201720182019202020212022202320242025202620272028202920302031203220332034203520362037203820392040204120422043204420452046204720482049205020512052205320542055205620572058205920602061206220632064206520662067206820692070207120722073207420752076207720782079208020812082208320842085208620872088208920902091209220932094209520962097209820992100210121022103210421052106210721082109211021112112211321142115211621172118211921202121212221232124212521262127212821292130213121322133213421352136213721382139214021412142214321442145214621472148214921502151215221532154215521562157215821592160216121622163216421652166216721682169217021712172217321742175217621772178217921802181218221832184218521862187218821892190219121922193219421952196219721982199220022012202220322042205220622072208220922102211221222132214221522162217221822192220222122222223222422252226222722282229 |
- //+------------------------------------------------------------------+
- //| MK_BOS_CHOCH.mq5 |
- //| Copyright 2023, MetaQuotes Ltd. |
- //| https://www.mql5.com |
- //+------------------------------------------------------------------+
- #property copyright "Copyright 2023, MetaQuotes Ltd."
- #property link "https://www.mql5.com"
- #property version "1.00"
- #include <Trade\Trade.mqh>
- CTrade trade;
- #define orderNum 200
- enum lotcalculator
- {
- fix, //Fixed Lot Size
- rsk, //Risk Percentage
- };
- struct tradeOrder
- {
- datetime choch_index_date_time;
- datetime reversal_index_date_time;
- string Signal;
- datetime Time_OF_Candle;
- datetime Time_of_candle_For_trade;
- int EntryCon;
- tradeOrder()
- {
- choch_index_date_time = 0;
- Signal = "";
- reversal_index_date_time = 0;
- Time_OF_Candle = 0.0;
- Time_of_candle_For_trade = 0.0;
- EntryCon = 0.0;
- }
- };
- tradeOrder od_1[orderNum];
- bool entry_condition_candle_1_met = false;
- enum entryCondition
- {
- one, // Entry A1
- two, // Entry A2
- };
- // input entryCondition Entry_condition_1 = one; // Entry Condition
- sinput string str = "<><><><><><> Set Object Name <><><><><><>";
- input string object_name = "line";
- sinput string str1 = "<><><><><><> Set time of vertical line <><><><><><>";
- input datetime inpTime = 0;//First Line Draw time
- sinput string str2 = "<><><><><><> General Settings <><><><><><>";
- input int magic_no = 123; // Magic no
- input double lot_size = 0.1;
- input lotcalculator lot_calculator = fix; //Lot Size Calculator
- input bool Entry_condition_two_Enable = false; // Enable A1 Entry
- input bool Entry_condition_one_Enable = false; // Enable A2 Entry
- input double risk = 1; //Risk in Percentage %
- input double stoploss = 20; // Stoploss Pips buffer from choch candle
- string trend = " ";
- string signal = "";
- datetime reversal_bar_time = 0;
- datetime choch_index_time ;
- datetime index_of_low_time;
- datetime index_of_high_time;
- datetime store_last_bos_index_time;
- datetime time_of_candle = 0.0;
- datetime time_to_place_trade = 0.0;
- datetime high_index_time;
- datetime low_index_time;
- datetime tp_date_time_buy;
- datetime tp_date_time_sell;
- datetime Last_bos_before_reversal;
- double hi;
- double lo;
- double high,low,low1,high1,low2,high2;
- double HIGH;
- double LOW;
- bool bearish_found = false;
- bool bullish_found = false;
- bool choch_at_index = false;
- int choch_index = 0;
- int reversal_candle_index = 0;
- int ind = 0;
- int index_of_last_high = 0;
- int index_of_last_low = 0;
- int index_of_low = 0;
- int index_of_high = 0;
- int high_index=0;
- int low_index =0;
- int Store_bos_last_index = 0;
- int index = 0;
- //+------------------------------------------------------------------+
- //| Expert initialization function |
- //+------------------------------------------------------------------+
- void Bos(int i)
- {
- int save_bullish_index = 0;
- int save_bearish_index = 0;
- if(trend == "uptrend")
- {
- high1 = iHigh(Symbol(),PERIOD_CURRENT,i);
- double close = iClose(Symbol(),PERIOD_CURRENT,i);
- if(close > high)
- {
- high_index = iBarShift(Symbol(), PERIOD_CURRENT, high_index_time, false);
- for(int j = i ; j < high_index ; j++)
- {
- if(checkCandle(j) == "Bearish")
- {
- save_bullish_index = j;
- if(object_find("high") > 0)
- {
- ObjectDelete(0,"high");
- }
- high = high1;
- ObjectCreate(0,"high",OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,i),high,iTime(Symbol(),PERIOD_CURRENT,0),high);
- ObjectSetInteger(0,"high",OBJPROP_RAY_RIGHT,true);
- ObjectSetInteger(0,"high",OBJPROP_COLOR,clrBlue);
- ObjectCreate(0,"line1"+iTime(Symbol(),PERIOD_CURRENT,i),OBJ_TEXT,0,iTime(Symbol(),PERIOD_CURRENT,i),high+40*Point());
- ObjectSetString(0,"line1"+iTime(Symbol(),PERIOD_CURRENT,i), OBJPROP_TEXT,"bos");
- store_last_bos_index_time = iTime(Symbol(),PERIOD_CURRENT,i);
- Store_bos_last_index = iBarShift(Symbol(), PERIOD_CURRENT, store_last_bos_index_time, false);
- //low = iBarShift(Symbol(), PERIOD_CURRENT, low_index_time, false);
- low = iLow(Symbol(),PERIOD_CURRENT,j);
- bearish_found = true;
- index_of_low_time = iTime(Symbol(),PERIOD_CURRENT,j);
- break;
- }
- }
- if(bearish_found == true)
- {
- for(int k=save_bullish_index; k > i ; k--)
- {
- low1 = iLow(Symbol(),PERIOD_CURRENT,k);
- if(low1 < low)
- {
- low = low1;
- index_of_low_time = iTime(Symbol(),PERIOD_CURRENT,k);
- bearish_found = false;
- }
- }
- if(object_find("low") > 0)
- {
- if(ObjectDelete(0,"low"))
- {
- //Print("object deleted :");
- }
- }
- index_of_low = iBarShift(Symbol(), PERIOD_CURRENT, index_of_low_time, false);
- ObjectCreate(0,"low",OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,index_of_low),low,iTime(Symbol(),PERIOD_CURRENT,0),low);
- ObjectSetInteger(0,"low",OBJPROP_RAY_RIGHT,true);
- ObjectSetInteger(0,"low",OBJPROP_RAY_LEFT,false);
- ObjectSetInteger(0,"low",OBJPROP_COLOR,clrRed);
- }
- high_index_time = iTime(Symbol(),PERIOD_CURRENT,i);
- }
- }
- if(trend == "downtrend")
- {
- low1 = iLow(Symbol(),PERIOD_CURRENT,i);
- double close1 = iClose(Symbol(),PERIOD_CURRENT,i);
- if(close1 < low)
- {
- low_index = iBarShift(Symbol(), PERIOD_CURRENT, low_index_time, false);
- for(int j= i ; j < low_index ; j++)
- {
- if(checkCandle(j) == "Bullish")
- {
- save_bullish_index = j;
- if(object_find("low") > 0)
- {
- ObjectDelete(0,"low");
- }
- low = low1;
- ObjectCreate(0,"low",OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,i),low,iTime(Symbol(),PERIOD_CURRENT,0),low);
- ObjectSetInteger(0,"low",OBJPROP_RAY_RIGHT,true);
- ObjectSetInteger(0,"low",OBJPROP_COLOR,clrRed);
- ObjectCreate(0,"line2"+iTime(Symbol(),PERIOD_CURRENT,i),OBJ_TEXT,0,iTime(Symbol(),PERIOD_CURRENT,i),low);
- ObjectSetString(0,"line2"+iTime(Symbol(),PERIOD_CURRENT,i), OBJPROP_TEXT,"bos");
- store_last_bos_index_time = iTime(Symbol(),PERIOD_CURRENT,i);
- Store_bos_last_index = iBarShift(Symbol(), PERIOD_CURRENT, store_last_bos_index_time, false);
- low_index = iBarShift(Symbol(), PERIOD_CURRENT, low_index_time, false);
- high = iHigh(Symbol(),PERIOD_CURRENT,j);
- bullish_found = true;
- index_of_high_time = iTime(Symbol(),PERIOD_CURRENT,j);
- break;
- }
- }
- if(bullish_found == true)
- {
- for(int k=save_bullish_index; k > i ; k--)
- {
- high1 = iHigh(Symbol(),PERIOD_CURRENT,k);
- if(high1 > high)
- {
- high = high1;
- index_of_high_time = iTime(Symbol(),PERIOD_CURRENT,k);
- bullish_found = false;
- }
- }
- if(object_find("high") > 0)
- {
- ObjectDelete(0,"high");
- }
- index_of_high = iBarShift(Symbol(), PERIOD_CURRENT, index_of_high_time, false);
- ObjectCreate(0,"high",OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,index_of_high),high,iTime(Symbol(),PERIOD_CURRENT,0),high);
- ObjectSetInteger(0,"high",OBJPROP_RAY_RIGHT,true);
- ObjectSetInteger(0,"high",OBJPROP_COLOR,clrBlue);
- bullish_found = false;
- }
- low_index_time = iTime(Symbol(),PERIOD_CURRENT,i);
- }
- }
- }
- //+------------------------------------------------------------------+
- //| |
- //+------------------------------------------------------------------+
- void Entry_Action_1_down(int Store_bos_last_index, int i,int diff)
- {
- ind = Store_bos_last_index +1; // reversal candle index
- reversal_bar_time = iTime(Symbol(),PERIOD_CURRENT,ind);
- bool addtional_condition = true;
- for(int j=Store_bos_last_index-1; j>i+1; j--)
- {
- // Print("Store_bos_last_index ",Store_bos_last_index," chock index is ",i);
- if(checkCandle(j) == "Bearish" && (checkCandle(j-1) == "Bearish" || checkCandle(j-1) == "Doji"))
- {
- if(iHigh(Symbol(),PERIOD_CURRENT,j) > iOpen(Symbol(),PERIOD_CURRENT,j-1) && iLow(Symbol(),PERIOD_CURRENT,j) < iClose(Symbol(),PERIOD_CURRENT,j-1))
- {
- tp_date_time_buy = 0.0;
- // Print("target lines deleted due to in bar");
- if(object_find("target line") > 0)
- {
- ObjectDelete(0,"target line");
- }
- if(object_find("target line1") > 0)
- {
- ObjectDelete(0,"target line1");
- }
- addtional_condition = false;
- }
- }
- if(checkCandle(j) == "Bullish" && (checkCandle(j-1) == "Bullish" || checkCandle(j-1) == "Doji"))
- {
- if(iHigh(Symbol(),PERIOD_CURRENT,j) > iClose(Symbol(),PERIOD_CURRENT,j-1) && iLow(Symbol(),PERIOD_CURRENT,j) < iOpen(Symbol(),PERIOD_CURRENT,j-1))
- {
- tp_date_time_buy = 0.0;
- // Print("target lines deleted due to in bar");
- if(object_find("target line") > 0)
- {
- ObjectDelete(0,"target line");
- }
- if(object_find("target line1") > 0)
- {
- ObjectDelete(0,"target line1");
- }
- addtional_condition = false;
- }
- }
- }
- Print("condition satisfied in downtrend buy trade : ",check_values_less_than_choch_high(ind,i));
- if(check_values_less_than_choch_high(ind,i) == true && addtional_condition == true)
- {
- if(iOpen(Symbol(),PERIOD_CURRENT,ind) > iOpen(Symbol(),PERIOD_CURRENT,i) && iClose(Symbol(),PERIOD_CURRENT,ind) < iClose(Symbol(),PERIOD_CURRENT,i))
- {
- signal = "buy";
- time_of_candle = iTime(Symbol(),PERIOD_CURRENT,i);
- // Print("Place buy order -----------------------------------------------------------------------: ");
- }
- }
- ObjectCreate(0,"line14"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,ind),iHigh(Symbol(),PERIOD_CURRENT,ind),iTime(Symbol(),PERIOD_CURRENT,i),iHigh(Symbol(),PERIOD_CURRENT,ind));
- ObjectCreate(0,"line15"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,ind),iLow(Symbol(),PERIOD_CURRENT,ind),iTime(Symbol(),PERIOD_CURRENT,i),iLow(Symbol(),PERIOD_CURRENT,ind));
- ObjectSetInteger(0,"line14"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJPROP_COLOR,clrBlue);
- ObjectSetInteger(0,"line15"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJPROP_COLOR,clrBlue);
- ObjectCreate(0,"line16"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,ind),iClose(Symbol(),PERIOD_CURRENT,ind),iTime(Symbol(),PERIOD_CURRENT,i),iClose(Symbol(),PERIOD_CURRENT,ind));
- ObjectCreate(0,"line17"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,ind),iOpen(Symbol(),PERIOD_CURRENT,ind),iTime(Symbol(),PERIOD_CURRENT,i),iOpen(Symbol(),PERIOD_CURRENT,ind));
- ObjectSetInteger(0,"line16"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJPROP_STYLE,STYLE_DOT);
- ObjectSetInteger(0,"line17"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJPROP_STYLE,STYLE_DOT);
- diff = 0;
- }
- //+------------------------------------------------------------------+
- //| |
- //+------------------------------------------------------------------+
- void Entry_Action_2_down(int Store_bos_last_index, int i,int diff)
- {
- ind = Store_bos_last_index +1; // reversal candle index
- reversal_bar_time = iTime(Symbol(),PERIOD_CURRENT,ind);
- bool addtional_condition = true;
- for(int j=Store_bos_last_index-1; j>i+1; j--)
- {
- if(checkCandle(j) == "Bearish" && (checkCandle(j-1) == "Bearish" || checkCandle(j-1) == "Doji"))
- {
- if(iHigh(Symbol(),PERIOD_CURRENT,j) > iOpen(Symbol(),PERIOD_CURRENT,j-1) && iLow(Symbol(),PERIOD_CURRENT,j) < iClose(Symbol(),PERIOD_CURRENT,j-1))
- {
- tp_date_time_buy = 0.0;
- // Print("target lines deleted due to in bar");
- if(object_find("target line") > 0)
- {
- ObjectDelete(0,"target line");
- }
- if(object_find("target line1") > 0)
- {
- ObjectDelete(0,"target line1");
- }
- addtional_condition = false;
- }
- }
- if(checkCandle(j) == "Bullish" && (checkCandle(j-1) == "Bullish" || checkCandle(j-1) == "Doji"))
- {
- if(iHigh(Symbol(),PERIOD_CURRENT,j) > iClose(Symbol(),PERIOD_CURRENT,j-1) && iLow(Symbol(),PERIOD_CURRENT,j) < iOpen(Symbol(),PERIOD_CURRENT,j-1))
- {
- tp_date_time_buy = 0.0;
- // Print("target lines deleted due to in bar");
- if(object_find("target line") > 0)
- {
- ObjectDelete(0,"target line");
- }
- if(object_find("target line1") > 0)
- {
- ObjectDelete(0,"target line1");
- }
- addtional_condition = false;
- }
- }
- }
- if(check_values_less_than_choch_high(ind,i) == true && addtional_condition == true)
- {
- if(iOpen(Symbol(),PERIOD_CURRENT,ind) > iOpen(Symbol(),PERIOD_CURRENT,i) && iClose(Symbol(),PERIOD_CURRENT,ind) < iClose(Symbol(),PERIOD_CURRENT,i))
- {
- signal = "buy";
- time_of_candle = iTime(Symbol(),PERIOD_CURRENT,i);
- }
- }
- ObjectCreate(0,"line14"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,ind),iHigh(Symbol(),PERIOD_CURRENT,ind),iTime(Symbol(),PERIOD_CURRENT,i),iHigh(Symbol(),PERIOD_CURRENT,ind));
- ObjectCreate(0,"line15"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,ind),iLow(Symbol(),PERIOD_CURRENT,ind),iTime(Symbol(),PERIOD_CURRENT,i),iLow(Symbol(),PERIOD_CURRENT,ind));
- ObjectSetInteger(0,"line14"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJPROP_COLOR,clrBlue);
- ObjectSetInteger(0,"line15"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJPROP_COLOR,clrBlue);
- ObjectCreate(0,"line16"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,ind),iClose(Symbol(),PERIOD_CURRENT,ind),iTime(Symbol(),PERIOD_CURRENT,i),iClose(Symbol(),PERIOD_CURRENT,ind));
- ObjectCreate(0,"line17"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,ind),iOpen(Symbol(),PERIOD_CURRENT,ind),iTime(Symbol(),PERIOD_CURRENT,i),iOpen(Symbol(),PERIOD_CURRENT,ind));
- ObjectSetInteger(0,"line16"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJPROP_STYLE,STYLE_DOT);
- ObjectSetInteger(0,"line17"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJPROP_STYLE,STYLE_DOT);
- diff = 0;
- }
- //+------------------------------------------------------------------+
- //| |
- //+------------------------------------------------------------------+
- void Check_Inside_bar(int inex)
- {
- // Print("-----------------------------------------------------------------------------------------------------------------------------------");
- for(int j=inex+1; j>=1; j--)
- {
- // Print(" i am checking inside bar ");
- if(checkCandle(j) == "Bearish" && (checkCandle(j-1) == "Bearish" || checkCandle(j-1) == "Doji"))
- {
- if(iHigh(Symbol(),PERIOD_CURRENT,j) > iOpen(Symbol(),PERIOD_CURRENT,j-1) && iLow(Symbol(),PERIOD_CURRENT,j) < iClose(Symbol(),PERIOD_CURRENT,j-1))
- {
- tp_date_time_sell = 0.0;
- tp_date_time_buy = 0.0;
- // Print("Target line deleted due to in bar ");
- if(object_find("target line") > 0)
- {
- Print("Target line deleted due to in bar ");
- ObjectDelete(0,"target line");
- }
- if(object_find("target line1") > 0)
- {
- ObjectDelete(0,"target line1");
- }
- }
- }
- if(checkCandle(j) == "Bullish" && (checkCandle(j-1) == "Bullish" || checkCandle(j-1) == "Doji"))
- {
- if(iHigh(Symbol(),PERIOD_CURRENT,j) > iClose(Symbol(),PERIOD_CURRENT,j-1) && iLow(Symbol(),PERIOD_CURRENT,j) < iOpen(Symbol(),PERIOD_CURRENT,j-1))
- {
- // Print("j index is",j," j-1 index is ",j-1);
- tp_date_time_sell = 0.0;
- tp_date_time_buy = 0.0;
- // Print("Target line deleted due to in bar ");
- if(object_find("target line") > 0)
- {
- Print("Target line deleted due to in bar ");
- ObjectDelete(0,"target line");
- }
- if(object_find("target line1") > 0)
- {
- ObjectDelete(0,"target line1");
- }
- }
- }
- }
- }
- //+------------------------------------------------------------------+
- //| |
- //+------------------------------------------------------------------+
- void Entry_Action_1_up(int Store_bos_last_index, int i,int diff)
- {
- ind = Store_bos_last_index +1; // reversal candle index
- reversal_bar_time = iTime(Symbol(),PERIOD_CURRENT,ind);
- bool addtional_condition = true;
- for(int j=Store_bos_last_index-1; j>i+1; j--)
- {
- if(checkCandle(j) == "Bearish" && (checkCandle(j-1) == "Bearish" || checkCandle(j-1) == "Doji"))
- {
- if(iHigh(Symbol(),PERIOD_CURRENT,j) > iOpen(Symbol(),PERIOD_CURRENT,j-1) && iLow(Symbol(),PERIOD_CURRENT,j) < iClose(Symbol(),PERIOD_CURRENT,j-1))
- {
- tp_date_time_sell = 0.0;
- // Print("Target line deleted due to in bar ");
- if(object_find("target line") > 0)
- {
- ObjectDelete(0,"target line");
- }
- if(object_find("target line1") > 0)
- {
- ObjectDelete(0,"target line1");
- }
- addtional_condition = false;
- }
- }
- if(checkCandle(j) == "Bullish" && (checkCandle(j-1) == "Bullish" || checkCandle(j-1) == "Doji"))
- {
- if(iHigh(Symbol(),PERIOD_CURRENT,j) > iClose(Symbol(),PERIOD_CURRENT,j-1) && iLow(Symbol(),PERIOD_CURRENT,j) < iOpen(Symbol(),PERIOD_CURRENT,j-1))
- {
- tp_date_time_sell = 0.0;
- // Print("Target line deleted due to in bar ");
- if(object_find("target line") > 0)
- {
- ObjectDelete(0,"target line");
- }
- if(object_find("target line1") > 0)
- {
- ObjectDelete(0,"target line1");
- }
- addtional_condition = false;
- }
- }
- }
- // Print("condition satisfied in uptrend sell trade : ",check_values_less_than_choch_low(ind,i));
- if(check_values_less_than_choch_low(ind,i) == true && addtional_condition == true)
- {
- if(iOpen(Symbol(),PERIOD_CURRENT,ind) < iOpen(Symbol(),PERIOD_CURRENT,i) && iClose(Symbol(),PERIOD_CURRENT,ind) > iClose(Symbol(),PERIOD_CURRENT,i))
- {
- signal = "sell";
- time_of_candle = iTime(Symbol(),PERIOD_CURRENT,i);
- // Print("Place sell order -----------------------------------------------------------------------: ");
- }
- }
- ObjectCreate(0,"line10"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,ind),iHigh(Symbol(),PERIOD_CURRENT,ind),iTime(Symbol(),PERIOD_CURRENT,i),iHigh(Symbol(),PERIOD_CURRENT,ind));
- ObjectCreate(0,"line11"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,ind),iLow(Symbol(),PERIOD_CURRENT,ind),iTime(Symbol(),PERIOD_CURRENT,i),iLow(Symbol(),PERIOD_CURRENT,ind));
- ObjectSetInteger(0,"line10"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJPROP_COLOR,clrBlue);
- ObjectSetInteger(0,"line11"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJPROP_COLOR,clrBlue);
- ObjectCreate(0,"line12"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,ind),iClose(Symbol(),PERIOD_CURRENT,ind),iTime(Symbol(),PERIOD_CURRENT,i),iClose(Symbol(),PERIOD_CURRENT,ind));
- ObjectCreate(0,"line13"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,ind),iOpen(Symbol(),PERIOD_CURRENT,ind),iTime(Symbol(),PERIOD_CURRENT,i),iOpen(Symbol(),PERIOD_CURRENT,ind));
- ObjectSetInteger(0,"line12"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJPROP_STYLE,STYLE_DOT);
- ObjectSetInteger(0,"line13"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJPROP_STYLE,STYLE_DOT);
- }
- //+------------------------------------------------------------------+
- //| |
- //+------------------------------------------------------------------+
- void Entry_Action_2_up(int Store_bos_last_index, int i,int diff)
- {
- ind = Store_bos_last_index +1; // reversal candle index
- reversal_bar_time = iTime(Symbol(),PERIOD_CURRENT,ind);
- bool addtional_condition = true;
- for(int j=Store_bos_last_index-1; j>i+1; j--)
- {
- if(checkCandle(j) == "Bearish" && (checkCandle(j-1) == "Bearish" || checkCandle(j-1) == "Doji"))
- {
- if(iHigh(Symbol(),PERIOD_CURRENT,j) > iOpen(Symbol(),PERIOD_CURRENT,j-1) && iLow(Symbol(),PERIOD_CURRENT,j) < iClose(Symbol(),PERIOD_CURRENT,j-1))
- {
- tp_date_time_sell = 0.0;
- // Print("Target line deleted due to in bar ");
- if(object_find("target line") > 0)
- {
- ObjectDelete(0,"target line");
- }
- if(object_find("target line1") > 0)
- {
- ObjectDelete(0,"target line1");
- }
- addtional_condition = false;
- }
- }
- if(checkCandle(j) == "Bullish" && (checkCandle(j-1) == "Bullish" || checkCandle(j-1) == "Doji"))
- {
- if(iHigh(Symbol(),PERIOD_CURRENT,j) > iClose(Symbol(),PERIOD_CURRENT,j-1) && iLow(Symbol(),PERIOD_CURRENT,j) < iOpen(Symbol(),PERIOD_CURRENT,j-1))
- {
- tp_date_time_sell = 0.0;
- // Print("Target line deleted due to in bar ");
- if(object_find("target line") > 0)
- {
- ObjectDelete(0,"target line");
- }
- if(object_find("target line1") > 0)
- {
- ObjectDelete(0,"target line1");
- }
- addtional_condition = false;
- }
- }
- }
- if(check_values_less_than_choch_low(ind,i) == true && addtional_condition == true)
- {
- if(iOpen(Symbol(),PERIOD_CURRENT,ind) < iOpen(Symbol(),PERIOD_CURRENT,i) && iClose(Symbol(),PERIOD_CURRENT,ind) > iClose(Symbol(),PERIOD_CURRENT,i))
- {
- signal = "sell";
- time_of_candle = iTime(Symbol(),PERIOD_CURRENT,i);
- }
- }
- ObjectCreate(0,"line10"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,ind),iHigh(Symbol(),PERIOD_CURRENT,ind),iTime(Symbol(),PERIOD_CURRENT,i),iHigh(Symbol(),PERIOD_CURRENT,ind));
- ObjectCreate(0,"line11"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,ind),iLow(Symbol(),PERIOD_CURRENT,ind),iTime(Symbol(),PERIOD_CURRENT,i),iLow(Symbol(),PERIOD_CURRENT,ind));
- ObjectSetInteger(0,"line10"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJPROP_COLOR,clrBlue);
- ObjectSetInteger(0,"line11"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJPROP_COLOR,clrBlue);
- ObjectCreate(0,"line12"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,ind),iClose(Symbol(),PERIOD_CURRENT,ind),iTime(Symbol(),PERIOD_CURRENT,i),iClose(Symbol(),PERIOD_CURRENT,ind));
- ObjectCreate(0,"line13"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,ind),iOpen(Symbol(),PERIOD_CURRENT,ind),iTime(Symbol(),PERIOD_CURRENT,i),iOpen(Symbol(),PERIOD_CURRENT,ind));
- ObjectSetInteger(0,"line12"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJPROP_STYLE,STYLE_DOT);
- ObjectSetInteger(0,"line13"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJPROP_STYLE,STYLE_DOT);
- }
- //+------------------------------------------------------------------+
- //| |
- //+------------------------------------------------------------------+
- bool check_values_less_than_choch_high(int ind,int i) // downtrend
- {
- for(int k=ind; k>i; k--)
- {
- if(iHigh(Symbol(),PERIOD_CURRENT,k) > iClose(Symbol(),PERIOD_CURRENT,i))
- {
- return false;
- }
- }
- return true;
- }
- //+------------------------------------------------------------------+
- //| |
- //+------------------------------------------------------------------+
- bool check_values_less_than_choch_high1(int ind,int i) // downtrend
- {
- for(int k=ind; k>i; k--)
- {
- if(iHigh(Symbol(),PERIOD_CURRENT,k) > iClose(Symbol(),PERIOD_CURRENT,i))
- {
- return false;
- }
- }
- return true;
- }
- //+------------------------------------------------------------------+
- //| |
- //+------------------------------------------------------------------+
- bool check_values_less_than_choch_low(int ind,int i) // uptrend
- {
- for(int k=ind; k>i; k--)
- {
- if(iLow(Symbol(),PERIOD_CURRENT,k) < iClose(Symbol(),PERIOD_CURRENT,i))
- {
- return false;
- }
- }
- return true;
- }
- //+------------------------------------------------------------------+
- //| |
- //+------------------------------------------------------------------+
- bool check_values_less_than_choch_low1(int ind,int i) // uptrend
- {
- for(int k=ind; k>i; k--)
- {
- if(iLow(Symbol(),PERIOD_CURRENT,k) < iClose(Symbol(),PERIOD_CURRENT,i))
- {
- return false;
- }
- }
- return true;
- }
- //+------------------------------------------------------------------+
- //| |
- //+------------------------------------------------------------------+
- void choch(int i)
- {
- HIGH = 0.0;
- LOW = 0.0;
- if(trend == "uptrend")
- {
- double close = iClose(Symbol(),PERIOD_CURRENT,i);
- if(close < low)
- {
- remove_value_from_structure();
- choch_at_index = true;
- ObjectCreate(0,"line3"+iTime(Symbol(),PERIOD_CURRENT,i),OBJ_TEXT,0,iTime(Symbol(),PERIOD_CURRENT,i),iLow(Symbol(),PERIOD_CURRENT,i));
- ObjectSetString(0,"line3"+iTime(Symbol(),PERIOD_CURRENT,i), OBJPROP_TEXT,"choch");
- ObjectCreate(0,"line8"+iTime(Symbol(),PERIOD_CURRENT,i),OBJ_ARROW_DOWN,0,iTime(Symbol(),PERIOD_CURRENT,i),iHigh(Symbol(),PERIOD_CURRENT,i)+100*Point());
- ObjectSetInteger(0,"line8"+iTime(Symbol(),PERIOD_CURRENT,i),OBJPROP_COLOR,clrRed);
- Store_bos_last_index = iBarShift(Symbol(), PERIOD_CURRENT, store_last_bos_index_time, false);
- int diff1 = Store_bos_last_index - (i);
- // condition on 1st candle
- if(Entry_condition_one_Enable)
- {
- Entry_Action_1_up(Store_bos_last_index,i,diff1);
- }
- low = iLow(Symbol(),PERIOD_CURRENT,i);
- low_index_time = iTime(Symbol(),PERIOD_CURRENT,i);
- low_index = iBarShift(Symbol(), PERIOD_CURRENT, low_index_time, false);
- low_index = i;
- if(object_find("low") > 0)
- {
- ObjectDelete(0,"low");
- }
- ObjectCreate(0,"low",OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,i),low,iTime(Symbol(),PERIOD_CURRENT,0),low);
- ObjectSetInteger(0,"low",OBJPROP_RAY_RIGHT,true);
- ObjectSetInteger(0,"low",OBJPROP_COLOR,clrRed);
- trend = "downtrend";
- // choch_index_time = iTime(Symbol(),PERIOD_CURRENT,i);
- // -----------------------------------------------------------------------------------------------------------------------------------------------------------
- int chock_index = iBarShift(Symbol(), PERIOD_CURRENT, choch_index_time, false);
- chock_index++;
- datetime lastChochTimeUp = iTime(Symbol(),PERIOD_CURRENT,chock_index);
- HIGH = iHigh(Symbol(),PERIOD_CURRENT,chock_index); // save high and low of the chock prev index to compare
- LOW = iLow(Symbol(),PERIOD_CURRENT,chock_index);
- if(object_find("target line") > 0)
- {
- ObjectDelete(0,"target line");
- }
- if(ObjectCreate(0,"target line",OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,chock_index),iHigh(Symbol(),PERIOD_CURRENT,chock_index),iTime(Symbol(),PERIOD_CURRENT,0),iHigh(Symbol(),PERIOD_CURRENT,chock_index)));
- {
- //Print("object created from uptrend to downtrend ");
- }
- ObjectSetInteger(0,"target line",OBJPROP_RAY_RIGHT,true);
- ObjectSetInteger(0,"target line",OBJPROP_COLOR,clrGreen);
- if(object_find("target line1") > 0)
- {
- ObjectDelete(0,"target line1");
- }
- ObjectCreate(0,"target line1",OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,chock_index),iLow(Symbol(),PERIOD_CURRENT,chock_index),iTime(Symbol(),PERIOD_CURRENT,0),iLow(Symbol(),PERIOD_CURRENT,chock_index));
- ObjectSetInteger(0,"target line1",OBJPROP_RAY_RIGHT,true);
- ObjectSetInteger(0,"target line1",OBJPROP_COLOR,clrGreen);
- choch_index_time = iTime(Symbol(),PERIOD_CURRENT,i);
- int chock_index1 = iBarShift(Symbol(), PERIOD_CURRENT, choch_index_time, false);
- bool condition_not_match = false;
- for(int p=chock_index - 2 ; p > chock_index1; p--)
- {
- if(iLow(Symbol(),PERIOD_CURRENT,p) < HIGH)
- {
- condition_not_match = true;
- }
- }
- if(condition_not_match == true)
- {
- HIGH = 0.0;
- LOW = 0.0;
- tp_date_time_sell = 0.0;
- Print("Target line deleted in choch");
- condition_not_match = false;
- if(object_find("target line") > 0)
- {
- ObjectDelete(0,"target line");
- }
- if(object_find("target line1") > 0)
- {
- ObjectDelete(0,"target line1");
- }
- }
- else
- {
- tp_date_time_sell = lastChochTimeUp;
- }
- //-------------------------------------------------------------------------------------------------------------------------------------------------------------------
- if(signal == "sell")
- {
- time_to_place_trade = 0.0;
- int current_time_frame = Period();
- string current_time_frame_string;
- store_value_in_structure(choch_index_time,reversal_bar_time,signal,time_of_candle,time_to_place_trade,1);
- }
- signal = "";
- // condition on 2st candle
- if(Entry_condition_two_Enable)
- {
- Entry_Action_2_up(Store_bos_last_index,i,diff1);
- }
- low = iLow(Symbol(),PERIOD_CURRENT,i);
- low_index_time = iTime(Symbol(),PERIOD_CURRENT,i);
- low_index = iBarShift(Symbol(), PERIOD_CURRENT, low_index_time, false);
- low_index = i;
- if(object_find("low") > 0)
- {
- ObjectDelete(0,"low");
- }
- ObjectCreate(0,"low",OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,i),low,iTime(Symbol(),PERIOD_CURRENT,0),low);
- ObjectSetInteger(0,"low",OBJPROP_RAY_RIGHT,true);
- ObjectSetInteger(0,"low",OBJPROP_COLOR,clrRed);
- trend = "downtrend";
- if(signal == "sell")
- {
- time_to_place_trade = 0.0;
- int current_time_frame = Period();
- string current_time_frame_string;
- store_value_in_structure(choch_index_time,reversal_bar_time,signal,time_of_candle,time_to_place_trade,2);
- }
- signal = "";
- }
- }
- if(trend == "downtrend")
- {
- double close = iClose(Symbol(),PERIOD_CURRENT,i);
- if(close > high)
- {
- remove_value_from_structure();
- choch_at_index = true;
- ObjectCreate(0,"line4"+iTime(Symbol(),PERIOD_CURRENT,i),OBJ_TEXT,0,iTime(Symbol(),PERIOD_CURRENT,i),iHigh(Symbol(),PERIOD_CURRENT,i)+60*Point());
- ObjectSetString(0,"line4"+iTime(Symbol(),PERIOD_CURRENT,i), OBJPROP_TEXT,"choch");
- ObjectCreate(0,"line7"+iTime(Symbol(),PERIOD_CURRENT,i),OBJ_ARROW_UP,0,iTime(Symbol(),PERIOD_CURRENT,i),iLow(Symbol(),PERIOD_CURRENT,i)-100*Point());
- ObjectSetInteger(0,"line7"+iTime(Symbol(),PERIOD_CURRENT,i),OBJPROP_COLOR,clrGreen);
- Store_bos_last_index = iBarShift(Symbol(), PERIOD_CURRENT, store_last_bos_index_time, false);
- int diff = Store_bos_last_index - (i);
- if(Entry_condition_one_Enable)
- {
- Entry_Action_1_down(Store_bos_last_index,i,diff);
- }
- high = iHigh(Symbol(),PERIOD_CURRENT,i);
- high_index_time = iTime(Symbol(),PERIOD_CURRENT,i);
- high_index = iBarShift(Symbol(), PERIOD_CURRENT, high_index_time, false);
- high_index = i;
- if(object_find("high") > 0)
- {
- ObjectDelete(0,"high");
- }
- ObjectCreate(0,"high",OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,i),high,iTime(Symbol(),PERIOD_CURRENT,0),high);
- ObjectSetInteger(0,"high",OBJPROP_RAY_RIGHT,true);
- ObjectSetInteger(0,"high",OBJPROP_COLOR,clrBlue);
- trend = "uptrend";
- // choch_index_time = iTime(Symbol(),PERIOD_CURRENT,i);
- //--------------------------------------------------------------------------------------------------------------------------------------------------------------------
- int chock_index = iBarShift(Symbol(), PERIOD_CURRENT, choch_index_time, false);
- chock_index++;
- datetime t = iTime(Symbol(),PERIOD_CURRENT,chock_index);
- HIGH = iHigh(Symbol(),PERIOD_CURRENT,chock_index); // save high and low of the chock prev index to compare
- LOW = iLow(Symbol(),PERIOD_CURRENT,chock_index);
- if(object_find("target line") > 0)
- {
- ObjectDelete(0,"target line");
- }
- if(ObjectCreate(0,"target line",OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,chock_index),iHigh(Symbol(),PERIOD_CURRENT,chock_index),iTime(Symbol(),PERIOD_CURRENT,0),iHigh(Symbol(),PERIOD_CURRENT,chock_index)));
- {
- //Print("object created from downtrend to uptrend ");
- }
- ObjectSetInteger(0,"target line",OBJPROP_RAY_RIGHT,true);
- ObjectSetInteger(0,"target line",OBJPROP_COLOR,clrGreen);
- if(object_find("target line1") > 0)
- {
- ObjectDelete(0,"target line1");
- }
- ObjectCreate(0,"target line1",OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,chock_index),iLow(Symbol(),PERIOD_CURRENT,chock_index),iTime(Symbol(),PERIOD_CURRENT,0),iLow(Symbol(),PERIOD_CURRENT,chock_index));
- ObjectSetInteger(0,"target line1",OBJPROP_RAY_RIGHT,true);
- ObjectSetInteger(0,"target line1",OBJPROP_COLOR,clrGreen);
- choch_index_time = iTime(Symbol(),PERIOD_CURRENT,i);
- int chock_index1 = iBarShift(Symbol(), PERIOD_CURRENT, choch_index_time, false);
- bool condition_not_match = false;
- for(int p=chock_index - 2 ; p > chock_index1; p--)
- {
- if(iHigh(Symbol(),PERIOD_CURRENT,p) > LOW)
- {
- condition_not_match = true;
- }
- }
- if(condition_not_match == true)
- {
- Print("line target deleted :");
- HIGH = 0.0;
- LOW = 0.0;
- tp_date_time_buy = 0.0;
- condition_not_match = false;
- if(object_find("target line") > 0)
- {
- ObjectDelete(0,"target line");
- }
- if(object_find("target line1") > 0)
- {
- ObjectDelete(0,"target line1");
- }
- }
- else
- {
- tp_date_time_buy = t;
- }
- if(signal == "buy")
- {
- time_to_place_trade = 0.0;
- int current_time_frame = Period();
- string current_time_frame_string;
- store_value_in_structure(choch_index_time,reversal_bar_time,signal,time_of_candle,time_to_place_trade,1);
- }
- signal = "";
- if(Entry_condition_two_Enable)
- {
- Entry_Action_2_down(Store_bos_last_index,i,diff);
- }
- high = iHigh(Symbol(),PERIOD_CURRENT,i);
- high_index_time = iTime(Symbol(),PERIOD_CURRENT,i);
- high_index = iBarShift(Symbol(), PERIOD_CURRENT, high_index_time, false);
- high_index = i;
- if(object_find("high") > 0)
- {
- ObjectDelete(0,"high");
- }
- ObjectCreate(0,"high",OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,i),high,iTime(Symbol(),PERIOD_CURRENT,0),high);
- ObjectSetInteger(0,"high",OBJPROP_RAY_RIGHT,true);
- ObjectSetInteger(0,"high",OBJPROP_COLOR,clrBlue);
- trend = "uptrend";
- if(signal == "buy")
- {
- time_to_place_trade = 0.0;
- int current_time_frame = Period();
- string current_time_frame_string;
- store_value_in_structure(choch_index_time,reversal_bar_time,signal,time_of_candle,time_to_place_trade,2);
- }
- signal = "";
- }
- }
- }
- //+------------------------------------------------------------------+
- //| |
- //+------------------------------------------------------------------+
- void bos2(int i)
- {
- bool cnd;
- bool candle_bullish = false;
- bool candle_bearish = false;
- double find_high = 0.0;
- datetime find_high_time = 0.0;
- int save_bullish_index = 0;
- int save_bearish_index = 0;
- double find_low = 0.0;
- datetime find_low_time = 0.0;
- if(trend == "downtrend")
- {
- choch_index = iBarShift(Symbol(), PERIOD_CURRENT, choch_index_time, false);
- Store_bos_last_index = iBarShift(Symbol(), PERIOD_CURRENT, store_last_bos_index_time, false);
- if(i+1 == choch_index || i+1 == Store_bos_last_index || i == choch_index || i == Store_bos_last_index)
- {
- cnd = false;
- }
- else
- {
- cnd = true;
- }
- if(choch_index_time > store_last_bos_index_time)
- {
- for(int m=choch_index; m>i; m--)
- {
- if(checkCandle(m) == "Bullish")
- {
- save_bullish_index = m;
- candle_bullish = true;
- break;
- }
- }
- find_high = iHigh(Symbol(),PERIOD_CURRENT,save_bullish_index);
- find_high_time = iTime(Symbol(),PERIOD_CURRENT,save_bullish_index); // here is the addition
- for(int m=save_bullish_index; m>i; m--)
- {
- double find_high1 = iHigh(Symbol(),PERIOD_CURRENT,m);
- // find_high_time = iTime(Symbol(),PERIOD_CURRENT,m);
- if(find_high < find_high1)
- {
- find_high = find_high1;
- find_high_time = iTime(Symbol(),PERIOD_CURRENT,m);
- }
- }
- for(int j=choch_index; j>=i; j--)
- {
- if(iClose(Symbol(),PERIOD_CURRENT,j) < iClose(Symbol(),PERIOD_CURRENT,i) || iLow(Symbol(),PERIOD_CURRENT,j) < iLow(Symbol(),PERIOD_CURRENT,i))
- {
- cnd = false;
- }
- }
- }
- if(choch_index_time < store_last_bos_index_time)
- {
- for(int m=Store_bos_last_index; m>i; m--)
- {
- if(checkCandle(m) == "Bullish")
- {
- save_bullish_index = m;
- candle_bullish = true;
- break;
- }
- }
- find_high = iHigh(Symbol(),PERIOD_CURRENT,save_bullish_index);
- find_high_time = iTime(Symbol(),PERIOD_CURRENT,save_bullish_index); // here is the addition
- for(int m=save_bullish_index; m>i; m--)
- {
- double find_high1 = iHigh(Symbol(),PERIOD_CURRENT,m);
- // find_high_time = iTime(Symbol(),PERIOD_CURRENT,m);
- if(find_high < find_high1)
- {
- find_high = find_high1;
- find_high_time = iTime(Symbol(),PERIOD_CURRENT,m);
- }
- }
- for(int j=Store_bos_last_index; j>=i; j--)
- {
- if(iClose(Symbol(),PERIOD_CURRENT,j) < iClose(Symbol(),PERIOD_CURRENT,i) || iLow(Symbol(),PERIOD_CURRENT,j) < iLow(Symbol(),PERIOD_CURRENT,i))
- {
- cnd = false;
- }
- }
- }
- if(cnd == true && candle_bullish == true)
- {
- if(object_find("high") > 0)
- {
- ObjectDelete(0,"high");
- }
- high = find_high;
- high_index_time = find_high_time; // here is the addition
- index_of_high = iBarShift(Symbol(), PERIOD_CURRENT, find_high_time, false);
- ObjectCreate(0,"high",OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,index_of_high),high,iTime(Symbol(),PERIOD_CURRENT,0),high);
- ObjectSetInteger(0,"high",OBJPROP_RAY_RIGHT,true);
- ObjectSetInteger(0,"high",OBJPROP_COLOR,clrBlue);
- if(object_find("low") > 0)
- {
- ObjectDelete(0,"low");
- }
- low = iLow(Symbol(),PERIOD_CURRENT,i);
- ObjectCreate(0,"low",OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,i),low,iTime(Symbol(),PERIOD_CURRENT,0),low);
- ObjectSetInteger(0,"low",OBJPROP_RAY_RIGHT,true);
- ObjectSetInteger(0,"low",OBJPROP_COLOR,clrRed);
- ObjectCreate(0,"line2"+iTime(Symbol(),PERIOD_CURRENT,i),OBJ_TEXT,0,iTime(Symbol(),PERIOD_CURRENT,i),low);
- ObjectSetString(0,"line2"+iTime(Symbol(),PERIOD_CURRENT,i), OBJPROP_TEXT,"bos");
- store_last_bos_index_time = iTime(Symbol(),PERIOD_CURRENT,i);
- Store_bos_last_index = iBarShift(Symbol(), PERIOD_CURRENT, store_last_bos_index_time, false);
- low_index_time = iTime(Symbol(),PERIOD_CURRENT,i);
- low_index = iBarShift(Symbol(), PERIOD_CURRENT, low_index_time, false);
- cnd = false;
- candle_bullish = false;
- }
- }
- //-------
- if(trend == "uptrend")
- {
- choch_index = iBarShift(Symbol(), PERIOD_CURRENT, choch_index_time, false);
- Store_bos_last_index = iBarShift(Symbol(), PERIOD_CURRENT, store_last_bos_index_time, false);
- if(i+1 == choch_index || i+1 == Store_bos_last_index || i == choch_index || i == Store_bos_last_index)
- {
- cnd = false;
- }
- else
- {
- cnd = true;
- }
- if(choch_index_time < store_last_bos_index_time)
- {
- for(int m=Store_bos_last_index; m>i; m--)
- {
- if(checkCandle(m) == "Bearish")
- {
- candle_bearish = true;
- save_bearish_index = m;
- break;
- }
- }
- find_low = iLow(Symbol(),PERIOD_CURRENT,save_bearish_index);
- find_low_time = iTime(Symbol(),PERIOD_CURRENT,save_bearish_index); // here is the addition
- for(int m=save_bearish_index; m>i; m--)
- {
- double find_low1 = iLow(Symbol(),PERIOD_CURRENT,m);
- //find_low_time = iTime(Symbol(),PERIOD_CURRENT,m);
- if(find_low > find_low1)
- {
- find_low = find_low1;
- find_low_time = iTime(Symbol(),PERIOD_CURRENT,m);
- }
- }
- for(int j=Store_bos_last_index; j>=i; j--)
- {
- if(iClose(Symbol(),PERIOD_CURRENT,j) > iClose(Symbol(),PERIOD_CURRENT,i) || iHigh(Symbol(),PERIOD_CURRENT,j) > iHigh(Symbol(),PERIOD_CURRENT,i))
- {
- cnd = false;
- }
- }
- }
- if(choch_index_time > store_last_bos_index_time)
- {
- for(int m=choch_index; m>i; m--)
- {
- if(checkCandle(m) == "Bearish")
- {
- candle_bearish = true;
- save_bearish_index = m;
- break;
- }
- }
- find_low = iLow(Symbol(),PERIOD_CURRENT,save_bearish_index);
- find_low_time = iTime(Symbol(),PERIOD_CURRENT,save_bearish_index); // here is the addition
- for(int m=save_bearish_index; m>i; m--)
- {
- double find_low1 = iLow(Symbol(),PERIOD_CURRENT,m);
- find_low_time = iTime(Symbol(),PERIOD_CURRENT,m);
- // find_low = find_low1; // here is the addition
- if(find_low > find_low1)
- {
- find_low = find_low1;
- find_low_time = iTime(Symbol(),PERIOD_CURRENT,m);
- }
- }
- for(int j=choch_index; j>=i; j--)
- {
- if(iClose(Symbol(),PERIOD_CURRENT,j) > iClose(Symbol(),PERIOD_CURRENT,i) || iHigh(Symbol(),PERIOD_CURRENT,j) > iHigh(Symbol(),PERIOD_CURRENT,i))
- {
- cnd = false;
- }
- }
- }
- if(cnd == true && candle_bearish == true)
- {
- if(object_find("low") > 0)
- {
- ObjectDelete(0,"low");
- }
- low = find_low;
- low_index_time = find_low_time; // here is the addition
- index_of_low = iBarShift(Symbol(), PERIOD_CURRENT, find_low_time, false);
- ObjectCreate(0,"low",OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,index_of_low),low,iTime(Symbol(),PERIOD_CURRENT,0),low);
- ObjectSetInteger(0,"low",OBJPROP_RAY_RIGHT,true);
- ObjectSetInteger(0,"low",OBJPROP_COLOR,clrRed);
- if(object_find("high") > 0)
- {
- ObjectDelete(0,"high");
- }
- high = iHigh(Symbol(),PERIOD_CURRENT,i);
- ObjectCreate(0,"high",OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,i),high,iTime(Symbol(),PERIOD_CURRENT,0),high);
- ObjectSetInteger(0,"high",OBJPROP_RAY_RIGHT,true);
- ObjectSetInteger(0,"high",OBJPROP_COLOR,clrBlue);
- ObjectCreate(0,"line1"+iTime(Symbol(),PERIOD_CURRENT,i),OBJ_TEXT,0,iTime(Symbol(),PERIOD_CURRENT,i),high+40*Point());
- ObjectSetString(0,"line1"+iTime(Symbol(),PERIOD_CURRENT,i), OBJPROP_TEXT,"bos");
- store_last_bos_index_time = iTime(Symbol(),PERIOD_CURRENT,i);
- Store_bos_last_index = iBarShift(Symbol(), PERIOD_CURRENT, store_last_bos_index_time, false);
- high_index_time = iTime(Symbol(),PERIOD_CURRENT,i);
- high_index = iBarShift(Symbol(), PERIOD_CURRENT, high_index_time, false);
- cnd = false;
- candle_bearish = false;
- }
- }
- }
- //+------------------------------------------------------------------+
- //| |
- //+------------------------------------------------------------------+
- void third_Condition(int i)
- {
- if(trend == "uptrend")
- {
- low2 = iLow(Symbol(),PERIOD_CURRENT,i);
- high2 = iHigh(Symbol(),PERIOD_CURRENT,i);
- if(low2 < low)
- {
- //ObjectCreate(0,"line5"+iTime(Symbol(),PERIOD_CURRENT,i),OBJ_TEXT,0,iTime(Symbol(),PERIOD_CURRENT,i),iLow(Symbol(),PERIOD_CURRENT,i));
- // ObjectSetString(0,"line5"+iTime(Symbol(),PERIOD_CURRENT,i), OBJPROP_TEXT,"3_C");
- low = low2;
- low_index_time = iTime(Symbol(),PERIOD_CURRENT,i);
- low_index = iBarShift(Symbol(), PERIOD_CURRENT, low_index_time, false);
- low_index = i; // addtion to be minus
- if(object_find("low") > 0)
- {
- ObjectDelete(0,"low");
- }
- ObjectCreate(0,"low",OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,i),low,iTime(Symbol(),PERIOD_CURRENT,0),low);
- ObjectSetInteger(0,"low",OBJPROP_RAY_RIGHT,true);
- ObjectSetInteger(0,"low",OBJPROP_COLOR,clrRed);
- }
- if(high2 > high)
- {
- // ObjectCreate(0,"line51"+iTime(Symbol(),PERIOD_CURRENT,i),OBJ_TEXT,0,iTime(Symbol(),PERIOD_CURRENT,i),iHigh(Symbol(),PERIOD_CURRENT,i));
- // ObjectSetString(0,"line51"+iTime(Symbol(),PERIOD_CURRENT,i), OBJPROP_TEXT,"3_C");
- high = high2;
- high_index_time = iTime(Symbol(),PERIOD_CURRENT,i);
- high_index = iBarShift(Symbol(), PERIOD_CURRENT, low_index_time, false);
- high_index = i; // addtion to be minus
- if(object_find("high") > 0)
- {
- ObjectDelete(0,"high");
- }
- ObjectCreate(0,"high",OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,i),high,iTime(Symbol(),PERIOD_CURRENT,0),high);
- ObjectSetInteger(0,"high",OBJPROP_RAY_RIGHT,true);
- ObjectSetInteger(0,"high",OBJPROP_COLOR,clrBlue);
- }
- }
- if(trend == "downtrend")
- {
- high2 = iHigh(Symbol(),PERIOD_CURRENT,i);
- low2 = iLow(Symbol(),PERIOD_CURRENT,i);
- if(high2 > high)
- {
- // ObjectCreate(0,"line6"+iTime(Symbol(),PERIOD_CURRENT,i),OBJ_TEXT,0,iTime(Symbol(),PERIOD_CURRENT,i),iHigh(Symbol(),PERIOD_CURRENT,i));
- // ObjectSetString(0,"line6"+iTime(Symbol(),PERIOD_CURRENT,i), OBJPROP_TEXT,"3_C");
- high = high2;
- high_index_time = iTime(Symbol(),PERIOD_CURRENT,i);
- high_index = iBarShift(Symbol(), PERIOD_CURRENT, low_index_time, false);
- high_index = i; // addtion to be minus
- if(object_find("high") > 0)
- {
- ObjectDelete(0,"high");
- }
- ObjectCreate(0,"high",OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,i),high,iTime(Symbol(),PERIOD_CURRENT,0),high);
- ObjectSetInteger(0,"high",OBJPROP_RAY_RIGHT,true);
- ObjectSetInteger(0,"high",OBJPROP_COLOR,clrBlue);
- }
- if(low2 < low)
- {
- // ObjectCreate(0,"line61"+iTime(Symbol(),PERIOD_CURRENT,i),OBJ_TEXT,0,iTime(Symbol(),PERIOD_CURRENT,i),iLow(Symbol(),PERIOD_CURRENT,i));
- // ObjectSetString(0,"line61"+iTime(Symbol(),PERIOD_CURRENT,i), OBJPROP_TEXT,"3_C");
- low = low2;
- low_index_time = iTime(Symbol(),PERIOD_CURRENT,i);
- low_index = iBarShift(Symbol(), PERIOD_CURRENT, low_index_time, false);
- low_index = i; // addtion to be minus
- if(object_find("low") > 0)
- {
- ObjectDelete(0,"low");
- }
- ObjectCreate(0,"low",OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,i),low,iTime(Symbol(),PERIOD_CURRENT,0),low);
- ObjectSetInteger(0,"low",OBJPROP_RAY_RIGHT,true);
- ObjectSetInteger(0,"low",OBJPROP_COLOR,clrRed);
- }
- }
- }
- //+------------------------------------------------------------------+
- //| |
- //+------------------------------------------------------------------+
- void store_value_in_structure(datetime chock_time,datetime ind,string signal,datetime time_of_candle,datetime time_to_place_trade, int entry)
- {
- for(int l=0; l<200; l++)
- {
- if(od_1[l].choch_index_date_time == 0)
- {
- od_1[l].choch_index_date_time = chock_time;
- od_1[l].reversal_index_date_time = ind;
- od_1[l].Signal = signal;
- od_1[l].Time_OF_Candle = time_of_candle;
- od_1[l].Time_of_candle_For_trade = time_to_place_trade;
- od_1[l].EntryCon = entry;
- Print("added value of chock in structure ---------------",od_1[l].choch_index_date_time);
- break;
- }
- }
- }
- //+------------------------------------------------------------------+
- //| |
- //+------------------------------------------------------------------+
- void remove_value_from_structure()
- {
- for(int l=0; l<200; l++)
- {
- if(od_1[l].choch_index_date_time != 0)
- {
- Print("chock value removed from structure and chock time is ---------- ",od_1[l].choch_index_date_time);
- od_1[l].choch_index_date_time = 0;
- od_1[l].reversal_index_date_time = 0;
- od_1[l].Signal = "";
- od_1[l].Time_OF_Candle = 0;
- od_1[l].Time_of_candle_For_trade = 0;
- }
- }
- }
- //+------------------------------------------------------------------+
- //| |
- //+------------------------------------------------------------------+
- void Entry_strategy(int value)
- {
- for(int i=value; i > 0; i--)
- {
- Bos(i);
- bos2(i);
- choch(i);
- third_Condition(i);
- }
- }
- //+------------------------------------------------------------------+
- //| |
- //+------------------------------------------------------------------+
- void placeBuyTrade()
- {
- double sell_SL = 0,sell_Tp = 0, openPrice = 0,buySL = 0, buyTp = 0;
- openPrice = SymbolInfoDouble(Symbol(),SYMBOL_ASK);
- double Ask = SymbolInfoDouble(Symbol(),SYMBOL_ASK);
- int ch = iBarShift(Symbol(), PERIOD_CURRENT,choch_index_time,false); // get high of chock index
- buySL = iLow(Symbol(),PERIOD_CURRENT,ch) - stoploss *10 * Point();
- int tp = iBarShift(Symbol(), PERIOD_CURRENT,tp_date_time_buy,false);
- buyTp = iLow(Symbol(),PERIOD_CURRENT,tp);
- double distance = (Ask - buySL)/Point();
- if(trade.PositionOpen(Symbol(),ORDER_TYPE_BUY,getlot(distance),Ask,buySL,buyTp,"Buy Trade Placed"))
- {
- Print("Buy Trade Placed: ",trade.ResultOrder());
- }
- else
- {
- Print("Error in placing Buy: "+Symbol()+" ",GetLastError());
- }
- }
- //+------------------------------------------------------------------+
- //| |
- //+------------------------------------------------------------------+
- double getlot(double stop_loss)
- {
- Print("Tick Value: ",SymbolInfoDouble(Symbol(),SYMBOL_TRADE_TICK_VALUE));
- Print("Tick Size: ",SymbolInfoDouble(Symbol(),SYMBOL_TRADE_TICK_SIZE));
- double modeTickV=SymbolInfoDouble(Symbol(),SYMBOL_TRADE_TICK_VALUE),modeTickS=SymbolInfoDouble(Symbol(),SYMBOL_TRADE_TICK_SIZE);
- double pipvalue = NormalizeDouble(((SymbolInfoDouble(Symbol(),SYMBOL_TRADE_TICK_VALUE)/(SymbolInfoDouble(Symbol(),SYMBOL_TRADE_TICK_SIZE)/Point()))*10),2);
- pipvalue = pipvalue / 10;
- double lotSize = lot_size;
- if(lot_calculator==rsk) //calculating risk
- {
- double riskamount=(risk/100)*AccountInfoDouble(ACCOUNT_BALANCE);
- double pipvalue_required=riskamount/stop_loss;
- lotSize = pipvalue_required/pipvalue;
- int roundDigit=0;
- double step=SymbolInfoDouble(Symbol(),SYMBOL_VOLUME_STEP);
- while(step<1)
- {
- roundDigit++;
- step=step*10;
- }
- Print("Round Digits:",roundDigit);
- lotSize = NormalizeDouble(lotSize,roundDigit);
- //
- }
- Print("Lot Size: ",lotSize);
- if(lotSize > SymbolInfoDouble(Symbol(),SYMBOL_VOLUME_MAX))
- {
- lotSize=SymbolInfoDouble(Symbol(),SYMBOL_VOLUME_MAX);
- }
- else
- if(lotSize<SymbolInfoDouble(Symbol(),SYMBOL_VOLUME_MIN))
- {
- lotSize=SymbolInfoDouble(Symbol(),SYMBOL_VOLUME_MIN);
- }
- return lotSize;
- }
- //+------------------------------------------------------------------+
- //| |
- //+------------------------------------------------------------------+
- void placeSellTrade()
- {
- double sell_SL = 0,sell_Tp = 0, openPrice = 0, buySL = 0, buyTp = 0;
- openPrice = SymbolInfoDouble(Symbol(),SYMBOL_BID);
- double Bid = SymbolInfoDouble(Symbol(),SYMBOL_BID);
- int ch = iBarShift(Symbol(), PERIOD_CURRENT,choch_index_time,false); // get high of chock index
- sell_SL = iHigh(Symbol(),PERIOD_CURRENT,ch) + stoploss *10 * Point();
- int tp = iBarShift(Symbol(), PERIOD_CURRENT,tp_date_time_sell,false);
- sell_Tp = iHigh(Symbol(),PERIOD_CURRENT,tp);
- double distance = (sell_SL - Bid)/Point();
- if(trade.PositionOpen(Symbol(),ORDER_TYPE_SELL,getlot(distance),Bid,sell_SL,sell_Tp,"Sell Trade Placed"))
- {
- Print("Sell Trade PLaced: ",trade.ResultOrder());
- }
- else
- {
- Print("Error in placing Sell: "+Symbol()+" ",GetLastError());
- }
- }
- //+------------------------------------------------------------------+
- //| |
- //+------------------------------------------------------------------+
- int OnInit()
- {
- trade.SetExpertMagicNumber(magic_no);
- trade.SetDeviationInPoints(10);
- trade.SetTypeFilling(ORDER_FILLING_IOC);
- trade.LogLevel(LOG_LEVEL_ALL);
- trade.SetAsyncMode(false);
- int idx = 0;
- int user_input_index = iBarShift(Symbol(), PERIOD_CURRENT,inpTime, false);
- if(ObjectCreate(0,"line",OBJ_VLINE,0,inpTime,iLow(Symbol(),PERIOD_CURRENT,user_input_index)))
- {
- Print("vertical line created on chart : ");
- }
- else
- {
- Print("error in creating line : ");
- }
- //int user_input_index = iBarShift(Symbol(), PERIOD_CURRENT, D'2021.09.01 15:30:27', false);
- //if(ObjectCreate(0,"line",OBJ_VLINE,0,D'2021.09.01 15:30:27',iLow(Symbol(),PERIOD_CURRENT,user_input_index)))
- // {
- // Print("object created on chart : ");
- // }
- //else
- // {
- // Print("object not created : ");
- // }
- object_find(object_name);
- if(object_find(object_name) == true)
- {
- Print("object found");
- if(checkCandle(user_input_index) == "Bullish")
- {
- trend = "uptrend";
- high = iHigh(Symbol(),PERIOD_CURRENT,user_input_index);
- high_index_time = iTime(Symbol(),PERIOD_CURRENT,user_input_index); // ambiguity
- high_index = user_input_index;
- for(int j=user_input_index; j < 1000; j++)
- {
- if(checkCandle(j) == "Bearish")
- {
- low = iLow(Symbol(),PERIOD_CURRENT,j);
- idx = j;
- break;
- }
- }
- idx = iLowest(Symbol(),PERIOD_CURRENT,MODE_LOW,idx,user_input_index+1);
- low = iLow(Symbol(),PERIOD_CURRENT,idx);
- low_index_time = iTime(Symbol(),PERIOD_CURRENT,idx);
- low_index = idx;
- }
- if(checkCandle(user_input_index) == "Bearish")
- {
- trend = "downtrend";
- low = iLow(Symbol(),PERIOD_CURRENT,user_input_index);
- low_index_time = iTime(Symbol(),PERIOD_CURRENT,user_input_index);
- low_index = user_input_index;
- for(int j=user_input_index; j < 1000; j++)
- {
- if(checkCandle(j) == "Bullish")
- {
- high = iHigh(Symbol(),PERIOD_CURRENT,j);
- idx = j;
- break;
- }
- }
- for(int k=idx; k<user_input_index; k++)
- {
- double highh = iHigh(Symbol(),PERIOD_CURRENT,k);
- if(highh > high)
- {
- high = highh;
- high_index_time = iTime(Symbol(),PERIOD_CURRENT,k);
- high_index = k;
- }
- }
- }
- ObjectCreate(0,"target line",OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,user_input_index+1),iHigh(Symbol(),PERIOD_CURRENT,user_input_index+1),iTime(Symbol(),PERIOD_CURRENT,0),iHigh(Symbol(),PERIOD_CURRENT,user_input_index + 1));
- ObjectSetInteger(0,"target line",OBJPROP_RAY_RIGHT,true);
- ObjectSetInteger(0,"target line",OBJPROP_COLOR,clrGreen);
- ObjectCreate(0,"target line1",OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,user_input_index + 1),iLow(Symbol(),PERIOD_CURRENT,user_input_index + 1),iTime(Symbol(),PERIOD_CURRENT,0),iLow(Symbol(),PERIOD_CURRENT,user_input_index + 1));
- ObjectSetInteger(0,"target line1",OBJPROP_RAY_RIGHT,true);
- ObjectSetInteger(0,"target line1",OBJPROP_COLOR,clrGreen);
- ObjectCreate(0,"high",OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,user_input_index),high,iTime(Symbol(),PERIOD_CURRENT,0),high);
- ObjectSetInteger(0,"high",OBJPROP_RAY_RIGHT,true);
- ObjectSetInteger(0,"high",OBJPROP_COLOR,clrBlue);
- ObjectCreate(0,"low",OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,user_input_index),low,iTime(Symbol(),PERIOD_CURRENT,0),low);
- ObjectSetInteger(0,"low",OBJPROP_RAY_RIGHT,true);
- ObjectSetInteger(0,"low",OBJPROP_COLOR,clrRed);
- choch_index_time = iTime(Symbol(),PERIOD_CURRENT,user_input_index);
- Entry_strategy(user_input_index);
- }
- else
- {
- Print("Object Not Found");
- }
- return(INIT_SUCCEEDED);
- }
- //+------------------------------------------------------------------+
- //| |
- //+------------------------------------------------------------------+
- bool value_close_low(int chockIndex)
- {
- for(int i=chockIndex; i>1; i--)
- {
- if(iLow(Symbol(),PERIOD_CURRENT,i) < iClose(Symbol(),PERIOD_CURRENT,1))
- {
- return false;
- }
- }
- return true;
- }
- //+------------------------------------------------------------------+
- //| |
- //+------------------------------------------------------------------+
- bool value_close_high(int chockIndex)
- {
- for(int i=chockIndex; i>1; i--)
- {
- if(iHigh(Symbol(),PERIOD_CURRENT,i) > iClose(Symbol(),PERIOD_CURRENT,1))
- {
- return false;
- }
- }
- return true;
- }
- //+------------------------------------------------------------------+
- //| Expert deinitialization function |
- //+------------------------------------------------------------------+
- void OnDeinit(const int reason)
- {
- //---
- }
- //+------------------------------------------------------------------+
- //| Expert tick function |
- //+------------------------------------------------------------------+
- void OnTick()
- {
- if(NewBar() == true)
- {
- Entry_strategy(1);
- // for entry condition candel 1
- for(int m=0; m < orderNum; m++)
- {
- if(od_1[m].choch_index_date_time != 0)
- {
- int indexOfTradePlace = iBarShift(Symbol(), PERIOD_CURRENT,od_1[m].Time_OF_Candle,false);
- if(indexOfTradePlace == 2)
- {
- if(od_1[m].EntryCon == 1 && od_1[m].Signal == "buy")
- {
- int reversal_indexx = iBarShift(Symbol(), PERIOD_CURRENT,od_1[m].reversal_index_date_time,false);
- int close_index = iBarShift(Symbol(), PERIOD_CURRENT,od_1[m].choch_index_date_time,false);
- if(checkCandle(close_index) == "Bearish" && (checkCandle(close_index-1) == "Bearish" || checkCandle(close_index-1) == "Doji"))
- {
- if(iHigh(Symbol(),PERIOD_CURRENT,close_index) > iOpen(Symbol(),PERIOD_CURRENT,close_index-1) && iLow(Symbol(),PERIOD_CURRENT,close_index) < iClose(Symbol(),PERIOD_CURRENT,close_index-1))
- {
- tp_date_time_sell = 0.0;
- tp_date_time_buy = 0.0;
- // Print("Target line deleted due to in bar ");
- if(object_find("target line") > 0)
- {
- Print("Target line deleted due to in bar ");
- ObjectDelete(0,"target line");
- }
- if(object_find("target line1") > 0)
- {
- ObjectDelete(0,"target line1");
- }
- }
- }
- if(checkCandle(close_index) == "Bullish" && (checkCandle(close_index-1) == "Bullish" || checkCandle(close_index-1) == "Doji"))
- {
- if(iHigh(Symbol(),PERIOD_CURRENT,close_index) > iClose(Symbol(),PERIOD_CURRENT,close_index-1) && iLow(Symbol(),PERIOD_CURRENT,close_index) < iOpen(Symbol(),PERIOD_CURRENT,close_index-1))
- {
- // Print("j index is",j," j-1 index is ",j-1);
- tp_date_time_sell = 0.0;
- tp_date_time_buy = 0.0;
- // Print("Target line deleted due to in bar ");
- if(object_find("target line") > 0)
- {
- Print("Target line deleted due to in bar ");
- ObjectDelete(0,"target line");
- }
- if(object_find("target line1") > 0)
- {
- ObjectDelete(0,"target line1");
- }
- }
- }
- double reversalMax = iOpen(Symbol(),PERIOD_CURRENT,reversal_indexx) < iClose(Symbol(),PERIOD_CURRENT,reversal_indexx) ? iClose(Symbol(),PERIOD_CURRENT,reversal_indexx) : iOpen(Symbol(),PERIOD_CURRENT,reversal_indexx);
- // bool snd_con = false;
- //for(int i=close_index-1; i>=1; i--) // second condition of updation
- // {
- // if(iClose(Symbol(),PERIOD_CURRENT,i) < reversalMax)
- // {
- // remove_value_from_structure();
- // }
- // }
- // if(iOpen(Symbol(),PERIOD_CURRENT,1) > iClose(Symbol(),PERIOD_CURRENT,close_index)) // first condition of updation
- {
- if(reversalMax > iLow(Symbol(),PERIOD_CURRENT,1)
- && iClose(Symbol(),PERIOD_CURRENT,close_index) < iClose(Symbol(),PERIOD_CURRENT,1) && tp_date_time_buy != 0.0)
- {
- placeBuyTrade();
- if(object_find("target line") > 0)
- {
- ObjectDelete(0,"target line");
- }
- if(object_find("target line1") > 0)
- {
- ObjectDelete(0,"target line1");
- }
- remove_value_from_structure();
- od_1[m].choch_index_date_time = 0;
- od_1[m].Signal == "";
- od_1[m].reversal_index_date_time = 0;
- od_1[m].choch_index_date_time = 0;
- signal = "";
- Print("buy trade placed in no delay entry condition -------------------------------------------------------------");
- Print("time at which trade is placed : ",TimeCurrent());
- }
- }
- }
- if(od_1[m].EntryCon == 1 && od_1[m].Signal == "sell")
- {
- int reversal_indexx = iBarShift(Symbol(), PERIOD_CURRENT,od_1[m].reversal_index_date_time,false);
- int close_index = iBarShift(Symbol(), PERIOD_CURRENT,od_1[m].choch_index_date_time,false);
- if(checkCandle(close_index) == "Bearish" && (checkCandle(close_index-1) == "Bearish" || checkCandle(close_index-1) == "Doji"))
- {
- if(iHigh(Symbol(),PERIOD_CURRENT,close_index) > iOpen(Symbol(),PERIOD_CURRENT,close_index-1) && iLow(Symbol(),PERIOD_CURRENT,close_index) < iClose(Symbol(),PERIOD_CURRENT,close_index-1))
- {
- tp_date_time_sell = 0.0;
- tp_date_time_buy = 0.0;
- // Print("Target line deleted due to in bar ");
- if(object_find("target line") > 0)
- {
- Print("Target line deleted due to in bar ");
- ObjectDelete(0,"target line");
- }
- if(object_find("target line1") > 0)
- {
- ObjectDelete(0,"target line1");
- }
- }
- }
- if(checkCandle(close_index) == "Bullish" && (checkCandle(close_index-1) == "Bullish" || checkCandle(close_index-1) == "Doji"))
- {
- if(iHigh(Symbol(),PERIOD_CURRENT,close_index) > iClose(Symbol(),PERIOD_CURRENT,close_index-1) && iLow(Symbol(),PERIOD_CURRENT,close_index) < iOpen(Symbol(),PERIOD_CURRENT,close_index-1))
- {
- // Print("j index is",j," j-1 index is ",j-1);
- tp_date_time_sell = 0.0;
- tp_date_time_buy = 0.0;
- // Print("Target line deleted due to in bar ");
- if(object_find("target line") > 0)
- {
- Print("Target line deleted due to in bar ");
- ObjectDelete(0,"target line");
- }
- if(object_find("target line1") > 0)
- {
- ObjectDelete(0,"target line1");
- }
- }
- }
- double reversalMin = iOpen(Symbol(),PERIOD_CURRENT,reversal_indexx) > iClose(Symbol(),PERIOD_CURRENT,reversal_indexx) ? iClose(Symbol(),PERIOD_CURRENT,reversal_indexx) : iOpen(Symbol(),PERIOD_CURRENT,reversal_indexx);
- // double reversalMin = iOpen(Symbol(),PERIOD_CURRENT,reversal_indexx) > iClose(Symbol(),PERIOD_CURRENT,reversal_indexx) ? iClose(Symbol(),PERIOD_CURRENT,reversal_indexx) : iOpen(Symbol(),PERIOD_CURRENT,reversal_indexx);
- // bool snd_con = false;
- //
- //for(int i=close_index-1; i>=1; i--) // second condition of updation
- // {
- // if(iClose(Symbol(),PERIOD_CURRENT,i) > reversalMin)
- // {
- // remove_value_from_structure();
- // //snd_con = true;
- // }
- // }
- //
- // if(iOpen(Symbol(),PERIOD_CURRENT,1) < iClose(Symbol(),PERIOD_CURRENT,close_index)) // first condition of updation
- {
- if(reversalMin < iHigh(Symbol(),PERIOD_CURRENT,1)
- && iClose(Symbol(),PERIOD_CURRENT,close_index) > iClose(Symbol(),PERIOD_CURRENT,1) && tp_date_time_sell != 0.0)
- {
- placeSellTrade();
- // tp_date_time_sell = 0.0;
- if(object_find("target line") > 0)
- {
- ObjectDelete(0,"target line");
- }
- if(object_find("target line1") > 0)
- {
- ObjectDelete(0,"target line1");
- }
- remove_value_from_structure();
- od_1[m].choch_index_date_time = 0;
- od_1[m].Signal == "";
- od_1[m].reversal_index_date_time = 0;
- od_1[m].choch_index_date_time = 0;
- signal = "";
- Print("sell trade placed in no delay entry condition -------------------------------------------------------------");
- Print("time at which trade is placed : ",TimeCurrent());
- }
- }
- }
- }
- if(indexOfTradePlace > 2)
- {
- int close_index1 = iBarShift(Symbol(), PERIOD_CURRENT,od_1[m].choch_index_date_time,false);
- Check_Inside_bar(close_index1);
- // second condition match
- if(od_1[m].EntryCon == 2 && od_1[m].Signal == "buy")
- {
- if(trend == "uptrend")
- {
- double ib =iBarShift(Symbol(), PERIOD_CURRENT,tp_date_time_buy,false);
- for(int p=ib-2; p >= 1; p--)
- {
- if(iHigh(Symbol(),PERIOD_CURRENT,p) > iLow(Symbol(),PERIOD_CURRENT,ib))
- {
- tp_date_time_buy = 0.0;
- if(object_find("target line") > 0)
- {
- ObjectDelete(0,"target line");
- }
- if(object_find("target line1") > 0)
- {
- ObjectDelete(0,"target line1");
- }
- break;
- }
- }
- }
- int reversal_indexx = iBarShift(Symbol(), PERIOD_CURRENT,od_1[m].reversal_index_date_time,false);
- int close_index = iBarShift(Symbol(), PERIOD_CURRENT,od_1[m].choch_index_date_time,false);
- //Print("Reversal Index time is ",od_1[m].reversal_index_date_time," and chock tine is ",od_1[m].choch_index_date_time);
- Check_Inside_bar(reversal_indexx);
- bool snd_con = false;
- double reversalMax = iOpen(Symbol(),PERIOD_CURRENT,reversal_indexx) < iClose(Symbol(),PERIOD_CURRENT,reversal_indexx) ? iClose(Symbol(),PERIOD_CURRENT,reversal_indexx) : iOpen(Symbol(),PERIOD_CURRENT,reversal_indexx);
- for(int i=close_index-1; i>=1; i--) // second condition of updation
- {
- if(iClose(Symbol(),PERIOD_CURRENT,i) < reversalMax)
- {
- snd_con = true;
- //remove_value_from_structure();
- }
- }
- if(iOpen(Symbol(),PERIOD_CURRENT,1) > iClose(Symbol(),PERIOD_CURRENT,close_index) && snd_con == false) // first condition of updation
- {
- if(value_close_high(close_index) == true)
- {
- if(iClose(Symbol(),PERIOD_CURRENT,close_index) > iLow(Symbol(),PERIOD_CURRENT,1)
- && iClose(Symbol(),PERIOD_CURRENT,close_index) < iClose(Symbol(),PERIOD_CURRENT,1) && tp_date_time_buy != 0.0)
- {
- placeBuyTrade();
- if(object_find("target line") > 0)
- {
- ObjectDelete(0,"target line");
- }
- if(object_find("target line1") > 0)
- {
- ObjectDelete(0,"target line1");
- }
- remove_value_from_structure();
- od_1[m].choch_index_date_time = 0;
- od_1[m].Signal == "";
- od_1[m].reversal_index_date_time = 0;
- od_1[m].choch_index_date_time = 0;
- signal = "";
- Print("buy trade placed in Entry condition delay -------------------------------------------------------------");
- Print("time at which trade is placed : ",TimeCurrent());
- }
- }
- }
- }
- if(od_1[m].EntryCon == 2 && od_1[m].Signal == "sell")
- {
- // Print("hi ----- entry condition 2 trend lines in sell case downtrend "," tp_date_time_sell",tp_date_time_sell);
- if(trend == "downtrend")
- {
- // Print("there ----- entry condition 2 trend lines in sell case downtrend "," tp_date_time_sell",tp_date_time_sell);
- double ib =iBarShift(Symbol(), PERIOD_CURRENT,tp_date_time_sell,false);
- for(int p=ib-2; p >= 1; p--)
- {
- if(iLow(Symbol(),PERIOD_CURRENT,p) < iHigh(Symbol(),PERIOD_CURRENT,ib))
- {
- tp_date_time_sell = 0.0;
- if(object_find("target line") > 0)
- {
- ObjectDelete(0,"target line");
- }
- if(object_find("target line1") > 0)
- {
- ObjectDelete(0,"target line1");
- }
- break;
- }
- }
- }
- int reversal_indexx = iBarShift(Symbol(), PERIOD_CURRENT,od_1[m].reversal_index_date_time,false);
- int close_index = iBarShift(Symbol(), PERIOD_CURRENT,od_1[m].choch_index_date_time,false);
- //Print("Reversal Index time is ",od_1[m].reversal_index_date_time," and chock tine is ",od_1[m].choch_index_date_time);
- Check_Inside_bar(reversal_indexx);
- double reversalMin = iOpen(Symbol(),PERIOD_CURRENT,reversal_indexx) > iClose(Symbol(),PERIOD_CURRENT,reversal_indexx) ? iClose(Symbol(),PERIOD_CURRENT,reversal_indexx) : iOpen(Symbol(),PERIOD_CURRENT,reversal_indexx);
- bool snd_con1 = false;
- for(int i=close_index-1; i>=1; i--) // second condition of updation
- {
- if(iClose(Symbol(),PERIOD_CURRENT,i) > reversalMin)
- {
- snd_con1 = true;
- // remove_value_from_structure();
- }
- }
- if(iOpen(Symbol(),PERIOD_CURRENT,1) < iClose(Symbol(),PERIOD_CURRENT,close_index) && snd_con1 == false) // first condition of updation
- {
- if(value_close_low(close_index) == true)
- {
- if(iClose(Symbol(),PERIOD_CURRENT,close_index) < iHigh(Symbol(),PERIOD_CURRENT,1)
- && iClose(Symbol(),PERIOD_CURRENT,close_index) > iClose(Symbol(),PERIOD_CURRENT,1) && tp_date_time_sell != 0.0)
- {
- placeSellTrade();
- if(object_find("target line") > 0)
- {
- ObjectDelete(0,"target line");
- }
- if(object_find("target line1") > 0)
- {
- ObjectDelete(0,"target line1");
- }
- remove_value_from_structure();
- od_1[m].choch_index_date_time = 0;
- od_1[m].Signal == "";
- od_1[m].reversal_index_date_time = 0;
- od_1[m].choch_index_date_time = 0;
- signal = "";
- Print("sell trade placed in entry condition delay -------------------------------------------------------------");
- Print("time at which trade is placed : ",TimeCurrent());
- }
- }
- }
- }
- }
- }
- }
- }
- }
- //+------------------------------------------------------------------+
- //| |
- //+------------------------------------------------------------------+
- bool NewBar()
- {
- static datetime Last_bar ;
- datetime Current_bar = iTime(Symbol(), PERIOD_CURRENT,0);
- if(Current_bar != Last_bar)
- {
- Last_bar = Current_bar;
- return (true);
- }
- else
- {
- return (false);
- }
- }
- //+------------------------------------------------------------------+
- //| |
- //+------------------------------------------------------------------+
- bool object_find(string obj) // to find object placed by user in the chart
- {
- if(ObjectFind(0,obj) >= 0)
- {
- return true;
- }
- return false;
- }
- //+------------------------------------------------------------------+
- //| |
- //+------------------------------------------------------------------+
- string checkCandle(int v) // to check the candle is bullish or bearish
- {
- double close = iClose(Symbol(),PERIOD_CURRENT,v);
- double open = iOpen(Symbol(),PERIOD_CURRENT,v);
- if(close > open)
- {
- return "Bullish";
- }
- else
- if(close < open)
- {
- return "Bearish";
- }
- else
- {
- return "Doji";
- }
- return "empty";
- }
- //+------------------------------------------------------------------+
- //+------------------------------------------------------------------+
- //+------------------------------------------------------------------+
|