| 12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295129612971298129913001301130213031304130513061307130813091310131113121313131413151316131713181319132013211322132313241325132613271328132913301331133213331334133513361337133813391340134113421343134413451346134713481349135013511352135313541355135613571358135913601361136213631364136513661367136813691370137113721373137413751376137713781379138013811382138313841385138613871388138913901391139213931394139513961397139813991400140114021403140414051406140714081409141014111412141314141415141614171418141914201421142214231424142514261427142814291430143114321433143414351436143714381439144014411442144314441445144614471448144914501451145214531454145514561457145814591460146114621463146414651466146714681469147014711472147314741475147614771478147914801481148214831484148514861487148814891490149114921493149414951496149714981499150015011502150315041505150615071508150915101511151215131514151515161517151815191520152115221523152415251526152715281529153015311532153315341535153615371538153915401541154215431544154515461547154815491550155115521553155415551556155715581559156015611562156315641565156615671568156915701571157215731574157515761577157815791580158115821583158415851586158715881589159015911592159315941595159615971598159916001601160216031604160516061607160816091610161116121613161416151616161716181619162016211622162316241625162616271628162916301631163216331634163516361637163816391640164116421643164416451646164716481649165016511652165316541655165616571658165916601661166216631664166516661667166816691670167116721673167416751676167716781679168016811682168316841685168616871688168916901691169216931694169516961697169816991700170117021703170417051706170717081709171017111712171317141715171617171718171917201721172217231724172517261727172817291730173117321733173417351736173717381739174017411742174317441745174617471748174917501751175217531754175517561757175817591760176117621763176417651766176717681769177017711772177317741775177617771778177917801781178217831784178517861787178817891790179117921793179417951796179717981799180018011802180318041805180618071808180918101811181218131814181518161817181818191820182118221823182418251826182718281829183018311832183318341835183618371838183918401841184218431844184518461847184818491850185118521853185418551856185718581859186018611862186318641865186618671868186918701871187218731874187518761877187818791880188118821883188418851886188718881889189018911892189318941895189618971898189919001901190219031904190519061907190819091910191119121913191419151916191719181919192019211922192319241925192619271928192919301931193219331934193519361937193819391940194119421943194419451946194719481949195019511952195319541955195619571958195919601961196219631964196519661967196819691970197119721973197419751976197719781979198019811982198319841985198619871988198919901991199219931994199519961997199819992000200120022003200420052006200720082009201020112012201320142015201620172018201920202021202220232024202520262027202820292030203120322033203420352036203720382039204020412042204320442045204620472048204920502051205220532054205520562057205820592060206120622063206420652066206720682069207020712072207320742075207620772078207920802081208220832084208520862087208820892090209120922093209420952096209720982099210021012102210321042105210621072108210921102111211221132114211521162117211821192120212121222123212421252126212721282129213021312132213321342135213621372138213921402141214221432144214521462147214821492150215121522153215421552156215721582159216021612162216321642165216621672168216921702171217221732174217521762177217821792180218121822183218421852186218721882189219021912192219321942195219621972198219922002201220222032204220522062207220822092210221122122213221422152216221722182219222022212222222322242225222622272228222922302231223222332234223522362237223822392240224122422243224422452246224722482249225022512252225322542255225622572258225922602261226222632264226522662267226822692270227122722273 |
- //+------------------------------------------------------------------+
- //| 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 = "<><><><><><> Default Settings <><><><><><>";
- input double lot_size = 0.1;
- input lotcalculator lot_calculator = fix; //Lot Size Calculator
- input double risk = 1; //Risk in Percentage %
- input double stoploss = 20; // Stoploss Pips buffer from choch candle
- input double takeProfit = 20; // TakeProfit in Pips
- input int magic_no = 123; // Magic no
- 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;
- 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=high_index-1; j > i; 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=low_index - 1; j > i; 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)
- {
- //Print("bullish found at index ",j);
- ind = Store_bos_last_index +1; // reversal candle index
- reversal_bar_time = iTime(Symbol(),PERIOD_CURRENT,ind);
- 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)
- {
- 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);
- Print("condition satisfied in downtrend buy trade : ",check_values_less_than_choch_high1(ind,i));
- if(check_values_less_than_choch_high(ind,i) == 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_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);
- 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)
- {
- 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);
- Print("condition satisfied in uptrend sell trade : ",check_values_less_than_choch_low(ind,i));
- if(check_values_less_than_choch_low1(ind,i) == 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);
- }
- //+------------------------------------------------------------------+
- //| |
- //+------------------------------------------------------------------+
- 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)
- {
- int a = 0;
- 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
- Entry_Action_1_up(Store_bos_last_index,i,diff1);
- a=1;
- 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 ti = choch_index_time;
- 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);
- Print("from where you start ",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("time at which error accur ",iTime(Symbol(),PERIOD_CURRENT,i));
- // Print("object error ",GetLastError());
- // }
- 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);
- Print("from where you end ",chock_index1);
- 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");
- 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 = ti;
- }
- //-------------------------------------------------------------------------------------------------------------------------------------------------------------------
- if(signal == "sell")
- {
- MqlDateTime edate;
- time_to_place_trade = 0.0;
- int current_time_frame = Period();
- string current_time_frame_string;
- switch(current_time_frame)
- {
- case PERIOD_M1:
- current_time_frame_string = "1 minute";
- if(TimeToStruct(time_of_candle,edate))
- {
- edate.hour = 0;
- edate.min = edate.min + 2;
- edate.sec = 0;
- }
- break;
- case PERIOD_M5:
- current_time_frame_string = "5 minutes";
- if(TimeToStruct(time_of_candle,edate))
- {
- edate.hour = 0;
- edate.min = edate.min + 10;
- edate.sec = 0;
- }
- break;
- case PERIOD_M15:
- current_time_frame_string = "15 minutes";
- if(TimeToStruct(time_of_candle,edate))
- {
- edate.hour = 0;
- edate.min = edate.min + 30;
- edate.sec = 0;
- }
- break;
- case PERIOD_M30:
- current_time_frame_string = "30 minutes";
- if(TimeToStruct(time_of_candle,edate))
- {
- edate.hour = 0;
- edate.min = edate.min + 60;
- edate.sec = 0;
- }
- break;
- case PERIOD_H1:
- current_time_frame_string = "1 hour";
- if(TimeToStruct(time_of_candle,edate))
- {
- edate.hour = edate.hour + 1;
- edate.min = 0;
- edate.sec = 0;
- }
- time_to_place_trade = StructToTime(edate);
- // Print("Time: ",iTime(Symbol(),PERIOD_CURRENT,0));
- store_value_in_structure(choch_index_time,reversal_bar_time,signal,time_of_candle,time_to_place_trade,1);
- //Print("choch_index_time ",choch_index_time);
- //Print("reversal_bar_time ",reversal_bar_time);
- //Print("time_of_candle",time_of_candle);
- //Print("time_to_place_trade",time_to_place_trade);
- //Print("signal is ",signal);
- break;
- default:
- current_time_frame_string = "unknown";
- break;
- }
- //signal = "";
- }
- signal = "";
- // condition on 2st candle
- Entry_Action_2_up(Store_bos_last_index,i,diff1);
- a=2;
- 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);
- // -----------------------------------------------------------------------------------------------------------------------------------------------------------
- // chock_index = iBarShift(Symbol(), PERIOD_CURRENT, choch_index_time, false);
- // 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);
- //
- // Print("from where you start ",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 error ",GetLastError());
- // }
- // 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);
- //
- // chock_index1 = iBarShift(Symbol(), PERIOD_CURRENT, choch_index_time, false);
- // Print("from where you end ",chock_index1);
- //
- // condition_not_match = false;
- // for(int p=chock_index - 1 ; p >=chock_index1; p--)
- // {
- // if(iLow(Symbol(),PERIOD_CURRENT,p) < HIGH)
- // {
- // condition_not_match = true;
- // }
- // }
- //
- // if(condition_not_match == true)
- // {
- // Print("TArget line deleted");
- // HIGH = 0.0;
- // LOW = 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");
- // }
- //
- // }
- //-------------------------------------------------------------------------------------------------------------------------------------------------------------------
- if(signal == "sell")
- {
- MqlDateTime edate;
- time_to_place_trade = 0.0;
- int current_time_frame = Period();
- string current_time_frame_string;
- switch(current_time_frame)
- {
- case PERIOD_M1:
- current_time_frame_string = "1 minute";
- if(TimeToStruct(time_of_candle,edate))
- {
- edate.hour = 0;
- edate.min = edate.min + 2;
- edate.sec = 0;
- }
- break;
- case PERIOD_M5:
- current_time_frame_string = "5 minutes";
- if(TimeToStruct(time_of_candle,edate))
- {
- edate.hour = 0;
- edate.min = edate.min + 10;
- edate.sec = 0;
- }
- break;
- case PERIOD_M15:
- current_time_frame_string = "15 minutes";
- if(TimeToStruct(time_of_candle,edate))
- {
- edate.hour = 0;
- edate.min = edate.min + 30;
- edate.sec = 0;
- }
- break;
- case PERIOD_M30:
- current_time_frame_string = "30 minutes";
- if(TimeToStruct(time_of_candle,edate))
- {
- edate.hour = 0;
- edate.min = edate.min + 60;
- edate.sec = 0;
- }
- break;
- case PERIOD_H1:
- current_time_frame_string = "1 hour";
- if(TimeToStruct(time_of_candle,edate))
- {
- edate.hour = edate.hour + 2;
- edate.min = 0;
- edate.sec = 0;
- }
- time_to_place_trade = StructToTime(edate);
- Print("Time: ",iTime(Symbol(),PERIOD_CURRENT,0));
- store_value_in_structure(choch_index_time,reversal_bar_time,signal,time_of_candle,time_to_place_trade,2);
- //Print("choch_index_time ",choch_index_time);
- //Print("reversal_bar_time ",reversal_bar_time);
- //Print("time_of_candle",time_of_candle);
- //Print("time_to_place_trade",time_to_place_trade);
- //Print("signal is ",signal);
- break;
- default:
- current_time_frame_string = "unknown";
- break;
- }
- //signal = "";
- }
- 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);
- Entry_Action_1_down(Store_bos_last_index,i,diff);
- a = 1;
- 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 = choch_index_time;
- 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);
- Print("from where you start ",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("time at which error accur in downtrend to uptrend ",iTime(Symbol(),PERIOD_CURRENT,i));
- // Print("object error ",GetLastError());
- // }
- 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);
- Print("from where you end ",chock_index1);
- bool condition_not_match = false;
- for(int p=chock_index - 2 ; p > chock_index1; p--)
- {
- // Print("index is ",p," time is ", iTime(Symbol(),PERIOD_CURRENT,p));
- // Print("high is ", iHigh(Symbol(),PERIOD_CURRENT,chock_index)," low is ",LOW);
- if(iHigh(Symbol(),PERIOD_CURRENT,p) > LOW)
- {
- Print("here the condition is get false ");
- Print("high is ", iHigh(Symbol(),PERIOD_CURRENT,p)," low is ",LOW);
- Print("index is ",p," time is ", iTime(Symbol(),PERIOD_CURRENT,p));
- 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")
- {
- MqlDateTime edate;
- time_to_place_trade = 0.0;
- int current_time_frame = Period();
- string current_time_frame_string;
- switch(current_time_frame)
- {
- case PERIOD_M1:
- current_time_frame_string = "1 minute";
- if(TimeToStruct(time_of_candle,edate))
- {
- edate.hour = 0;
- edate.min = edate.min + 2;
- edate.sec = 0;
- }
- break;
- case PERIOD_M5:
- current_time_frame_string = "5 minutes";
- if(TimeToStruct(time_of_candle,edate))
- {
- edate.hour = 0;
- edate.min = edate.min + 10;
- edate.sec = 0;
- }
- break;
- case PERIOD_M15:
- current_time_frame_string = "15 minutes";
- if(TimeToStruct(time_of_candle,edate))
- {
- edate.hour = 0;
- edate.min = edate.min + 30;
- edate.sec = 0;
- }
- break;
- case PERIOD_M30:
- current_time_frame_string = "30 minutes";
- if(TimeToStruct(time_of_candle,edate))
- {
- edate.hour = 0;
- edate.min = edate.min + 60;
- edate.sec = 0;
- }
- break;
- case PERIOD_H1:
- current_time_frame_string = "1 hour";
- if(TimeToStruct(time_of_candle,edate))
- {
- edate.hour = edate.hour + 1;
- edate.min = 0;
- edate.sec = 0;
- }
- time_to_place_trade = StructToTime(edate);
- Print("Time: ",iTime(Symbol(),PERIOD_CURRENT,0));
- store_value_in_structure(choch_index_time,reversal_bar_time,signal,time_of_candle,time_to_place_trade,1);
- //Print("choch_index_time ",choch_index_time);
- //Print("reversal_bar_time ",reversal_bar_time);
- //Print("time_of_candle",time_of_candle);
- //Print("time_to_place_trade",time_to_place_trade);
- //Print("signal is ",signal);
- break;
- default:
- current_time_frame_string = "unknown";
- break;
- }
- }
- signal = "";
- Entry_Action_2_down(Store_bos_last_index,i,diff);
- a = 2;
- 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);
- //--------------------------------------------------------------------------------------------------------------------------------------------------------------------
- // chock_index = iBarShift(Symbol(), PERIOD_CURRENT, choch_index_time, false);
- // 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);
- //
- // Print("from where you start ",chock_index);
- //
- //
- //
- // if(object_find("target line") > 0)
- // {
- // ObjectDelete(0,"target line");
- // }
- //
- // 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));
- // 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);
- // chock_index1 = iBarShift(Symbol(), PERIOD_CURRENT, choch_index_time, false);
- // Print("from where you end ",chock_index1);
- //
- // condition_not_match = false;
- // for(int p=chock_index - 1 ; p >=chock_index1; p--)
- // {
- // if(iHigh(Symbol(),PERIOD_CURRENT,p) > LOW)
- // {
- // condition_not_match = true;
- // }
- // }
- //
- // if(condition_not_match == true)
- // {
- // HIGH = 0.0;
- // LOW = 0.0;
- // Print("line target deleted :");
- // condition_not_match = false;
- //
- // if(object_find("target line") > 0)
- // {
- // ObjectDelete(0,"target line");
- // }
- //
- // if(object_find("target line1") > 0)
- // {
- // ObjectDelete(0,"target line1");
- // }
- //
- // }
- //------------------------------------------------------------------------------------------------------------------------------------------------------------------
- if(signal == "buy")
- {
- MqlDateTime edate;
- time_to_place_trade = 0.0;
- int current_time_frame = Period();
- string current_time_frame_string;
- switch(current_time_frame)
- {
- case PERIOD_M1:
- current_time_frame_string = "1 minute";
- if(TimeToStruct(time_of_candle,edate))
- {
- edate.hour = 0;
- edate.min = edate.min + 2;
- edate.sec = 0;
- }
- break;
- case PERIOD_M5:
- current_time_frame_string = "5 minutes";
- if(TimeToStruct(time_of_candle,edate))
- {
- edate.hour = 0;
- edate.min = edate.min + 10;
- edate.sec = 0;
- }
- break;
- case PERIOD_M15:
- current_time_frame_string = "15 minutes";
- if(TimeToStruct(time_of_candle,edate))
- {
- edate.hour = 0;
- edate.min = edate.min + 30;
- edate.sec = 0;
- }
- break;
- case PERIOD_M30:
- current_time_frame_string = "30 minutes";
- if(TimeToStruct(time_of_candle,edate))
- {
- edate.hour = 0;
- edate.min = edate.min + 60;
- edate.sec = 0;
- }
- break;
- case PERIOD_H1:
- current_time_frame_string = "1 hour";
- if(TimeToStruct(time_of_candle,edate))
- {
- edate.hour = edate.hour + 2;
- edate.min = 0;
- edate.sec = 0;
- }
- time_to_place_trade = StructToTime(edate);
- Print("Time: ",iTime(Symbol(),PERIOD_CURRENT,0));
- store_value_in_structure(choch_index_time,reversal_bar_time,signal,time_of_candle,time_to_place_trade,2);
- //Print("choch_index_time ",choch_index_time);
- //Print("reversal_bar_time ",reversal_bar_time);
- //Print("time_of_candle",time_of_candle);
- //Print("time_to_place_trade",time_to_place_trade);
- //Print("signal is ",signal);
- break;
- default:
- current_time_frame_string = "unknown";
- break;
- }
- }
- 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);
- 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);
- 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;
- 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);
- 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);
- 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;
- 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);
- // Print("low update due to third condition",low," time of the candle is ",iTime(Symbol(),PERIOD_CURRENT,i));
- }
- 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);
- // Print("high update due to third condition",high," time of the candle is ",iTime(Symbol(),PERIOD_CURRENT,i));
- }
- }
- 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);
- // Print("high update due to third condition",high);
- }
- 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");
- }
- // Print("low value is ", 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);
- // Print("low update due to third condition",low);
- }
- }
- }
- //+------------------------------------------------------------------+
- //| |
- //+------------------------------------------------------------------+
- 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;
- // Print("saved time in the structure ",time_of_candle);
- od_1[l].Time_of_candle_For_trade = time_to_place_trade;
- // Print("saved time in the structure ",time_to_place_trade);
- od_1[l].EntryCon = entry;
- break;
- }
- }
- }
- //+------------------------------------------------------------------+
- //| |
- //+------------------------------------------------------------------+
- void remove_value_from_structure()
- {
- for(int l=0; l<200; l++)
- {
- if(od_1[l].choch_index_date_time != 0)
- {
- // Print("value removed from structure ");
- 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);
- // Print("Pip value: ", NormalizeDouble(((SymbolInfoDouble(Symbol(),SYMBOL_TRADE_TICK_VALUE)/(SymbolInfoDouble(Symbol(),SYMBOL_TRADE_TICK_SIZE)/Point))*10),2));
- double pipvalue = NormalizeDouble(((SymbolInfoDouble(Symbol(),SYMBOL_TRADE_TICK_VALUE)/(SymbolInfoDouble(Symbol(),SYMBOL_TRADE_TICK_SIZE)/Point()))*10),2);
- // pipvalue=NormalizeDouble((modeTickV/modeTickS/Point()),)
- // pipvalue=
- 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;
- //sl=riskamount/pipValuelot
- 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 = iLow(Symbol(),PERIOD_CURRENT,tp);
- //tp_date_time_sell = 0.0;
- 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;
- }
- }
- }
- 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)
- {
- if(od_1[m].EntryCon == 1 && iTime(Symbol(),PERIOD_CURRENT,1) == od_1[m].Time_of_candle_For_trade && od_1[m].Signal == "buy" && od_1[m].Time_of_candle_For_trade != 0 /*&& HIGH != 0 && LOW != 0*/)
- {
- 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);
- 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);
- if(reversalMax > iLow(Symbol(),PERIOD_CURRENT,1)
- && iClose(Symbol(),PERIOD_CURRENT,close_index) < iClose(Symbol(),PERIOD_CURRENT,1) && tp_date_time_buy != 0.0)
- {
- Print("<<<<<<<<<<<< Entry 1 >>>>>>>>>");
- placeBuyTrade();
- 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 -------------------------------------------------------------");
- Print("time at which trade is placed : ",TimeCurrent());
- }
- }
- if(od_1[m].EntryCon == 1 && iTime(Symbol(),PERIOD_CURRENT,1) == od_1[m].Time_of_candle_For_trade && od_1[m].Signal == "sell" && od_1[m].Time_of_candle_For_trade != 0 /*&& HIGH != 0 && LOW != 0*/)
- {
- 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);
- 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);
- 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();
- 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 -------------------------------------------------------------");
- Print("time at which trade is placed : ",TimeCurrent());
- }
- }
- // second condition match
- if(od_1[m].EntryCon == 2 && TimeCurrent() > od_1[m].Time_of_candle_For_trade && od_1[m].Signal == "buy" && od_1[m].Time_of_candle_For_trade != 0 /*&& HIGH != 0 && LOW != 0*/)
- {
- // Print("time is greater and signal is buy ",TimeCurrent());
- // Print("i am in enrtry condition 1 : ");
- 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(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)
- {
- Print("<<<<<<<<<<<< Entry 2 >>>>>>>>>");
- placeBuyTrade();
- 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 -------------------------------------------------------------");
- Print("time at which trade is placed : ",TimeCurrent());
- }
- }
- }
- if(od_1[m].EntryCon == 2 && TimeCurrent() > od_1[m].Time_of_candle_For_trade && od_1[m].Signal == "sell" && od_1[m].Time_of_candle_For_trade != 0 /*&& HIGH != 0 && LOW != 0*/)
- {
- 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(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();
- 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 -------------------------------------------------------------");
- 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";
- }
- return "empty";
- }
- //+------------------------------------------------------------------+
- //+------------------------------------------------------------------+
|