Без опису

BOS_CHOCH.mq5 74KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330133113321333133413351336133713381339134013411342134313441345134613471348134913501351135213531354135513561357135813591360136113621363136413651366136713681369137013711372137313741375137613771378137913801381138213831384138513861387138813891390139113921393139413951396139713981399140014011402140314041405140614071408140914101411141214131414141514161417141814191420142114221423142414251426142714281429143014311432143314341435143614371438143914401441144214431444144514461447144814491450145114521453145414551456145714581459146014611462146314641465146614671468146914701471147214731474147514761477147814791480148114821483148414851486148714881489149014911492149314941495149614971498149915001501150215031504150515061507150815091510151115121513151415151516151715181519152015211522152315241525152615271528152915301531153215331534153515361537153815391540154115421543154415451546154715481549155015511552155315541555155615571558155915601561156215631564156515661567156815691570157115721573157415751576157715781579158015811582158315841585158615871588158915901591159215931594159515961597159815991600160116021603160416051606160716081609161016111612161316141615161616171618161916201621162216231624162516261627162816291630163116321633163416351636163716381639164016411642164316441645164616471648164916501651165216531654165516561657165816591660166116621663166416651666166716681669167016711672167316741675167616771678167916801681168216831684168516861687168816891690169116921693169416951696169716981699170017011702170317041705170617071708170917101711171217131714171517161717171817191720172117221723172417251726172717281729173017311732173317341735173617371738173917401741174217431744174517461747174817491750175117521753175417551756175717581759176017611762176317641765176617671768176917701771177217731774177517761777177817791780178117821783178417851786178717881789179017911792179317941795179617971798179918001801180218031804180518061807180818091810181118121813181418151816181718181819182018211822182318241825182618271828182918301831183218331834183518361837183818391840184118421843184418451846184718481849185018511852185318541855185618571858185918601861186218631864186518661867186818691870187118721873187418751876187718781879188018811882188318841885188618871888188918901891189218931894189518961897189818991900190119021903190419051906190719081909191019111912191319141915191619171918191919201921192219231924192519261927192819291930193119321933193419351936193719381939194019411942194319441945194619471948194919501951195219531954195519561957195819591960196119621963196419651966196719681969197019711972197319741975197619771978197919801981198219831984198519861987198819891990199119921993199419951996199719981999200020012002200320042005200620072008200920102011201220132014201520162017201820192020202120222023202420252026202720282029203020312032203320342035203620372038203920402041204220432044204520462047204820492050205120522053205420552056205720582059206020612062206320642065206620672068206920702071207220732074207520762077207820792080208120822083208420852086208720882089209020912092209320942095209620972098209921002101210221032104210521062107
  1. //+------------------------------------------------------------------+
  2. //| MK_BOS_CHOCH.mq5 |
  3. //| Copyright 2023, MetaQuotes Ltd. |
  4. //| https://www.mql5.com |
  5. //+------------------------------------------------------------------+
  6. #property copyright "Copyright 2023, MetaQuotes Ltd."
  7. #property link "https://www.mql5.com"
  8. #property version "1.00"
  9. #include <Trade\Trade.mqh>
  10. CTrade trade;
  11. #define orderNum 200
  12. enum lotcalculator
  13. {
  14. fix, //Fixed Lot Size
  15. rsk, //Risk Percentage
  16. };
  17. struct tradeOrder
  18. {
  19. datetime choch_index_date_time;
  20. datetime reversal_index_date_time;
  21. string Signal;
  22. datetime Time_OF_Candle;
  23. datetime Time_of_candle_For_trade;
  24. int EntryCon;
  25. tradeOrder()
  26. {
  27. choch_index_date_time = 0;
  28. Signal = "";
  29. reversal_index_date_time = 0;
  30. Time_OF_Candle = 0.0;
  31. Time_of_candle_For_trade = 0.0;
  32. EntryCon = 0.0;
  33. }
  34. };
  35. tradeOrder od_1[orderNum];
  36. bool entry_condition_candle_1_met = false;
  37. enum entryCondition
  38. {
  39. one, // Entry A1
  40. two, // Entry A2
  41. };
  42. // input entryCondition Entry_condition_1 = one; // Entry Condition
  43. sinput string str = "<><><><><><> Set Object Name <><><><><><>";
  44. input string object_name = "line";
  45. sinput string str1 = "<><><><><><> Set time of vertical line <><><><><><>";
  46. input datetime inpTime = 0;//First Line Draw time
  47. sinput string str2 = "<><><><><><> General Settings <><><><><><>";
  48. input int magic_no = 123; // Magic no
  49. input double lot_size = 0.1;
  50. input lotcalculator lot_calculator = fix; //Lot Size Calculator
  51. input double risk = 1; //Risk in Percentage %
  52. input double stoploss = 20; // Stoploss Pips buffer from choch candle
  53. string trend = " ";
  54. string signal = "";
  55. datetime reversal_bar_time = 0;
  56. datetime choch_index_time ;
  57. datetime index_of_low_time;
  58. datetime index_of_high_time;
  59. datetime store_last_bos_index_time;
  60. datetime time_of_candle = 0.0;
  61. datetime time_to_place_trade = 0.0;
  62. datetime high_index_time;
  63. datetime low_index_time;
  64. datetime tp_date_time_buy;
  65. datetime tp_date_time_sell;
  66. datetime Last_bos_before_reversal;
  67. double hi;
  68. double lo;
  69. double high,low,low1,high1,low2,high2;
  70. double HIGH;
  71. double LOW;
  72. bool bearish_found = false;
  73. bool bullish_found = false;
  74. bool choch_at_index = false;
  75. int choch_index = 0;
  76. int reversal_candle_index = 0;
  77. int ind = 0;
  78. int index_of_last_high = 0;
  79. int index_of_last_low = 0;
  80. int index_of_low = 0;
  81. int index_of_high = 0;
  82. int high_index=0;
  83. int low_index =0;
  84. int Store_bos_last_index = 0;
  85. int index = 0;
  86. //+------------------------------------------------------------------+
  87. //| Expert initialization function |
  88. //+------------------------------------------------------------------+
  89. void Bos(int i)
  90. {
  91. int save_bullish_index = 0;
  92. int save_bearish_index = 0;
  93. if(trend == "uptrend")
  94. {
  95. high1 = iHigh(Symbol(),PERIOD_CURRENT,i);
  96. double close = iClose(Symbol(),PERIOD_CURRENT,i);
  97. if(close > high)
  98. {
  99. high_index = iBarShift(Symbol(), PERIOD_CURRENT, high_index_time, false);
  100. for(int j=high_index-1; j > i; j--)
  101. {
  102. if(checkCandle(j) == "Bearish")
  103. {
  104. save_bullish_index = j;
  105. if(object_find("high") > 0)
  106. {
  107. ObjectDelete(0,"high");
  108. }
  109. high = high1;
  110. ObjectCreate(0,"high",OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,i),high,iTime(Symbol(),PERIOD_CURRENT,0),high);
  111. ObjectSetInteger(0,"high",OBJPROP_RAY_RIGHT,true);
  112. ObjectSetInteger(0,"high",OBJPROP_COLOR,clrBlue);
  113. ObjectCreate(0,"line1"+iTime(Symbol(),PERIOD_CURRENT,i),OBJ_TEXT,0,iTime(Symbol(),PERIOD_CURRENT,i),high+40*Point());
  114. ObjectSetString(0,"line1"+iTime(Symbol(),PERIOD_CURRENT,i), OBJPROP_TEXT,"bos");
  115. store_last_bos_index_time = iTime(Symbol(),PERIOD_CURRENT,i);
  116. Store_bos_last_index = iBarShift(Symbol(), PERIOD_CURRENT, store_last_bos_index_time, false);
  117. //low = iBarShift(Symbol(), PERIOD_CURRENT, low_index_time, false);
  118. low = iLow(Symbol(),PERIOD_CURRENT,j);
  119. bearish_found = true;
  120. index_of_low_time = iTime(Symbol(),PERIOD_CURRENT,j);
  121. break;
  122. }
  123. }
  124. if(bearish_found == true)
  125. {
  126. for(int k=save_bullish_index; k > i ; k--)
  127. {
  128. low1 = iLow(Symbol(),PERIOD_CURRENT,k);
  129. if(low1 < low)
  130. {
  131. low = low1;
  132. index_of_low_time = iTime(Symbol(),PERIOD_CURRENT,k);
  133. bearish_found = false;
  134. }
  135. }
  136. if(object_find("low") > 0)
  137. {
  138. if(ObjectDelete(0,"low"))
  139. {
  140. //Print("object deleted :");
  141. }
  142. }
  143. index_of_low = iBarShift(Symbol(), PERIOD_CURRENT, index_of_low_time, false);
  144. ObjectCreate(0,"low",OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,index_of_low),low,iTime(Symbol(),PERIOD_CURRENT,0),low);
  145. ObjectSetInteger(0,"low",OBJPROP_RAY_RIGHT,true);
  146. ObjectSetInteger(0,"low",OBJPROP_RAY_LEFT,false);
  147. ObjectSetInteger(0,"low",OBJPROP_COLOR,clrRed);
  148. }
  149. high_index_time = iTime(Symbol(),PERIOD_CURRENT,i);
  150. }
  151. }
  152. if(trend == "downtrend")
  153. {
  154. low1 = iLow(Symbol(),PERIOD_CURRENT,i);
  155. double close1 = iClose(Symbol(),PERIOD_CURRENT,i);
  156. if(close1 < low)
  157. {
  158. low_index = iBarShift(Symbol(), PERIOD_CURRENT, low_index_time, false);
  159. for(int j=low_index - 1; j > i; j--)
  160. {
  161. if(checkCandle(j) == "Bullish")
  162. {
  163. save_bullish_index = j;
  164. if(object_find("low") > 0)
  165. {
  166. ObjectDelete(0,"low");
  167. }
  168. low = low1;
  169. ObjectCreate(0,"low",OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,i),low,iTime(Symbol(),PERIOD_CURRENT,0),low);
  170. ObjectSetInteger(0,"low",OBJPROP_RAY_RIGHT,true);
  171. ObjectSetInteger(0,"low",OBJPROP_COLOR,clrRed);
  172. ObjectCreate(0,"line2"+iTime(Symbol(),PERIOD_CURRENT,i),OBJ_TEXT,0,iTime(Symbol(),PERIOD_CURRENT,i),low);
  173. ObjectSetString(0,"line2"+iTime(Symbol(),PERIOD_CURRENT,i), OBJPROP_TEXT,"bos");
  174. store_last_bos_index_time = iTime(Symbol(),PERIOD_CURRENT,i);
  175. Store_bos_last_index = iBarShift(Symbol(), PERIOD_CURRENT, store_last_bos_index_time, false);
  176. low_index = iBarShift(Symbol(), PERIOD_CURRENT, low_index_time, false);
  177. high = iHigh(Symbol(),PERIOD_CURRENT,j);
  178. bullish_found = true;
  179. index_of_high_time = iTime(Symbol(),PERIOD_CURRENT,j);
  180. break;
  181. }
  182. }
  183. if(bullish_found == true)
  184. {
  185. for(int k=save_bullish_index; k > i ; k--)
  186. {
  187. high1 = iHigh(Symbol(),PERIOD_CURRENT,k);
  188. if(high1 > high)
  189. {
  190. high = high1;
  191. index_of_high_time = iTime(Symbol(),PERIOD_CURRENT,k);
  192. bullish_found = false;
  193. }
  194. }
  195. if(object_find("high") > 0)
  196. {
  197. ObjectDelete(0,"high");
  198. }
  199. index_of_high = iBarShift(Symbol(), PERIOD_CURRENT, index_of_high_time, false);
  200. ObjectCreate(0,"high",OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,index_of_high),high,iTime(Symbol(),PERIOD_CURRENT,0),high);
  201. ObjectSetInteger(0,"high",OBJPROP_RAY_RIGHT,true);
  202. ObjectSetInteger(0,"high",OBJPROP_COLOR,clrBlue);
  203. bullish_found = false;
  204. }
  205. low_index_time = iTime(Symbol(),PERIOD_CURRENT,i);
  206. }
  207. }
  208. }
  209. //+------------------------------------------------------------------+
  210. //| |
  211. //+------------------------------------------------------------------+
  212. void Entry_Action_1_down(int Store_bos_last_index, int i,int diff)
  213. {
  214. ind = Store_bos_last_index +1; // reversal candle index
  215. reversal_bar_time = iTime(Symbol(),PERIOD_CURRENT,ind);
  216. bool addtional_condition = true;
  217. for(int j=Store_bos_last_index-1; j>i+2; j--)
  218. {
  219. // Print("Store_bos_last_index ",Store_bos_last_index," chock index is ",i);
  220. if(checkCandle(j) == "Bearish" && checkCandle(j-1) == "Bearish")
  221. {
  222. if(iHigh(Symbol(),PERIOD_CURRENT,j) > iOpen(Symbol(),PERIOD_CURRENT,j-1) && iLow(Symbol(),PERIOD_CURRENT,j) < iClose(Symbol(),PERIOD_CURRENT,j-1))
  223. {
  224. tp_date_time_buy = 0.0;
  225. Print("target lines deleted due to in bar");
  226. if(object_find("target line") > 0)
  227. {
  228. ObjectDelete(0,"target line");
  229. }
  230. if(object_find("target line1") > 0)
  231. {
  232. ObjectDelete(0,"target line1");
  233. }
  234. addtional_condition = false;
  235. }
  236. }
  237. if(checkCandle(j) == "Bullish" && checkCandle(j-1) == "Bullish")
  238. {
  239. if(iHigh(Symbol(),PERIOD_CURRENT,j) > iOpen(Symbol(),PERIOD_CURRENT,j-1) && iLow(Symbol(),PERIOD_CURRENT,j) < iClose(Symbol(),PERIOD_CURRENT,j-1))
  240. {
  241. tp_date_time_buy = 0.0;
  242. Print("target lines deleted due to in bar");
  243. if(object_find("target line") > 0)
  244. {
  245. ObjectDelete(0,"target line");
  246. }
  247. if(object_find("target line1") > 0)
  248. {
  249. ObjectDelete(0,"target line1");
  250. }
  251. addtional_condition = false;
  252. }
  253. }
  254. }
  255. Print("condition satisfied in downtrend buy trade : ",check_values_less_than_choch_high(ind,i));
  256. if(check_values_less_than_choch_high(ind,i) == true && addtional_condition == true)
  257. {
  258. if(iOpen(Symbol(),PERIOD_CURRENT,ind) > iOpen(Symbol(),PERIOD_CURRENT,i) && iClose(Symbol(),PERIOD_CURRENT,ind) < iClose(Symbol(),PERIOD_CURRENT,i))
  259. {
  260. signal = "buy";
  261. time_of_candle = iTime(Symbol(),PERIOD_CURRENT,i);
  262. // Print("Place buy order -----------------------------------------------------------------------: ");
  263. }
  264. }
  265. 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));
  266. 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));
  267. ObjectSetInteger(0,"line14"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJPROP_COLOR,clrBlue);
  268. ObjectSetInteger(0,"line15"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJPROP_COLOR,clrBlue);
  269. 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));
  270. 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));
  271. ObjectSetInteger(0,"line16"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJPROP_STYLE,STYLE_DOT);
  272. ObjectSetInteger(0,"line17"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJPROP_STYLE,STYLE_DOT);
  273. diff = 0;
  274. }
  275. //+------------------------------------------------------------------+
  276. //| |
  277. //+------------------------------------------------------------------+
  278. void Entry_Action_2_down(int Store_bos_last_index, int i,int diff)
  279. {
  280. ind = Store_bos_last_index +1; // reversal candle index
  281. reversal_bar_time = iTime(Symbol(),PERIOD_CURRENT,ind);
  282. bool addtional_condition = true;
  283. for(int j=Store_bos_last_index-1; j>i+2; j--)
  284. {
  285. if(checkCandle(j) == "Bearish" && checkCandle(j-1) == "Bearish")
  286. {
  287. if(iHigh(Symbol(),PERIOD_CURRENT,j) > iOpen(Symbol(),PERIOD_CURRENT,j-1) && iLow(Symbol(),PERIOD_CURRENT,j) < iClose(Symbol(),PERIOD_CURRENT,j-1))
  288. {
  289. tp_date_time_buy = 0.0;
  290. Print("target lines deleted due to in bar");
  291. if(object_find("target line") > 0)
  292. {
  293. ObjectDelete(0,"target line");
  294. }
  295. if(object_find("target line1") > 0)
  296. {
  297. ObjectDelete(0,"target line1");
  298. }
  299. addtional_condition = false;
  300. }
  301. }
  302. if(checkCandle(j) == "Bullish" && checkCandle(j-1) == "Bullish")
  303. {
  304. if(iHigh(Symbol(),PERIOD_CURRENT,j) > iOpen(Symbol(),PERIOD_CURRENT,j-1) && iLow(Symbol(),PERIOD_CURRENT,j) < iClose(Symbol(),PERIOD_CURRENT,j-1))
  305. {
  306. tp_date_time_buy = 0.0;
  307. Print("target lines deleted due to in bar");
  308. if(object_find("target line") > 0)
  309. {
  310. ObjectDelete(0,"target line");
  311. }
  312. if(object_find("target line1") > 0)
  313. {
  314. ObjectDelete(0,"target line1");
  315. }
  316. addtional_condition = false;
  317. }
  318. }
  319. }
  320. if(addtional_condition = true)
  321. {
  322. signal = "buy";
  323. time_of_candle = iTime(Symbol(),PERIOD_CURRENT,i);
  324. }
  325. 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));
  326. 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));
  327. ObjectSetInteger(0,"line14"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJPROP_COLOR,clrBlue);
  328. ObjectSetInteger(0,"line15"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJPROP_COLOR,clrBlue);
  329. 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));
  330. 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));
  331. ObjectSetInteger(0,"line16"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJPROP_STYLE,STYLE_DOT);
  332. ObjectSetInteger(0,"line17"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJPROP_STYLE,STYLE_DOT);
  333. diff = 0;
  334. }
  335. //+------------------------------------------------------------------+
  336. //| |
  337. //+------------------------------------------------------------------+
  338. void Check_Inside_bar(int inex)
  339. {
  340. for(int j=inex+1; j>=1; j--)
  341. {
  342. if(checkCandle(j) == "Bearish" && checkCandle(j-1) == "Bearish")
  343. {
  344. if(iHigh(Symbol(),PERIOD_CURRENT,j) > iOpen(Symbol(),PERIOD_CURRENT,j-1) && iLow(Symbol(),PERIOD_CURRENT,j) < iClose(Symbol(),PERIOD_CURRENT,j-1))
  345. {
  346. tp_date_time_sell = 0.0;
  347. tp_date_time_buy = 0.0;
  348. Print("Target line deleted due to in bar ");
  349. if(object_find("target line") > 0)
  350. {
  351. ObjectDelete(0,"target line");
  352. }
  353. if(object_find("target line1") > 0)
  354. {
  355. ObjectDelete(0,"target line1");
  356. }
  357. }
  358. }
  359. if(checkCandle(j) == "Bullish" && checkCandle(j-1) == "Bullish")
  360. {
  361. if(iHigh(Symbol(),PERIOD_CURRENT,j) > iOpen(Symbol(),PERIOD_CURRENT,j-1) && iLow(Symbol(),PERIOD_CURRENT,j) < iClose(Symbol(),PERIOD_CURRENT,j-1))
  362. {
  363. tp_date_time_sell = 0.0;
  364. tp_date_time_buy = 0.0;
  365. Print("Target line deleted due to in bar ");
  366. if(object_find("target line") > 0)
  367. {
  368. ObjectDelete(0,"target line");
  369. }
  370. if(object_find("target line1") > 0)
  371. {
  372. ObjectDelete(0,"target line1");
  373. }
  374. }
  375. }
  376. }
  377. }
  378. //+------------------------------------------------------------------+
  379. //| |
  380. //+------------------------------------------------------------------+
  381. void Entry_Action_1_up(int Store_bos_last_index, int i,int diff)
  382. {
  383. ind = Store_bos_last_index +1; // reversal candle index
  384. reversal_bar_time = iTime(Symbol(),PERIOD_CURRENT,ind);
  385. bool addtional_condition = true;
  386. for(int j=Store_bos_last_index-1; j>i+2; j--)
  387. {
  388. if(checkCandle(j) == "Bearish" && checkCandle(j-1) == "Bearish")
  389. {
  390. if(iHigh(Symbol(),PERIOD_CURRENT,j) > iOpen(Symbol(),PERIOD_CURRENT,j-1) && iLow(Symbol(),PERIOD_CURRENT,j) < iClose(Symbol(),PERIOD_CURRENT,j-1))
  391. {
  392. tp_date_time_sell = 0.0;
  393. Print("Target line deleted due to in bar ");
  394. if(object_find("target line") > 0)
  395. {
  396. ObjectDelete(0,"target line");
  397. }
  398. if(object_find("target line1") > 0)
  399. {
  400. ObjectDelete(0,"target line1");
  401. }
  402. addtional_condition = false;
  403. }
  404. }
  405. if(checkCandle(j) == "Bullish" && checkCandle(j-1) == "Bullish")
  406. {
  407. if(iHigh(Symbol(),PERIOD_CURRENT,j) > iOpen(Symbol(),PERIOD_CURRENT,j-1) && iLow(Symbol(),PERIOD_CURRENT,j) < iClose(Symbol(),PERIOD_CURRENT,j-1))
  408. {
  409. tp_date_time_sell = 0.0;
  410. Print("Target line deleted due to in bar ");
  411. if(object_find("target line") > 0)
  412. {
  413. ObjectDelete(0,"target line");
  414. }
  415. if(object_find("target line1") > 0)
  416. {
  417. ObjectDelete(0,"target line1");
  418. }
  419. addtional_condition = false;
  420. }
  421. }
  422. }
  423. // Print("condition satisfied in uptrend sell trade : ",check_values_less_than_choch_low(ind,i));
  424. if(check_values_less_than_choch_low(ind,i) == true && addtional_condition == true)
  425. {
  426. if(iOpen(Symbol(),PERIOD_CURRENT,ind) < iOpen(Symbol(),PERIOD_CURRENT,i) && iClose(Symbol(),PERIOD_CURRENT,ind) > iClose(Symbol(),PERIOD_CURRENT,i))
  427. {
  428. signal = "sell";
  429. time_of_candle = iTime(Symbol(),PERIOD_CURRENT,i);
  430. // Print("Place sell order -----------------------------------------------------------------------: ");
  431. }
  432. }
  433. 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));
  434. 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));
  435. ObjectSetInteger(0,"line10"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJPROP_COLOR,clrBlue);
  436. ObjectSetInteger(0,"line11"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJPROP_COLOR,clrBlue);
  437. 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));
  438. 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));
  439. ObjectSetInteger(0,"line12"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJPROP_STYLE,STYLE_DOT);
  440. ObjectSetInteger(0,"line13"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJPROP_STYLE,STYLE_DOT);
  441. }
  442. //+------------------------------------------------------------------+
  443. //| |
  444. //+------------------------------------------------------------------+
  445. void Entry_Action_2_up(int Store_bos_last_index, int i,int diff)
  446. {
  447. ind = Store_bos_last_index +1; // reversal candle index
  448. reversal_bar_time = iTime(Symbol(),PERIOD_CURRENT,ind);
  449. bool addtional_condition = true;
  450. for(int j=Store_bos_last_index-1; j>i+2; j--)
  451. {
  452. if(checkCandle(j) == "Bearish" && checkCandle(j-1) == "Bearish")
  453. {
  454. if(iHigh(Symbol(),PERIOD_CURRENT,j) > iOpen(Symbol(),PERIOD_CURRENT,j-1) && iLow(Symbol(),PERIOD_CURRENT,j) < iClose(Symbol(),PERIOD_CURRENT,j-1))
  455. {
  456. tp_date_time_sell = 0.0;
  457. Print("Target line deleted due to in bar ");
  458. if(object_find("target line") > 0)
  459. {
  460. ObjectDelete(0,"target line");
  461. }
  462. if(object_find("target line1") > 0)
  463. {
  464. ObjectDelete(0,"target line1");
  465. }
  466. addtional_condition = false;
  467. }
  468. }
  469. if(checkCandle(j) == "Bullish" && checkCandle(j-1) == "Bullish")
  470. {
  471. if(iHigh(Symbol(),PERIOD_CURRENT,j) > iOpen(Symbol(),PERIOD_CURRENT,j-1) && iLow(Symbol(),PERIOD_CURRENT,j) < iClose(Symbol(),PERIOD_CURRENT,j-1))
  472. {
  473. tp_date_time_sell = 0.0;
  474. Print("Target line deleted due to in bar ");
  475. if(object_find("target line") > 0)
  476. {
  477. ObjectDelete(0,"target line");
  478. }
  479. if(object_find("target line1") > 0)
  480. {
  481. ObjectDelete(0,"target line1");
  482. }
  483. addtional_condition = false;
  484. }
  485. }
  486. }
  487. if(addtional_condition == true)
  488. {
  489. signal = "sell";
  490. time_of_candle = iTime(Symbol(),PERIOD_CURRENT,i);
  491. }
  492. 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));
  493. 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));
  494. ObjectSetInteger(0,"line10"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJPROP_COLOR,clrBlue);
  495. ObjectSetInteger(0,"line11"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJPROP_COLOR,clrBlue);
  496. 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));
  497. 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));
  498. ObjectSetInteger(0,"line12"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJPROP_STYLE,STYLE_DOT);
  499. ObjectSetInteger(0,"line13"+iTime(Symbol(),PERIOD_CURRENT,ind),OBJPROP_STYLE,STYLE_DOT);
  500. }
  501. //+------------------------------------------------------------------+
  502. //| |
  503. //+------------------------------------------------------------------+
  504. bool check_values_less_than_choch_high(int ind,int i) // downtrend
  505. {
  506. for(int k=ind; k>i; k--)
  507. {
  508. if(iHigh(Symbol(),PERIOD_CURRENT,k) > iClose(Symbol(),PERIOD_CURRENT,i))
  509. {
  510. return false;
  511. }
  512. }
  513. return true;
  514. }
  515. //+------------------------------------------------------------------+
  516. //| |
  517. //+------------------------------------------------------------------+
  518. bool check_values_less_than_choch_high1(int ind,int i) // downtrend
  519. {
  520. for(int k=ind; k>i; k--)
  521. {
  522. if(iHigh(Symbol(),PERIOD_CURRENT,k) > iClose(Symbol(),PERIOD_CURRENT,i))
  523. {
  524. return false;
  525. }
  526. }
  527. return true;
  528. }
  529. //+------------------------------------------------------------------+
  530. //| |
  531. //+------------------------------------------------------------------+
  532. bool check_values_less_than_choch_low(int ind,int i) // uptrend
  533. {
  534. for(int k=ind; k>i; k--)
  535. {
  536. if(iLow(Symbol(),PERIOD_CURRENT,k) < iClose(Symbol(),PERIOD_CURRENT,i))
  537. {
  538. return false;
  539. }
  540. }
  541. return true;
  542. }
  543. //+------------------------------------------------------------------+
  544. //| |
  545. //+------------------------------------------------------------------+
  546. bool check_values_less_than_choch_low1(int ind,int i) // uptrend
  547. {
  548. for(int k=ind; k>i; k--)
  549. {
  550. if(iLow(Symbol(),PERIOD_CURRENT,k) < iClose(Symbol(),PERIOD_CURRENT,i))
  551. {
  552. return false;
  553. }
  554. }
  555. return true;
  556. }
  557. //+------------------------------------------------------------------+
  558. //| |
  559. //+------------------------------------------------------------------+
  560. void choch(int i)
  561. {
  562. HIGH = 0.0;
  563. LOW = 0.0;
  564. if(trend == "uptrend")
  565. {
  566. double close = iClose(Symbol(),PERIOD_CURRENT,i);
  567. if(close < low)
  568. {
  569. remove_value_from_structure();
  570. choch_at_index = true;
  571. ObjectCreate(0,"line3"+iTime(Symbol(),PERIOD_CURRENT,i),OBJ_TEXT,0,iTime(Symbol(),PERIOD_CURRENT,i),iLow(Symbol(),PERIOD_CURRENT,i));
  572. ObjectSetString(0,"line3"+iTime(Symbol(),PERIOD_CURRENT,i), OBJPROP_TEXT,"choch");
  573. ObjectCreate(0,"line8"+iTime(Symbol(),PERIOD_CURRENT,i),OBJ_ARROW_DOWN,0,iTime(Symbol(),PERIOD_CURRENT,i),iHigh(Symbol(),PERIOD_CURRENT,i)+100*Point());
  574. ObjectSetInteger(0,"line8"+iTime(Symbol(),PERIOD_CURRENT,i),OBJPROP_COLOR,clrRed);
  575. Store_bos_last_index = iBarShift(Symbol(), PERIOD_CURRENT, store_last_bos_index_time, false);
  576. int diff1 = Store_bos_last_index - (i);
  577. // condition on 1st candle
  578. Entry_Action_1_up(Store_bos_last_index,i,diff1);
  579. low = iLow(Symbol(),PERIOD_CURRENT,i);
  580. low_index_time = iTime(Symbol(),PERIOD_CURRENT,i);
  581. low_index = iBarShift(Symbol(), PERIOD_CURRENT, low_index_time, false);
  582. low_index = i;
  583. if(object_find("low") > 0)
  584. {
  585. ObjectDelete(0,"low");
  586. }
  587. ObjectCreate(0,"low",OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,i),low,iTime(Symbol(),PERIOD_CURRENT,0),low);
  588. ObjectSetInteger(0,"low",OBJPROP_RAY_RIGHT,true);
  589. ObjectSetInteger(0,"low",OBJPROP_COLOR,clrRed);
  590. trend = "downtrend";
  591. // choch_index_time = iTime(Symbol(),PERIOD_CURRENT,i);
  592. // -----------------------------------------------------------------------------------------------------------------------------------------------------------
  593. int chock_index = iBarShift(Symbol(), PERIOD_CURRENT, choch_index_time, false);
  594. chock_index++;
  595. datetime lastChochTimeUp = iTime(Symbol(),PERIOD_CURRENT,chock_index);
  596. HIGH = iHigh(Symbol(),PERIOD_CURRENT,chock_index); // save high and low of the chock prev index to compare
  597. LOW = iLow(Symbol(),PERIOD_CURRENT,chock_index);
  598. if(object_find("target line") > 0)
  599. {
  600. ObjectDelete(0,"target line");
  601. }
  602. 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)));
  603. {
  604. //Print("object created from uptrend to downtrend ");
  605. }
  606. ObjectSetInteger(0,"target line",OBJPROP_RAY_RIGHT,true);
  607. ObjectSetInteger(0,"target line",OBJPROP_COLOR,clrGreen);
  608. if(object_find("target line1") > 0)
  609. {
  610. ObjectDelete(0,"target line1");
  611. }
  612. 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));
  613. ObjectSetInteger(0,"target line1",OBJPROP_RAY_RIGHT,true);
  614. ObjectSetInteger(0,"target line1",OBJPROP_COLOR,clrGreen);
  615. choch_index_time = iTime(Symbol(),PERIOD_CURRENT,i);
  616. int chock_index1 = iBarShift(Symbol(), PERIOD_CURRENT, choch_index_time, false);
  617. bool condition_not_match = false;
  618. for(int p=chock_index - 2 ; p > chock_index1; p--)
  619. {
  620. if(iLow(Symbol(),PERIOD_CURRENT,p) < HIGH)
  621. {
  622. condition_not_match = true;
  623. }
  624. }
  625. if(condition_not_match == true)
  626. {
  627. HIGH = 0.0;
  628. LOW = 0.0;
  629. tp_date_time_sell = 0.0;
  630. Print("Target line deleted in choch");
  631. condition_not_match = false;
  632. if(object_find("target line") > 0)
  633. {
  634. ObjectDelete(0,"target line");
  635. }
  636. if(object_find("target line1") > 0)
  637. {
  638. ObjectDelete(0,"target line1");
  639. }
  640. }
  641. else
  642. {
  643. tp_date_time_sell = lastChochTimeUp;
  644. }
  645. //-------------------------------------------------------------------------------------------------------------------------------------------------------------------
  646. if(signal == "sell")
  647. {
  648. time_to_place_trade = 0.0;
  649. int current_time_frame = Period();
  650. string current_time_frame_string;
  651. store_value_in_structure(choch_index_time,reversal_bar_time,signal,time_of_candle,time_to_place_trade,1);
  652. }
  653. signal = "";
  654. // condition on 2st candle
  655. Entry_Action_2_up(Store_bos_last_index,i,diff1);
  656. low = iLow(Symbol(),PERIOD_CURRENT,i);
  657. low_index_time = iTime(Symbol(),PERIOD_CURRENT,i);
  658. low_index = iBarShift(Symbol(), PERIOD_CURRENT, low_index_time, false);
  659. low_index = i;
  660. if(object_find("low") > 0)
  661. {
  662. ObjectDelete(0,"low");
  663. }
  664. ObjectCreate(0,"low",OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,i),low,iTime(Symbol(),PERIOD_CURRENT,0),low);
  665. ObjectSetInteger(0,"low",OBJPROP_RAY_RIGHT,true);
  666. ObjectSetInteger(0,"low",OBJPROP_COLOR,clrRed);
  667. trend = "downtrend";
  668. if(signal == "sell")
  669. {
  670. time_to_place_trade = 0.0;
  671. int current_time_frame = Period();
  672. string current_time_frame_string;
  673. store_value_in_structure(choch_index_time,reversal_bar_time,signal,time_of_candle,time_to_place_trade,2);
  674. }
  675. signal = "";
  676. }
  677. }
  678. if(trend == "downtrend")
  679. {
  680. double close = iClose(Symbol(),PERIOD_CURRENT,i);
  681. if(close > high)
  682. {
  683. remove_value_from_structure();
  684. choch_at_index = true;
  685. ObjectCreate(0,"line4"+iTime(Symbol(),PERIOD_CURRENT,i),OBJ_TEXT,0,iTime(Symbol(),PERIOD_CURRENT,i),iHigh(Symbol(),PERIOD_CURRENT,i)+60*Point());
  686. ObjectSetString(0,"line4"+iTime(Symbol(),PERIOD_CURRENT,i), OBJPROP_TEXT,"choch");
  687. ObjectCreate(0,"line7"+iTime(Symbol(),PERIOD_CURRENT,i),OBJ_ARROW_UP,0,iTime(Symbol(),PERIOD_CURRENT,i),iLow(Symbol(),PERIOD_CURRENT,i)-100*Point());
  688. ObjectSetInteger(0,"line7"+iTime(Symbol(),PERIOD_CURRENT,i),OBJPROP_COLOR,clrGreen);
  689. Store_bos_last_index = iBarShift(Symbol(), PERIOD_CURRENT, store_last_bos_index_time, false);
  690. int diff = Store_bos_last_index - (i);
  691. Entry_Action_1_down(Store_bos_last_index,i,diff);
  692. high = iHigh(Symbol(),PERIOD_CURRENT,i);
  693. high_index_time = iTime(Symbol(),PERIOD_CURRENT,i);
  694. high_index = iBarShift(Symbol(), PERIOD_CURRENT, high_index_time, false);
  695. high_index = i;
  696. if(object_find("high") > 0)
  697. {
  698. ObjectDelete(0,"high");
  699. }
  700. ObjectCreate(0,"high",OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,i),high,iTime(Symbol(),PERIOD_CURRENT,0),high);
  701. ObjectSetInteger(0,"high",OBJPROP_RAY_RIGHT,true);
  702. ObjectSetInteger(0,"high",OBJPROP_COLOR,clrBlue);
  703. trend = "uptrend";
  704. // choch_index_time = iTime(Symbol(),PERIOD_CURRENT,i);
  705. //--------------------------------------------------------------------------------------------------------------------------------------------------------------------
  706. int chock_index = iBarShift(Symbol(), PERIOD_CURRENT, choch_index_time, false);
  707. chock_index++;
  708. datetime t = iTime(Symbol(),PERIOD_CURRENT,chock_index);
  709. HIGH = iHigh(Symbol(),PERIOD_CURRENT,chock_index); // save high and low of the chock prev index to compare
  710. LOW = iLow(Symbol(),PERIOD_CURRENT,chock_index);
  711. if(object_find("target line") > 0)
  712. {
  713. ObjectDelete(0,"target line");
  714. }
  715. 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)));
  716. {
  717. //Print("object created from downtrend to uptrend ");
  718. }
  719. ObjectSetInteger(0,"target line",OBJPROP_RAY_RIGHT,true);
  720. ObjectSetInteger(0,"target line",OBJPROP_COLOR,clrGreen);
  721. if(object_find("target line1") > 0)
  722. {
  723. ObjectDelete(0,"target line1");
  724. }
  725. 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));
  726. ObjectSetInteger(0,"target line1",OBJPROP_RAY_RIGHT,true);
  727. ObjectSetInteger(0,"target line1",OBJPROP_COLOR,clrGreen);
  728. choch_index_time = iTime(Symbol(),PERIOD_CURRENT,i);
  729. int chock_index1 = iBarShift(Symbol(), PERIOD_CURRENT, choch_index_time, false);
  730. bool condition_not_match = false;
  731. for(int p=chock_index - 2 ; p > chock_index1; p--)
  732. {
  733. if(iHigh(Symbol(),PERIOD_CURRENT,p) > LOW)
  734. {
  735. condition_not_match = true;
  736. }
  737. }
  738. if(condition_not_match == true)
  739. {
  740. Print("line target deleted :");
  741. HIGH = 0.0;
  742. LOW = 0.0;
  743. tp_date_time_buy = 0.0;
  744. condition_not_match = false;
  745. if(object_find("target line") > 0)
  746. {
  747. ObjectDelete(0,"target line");
  748. }
  749. if(object_find("target line1") > 0)
  750. {
  751. ObjectDelete(0,"target line1");
  752. }
  753. }
  754. else
  755. {
  756. tp_date_time_buy = t;
  757. }
  758. if(signal == "buy")
  759. {
  760. time_to_place_trade = 0.0;
  761. int current_time_frame = Period();
  762. string current_time_frame_string;
  763. store_value_in_structure(choch_index_time,reversal_bar_time,signal,time_of_candle,time_to_place_trade,1);
  764. }
  765. signal = "";
  766. Entry_Action_2_down(Store_bos_last_index,i,diff);
  767. high = iHigh(Symbol(),PERIOD_CURRENT,i);
  768. high_index_time = iTime(Symbol(),PERIOD_CURRENT,i);
  769. high_index = iBarShift(Symbol(), PERIOD_CURRENT, high_index_time, false);
  770. high_index = i;
  771. if(object_find("high") > 0)
  772. {
  773. ObjectDelete(0,"high");
  774. }
  775. ObjectCreate(0,"high",OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,i),high,iTime(Symbol(),PERIOD_CURRENT,0),high);
  776. ObjectSetInteger(0,"high",OBJPROP_RAY_RIGHT,true);
  777. ObjectSetInteger(0,"high",OBJPROP_COLOR,clrBlue);
  778. trend = "uptrend";
  779. if(signal == "buy")
  780. {
  781. time_to_place_trade = 0.0;
  782. int current_time_frame = Period();
  783. string current_time_frame_string;
  784. store_value_in_structure(choch_index_time,reversal_bar_time,signal,time_of_candle,time_to_place_trade,2);
  785. }
  786. signal = "";
  787. }
  788. }
  789. }
  790. //+------------------------------------------------------------------+
  791. //| |
  792. //+------------------------------------------------------------------+
  793. void bos2(int i)
  794. {
  795. bool cnd;
  796. bool candle_bullish = false;
  797. bool candle_bearish = false;
  798. double find_high = 0.0;
  799. datetime find_high_time = 0.0;
  800. int save_bullish_index = 0;
  801. int save_bearish_index = 0;
  802. double find_low = 0.0;
  803. datetime find_low_time = 0.0;
  804. if(trend == "downtrend")
  805. {
  806. choch_index = iBarShift(Symbol(), PERIOD_CURRENT, choch_index_time, false);
  807. Store_bos_last_index = iBarShift(Symbol(), PERIOD_CURRENT, store_last_bos_index_time, false);
  808. if(i+1 == choch_index || i+1 == Store_bos_last_index || i == choch_index || i == Store_bos_last_index)
  809. {
  810. cnd = false;
  811. }
  812. else
  813. {
  814. cnd = true;
  815. }
  816. if(choch_index_time > store_last_bos_index_time)
  817. {
  818. for(int m=choch_index; m>i; m--)
  819. {
  820. if(checkCandle(m) == "Bullish")
  821. {
  822. save_bullish_index = m;
  823. candle_bullish = true;
  824. break;
  825. }
  826. }
  827. find_high = iHigh(Symbol(),PERIOD_CURRENT,save_bullish_index);
  828. for(int m=save_bullish_index; m>i; m--)
  829. {
  830. double find_high1 = iHigh(Symbol(),PERIOD_CURRENT,m);
  831. find_high_time = iTime(Symbol(),PERIOD_CURRENT,m);
  832. if(find_high < find_high1)
  833. {
  834. find_high = find_high1;
  835. find_high_time = iTime(Symbol(),PERIOD_CURRENT,m);
  836. }
  837. }
  838. for(int j=choch_index; j>=i; j--)
  839. {
  840. if(iClose(Symbol(),PERIOD_CURRENT,j) < iClose(Symbol(),PERIOD_CURRENT,i) || iLow(Symbol(),PERIOD_CURRENT,j) < iLow(Symbol(),PERIOD_CURRENT,i))
  841. {
  842. cnd = false;
  843. }
  844. }
  845. }
  846. if(choch_index_time < store_last_bos_index_time)
  847. {
  848. for(int m=Store_bos_last_index; m>i; m--)
  849. {
  850. if(checkCandle(m) == "Bullish")
  851. {
  852. save_bullish_index = m;
  853. candle_bullish = true;
  854. break;
  855. }
  856. }
  857. find_high = iHigh(Symbol(),PERIOD_CURRENT,save_bullish_index);
  858. for(int m=save_bullish_index; m>i; m--)
  859. {
  860. double find_high1 = iHigh(Symbol(),PERIOD_CURRENT,m);
  861. find_high_time = iTime(Symbol(),PERIOD_CURRENT,m);
  862. if(find_high < find_high1)
  863. {
  864. find_high = find_high1;
  865. find_high_time = iTime(Symbol(),PERIOD_CURRENT,m);
  866. }
  867. }
  868. for(int j=Store_bos_last_index; j>=i; j--)
  869. {
  870. if(iClose(Symbol(),PERIOD_CURRENT,j) < iClose(Symbol(),PERIOD_CURRENT,i) || iLow(Symbol(),PERIOD_CURRENT,j) < iLow(Symbol(),PERIOD_CURRENT,i))
  871. {
  872. cnd = false;
  873. }
  874. }
  875. }
  876. if(cnd == true && candle_bullish == true)
  877. {
  878. if(object_find("high") > 0)
  879. {
  880. ObjectDelete(0,"high");
  881. }
  882. high = find_high;
  883. index_of_high = iBarShift(Symbol(), PERIOD_CURRENT, find_high_time, false);
  884. ObjectCreate(0,"high",OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,index_of_high),high,iTime(Symbol(),PERIOD_CURRENT,0),high);
  885. ObjectSetInteger(0,"high",OBJPROP_RAY_RIGHT,true);
  886. ObjectSetInteger(0,"high",OBJPROP_COLOR,clrBlue);
  887. if(object_find("low") > 0)
  888. {
  889. ObjectDelete(0,"low");
  890. }
  891. low = iLow(Symbol(),PERIOD_CURRENT,i);
  892. ObjectCreate(0,"low",OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,i),low,iTime(Symbol(),PERIOD_CURRENT,0),low);
  893. ObjectSetInteger(0,"low",OBJPROP_RAY_RIGHT,true);
  894. ObjectSetInteger(0,"low",OBJPROP_COLOR,clrRed);
  895. ObjectCreate(0,"line2"+iTime(Symbol(),PERIOD_CURRENT,i),OBJ_TEXT,0,iTime(Symbol(),PERIOD_CURRENT,i),low);
  896. ObjectSetString(0,"line2"+iTime(Symbol(),PERIOD_CURRENT,i), OBJPROP_TEXT,"bos");
  897. store_last_bos_index_time = iTime(Symbol(),PERIOD_CURRENT,i);
  898. Store_bos_last_index = iBarShift(Symbol(), PERIOD_CURRENT, store_last_bos_index_time, false);
  899. low_index_time = iTime(Symbol(),PERIOD_CURRENT,i);
  900. low_index = iBarShift(Symbol(), PERIOD_CURRENT, low_index_time, false);
  901. cnd = false;
  902. candle_bullish = false;
  903. }
  904. }
  905. //-------
  906. if(trend == "uptrend")
  907. {
  908. choch_index = iBarShift(Symbol(), PERIOD_CURRENT, choch_index_time, false);
  909. Store_bos_last_index = iBarShift(Symbol(), PERIOD_CURRENT, store_last_bos_index_time, false);
  910. if(i+1 == choch_index || i+1 == Store_bos_last_index || i == choch_index || i == Store_bos_last_index)
  911. {
  912. cnd = false;
  913. }
  914. else
  915. {
  916. cnd = true;
  917. }
  918. if(choch_index_time < store_last_bos_index_time)
  919. {
  920. for(int m=Store_bos_last_index; m>i; m--)
  921. {
  922. if(checkCandle(m) == "Bearish")
  923. {
  924. candle_bearish = true;
  925. save_bearish_index = m;
  926. break;
  927. }
  928. }
  929. find_low = iLow(Symbol(),PERIOD_CURRENT,save_bearish_index);
  930. for(int m=save_bearish_index; m>i; m--)
  931. {
  932. double find_low1 = iLow(Symbol(),PERIOD_CURRENT,m);
  933. find_low_time = iTime(Symbol(),PERIOD_CURRENT,m);
  934. if(find_low > find_low1)
  935. {
  936. find_low = find_low1;
  937. find_low_time = iTime(Symbol(),PERIOD_CURRENT,m);
  938. }
  939. }
  940. for(int j=Store_bos_last_index; j>=i; j--)
  941. {
  942. if(iClose(Symbol(),PERIOD_CURRENT,j) > iClose(Symbol(),PERIOD_CURRENT,i) || iHigh(Symbol(),PERIOD_CURRENT,j) > iHigh(Symbol(),PERIOD_CURRENT,i))
  943. {
  944. cnd = false;
  945. }
  946. }
  947. }
  948. if(choch_index_time > store_last_bos_index_time)
  949. {
  950. for(int m=choch_index; m>i; m--)
  951. {
  952. if(checkCandle(m) == "Bearish")
  953. {
  954. candle_bearish = true;
  955. save_bearish_index = m;
  956. break;
  957. }
  958. }
  959. find_low = iLow(Symbol(),PERIOD_CURRENT,save_bearish_index);
  960. for(int m=save_bearish_index; m>i; m--)
  961. {
  962. double find_low1 = iLow(Symbol(),PERIOD_CURRENT,m);
  963. find_low_time = iTime(Symbol(),PERIOD_CURRENT,m);
  964. // find_low = find_low1; // here is the addition
  965. if(find_low > find_low1)
  966. {
  967. find_low = find_low1;
  968. find_low_time = iTime(Symbol(),PERIOD_CURRENT,m);
  969. }
  970. }
  971. for(int j=choch_index; j>=i; j--)
  972. {
  973. if(iClose(Symbol(),PERIOD_CURRENT,j) > iClose(Symbol(),PERIOD_CURRENT,i) || iHigh(Symbol(),PERIOD_CURRENT,j) > iHigh(Symbol(),PERIOD_CURRENT,i))
  974. {
  975. cnd = false;
  976. }
  977. }
  978. }
  979. if(cnd == true && candle_bearish == true)
  980. {
  981. if(object_find("low") > 0)
  982. {
  983. ObjectDelete(0,"low");
  984. }
  985. low = find_low;
  986. index_of_low = iBarShift(Symbol(), PERIOD_CURRENT, find_low_time, false);
  987. ObjectCreate(0,"low",OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,index_of_low),low,iTime(Symbol(),PERIOD_CURRENT,0),low);
  988. ObjectSetInteger(0,"low",OBJPROP_RAY_RIGHT,true);
  989. ObjectSetInteger(0,"low",OBJPROP_COLOR,clrRed);
  990. if(object_find("high") > 0)
  991. {
  992. ObjectDelete(0,"high");
  993. }
  994. high = iHigh(Symbol(),PERIOD_CURRENT,i);
  995. ObjectCreate(0,"high",OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,i),high,iTime(Symbol(),PERIOD_CURRENT,0),high);
  996. ObjectSetInteger(0,"high",OBJPROP_RAY_RIGHT,true);
  997. ObjectSetInteger(0,"high",OBJPROP_COLOR,clrBlue);
  998. ObjectCreate(0,"line1"+iTime(Symbol(),PERIOD_CURRENT,i),OBJ_TEXT,0,iTime(Symbol(),PERIOD_CURRENT,i),high+40*Point());
  999. ObjectSetString(0,"line1"+iTime(Symbol(),PERIOD_CURRENT,i), OBJPROP_TEXT,"bos");
  1000. store_last_bos_index_time = iTime(Symbol(),PERIOD_CURRENT,i);
  1001. Store_bos_last_index = iBarShift(Symbol(), PERIOD_CURRENT, store_last_bos_index_time, false);
  1002. high_index_time = iTime(Symbol(),PERIOD_CURRENT,i);
  1003. high_index = iBarShift(Symbol(), PERIOD_CURRENT, high_index_time, false);
  1004. cnd = false;
  1005. candle_bearish = false;
  1006. }
  1007. }
  1008. }
  1009. //+------------------------------------------------------------------+
  1010. //| |
  1011. //+------------------------------------------------------------------+
  1012. void third_Condition(int i)
  1013. {
  1014. if(trend == "uptrend")
  1015. {
  1016. low2 = iLow(Symbol(),PERIOD_CURRENT,i);
  1017. high2 = iHigh(Symbol(),PERIOD_CURRENT,i);
  1018. if(low2 < low)
  1019. {
  1020. //ObjectCreate(0,"line5"+iTime(Symbol(),PERIOD_CURRENT,i),OBJ_TEXT,0,iTime(Symbol(),PERIOD_CURRENT,i),iLow(Symbol(),PERIOD_CURRENT,i));
  1021. // ObjectSetString(0,"line5"+iTime(Symbol(),PERIOD_CURRENT,i), OBJPROP_TEXT,"3_C");
  1022. low = low2;
  1023. low_index_time = iTime(Symbol(),PERIOD_CURRENT,i);
  1024. low_index = iBarShift(Symbol(), PERIOD_CURRENT, low_index_time, false);
  1025. low_index = i; // addtion to be minus
  1026. if(object_find("low") > 0)
  1027. {
  1028. ObjectDelete(0,"low");
  1029. }
  1030. ObjectCreate(0,"low",OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,i),low,iTime(Symbol(),PERIOD_CURRENT,0),low);
  1031. ObjectSetInteger(0,"low",OBJPROP_RAY_RIGHT,true);
  1032. ObjectSetInteger(0,"low",OBJPROP_COLOR,clrRed);
  1033. }
  1034. if(high2 > high)
  1035. {
  1036. // ObjectCreate(0,"line51"+iTime(Symbol(),PERIOD_CURRENT,i),OBJ_TEXT,0,iTime(Symbol(),PERIOD_CURRENT,i),iHigh(Symbol(),PERIOD_CURRENT,i));
  1037. // ObjectSetString(0,"line51"+iTime(Symbol(),PERIOD_CURRENT,i), OBJPROP_TEXT,"3_C");
  1038. high = high2;
  1039. high_index_time = iTime(Symbol(),PERIOD_CURRENT,i);
  1040. high_index = iBarShift(Symbol(), PERIOD_CURRENT, low_index_time, false);
  1041. high_index = i; // addtion to be minus
  1042. if(object_find("high") > 0)
  1043. {
  1044. ObjectDelete(0,"high");
  1045. }
  1046. ObjectCreate(0,"high",OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,i),high,iTime(Symbol(),PERIOD_CURRENT,0),high);
  1047. ObjectSetInteger(0,"high",OBJPROP_RAY_RIGHT,true);
  1048. ObjectSetInteger(0,"high",OBJPROP_COLOR,clrBlue);
  1049. }
  1050. }
  1051. if(trend == "downtrend")
  1052. {
  1053. high2 = iHigh(Symbol(),PERIOD_CURRENT,i);
  1054. low2 = iLow(Symbol(),PERIOD_CURRENT,i);
  1055. if(high2 > high)
  1056. {
  1057. // ObjectCreate(0,"line6"+iTime(Symbol(),PERIOD_CURRENT,i),OBJ_TEXT,0,iTime(Symbol(),PERIOD_CURRENT,i),iHigh(Symbol(),PERIOD_CURRENT,i));
  1058. // ObjectSetString(0,"line6"+iTime(Symbol(),PERIOD_CURRENT,i), OBJPROP_TEXT,"3_C");
  1059. high = high2;
  1060. high_index_time = iTime(Symbol(),PERIOD_CURRENT,i);
  1061. high_index = iBarShift(Symbol(), PERIOD_CURRENT, low_index_time, false);
  1062. high_index = i; // addtion to be minus
  1063. if(object_find("high") > 0)
  1064. {
  1065. ObjectDelete(0,"high");
  1066. }
  1067. ObjectCreate(0,"high",OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,i),high,iTime(Symbol(),PERIOD_CURRENT,0),high);
  1068. ObjectSetInteger(0,"high",OBJPROP_RAY_RIGHT,true);
  1069. ObjectSetInteger(0,"high",OBJPROP_COLOR,clrBlue);
  1070. }
  1071. if(low2 < low)
  1072. {
  1073. // ObjectCreate(0,"line61"+iTime(Symbol(),PERIOD_CURRENT,i),OBJ_TEXT,0,iTime(Symbol(),PERIOD_CURRENT,i),iLow(Symbol(),PERIOD_CURRENT,i));
  1074. // ObjectSetString(0,"line61"+iTime(Symbol(),PERIOD_CURRENT,i), OBJPROP_TEXT,"3_C");
  1075. low = low2;
  1076. low_index_time = iTime(Symbol(),PERIOD_CURRENT,i);
  1077. low_index = iBarShift(Symbol(), PERIOD_CURRENT, low_index_time, false);
  1078. low_index = i; // addtion to be minus
  1079. if(object_find("low") > 0)
  1080. {
  1081. ObjectDelete(0,"low");
  1082. }
  1083. ObjectCreate(0,"low",OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,i),low,iTime(Symbol(),PERIOD_CURRENT,0),low);
  1084. ObjectSetInteger(0,"low",OBJPROP_RAY_RIGHT,true);
  1085. ObjectSetInteger(0,"low",OBJPROP_COLOR,clrRed);
  1086. }
  1087. }
  1088. }
  1089. //+------------------------------------------------------------------+
  1090. //| |
  1091. //+------------------------------------------------------------------+
  1092. void store_value_in_structure(datetime chock_time,datetime ind,string signal,datetime time_of_candle,datetime time_to_place_trade, int entry)
  1093. {
  1094. for(int l=0; l<200; l++)
  1095. {
  1096. if(od_1[l].choch_index_date_time == 0)
  1097. {
  1098. od_1[l].choch_index_date_time = chock_time;
  1099. od_1[l].reversal_index_date_time = ind;
  1100. od_1[l].Signal = signal;
  1101. od_1[l].Time_OF_Candle = time_of_candle;
  1102. od_1[l].Time_of_candle_For_trade = time_to_place_trade;
  1103. od_1[l].EntryCon = entry;
  1104. Print("added value of chock in structure ---------------",od_1[l].choch_index_date_time);
  1105. break;
  1106. }
  1107. }
  1108. }
  1109. //+------------------------------------------------------------------+
  1110. //| |
  1111. //+------------------------------------------------------------------+
  1112. void remove_value_from_structure()
  1113. {
  1114. for(int l=0; l<200; l++)
  1115. {
  1116. if(od_1[l].choch_index_date_time != 0)
  1117. {
  1118. Print("chock value removed from structure and chock time is ---------- ",od_1[l].choch_index_date_time);
  1119. od_1[l].choch_index_date_time = 0;
  1120. od_1[l].reversal_index_date_time = 0;
  1121. od_1[l].Signal = "";
  1122. od_1[l].Time_OF_Candle = 0;
  1123. od_1[l].Time_of_candle_For_trade = 0;
  1124. }
  1125. }
  1126. }
  1127. //+------------------------------------------------------------------+
  1128. //| |
  1129. //+------------------------------------------------------------------+
  1130. void Entry_strategy(int value)
  1131. {
  1132. for(int i=value; i > 0; i--)
  1133. {
  1134. Bos(i);
  1135. bos2(i);
  1136. choch(i);
  1137. third_Condition(i);
  1138. }
  1139. }
  1140. //+------------------------------------------------------------------+
  1141. //| |
  1142. //+------------------------------------------------------------------+
  1143. void placeBuyTrade()
  1144. {
  1145. double sell_SL = 0,sell_Tp = 0, openPrice = 0,buySL = 0, buyTp = 0;
  1146. openPrice = SymbolInfoDouble(Symbol(),SYMBOL_ASK);
  1147. double Ask = SymbolInfoDouble(Symbol(),SYMBOL_ASK);
  1148. int ch = iBarShift(Symbol(), PERIOD_CURRENT,choch_index_time,false); // get high of chock index
  1149. buySL = iLow(Symbol(),PERIOD_CURRENT,ch) - stoploss *10 * Point();
  1150. int tp = iBarShift(Symbol(), PERIOD_CURRENT,tp_date_time_buy,false);
  1151. buyTp = iLow(Symbol(),PERIOD_CURRENT,tp);
  1152. double distance = (Ask - buySL)/Point();
  1153. if(trade.PositionOpen(Symbol(),ORDER_TYPE_BUY,getlot(distance),Ask,buySL,buyTp,"Buy Trade Placed"))
  1154. {
  1155. Print("Buy Trade Placed: ",trade.ResultOrder());
  1156. }
  1157. else
  1158. {
  1159. Print("Error in placing Buy: "+Symbol()+" ",GetLastError());
  1160. }
  1161. }
  1162. //+------------------------------------------------------------------+
  1163. //| |
  1164. //+------------------------------------------------------------------+
  1165. double getlot(double stop_loss)
  1166. {
  1167. Print("Tick Value: ",SymbolInfoDouble(Symbol(),SYMBOL_TRADE_TICK_VALUE));
  1168. Print("Tick Size: ",SymbolInfoDouble(Symbol(),SYMBOL_TRADE_TICK_SIZE));
  1169. double modeTickV=SymbolInfoDouble(Symbol(),SYMBOL_TRADE_TICK_VALUE),modeTickS=SymbolInfoDouble(Symbol(),SYMBOL_TRADE_TICK_SIZE);
  1170. double pipvalue = NormalizeDouble(((SymbolInfoDouble(Symbol(),SYMBOL_TRADE_TICK_VALUE)/(SymbolInfoDouble(Symbol(),SYMBOL_TRADE_TICK_SIZE)/Point()))*10),2);
  1171. pipvalue = pipvalue / 10;
  1172. double lotSize = lot_size;
  1173. if(lot_calculator==rsk) //calculating risk
  1174. {
  1175. double riskamount=(risk/100)*AccountInfoDouble(ACCOUNT_BALANCE);
  1176. double pipvalue_required=riskamount/stop_loss;
  1177. lotSize = pipvalue_required/pipvalue;
  1178. int roundDigit=0;
  1179. double step=SymbolInfoDouble(Symbol(),SYMBOL_VOLUME_STEP);
  1180. while(step<1)
  1181. {
  1182. roundDigit++;
  1183. step=step*10;
  1184. }
  1185. Print("Round Digits:",roundDigit);
  1186. lotSize = NormalizeDouble(lotSize,roundDigit);
  1187. //
  1188. }
  1189. Print("Lot Size: ",lotSize);
  1190. if(lotSize > SymbolInfoDouble(Symbol(),SYMBOL_VOLUME_MAX))
  1191. {
  1192. lotSize=SymbolInfoDouble(Symbol(),SYMBOL_VOLUME_MAX);
  1193. }
  1194. else
  1195. if(lotSize<SymbolInfoDouble(Symbol(),SYMBOL_VOLUME_MIN))
  1196. {
  1197. lotSize=SymbolInfoDouble(Symbol(),SYMBOL_VOLUME_MIN);
  1198. }
  1199. return lotSize;
  1200. }
  1201. //+------------------------------------------------------------------+
  1202. //| |
  1203. //+------------------------------------------------------------------+
  1204. void placeSellTrade()
  1205. {
  1206. double sell_SL = 0,sell_Tp = 0, openPrice = 0, buySL = 0, buyTp = 0;
  1207. openPrice = SymbolInfoDouble(Symbol(),SYMBOL_BID);
  1208. double Bid = SymbolInfoDouble(Symbol(),SYMBOL_BID);
  1209. int ch = iBarShift(Symbol(), PERIOD_CURRENT,choch_index_time,false); // get high of chock index
  1210. sell_SL = iHigh(Symbol(),PERIOD_CURRENT,ch) + stoploss *10 * Point();
  1211. int tp = iBarShift(Symbol(), PERIOD_CURRENT,tp_date_time_sell,false);
  1212. sell_Tp = iHigh(Symbol(),PERIOD_CURRENT,tp);
  1213. double distance = (sell_SL - Bid)/Point();
  1214. if(trade.PositionOpen(Symbol(),ORDER_TYPE_SELL,getlot(distance),Bid,sell_SL,sell_Tp,"Sell Trade Placed"))
  1215. {
  1216. Print("Sell Trade PLaced: ",trade.ResultOrder());
  1217. }
  1218. else
  1219. {
  1220. Print("Error in placing Sell: "+Symbol()+" ",GetLastError());
  1221. }
  1222. }
  1223. //+------------------------------------------------------------------+
  1224. //| |
  1225. //+------------------------------------------------------------------+
  1226. int OnInit()
  1227. {
  1228. trade.SetExpertMagicNumber(magic_no);
  1229. trade.SetDeviationInPoints(10);
  1230. trade.SetTypeFilling(ORDER_FILLING_IOC);
  1231. trade.LogLevel(LOG_LEVEL_ALL);
  1232. trade.SetAsyncMode(false);
  1233. int idx = 0;
  1234. int user_input_index = iBarShift(Symbol(), PERIOD_CURRENT,inpTime, false);
  1235. if(ObjectCreate(0,"line",OBJ_VLINE,0,inpTime,iLow(Symbol(),PERIOD_CURRENT,user_input_index)))
  1236. {
  1237. Print("vertical line created on chart : ");
  1238. }
  1239. else
  1240. {
  1241. Print("error in creating line : ");
  1242. }
  1243. //int user_input_index = iBarShift(Symbol(), PERIOD_CURRENT, D'2021.09.01 15:30:27', false);
  1244. //if(ObjectCreate(0,"line",OBJ_VLINE,0,D'2021.09.01 15:30:27',iLow(Symbol(),PERIOD_CURRENT,user_input_index)))
  1245. // {
  1246. // Print("object created on chart : ");
  1247. // }
  1248. //else
  1249. // {
  1250. // Print("object not created : ");
  1251. // }
  1252. object_find(object_name);
  1253. if(object_find(object_name) == true)
  1254. {
  1255. Print("object found");
  1256. if(checkCandle(user_input_index) == "Bullish")
  1257. {
  1258. trend = "uptrend";
  1259. high = iHigh(Symbol(),PERIOD_CURRENT,user_input_index);
  1260. high_index_time = iTime(Symbol(),PERIOD_CURRENT,user_input_index); // ambiguity
  1261. high_index = user_input_index;
  1262. for(int j=user_input_index; j < 1000; j++)
  1263. {
  1264. if(checkCandle(j) == "Bearish")
  1265. {
  1266. low = iLow(Symbol(),PERIOD_CURRENT,j);
  1267. idx = j;
  1268. break;
  1269. }
  1270. }
  1271. idx = iLowest(Symbol(),PERIOD_CURRENT,MODE_LOW,idx,user_input_index+1);
  1272. low = iLow(Symbol(),PERIOD_CURRENT,idx);
  1273. low_index_time = iTime(Symbol(),PERIOD_CURRENT,idx);
  1274. low_index = idx;
  1275. }
  1276. if(checkCandle(user_input_index) == "Bearish")
  1277. {
  1278. trend = "downtrend";
  1279. low = iLow(Symbol(),PERIOD_CURRENT,user_input_index);
  1280. low_index_time = iTime(Symbol(),PERIOD_CURRENT,user_input_index);
  1281. low_index = user_input_index;
  1282. for(int j=user_input_index; j < 1000; j++)
  1283. {
  1284. if(checkCandle(j) == "Bullish")
  1285. {
  1286. high = iHigh(Symbol(),PERIOD_CURRENT,j);
  1287. idx = j;
  1288. break;
  1289. }
  1290. }
  1291. for(int k=idx; k<user_input_index; k++)
  1292. {
  1293. double highh = iHigh(Symbol(),PERIOD_CURRENT,k);
  1294. if(highh > high)
  1295. {
  1296. high = highh;
  1297. high_index_time = iTime(Symbol(),PERIOD_CURRENT,k);
  1298. high_index = k;
  1299. }
  1300. }
  1301. }
  1302. 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));
  1303. ObjectSetInteger(0,"target line",OBJPROP_RAY_RIGHT,true);
  1304. ObjectSetInteger(0,"target line",OBJPROP_COLOR,clrGreen);
  1305. 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));
  1306. ObjectSetInteger(0,"target line1",OBJPROP_RAY_RIGHT,true);
  1307. ObjectSetInteger(0,"target line1",OBJPROP_COLOR,clrGreen);
  1308. ObjectCreate(0,"high",OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,user_input_index),high,iTime(Symbol(),PERIOD_CURRENT,0),high);
  1309. ObjectSetInteger(0,"high",OBJPROP_RAY_RIGHT,true);
  1310. ObjectSetInteger(0,"high",OBJPROP_COLOR,clrBlue);
  1311. ObjectCreate(0,"low",OBJ_TREND,0,iTime(Symbol(),PERIOD_CURRENT,user_input_index),low,iTime(Symbol(),PERIOD_CURRENT,0),low);
  1312. ObjectSetInteger(0,"low",OBJPROP_RAY_RIGHT,true);
  1313. ObjectSetInteger(0,"low",OBJPROP_COLOR,clrRed);
  1314. choch_index_time = iTime(Symbol(),PERIOD_CURRENT,user_input_index);
  1315. Entry_strategy(user_input_index);
  1316. }
  1317. else
  1318. {
  1319. Print("Object Not Found");
  1320. }
  1321. return(INIT_SUCCEEDED);
  1322. }
  1323. //+------------------------------------------------------------------+
  1324. //| |
  1325. //+------------------------------------------------------------------+
  1326. bool value_close_low(int chockIndex)
  1327. {
  1328. for(int i=chockIndex; i>1; i--)
  1329. {
  1330. if(iLow(Symbol(),PERIOD_CURRENT,i) < iClose(Symbol(),PERIOD_CURRENT,1))
  1331. {
  1332. return false;
  1333. }
  1334. }
  1335. return true;
  1336. }
  1337. //+------------------------------------------------------------------+
  1338. //| |
  1339. //+------------------------------------------------------------------+
  1340. bool value_close_high(int chockIndex)
  1341. {
  1342. for(int i=chockIndex; i>1; i--)
  1343. {
  1344. if(iHigh(Symbol(),PERIOD_CURRENT,i) > iClose(Symbol(),PERIOD_CURRENT,1))
  1345. {
  1346. return false;
  1347. }
  1348. }
  1349. return true;
  1350. }
  1351. //+------------------------------------------------------------------+
  1352. //| Expert deinitialization function |
  1353. //+------------------------------------------------------------------+
  1354. void OnDeinit(const int reason)
  1355. {
  1356. //---
  1357. }
  1358. //+------------------------------------------------------------------+
  1359. //| Expert tick function |
  1360. //+------------------------------------------------------------------+
  1361. void OnTick()
  1362. {
  1363. if(NewBar() == true)
  1364. {
  1365. Entry_strategy(1);
  1366. // for entry condition candel 1
  1367. for(int m=0; m < orderNum; m++)
  1368. {
  1369. if(od_1[m].choch_index_date_time != 0)
  1370. {
  1371. int indexOfTradePlace = iBarShift(Symbol(), PERIOD_CURRENT,od_1[m].Time_OF_Candle,false);
  1372. if(indexOfTradePlace == 2)
  1373. {
  1374. if(od_1[m].EntryCon == 1 && od_1[m].Signal == "buy")
  1375. {
  1376. int reversal_indexx = iBarShift(Symbol(), PERIOD_CURRENT,od_1[m].reversal_index_date_time,false);
  1377. int close_index = iBarShift(Symbol(), PERIOD_CURRENT,od_1[m].choch_index_date_time,false);
  1378. 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);
  1379. // bool snd_con = false;
  1380. //for(int i=close_index-1; i>=1; i--) // second condition of updation
  1381. // {
  1382. // if(iClose(Symbol(),PERIOD_CURRENT,i) < reversalMax)
  1383. // {
  1384. // remove_value_from_structure();
  1385. // }
  1386. // }
  1387. // if(iOpen(Symbol(),PERIOD_CURRENT,1) > iClose(Symbol(),PERIOD_CURRENT,close_index)) // first condition of updation
  1388. {
  1389. if(reversalMax > iLow(Symbol(),PERIOD_CURRENT,1)
  1390. && iClose(Symbol(),PERIOD_CURRENT,close_index) < iClose(Symbol(),PERIOD_CURRENT,1) && tp_date_time_buy != 0.0)
  1391. {
  1392. placeBuyTrade();
  1393. if(object_find("target line") > 0)
  1394. {
  1395. ObjectDelete(0,"target line");
  1396. }
  1397. if(object_find("target line1") > 0)
  1398. {
  1399. ObjectDelete(0,"target line1");
  1400. }
  1401. remove_value_from_structure();
  1402. od_1[m].choch_index_date_time = 0;
  1403. od_1[m].Signal == "";
  1404. od_1[m].reversal_index_date_time = 0;
  1405. od_1[m].choch_index_date_time = 0;
  1406. signal = "";
  1407. Print("buy trade placed in no delay entry condition -------------------------------------------------------------");
  1408. Print("time at which trade is placed : ",TimeCurrent());
  1409. }
  1410. }
  1411. }
  1412. if(od_1[m].EntryCon == 1 && od_1[m].Signal == "sell")
  1413. {
  1414. int reversal_indexx = iBarShift(Symbol(), PERIOD_CURRENT,od_1[m].reversal_index_date_time,false);
  1415. int close_index = iBarShift(Symbol(), PERIOD_CURRENT,od_1[m].choch_index_date_time,false);
  1416. 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);
  1417. // 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);
  1418. // bool snd_con = false;
  1419. //
  1420. //for(int i=close_index-1; i>=1; i--) // second condition of updation
  1421. // {
  1422. // if(iClose(Symbol(),PERIOD_CURRENT,i) > reversalMin)
  1423. // {
  1424. // remove_value_from_structure();
  1425. // //snd_con = true;
  1426. // }
  1427. // }
  1428. //
  1429. // if(iOpen(Symbol(),PERIOD_CURRENT,1) < iClose(Symbol(),PERIOD_CURRENT,close_index)) // first condition of updation
  1430. {
  1431. if(reversalMin < iHigh(Symbol(),PERIOD_CURRENT,1)
  1432. && iClose(Symbol(),PERIOD_CURRENT,close_index) > iClose(Symbol(),PERIOD_CURRENT,1) && tp_date_time_sell != 0.0)
  1433. {
  1434. placeSellTrade();
  1435. // tp_date_time_sell = 0.0;
  1436. if(object_find("target line") > 0)
  1437. {
  1438. ObjectDelete(0,"target line");
  1439. }
  1440. if(object_find("target line1") > 0)
  1441. {
  1442. ObjectDelete(0,"target line1");
  1443. }
  1444. remove_value_from_structure();
  1445. od_1[m].choch_index_date_time = 0;
  1446. od_1[m].Signal == "";
  1447. od_1[m].reversal_index_date_time = 0;
  1448. od_1[m].choch_index_date_time = 0;
  1449. signal = "";
  1450. Print("sell trade placed in no delay entry condition -------------------------------------------------------------");
  1451. Print("time at which trade is placed : ",TimeCurrent());
  1452. }
  1453. }
  1454. }
  1455. }
  1456. if(indexOfTradePlace > 2)
  1457. {
  1458. // second condition match
  1459. if(od_1[m].EntryCon == 2 && od_1[m].Signal == "buy")
  1460. {
  1461. if(trend == "uptrend")
  1462. {
  1463. double ib =iBarShift(Symbol(), PERIOD_CURRENT,tp_date_time_buy,false);
  1464. for(int p=ib-2; p >= 1; p--)
  1465. {
  1466. if(iHigh(Symbol(),PERIOD_CURRENT,p) > iLow(Symbol(),PERIOD_CURRENT,ib))
  1467. {
  1468. tp_date_time_buy = 0.0;
  1469. if(object_find("target line") > 0)
  1470. {
  1471. ObjectDelete(0,"target line");
  1472. }
  1473. if(object_find("target line1") > 0)
  1474. {
  1475. ObjectDelete(0,"target line1");
  1476. }
  1477. break;
  1478. }
  1479. }
  1480. }
  1481. int reversal_indexx = iBarShift(Symbol(), PERIOD_CURRENT,od_1[m].reversal_index_date_time,false);
  1482. int close_index = iBarShift(Symbol(), PERIOD_CURRENT,od_1[m].choch_index_date_time,false);
  1483. Check_Inside_bar(reversal_indexx);
  1484. bool snd_con = false;
  1485. 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);
  1486. for(int i=close_index-1; i>=1; i--) // second condition of updation
  1487. {
  1488. if(iClose(Symbol(),PERIOD_CURRENT,i) < reversalMax)
  1489. {
  1490. snd_con = true;
  1491. //remove_value_from_structure();
  1492. }
  1493. }
  1494. if(iOpen(Symbol(),PERIOD_CURRENT,1) > iClose(Symbol(),PERIOD_CURRENT,close_index) && snd_con == false) // first condition of updation
  1495. {
  1496. if(value_close_high(close_index) == true)
  1497. {
  1498. if(iClose(Symbol(),PERIOD_CURRENT,close_index) > iLow(Symbol(),PERIOD_CURRENT,1)
  1499. && iClose(Symbol(),PERIOD_CURRENT,close_index) < iClose(Symbol(),PERIOD_CURRENT,1) && tp_date_time_buy != 0.0)
  1500. {
  1501. placeBuyTrade();
  1502. if(object_find("target line") > 0)
  1503. {
  1504. ObjectDelete(0,"target line");
  1505. }
  1506. if(object_find("target line1") > 0)
  1507. {
  1508. ObjectDelete(0,"target line1");
  1509. }
  1510. remove_value_from_structure();
  1511. od_1[m].choch_index_date_time = 0;
  1512. od_1[m].Signal == "";
  1513. od_1[m].reversal_index_date_time = 0;
  1514. od_1[m].choch_index_date_time = 0;
  1515. signal = "";
  1516. Print("buy trade placed in Entry condition delay -------------------------------------------------------------");
  1517. Print("time at which trade is placed : ",TimeCurrent());
  1518. }
  1519. }
  1520. }
  1521. }
  1522. if(od_1[m].EntryCon == 2 && od_1[m].Signal == "sell")
  1523. {
  1524. // Print("hi ----- entry condition 2 trend lines in sell case downtrend "," tp_date_time_sell",tp_date_time_sell);
  1525. if(trend == "downtrend")
  1526. {
  1527. // Print("there ----- entry condition 2 trend lines in sell case downtrend "," tp_date_time_sell",tp_date_time_sell);
  1528. double ib =iBarShift(Symbol(), PERIOD_CURRENT,tp_date_time_sell,false);
  1529. for(int p=ib-2; p >= 1; p--)
  1530. {
  1531. if(iLow(Symbol(),PERIOD_CURRENT,p) < iHigh(Symbol(),PERIOD_CURRENT,ib))
  1532. {
  1533. tp_date_time_sell = 0.0;
  1534. if(object_find("target line") > 0)
  1535. {
  1536. ObjectDelete(0,"target line");
  1537. }
  1538. if(object_find("target line1") > 0)
  1539. {
  1540. ObjectDelete(0,"target line1");
  1541. }
  1542. break;
  1543. }
  1544. }
  1545. }
  1546. int reversal_indexx = iBarShift(Symbol(), PERIOD_CURRENT,od_1[m].reversal_index_date_time,false);
  1547. int close_index = iBarShift(Symbol(), PERIOD_CURRENT,od_1[m].choch_index_date_time,false);
  1548. Check_Inside_bar(reversal_indexx);
  1549. 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);
  1550. bool snd_con1 = false;
  1551. for(int i=close_index-1; i>=1; i--) // second condition of updation
  1552. {
  1553. if(iClose(Symbol(),PERIOD_CURRENT,i) > reversalMin)
  1554. {
  1555. snd_con1 = true;
  1556. // remove_value_from_structure();
  1557. }
  1558. }
  1559. if(iOpen(Symbol(),PERIOD_CURRENT,1) < iClose(Symbol(),PERIOD_CURRENT,close_index) && snd_con1 == false) // first condition of updation
  1560. {
  1561. if(value_close_low(close_index) == true)
  1562. {
  1563. if(iClose(Symbol(),PERIOD_CURRENT,close_index) < iHigh(Symbol(),PERIOD_CURRENT,1)
  1564. && iClose(Symbol(),PERIOD_CURRENT,close_index) > iClose(Symbol(),PERIOD_CURRENT,1) && tp_date_time_sell != 0.0)
  1565. {
  1566. placeSellTrade();
  1567. if(object_find("target line") > 0)
  1568. {
  1569. ObjectDelete(0,"target line");
  1570. }
  1571. if(object_find("target line1") > 0)
  1572. {
  1573. ObjectDelete(0,"target line1");
  1574. }
  1575. remove_value_from_structure();
  1576. od_1[m].choch_index_date_time = 0;
  1577. od_1[m].Signal == "";
  1578. od_1[m].reversal_index_date_time = 0;
  1579. od_1[m].choch_index_date_time = 0;
  1580. signal = "";
  1581. Print("sell trade placed in entry condition delay -------------------------------------------------------------");
  1582. Print("time at which trade is placed : ",TimeCurrent());
  1583. }
  1584. }
  1585. }
  1586. }
  1587. }
  1588. }
  1589. }
  1590. }
  1591. }
  1592. //+------------------------------------------------------------------+
  1593. //| |
  1594. //+------------------------------------------------------------------+
  1595. bool NewBar()
  1596. {
  1597. static datetime Last_bar ;
  1598. datetime Current_bar = iTime(Symbol(), PERIOD_CURRENT,0);
  1599. if(Current_bar != Last_bar)
  1600. {
  1601. Last_bar = Current_bar;
  1602. return (true);
  1603. }
  1604. else
  1605. {
  1606. return (false);
  1607. }
  1608. }
  1609. //+------------------------------------------------------------------+
  1610. //| |
  1611. //+------------------------------------------------------------------+
  1612. bool object_find(string obj) // to find object placed by user in the chart
  1613. {
  1614. if(ObjectFind(0,obj) >= 0)
  1615. {
  1616. return true;
  1617. }
  1618. return false;
  1619. }
  1620. //+------------------------------------------------------------------+
  1621. //| |
  1622. //+------------------------------------------------------------------+
  1623. string checkCandle(int v) // to check the candle is bullish or bearish
  1624. {
  1625. double close = iClose(Symbol(),PERIOD_CURRENT,v);
  1626. double open = iOpen(Symbol(),PERIOD_CURRENT,v);
  1627. if(close > open)
  1628. {
  1629. return "Bullish";
  1630. }
  1631. else
  1632. if(close < open)
  1633. {
  1634. return "Bearish";
  1635. }
  1636. return "empty";
  1637. }
  1638. //+------------------------------------------------------------------+
  1639. //+------------------------------------------------------------------+