/* Generated by EX4-TO-MQ4 decompiler V4.0.224.1 [] Website: http://purebeam.biz E-mail : purebeam@gmail.com */ #property copyright "BPS Auto Harmonic Patterns Copyright © 2009 ShreeKrishna shre51@hotmail.com" //#property link "http://www.4Africa.net/4meta/" #property indicator_chart_window #property indicator_buffers 8 #property indicator_color1 Red #property indicator_color2 Blue #property indicator_color3 Green #property indicator_color4 Yellow #property indicator_color5 Yellow #property indicator_color6 Black #property indicator_color7 Orange #property indicator_color8 DarkViolet #import "shell32.dll" int ShellExecuteA(int a0, int a1, string a2, string a3, string a4, int a5); #import "Tools4Meta.dll" double DataPass(int a0, int a1, int a2, double a3, double a4, double a5); #import string gs_76 = "BPS Auto Harmonic Patterns Version 1.7 06/07/2009 Copyright © 2009 ShreeKrishna shre51@hotmail.com , Thaiba , Nepal "; int gi_unused_84 = 300; int gi_88; extern bool Predict_Pattern = TRUE; extern bool Show_Fibo_Levels = FALSE; extern bool Show_Old_Pattern = TRUE; extern bool Show_Old_Pattern_Fibo = FALSE; bool gi_108 = TRUE; bool gi_112 = FALSE; extern bool Fill_Pattern = TRUE; extern int Histo = 30; int gi_124 = 1; double gd_128 = 161.0; double gd_136 = 127.0; int g_width_144 = 2; int g_fontsize_148 = 15; int g_fontsize_152 = 10; int gi_156 = 0; bool gi_160 = FALSE; int gi_unused_164 = 0; int gi_168 = 0; extern bool show_points = FALSE; int gi_unused_176 = 0; int gi_unused_180; int gi_184; int gi_188 = 2; int g_count_192; double g_ibuf_196[]; double g_ibuf_200[]; double g_ibuf_204[]; double g_ibuf_208[]; double g_ibuf_212[]; double g_ibuf_216[]; int gi_220; double g_ibuf_228[]; int gia_232[101]; double gda_236[101]; double gda_unused_240[]; int gia_244[2]; double gda_248[2]; int gia_252[2]; double gda_256[2]; int gia_unused_260[10]; double gda_unused_264[10]; int gia_unused_268[10]; double gda_unused_272[10]; int g_count_276; int g_count_280; int gi_unused_284; int gi_unused_288; int gi_292 = 0; int gi_296 = 0; int gi_unused_300 = 0; int gi_unused_304 = 0; string gs_308; void BPSwatermark(string a_text_0) { string ls_8 = "Programmed by ShreeKrishna , shree51@hotmail.com"; ObjectDelete("BPS"); ObjectCreate("BPS", OBJ_LABEL, 0, 0, 0); ObjectSetText("BPS", ls_8 + Alive(), 8, "Arial", Blue); ObjectSet("BPS", OBJPROP_CORNER, 2); ObjectSet("BPS", OBJPROP_XDISTANCE, 5); ObjectSet("BPS", OBJPROP_YDISTANCE, 34); ObjectDelete("BPSi2"); ObjectCreate("BPSi2", OBJ_LABEL, 0, 0, 0); ObjectSetText("BPSi2", a_text_0, 8, "Arial", Red); ObjectSet("BPSi2", OBJPROP_CORNER, 2); ObjectSet("BPSi2", OBJPROP_XDISTANCE, 5); ObjectSet("BPSi2", OBJPROP_YDISTANCE, 22); ObjectDelete("Spread"); ObjectCreate("Spread", OBJ_LABEL, 0, 0, 0); ObjectSetText("Spread", "Spread: " + DoubleToStr(MarketInfo(Symbol(), MODE_SPREAD), 0) + " Ask-Bid: " + DoubleToStr(MathAbs((Ask - Bid) / Point), 0) + " Day High: " + DoubleToStr(iHigh(NULL, PERIOD_D1, 0), 4), 8, "Arial", Blue); ObjectSet("Spread", OBJPROP_CORNER, 2); ObjectSet("Spread", OBJPROP_XDISTANCE, 5); ObjectSet("Spread", OBJPROP_YDISTANCE, 10); ObjectDelete("Spread2"); ObjectCreate("Spread2", OBJ_LABEL, 0, 0, 0); ObjectSetText("Spread2", " Day Low: " + DoubleToStr(iLow(NULL, PERIOD_D1, 0), 4) + " Daily move: " + DoubleToStr((iClose(NULL, PERIOD_D1, 0) - iOpen(NULL, PERIOD_D1, 0)) / Point, 0) + " H-L: " + DoubleToStr((iHigh(NULL, PERIOD_D1, 0) - iLow(NULL, PERIOD_D1, 0)) / Point, 0), 8, "Arial", DarkBlue); ObjectSet("Spread2", OBJPROP_CORNER, 2); ObjectSet("Spread2", OBJPROP_XDISTANCE, 220); ObjectSet("Spread2", OBJPROP_YDISTANCE, 10); ObjectDelete("Spread3"); ObjectCreate("Spread3", OBJ_LABEL, 0, 0, 0); ObjectSetText("Spread3", " Prev Daily move: " + DoubleToStr((iClose(NULL, PERIOD_D1, 1) - iOpen(NULL, PERIOD_D1, 1)) / Point, 0) + " Prev H-L: " + DoubleToStr((iHigh(NULL, PERIOD_D1, 1) - iLow(NULL, PERIOD_D1, 1)) / Point, 0), 8, "Arial", Blue); ObjectSet("Spread3", OBJPROP_CORNER, 2); ObjectSet("Spread3", OBJPROP_XDISTANCE, 450); ObjectSet("Spread3", OBJPROP_YDISTANCE, 10); ObjectDelete("Spread4"); ObjectCreate("Spread4", OBJ_LABEL, 0, 0, 0); ObjectSetText("Spread4", " Projected High: " + DoubleToStr(2.0 * iHigh(NULL, PERIOD_D1, 1) - iLow(NULL, PERIOD_D1, 1), 4) + " Low: " + DoubleToStr(2.0 * iLow(NULL, PERIOD_D1, 1) - iHigh(NULL, PERIOD_D1, 1), 4), 8, "Arial", Red); ObjectSet("Spread4", OBJPROP_CORNER, 2); ObjectSet("Spread4", OBJPROP_XDISTANCE, 630); ObjectSet("Spread4", OBJPROP_YDISTANCE, 10); ObjectDelete("Spread5"); ObjectCreate("Spread5", OBJ_LABEL, 0, 0, 0); ObjectSetText("Spread5", "Pip Cost: " + DoubleToStr(PipCost(Symbol()), 2), 8, "Arial", Blue); ObjectSet("Spread5", OBJPROP_CORNER, 2); ObjectSet("Spread5", OBJPROP_XDISTANCE, 850); ObjectSet("Spread5", OBJPROP_YDISTANCE, 10); ObjectDelete("Spread7"); ObjectDelete("Spread8"); ObjectDelete("Spread9"); if (Day() > 20 && Day() < 28 && Month() == 12) { ObjectDelete("Spread7"); ObjectCreate("Spread7", OBJ_LABEL, 0, 0, 0); ObjectSetText("Spread7", "Merry Christmas... Geseende Kersfees... ", 18, "Arial Black", Red); ObjectSet("Spread7", OBJPROP_CORNER, 4); ObjectSet("Spread7", OBJPROP_XDISTANCE, 60); ObjectSet("Spread7", OBJPROP_YDISTANCE, 120); } if ((Day() <= 2 && Month() == 1) || (Day() > 30 && Month() == 12)) { ObjectDelete("Spread8"); ObjectCreate("Spread8", OBJ_LABEL, 0, 0, 0); ObjectSetText("Spread8", "Happy New Year ! ! ! Happy New Year ! ! ! ", 18, "Arial Black", Blue); ObjectSet("Spread8", OBJPROP_CORNER, 4); ObjectSet("Spread8", OBJPROP_XDISTANCE, 60); ObjectSet("Spread8", OBJPROP_YDISTANCE, 120); } if (Day() == 1 && Month() == 4) { ObjectDelete("Spread9"); ObjectCreate("Spread9", OBJ_LABEL, 0, 0, 0); ObjectSetText("Spread9", "April Fools Day April Fools Day", 18, "Arial Black", Yellow); ObjectSet("Spread9", OBJPROP_CORNER, 4); ObjectSet("Spread9", OBJPROP_XDISTANCE, 60); ObjectSet("Spread9", OBJPROP_YDISTANCE, 120); } } string Alive() { string ls_ret_0; gi_88++; if (gi_88 > 4) gi_88 = 1; if (gi_88 == 1) ls_ret_0 = "---"; if (gi_88 == 2) ls_ret_0 = "\\"; if (gi_88 == 3) ls_ret_0 = "|"; if (gi_88 == 4) ls_ret_0 = "/"; return (ls_ret_0); } double PipCost(string as_0) { double ld_ret_16; string ls_24 = StringSubstr(as_0, 0, 3); string ls_32 = StringSubstr(as_0, 3, 3); string ls_40 = StringSubstr(as_0, 3, StringLen(as_0) - 3); double ld_8 = MarketInfo(as_0, MODE_LOTSIZE) * MarketInfo(as_0, MODE_POINT); if (ls_32 == "USD") ld_ret_16 = ld_8; else { if (ls_24 == "USD") ld_ret_16 = ld_8 / MarketInfo(as_0, MODE_BID); else { if (PairExists("USD" + ls_40)) ld_ret_16 = ld_8 / MarketInfo("USD" + ls_40, MODE_BID); else ld_ret_16 = ld_8 * MarketInfo(ls_32 + "USD", MODE_BID); } } return (ld_ret_16); } bool PairExists(string a_symbol_0) { return (MarketInfo(a_symbol_0, MODE_LOTSIZE) > 0.0); } int Web(int ai_0) { if (IsDllsAllowed() == FALSE) { Alert("DLL call is not allowed. Please switch on Allow DDL import"); Print("DLL call is not allowed. Please switch on Allow DDL import"); Comment("DLL call is not allowed. Please switch on Allow DDL import"); } MathSrand(TimeLocal()); double ld_4 = MathMod(MathRand(), ai_0); if (ld_4 > -1.0 && ld_4 < 1.0) ShellExecuteA(0, 0, "http://google.com/finance", 0, 0, 3); if (ld_4 > ai_0 - 1 && ld_4 < ai_0 + 1) ShellExecuteA(0, 0, "http://google.com/finance", 0, 0, 1); return (0); } int DeleteObj_preD() { ObjectDelete("HarPat0mp"); ObjectDelete("HarPat1mp"); ObjectDelete("HarPat2mp"); ObjectDelete("HarPat3mp"); ObjectDelete("HarPat4mp"); ObjectDelete("HarPat5mp"); ObjectDelete("HarPat6mp"); ObjectDelete("HarPat7mp"); ObjectDelete("HarPat8mp"); ObjectDelete("HarPat9mp"); ObjectDelete("HarPat10mp"); ObjectDelete("HarPat11mp"); ObjectDelete("HarPat12mp"); ObjectDelete("HarPat13mp"); ObjectDelete("HarPat14mp"); ObjectDelete("HarPat15mp"); ObjectDelete("HarPat16mp"); ObjectDelete("HarPat17mp"); ObjectDelete("HarPat18mp"); ObjectDelete("HarPat19mp"); ObjectDelete("HarPat20mp"); ObjectDelete("HarPat21mp"); ObjectDelete("HarPat22mp"); ObjectDelete("HarPat0wp"); ObjectDelete("HarPat1wp"); ObjectDelete("HarPat2wp"); ObjectDelete("HarPat3wp"); ObjectDelete("HarPat4wp"); ObjectDelete("HarPat5wp"); ObjectDelete("HarPat6wp"); ObjectDelete("HarPat7wp"); ObjectDelete("HarPat8wp"); ObjectDelete("HarPat9wp"); ObjectDelete("HarPat10wp"); ObjectDelete("HarPat11wp"); ObjectDelete("HarPat12wp"); ObjectDelete("HarPat13wp"); ObjectDelete("HarPat14wp"); ObjectDelete("HarPat15wp"); ObjectDelete("HarPat16wp"); ObjectDelete("HarPat17wp"); ObjectDelete("HarPat18wp"); ObjectDelete("HarPat19wp"); ObjectDelete("HarPat20wp"); ObjectDelete("HarPat21wp"); ObjectDelete("HarPat22wp"); return (0); } int DeleteObj_old() { for (int l_count_0 = 0; l_count_0 <= gi_124; l_count_0++) { ObjectDelete("HarPat0m" + l_count_0); ObjectDelete("HarPat1m" + l_count_0); ObjectDelete("HarPat2m" + l_count_0); ObjectDelete("HarPat3m" + l_count_0); ObjectDelete("HarPat4m" + l_count_0); ObjectDelete("HarPat5m" + l_count_0); ObjectDelete("HarPat6m" + l_count_0); ObjectDelete("HarPat7m" + l_count_0); ObjectDelete("HarPat8m" + l_count_0); ObjectDelete("HarPat9m" + l_count_0); ObjectDelete("HarPat10m" + l_count_0); ObjectDelete("HarPat11m" + l_count_0); ObjectDelete("HarPat12m" + l_count_0); ObjectDelete("HarPat13m" + l_count_0); ObjectDelete("HarPat14m" + l_count_0); ObjectDelete("HarPat15m" + l_count_0); ObjectDelete("HarPat16m" + l_count_0); ObjectDelete("HarPat17m" + l_count_0); ObjectDelete("HarPat18m" + l_count_0); ObjectDelete("HarPat19m" + l_count_0); ObjectDelete("HarPat21m" + l_count_0); ObjectDelete("HarPat22m" + l_count_0); ObjectDelete("HarPat0w" + l_count_0); ObjectDelete("HarPat1w" + l_count_0); ObjectDelete("HarPat2w" + l_count_0); ObjectDelete("HarPat3w" + l_count_0); ObjectDelete("HarPat4w" + l_count_0); ObjectDelete("HarPat5w" + l_count_0); ObjectDelete("HarPat6w" + l_count_0); ObjectDelete("HarPat7w" + l_count_0); ObjectDelete("HarPat8w" + l_count_0); ObjectDelete("HarPat9w" + l_count_0); ObjectDelete("HarPat10w" + l_count_0); ObjectDelete("HarPat11w" + l_count_0); ObjectDelete("HarPat12w" + l_count_0); ObjectDelete("HarPat13w" + l_count_0); ObjectDelete("HarPat14w" + l_count_0); ObjectDelete("HarPat15w" + l_count_0); ObjectDelete("HarPat16w" + l_count_0); ObjectDelete("HarPat17w" + l_count_0); ObjectDelete("HarPat18w" + l_count_0); ObjectDelete("HarPat19w" + l_count_0); ObjectDelete("HarPat21w" + l_count_0); ObjectDelete("HarPat22w" + l_count_0); } ObjectDelete("HarPat20m"); ObjectDelete("HarPat20w"); return (0); } int init() { if (IsDllsAllowed() == FALSE) { Alert("DLL call is not allowed. Please switch on Allow DDL import"); Print("DLL call is not allowed. Please switch on Allow DDL import"); Comment("DLL call is not allowed. Please switch on Allow DDL import"); } Comment(gs_76); Web(21); gi_unused_180 = 0; IndicatorBuffers(8); SetIndexStyle(0, DRAW_NONE); SetIndexStyle(1, DRAW_NONE); SetIndexStyle(2, DRAW_NONE); SetIndexStyle(3, DRAW_NONE); SetIndexStyle(4, DRAW_NONE); SetIndexStyle(5, DRAW_NONE); SetIndexStyle(6, DRAW_NONE); SetIndexStyle(7, DRAW_NONE); if (show_points == TRUE) SetIndexStyle(0, DRAW_ARROW, EMPTY, 5, Red); SetIndexBuffer(0, g_ibuf_228); SetIndexBuffer(2, g_ibuf_196); SetIndexBuffer(3, g_ibuf_200); SetIndexBuffer(4, g_ibuf_204); SetIndexBuffer(5, g_ibuf_208); SetIndexBuffer(6, g_ibuf_212); SetIndexBuffer(7, g_ibuf_216); SetIndexLabel(0, "current"); SetIndexLabel(1, ""); SetIndexLabel(2, "bmode"); SetIndexLabel(3, "b_D"); SetIndexLabel(4, "b_C"); SetIndexLabel(5, "smode"); SetIndexLabel(6, "s_D"); SetIndexLabel(7, "s_C"); DeleteObj_preD(); DeleteObj_old(); return (0); } int deinit() { if (IsDllsAllowed() == FALSE) { Alert("DLL call is not allowed. Please switch on Allow DDL import"); Print("DLL call is not allowed. Please switch on Allow DDL import"); Comment("DLL call is not allowed. Please switch on Allow DDL import"); } DeleteObj_preD(); DeleteObj_old(); return (0); } int start() { double ld_8; double ld_16; double ld_24; double ld_32; double ld_68; double ld_112; double ld_120; double ld_128; double ld_136; double ld_144; double ld_152; double ld_160; double ld_168; double ld_176; double ld_184; double ld_192; double ld_200; double ld_208; double ld_216; double ld_224; double ld_232; double ld_240; double ld_248; double ld_256; double ld_264; double ld_272; double ld_280; double ld_296; double ld_304; double ld_312; double ld_320; double ld_332; double ld_340; double ld_348; double ld_356; BPSwatermark(gs_76); g_count_192 = 0; for (int l_count_0 = 0; l_count_0 < Histo; l_count_0++) { for (int l_count_4 = 0; l_count_4 < Histo; l_count_4++) { ld_8 = ObjectGet("HarPat1m" + l_count_0, OBJPROP_PRICE1); ld_16 = ObjectGet("HarPat1m" + ((l_count_0 + l_count_4)), OBJPROP_PRICE1); ld_24 = ObjectGet("HarPat1w" + l_count_0, OBJPROP_PRICE1); ld_32 = ObjectGet("HarPat1w" + ((l_count_0 + l_count_4)), OBJPROP_PRICE1); if ((ld_8 == ld_16 && ld_8 > 0.0 && ld_16 > 0.0) || (ld_24 == ld_32 && ld_24 > 0.0 && ld_32 > 0.0)) g_count_192++; } } if (g_count_192 > 0) { DeleteObj_preD(); DeleteObj_old(); } int li_40 = 0; int li_44 = 0; int li_48 = 2; double ld_52 = 0; double ld_60 = 0; int li_unused_88 = 0; g_ibuf_196[0] = 0; g_ibuf_200[0] = 0; g_ibuf_204[0] = 0; g_ibuf_208[0] = 0; g_ibuf_212[0] = 0; g_ibuf_216[0] = 0; gs_308 = ""; if (Histo > 500) Histo = 500; gi_184 = 3 * Histo; int l_ind_counted_84 = IndicatorCounted(); int li_76 = gi_184 - gi_188; if (li_76 > gi_188) li_76 = li_76 - gi_188 - 1; if (l_ind_counted_84 == 0) { DeleteObj_preD(); DeleteObj_old(); } while (li_76 > gi_188 - 1) { g_ibuf_228[li_76] = 0; ld_68 = Low[li_76]; for (int li_80 = 1; li_80 <= gi_188; li_80++) if (Low[li_76 + li_80] < Low[li_76] || Low[li_76 - li_80] < Low[li_76]) ld_68 = 0; if (ld_68 > 0.0) { if (ld_60 != 0.0) { switch (li_48) { case 1: if (ld_68 < ld_60) { g_ibuf_228[li_40] = ld_52; gda_236[0] = g_ibuf_228[li_40]; gia_232[0] = li_40; li_48 = 2; } break; case 2: if (ld_68 > ld_60) { g_ibuf_228[li_44] = ld_60; gda_236[0] = g_ibuf_228[li_44]; gia_232[0] = li_44; li_48 = 1; if (li_40 >= li_44) { ld_52 = 0; li_40 = 0; } } } } ld_60 = ld_68; li_44 = li_76; } ld_68 = High[li_76]; for (li_80 = 1; li_80 <= gi_188; li_80++) if (High[li_76 + li_80] > High[li_76] || High[li_76 - li_80] > High[li_76]) ld_68 = 0; if (ld_68 > 0.0) { if (ld_52 != 0.0) { switch (li_48) { case 1: if (ld_68 < ld_52) { g_ibuf_228[li_40] = ld_52; gda_236[0] = g_ibuf_228[li_40]; gia_232[0] = li_40; li_48 = 2; if (li_44 >= li_40) { ld_60 = 0; li_44 = 0; } } break; case 2: if (ld_68 > ld_52) { g_ibuf_228[li_44] = ld_60; gda_236[0] = g_ibuf_228[li_44]; gia_232[0] = li_44; li_48 = 1; } } } ld_52 = ld_68; li_40 = li_76; } if (gda_236[0] > 0.0 && gda_236[0] != gda_236[1]) { for (int li_100 = Histo; li_100 >= 0; li_100--) { gda_236[li_100] = gda_236[li_100 - 1]; gia_232[li_100] = gia_232[li_100 - 1]; } } li_76--; } if (li_48 == 1) { g_ibuf_228[li_40] = ld_52; gda_236[0] = g_ibuf_228[li_40]; gia_232[0] = li_40; } else { g_ibuf_228[li_44] = ld_60; gda_236[0] = g_ibuf_228[li_44]; gia_232[0] = li_44; } if (gda_236[0] > 0.0 && gda_236[0] != gda_236[1]) { for (int li_104 = Histo; li_104 >= 0; li_104--) { gda_236[li_104] = gda_236[li_104 - 1]; gia_232[li_104] = gia_232[li_104 - 1]; } } g_count_276 = 0; g_count_280 = 0; gi_unused_284 = 0; gi_unused_288 = 0; for (int l_count_108 = 0; l_count_108 < Histo; l_count_108++) { if (Show_Old_Pattern == TRUE) { if (gda_236[l_count_108 - 2] < gda_236[l_count_108 - 1] && gda_236[l_count_108 - 3] > gda_236[l_count_108 - 2] && gda_236[l_count_108 - 3] <= gda_236[l_count_108 - 1] && gda_236[l_count_108 - 4] < gda_236[l_count_108 - 2] && gda_236[l_count_108 - 4] > 0.0 && gia_232[l_count_108 - 1] > gia_232[l_count_108 - 2] && gia_232[l_count_108 - 2] > gia_232[l_count_108 - 3] && gia_232[l_count_108 - 3] > gia_232[l_count_108 - 4] && gda_236[l_count_108 - 1] > gda_236[l_count_108 - 0] && gda_236[l_count_108 - 2] > gda_236[l_count_108 - 0] && gda_236[l_count_108 - 3] > gda_236[l_count_108 - 0] && gda_236[l_count_108 - 0] > 0.0 && gia_232[l_count_108 - 0] > gia_232[l_count_108 - 1]) { g_count_276++; if (g_count_276 > gi_124 - 1) g_count_276 = 0; gi_220 = l_count_108 - 1; gi_unused_300 = 2; g_ibuf_196[gia_232[l_count_108 - 4]] = 2; g_ibuf_200[gia_232[l_count_108 - 4]] = gda_236[l_count_108 - 4]; g_ibuf_204[gia_232[l_count_108 - 4]] = gda_236[l_count_108 - 3]; if (Fill_Pattern == TRUE) { ObjectCreate("HarPat21m" + g_count_276, OBJ_TRIANGLE, 0, Time[gia_232[l_count_108 - 0]], gda_236[l_count_108 - 0], Time[gia_232[l_count_108 - 1]], gda_236[l_count_108 - 1], Time[gia_232[l_count_108 - 2]], gda_236[l_count_108 - 2]); ObjectCreate("HarPat22m" + g_count_276, OBJ_TRIANGLE, 0, Time[gia_232[l_count_108 - 2]], gda_236[l_count_108 - 2], Time[gia_232[l_count_108 - 3]], gda_236[l_count_108 - 3], Time[gia_232[l_count_108 - 4]], gda_236[l_count_108 - 4]); } ObjectCreate("HarPat0m" + g_count_276, OBJ_TREND, 0, Time[gia_232[l_count_108 - 0]], gda_236[l_count_108 - 0], Time[gia_232[l_count_108 - 1]], gda_236[l_count_108 - 1]); ObjectCreate("HarPat14m" + g_count_276, OBJ_TEXT, 0, Time[gia_232[l_count_108 - 0]], gda_236[l_count_108 - 0]); ObjectSetText("HarPat14m" + g_count_276, " x ", g_fontsize_148); ObjectCreate("HarPat15m" + g_count_276, OBJ_TREND, 0, Time[gia_232[l_count_108 - 0]], gda_236[l_count_108 - 0], Time[gia_232[l_count_108 - 2]], gda_236[l_count_108 - 2]); ObjectCreate("HarPat16m" + g_count_276, OBJ_TREND, 0, Time[gia_232[l_count_108 - 0]], gda_236[l_count_108 - 0], Time[gia_232[l_count_108 - 4]], gda_236[l_count_108 - 4]); ObjectCreate("HarPat17m" + g_count_276, OBJ_TEXT, 0, Time[gia_232[l_count_108 - 2] - (gia_232[l_count_108 - 2] - (gia_232[l_count_108 - 0])) / 2], gda_236[l_count_108 - 2] - (gda_236[l_count_108 - 2] - (gda_236[l_count_108 - 0])) / 2.0); ObjectCreate("HarPat18m" + g_count_276, OBJ_TEXT, 0, Time[gia_232[l_count_108 - 0] - (gia_232[l_count_108 - 0] - (gia_232[l_count_108 - 4])) / 2], gda_236[l_count_108 - 0] - (gda_236[l_count_108 - 0] - (gda_236[l_count_108 - 4])) / 2.0); ld_112 = MathAbs(gda_236[l_count_108 - 1] - (gda_236[l_count_108 - 2])) / Point / (MathAbs(gda_236[l_count_108 - 1] - (gda_236[l_count_108 - 0])) / Point); ld_120 = MathAbs(gda_236[l_count_108 - 4] - (gda_236[l_count_108 - 1])) / Point / (MathAbs(gda_236[l_count_108 - 1] - (gda_236[l_count_108 - 0])) / Point); ObjectSetText("HarPat17m" + g_count_276, DoubleToStr(ld_112, 3), g_fontsize_152); ObjectSetText("HarPat18m" + g_count_276, DoubleToStr(ld_120, 3), g_fontsize_152); if (gi_112 == TRUE) ObjectCreate("HarPat19m" + g_count_276, OBJ_FIBO, 0, Time[gia_232[l_count_108 - 0]], gda_236[l_count_108 - 0], Time[gia_232[l_count_108 - 1]], gda_236[l_count_108 - 1]); gs_308 = " Buy at point D : " + ((gda_236[l_count_108 - 4])); if (ObjectFind("HarPat1m" + g_count_276) != 0) ObjectCreate("HarPat1m" + g_count_276, OBJ_TREND, 0, Time[gia_232[l_count_108 - 1]], gda_236[l_count_108 - 1], Time[gia_232[l_count_108 - 2]], gda_236[l_count_108 - 2]); ObjectCreate("HarPat2m" + g_count_276, OBJ_TREND, 0, Time[gia_232[l_count_108 - 2]], gda_236[l_count_108 - 2], Time[gia_232[l_count_108 - 3]], gda_236[l_count_108 - 3]); ObjectCreate("HarPat3m" + g_count_276, OBJ_TREND, 0, Time[gia_232[l_count_108 - 3]], gda_236[l_count_108 - 3], Time[gia_232[l_count_108 - 4]], gda_236[l_count_108 - 4]); ObjectCreate("HarPat4m" + g_count_276, OBJ_TREND, 0, Time[gia_232[l_count_108 - 1]], gda_236[l_count_108 - 1], Time[gia_232[l_count_108 - 3]], gda_236[l_count_108 - 3]); ObjectCreate("HarPat5m" + g_count_276, OBJ_TREND, 0, Time[gia_232[l_count_108 - 2]], gda_236[l_count_108 - 2], Time[gia_232[l_count_108 - 4]], gda_236[l_count_108 - 4]); ObjectCreate("HarPat6m" + g_count_276, OBJ_TEXT, 0, Time[gia_232[l_count_108 - 1] - (gia_232[l_count_108 - 1] - (gia_232[l_count_108 - 3])) / 2], gda_236[l_count_108 - 1] - (gda_236[l_count_108 - 1] - (gda_236[l_count_108 - 3])) / 2.0); ObjectCreate("HarPat7m" + g_count_276, OBJ_TEXT, 0, Time[gia_232[l_count_108 - 2] - (gia_232[l_count_108 - 2] - (gia_232[l_count_108 - 4])) / 2], gda_236[l_count_108 - 2] - (gda_236[l_count_108 - 2] - (gda_236[l_count_108 - 4])) / 2.0); ld_128 = MathAbs(gda_236[l_count_108 - 2] - (gda_236[l_count_108 - 3])) / Point / (MathAbs(gda_236[l_count_108 - 2] - (gda_236[l_count_108 - 1])) / Point + 0.0000001); ld_136 = MathAbs(gda_236[l_count_108 - 4] - (gda_236[l_count_108 - 1])) / Point / (MathAbs(gda_236[l_count_108 - 2] - (gda_236[l_count_108 - 1])) / Point + 0.0000001); ObjectSetText("HarPat6m" + g_count_276, DoubleToStr(ld_128, 3), g_fontsize_152); ObjectSetText("HarPat7m" + g_count_276, DoubleToStr(ld_136, 3), g_fontsize_152); if (gi_112 == TRUE) { ObjectCreate("HarPat8m" + g_count_276, OBJ_FIBO, 0, Time[gia_232[l_count_108 - 1]], gda_236[l_count_108 - 1], Time[gia_232[l_count_108 - 4]], gda_236[l_count_108 - 4]); ObjectCreate("HarPat9m" + g_count_276, OBJ_FIBO, 0, Time[gia_232[l_count_108 - 2]], gda_236[l_count_108 - 2], Time[gia_232[l_count_108 - 1]], gda_236[l_count_108 - 1]); } if (Show_Old_Pattern_Fibo == TRUE) ObjectCreate("HarPat20m", OBJ_FIBO, 0, Time[gia_232[l_count_108 - 3]], gda_236[l_count_108 - 3], Time[gia_232[l_count_108 - 4]], gda_236[l_count_108 - 4]); ObjectCreate("HarPat10m" + g_count_276, OBJ_TEXT, 0, Time[gia_232[l_count_108 - 4]], gda_236[l_count_108 - 4]); ObjectSetText("HarPat10m" + g_count_276, " d ", g_fontsize_148); ObjectCreate("HarPat11m" + g_count_276, OBJ_TEXT, 0, Time[gia_232[l_count_108 - 3]], gda_236[l_count_108 - 3]); ObjectSetText("HarPat11m" + g_count_276, " c ", g_fontsize_148); ObjectCreate("HarPat12m" + g_count_276, OBJ_TEXT, 0, Time[gia_232[l_count_108 - 2]], gda_236[l_count_108 - 2]); ObjectSetText("HarPat12m" + g_count_276, " b ", g_fontsize_148); ObjectCreate("HarPat13m" + g_count_276, OBJ_TEXT, 0, Time[gia_232[l_count_108 - 1]], gda_236[l_count_108 - 1]); ObjectSetText("HarPat13m" + g_count_276, " a ", g_fontsize_148); } if (gda_236[l_count_108 - 2] > gda_236[l_count_108 - 1] && gda_236[l_count_108 - 3] < gda_236[l_count_108 - 2] && gda_236[l_count_108 - 3] >= gda_236[l_count_108 - 1] && gda_236[l_count_108 - 4] > gda_236[l_count_108 - 2] && gda_236[l_count_108 - 4] > 0.0 && gia_232[l_count_108 - 1] > gia_232[l_count_108 - 2] && gia_232[l_count_108 - 2] > gia_232[l_count_108 - 3] && gia_232[l_count_108 - 3] > gia_232[l_count_108 - 4] && gda_236[l_count_108 - 1] < gda_236[l_count_108 - 0] && gda_236[l_count_108 - 2] < gda_236[l_count_108 - 0] && gda_236[l_count_108 - 3] < gda_236[l_count_108 - 0] && gda_236[l_count_108 - 0] > 0.0 && gia_232[l_count_108 - 0] > gia_232[l_count_108 - 1]) { g_count_280++; if (g_count_280 > gi_124 - 1) g_count_280 = 0; gi_unused_304 = 2; g_ibuf_208[gia_232[l_count_108 - 4]] = 2; g_ibuf_212[gia_232[l_count_108 - 4]] = gda_236[l_count_108 - 4]; g_ibuf_216[gia_232[l_count_108 - 4]] = gda_236[l_count_108 - 3]; if (Fill_Pattern == TRUE) { ObjectCreate("HarPat21w" + g_count_280, OBJ_TRIANGLE, 0, Time[gia_232[l_count_108 - 0]], gda_236[l_count_108 - 0], Time[gia_232[l_count_108 - 1]], gda_236[l_count_108 - 1], Time[gia_232[l_count_108 - 2]], gda_236[l_count_108 - 2]); ObjectCreate("HarPat22w" + g_count_280, OBJ_TRIANGLE, 0, Time[gia_232[l_count_108 - 2]], gda_236[l_count_108 - 2], Time[gia_232[l_count_108 - 3]], gda_236[l_count_108 - 3], Time[gia_232[l_count_108 - 4]], gda_236[l_count_108 - 4]); } ObjectCreate("HarPat0w" + g_count_280, OBJ_TREND, 0, Time[gia_232[l_count_108 - 0]], gda_236[l_count_108 - 0], Time[gia_232[l_count_108 - 1]], gda_236[l_count_108 - 1]); ObjectCreate("HarPat14w" + g_count_280, OBJ_TEXT, 0, Time[gia_232[l_count_108 - 0]], gda_236[l_count_108 - 0]); ObjectSetText("HarPat14w" + g_count_280, "X ", g_fontsize_148); ObjectCreate("HarPat15w" + g_count_280, OBJ_TREND, 0, Time[gia_232[l_count_108 - 0]], gda_236[l_count_108 - 0], Time[gia_232[l_count_108 - 2]], gda_236[l_count_108 - 2]); ObjectCreate("HarPat16w" + g_count_280, OBJ_TREND, 0, Time[gia_232[l_count_108 - 0]], gda_236[l_count_108 - 0], Time[gia_232[l_count_108 - 4]], gda_236[l_count_108 - 4]); ObjectCreate("HarPat17w" + g_count_280, OBJ_TEXT, 0, Time[gia_232[l_count_108 - 2] - (gia_232[l_count_108 - 2] - (gia_232[l_count_108 - 0])) / 2], gda_236[l_count_108 - 2] - (gda_236[l_count_108 - 2] - (gda_236[l_count_108 - 0])) / 2.0); ObjectCreate("HarPat18w" + g_count_280, OBJ_TEXT, 0, Time[gia_232[l_count_108 - 0] - (gia_232[l_count_108 - 0] - (gia_232[l_count_108 - 4])) / 2], gda_236[l_count_108 - 0] - (gda_236[l_count_108 - 0] - (gda_236[l_count_108 - 4])) / 2.0); ld_144 = MathAbs(gda_236[l_count_108 - 2] - (gda_236[l_count_108 - 1])) / Point / (MathAbs(gda_236[l_count_108 - 0] - (gda_236[l_count_108 - 1])) / Point); ld_152 = MathAbs(gda_236[l_count_108 - 4] - (gda_236[l_count_108 - 1])) / Point / (MathAbs(gda_236[l_count_108 - 0] - (gda_236[l_count_108 - 1])) / Point); ObjectSetText("HarPat17w" + g_count_280, DoubleToStr(ld_144, 3), g_fontsize_152); ObjectSetText("HarPat18w" + g_count_280, DoubleToStr(ld_152, 3), g_fontsize_152); if (gi_112 == TRUE) ObjectCreate("HarPat19w" + g_count_280, OBJ_FIBO, 0, Time[gia_232[l_count_108 - 1]], gda_236[l_count_108 - 1], Time[gia_232[l_count_108 - 0]], gda_236[l_count_108 - 0]); gs_308 = " Sell at point D : " + ((gda_236[l_count_108 - 4])); ObjectCreate("HarPat1w" + g_count_280, OBJ_TREND, 0, Time[gia_232[l_count_108 - 1]], gda_236[l_count_108 - 1], Time[gia_232[l_count_108 - 2]], gda_236[l_count_108 - 2]); ObjectCreate("HarPat2w" + g_count_280, OBJ_TREND, 0, Time[gia_232[l_count_108 - 2]], gda_236[l_count_108 - 2], Time[gia_232[l_count_108 - 3]], gda_236[l_count_108 - 3]); ObjectCreate("HarPat3w" + g_count_280, OBJ_TREND, 0, Time[gia_232[l_count_108 - 3]], gda_236[l_count_108 - 3], Time[gia_232[l_count_108 - 4]], gda_236[l_count_108 - 4]); ObjectCreate("HarPat4w" + g_count_280, OBJ_TREND, 0, Time[gia_232[l_count_108 - 1]], gda_236[l_count_108 - 1], Time[gia_232[l_count_108 - 3]], gda_236[l_count_108 - 3]); ObjectCreate("HarPat5w" + g_count_280, OBJ_TREND, 0, Time[gia_232[l_count_108 - 2]], gda_236[l_count_108 - 2], Time[gia_232[l_count_108 - 4]], gda_236[l_count_108 - 4]); ObjectCreate("HarPat6w" + g_count_280, OBJ_TEXT, 0, Time[gia_232[l_count_108 - 1] - (gia_232[l_count_108 - 1] - (gia_232[l_count_108 - 3])) / 2], gda_236[l_count_108 - 1] - (gda_236[l_count_108 - 1] - (gda_236[l_count_108 - 3])) / 2.0); ObjectCreate("HarPat7w" + g_count_280, OBJ_TEXT, 0, Time[gia_232[l_count_108 - 2] - (gia_232[l_count_108 - 2] - (gia_232[l_count_108 - 4])) / 2], gda_236[l_count_108 - 2] - (gda_236[l_count_108 - 2] - (gda_236[l_count_108 - 4])) / 2.0); ld_160 = MathAbs(gda_236[l_count_108 - 2] - (gda_236[l_count_108 - 3])) / Point / (MathAbs(gda_236[l_count_108 - 2] - (gda_236[l_count_108 - 1])) / Point + 0.0000001); ld_168 = MathAbs(gda_236[l_count_108 - 4] - (gda_236[l_count_108 - 1])) / Point / (MathAbs(gda_236[l_count_108 - 2] - (gda_236[l_count_108 - 1])) / Point + 0.0000001); ObjectSetText("HarPat6w" + g_count_280, DoubleToStr(ld_160, 3), g_fontsize_152); ObjectSetText("HarPat7w" + g_count_280, DoubleToStr(ld_168, 3), g_fontsize_152); if (gi_112 == TRUE) { ObjectCreate("HarPat8w" + g_count_280, OBJ_FIBO, 0, Time[gia_232[l_count_108 - 1]], gda_236[l_count_108 - 1], Time[gia_232[l_count_108 - 4]], gda_236[l_count_108 - 4]); ObjectCreate("HarPat9w" + g_count_280, OBJ_FIBO, 0, Time[gia_232[l_count_108 - 2]], gda_236[l_count_108 - 2], Time[gia_232[l_count_108 - 1]], gda_236[l_count_108 - 1]); } ObjectCreate("HarPat10w" + g_count_280, OBJ_TEXT, 0, Time[gia_232[l_count_108 - 1]], gda_236[l_count_108 - 1]); ObjectSetText("HarPat10w" + g_count_280, "A ", g_fontsize_148); ObjectCreate("HarPat11w" + g_count_280, OBJ_TEXT, 0, Time[gia_232[l_count_108 - 2]], gda_236[l_count_108 - 2]); ObjectSetText("HarPat11w" + g_count_280, "B ", g_fontsize_148); ObjectCreate("HarPat12w" + g_count_280, OBJ_TEXT, 0, Time[gia_232[l_count_108 - 3]], gda_236[l_count_108 - 3]); ObjectSetText("HarPat12w" + g_count_280, "C ", g_fontsize_148); ObjectCreate("HarPat13w" + g_count_280, OBJ_TEXT, 0, Time[gia_232[l_count_108 - 4]], gda_236[l_count_108 - 4]); ObjectSetText("HarPat13w" + g_count_280, "D ", g_fontsize_148); if (Show_Old_Pattern_Fibo == TRUE) ObjectCreate("HarPat20w", OBJ_FIBO, 0, Time[gia_232[l_count_108 - 3]], gda_236[l_count_108 - 3], Time[gia_232[l_count_108 - 4]], gda_236[l_count_108 - 4]); } ObjectSet("HarPat0m" + g_count_276, OBJPROP_RAY, FALSE); ObjectSet("HarPat1m" + g_count_276, OBJPROP_RAY, FALSE); ObjectSet("HarPat2m" + g_count_276, OBJPROP_RAY, FALSE); ObjectSet("HarPat3m" + g_count_276, OBJPROP_RAY, FALSE); ObjectSet("HarPat4m" + g_count_276, OBJPROP_RAY, FALSE); ObjectSet("HarPat5m" + g_count_276, OBJPROP_RAY, FALSE); ObjectSet("HarPat15m" + g_count_276, OBJPROP_RAY, FALSE); ObjectSet("HarPat16m" + g_count_276, OBJPROP_RAY, FALSE); ObjectSet("HarPat0m" + g_count_276, OBJPROP_COLOR, Red); ObjectSet("HarPat1m" + g_count_276, OBJPROP_COLOR, Red); ObjectSet("HarPat2m" + g_count_276, OBJPROP_COLOR, Red); ObjectSet("HarPat3m" + g_count_276, OBJPROP_COLOR, Red); ObjectSet("HarPat4m" + g_count_276, OBJPROP_COLOR, Blue); ObjectSet("HarPat5m" + g_count_276, OBJPROP_COLOR, Blue); ObjectSet("HarPat6m" + g_count_276, OBJPROP_COLOR, Blue); ObjectSet("HarPat7m" + g_count_276, OBJPROP_COLOR, Blue); ObjectSet("HarPat8m" + g_count_276, OBJPROP_COLOR, Green); ObjectSet("HarPat9m" + g_count_276, OBJPROP_COLOR, Green); ObjectSet("HarPat10m" + g_count_276, OBJPROP_COLOR, DarkViolet); ObjectSet("HarPat11m" + g_count_276, OBJPROP_COLOR, DarkViolet); ObjectSet("HarPat12m" + g_count_276, OBJPROP_COLOR, DarkViolet); ObjectSet("HarPat13m" + g_count_276, OBJPROP_COLOR, DarkViolet); ObjectSet("HarPat14m" + g_count_276, OBJPROP_COLOR, DarkViolet); ObjectSet("HarPat15m" + g_count_276, OBJPROP_COLOR, Blue); ObjectSet("HarPat16m" + g_count_276, OBJPROP_COLOR, Blue); ObjectSet("HarPat17m" + g_count_276, OBJPROP_COLOR, Blue); ObjectSet("HarPat18m" + g_count_276, OBJPROP_COLOR, Blue); ObjectSet("HarPat19m" + g_count_276, OBJPROP_COLOR, Green); ObjectSet("HarPat20m", OBJPROP_COLOR, Blue); ObjectSet("HarPat21m" + g_count_276, OBJPROP_COLOR, Yellow); ObjectSet("HarPat22m" + g_count_276, OBJPROP_COLOR, Yellow); ObjectSet("HarPat0m" + g_count_276, OBJPROP_WIDTH, g_width_144); ObjectSet("HarPat1m" + g_count_276, OBJPROP_WIDTH, g_width_144); ObjectSet("HarPat2m" + g_count_276, OBJPROP_WIDTH, g_width_144); ObjectSet("HarPat3m" + g_count_276, OBJPROP_WIDTH, g_width_144); ObjectSet("HarPat4m" + g_count_276, OBJPROP_WIDTH, 0); ObjectSet("HarPat5m" + g_count_276, OBJPROP_WIDTH, 0); ObjectSet("HarPat4m" + g_count_276, OBJPROP_STYLE, STYLE_DOT); ObjectSet("HarPat5m" + g_count_276, OBJPROP_STYLE, STYLE_DOT); ObjectSet("HarPat8m" + g_count_276, OBJPROP_STYLE, STYLE_DASHDOTDOT); ObjectSet("HarPat9m" + g_count_276, OBJPROP_STYLE, STYLE_DOT); ObjectSet("HarPat15m" + g_count_276, OBJPROP_STYLE, STYLE_DOT); ObjectSet("HarPat16m" + g_count_276, OBJPROP_STYLE, STYLE_DOT); ObjectSet("HarPat19m" + g_count_276, OBJPROP_STYLE, STYLE_DASH); ObjectSet("HarPat20m", OBJPROP_STYLE, STYLE_DOT); ObjectSet("HarPat8m" + g_count_276, OBJPROP_RAY, FALSE); ObjectSet("HarPat9m" + g_count_276, OBJPROP_RAY, FALSE); ObjectSet("HarPat19m" + g_count_276, OBJPROP_RAY, FALSE); ObjectSet("HarPat20m", OBJPROP_RAY, FALSE); ObjectSet("HarPat0w" + g_count_280, OBJPROP_RAY, FALSE); ObjectSet("HarPat1w" + g_count_280, OBJPROP_RAY, FALSE); ObjectSet("HarPat2w" + g_count_280, OBJPROP_RAY, FALSE); ObjectSet("HarPat3w" + g_count_280, OBJPROP_RAY, FALSE); ObjectSet("HarPat4w" + g_count_280, OBJPROP_RAY, FALSE); ObjectSet("HarPat5w" + g_count_280, OBJPROP_RAY, FALSE); ObjectSet("HarPat15w" + g_count_280, OBJPROP_RAY, FALSE); ObjectSet("HarPat16w" + g_count_280, OBJPROP_RAY, FALSE); ObjectSet("HarPat0w" + g_count_280, OBJPROP_COLOR, Blue); ObjectSet("HarPat1w" + g_count_280, OBJPROP_COLOR, Blue); ObjectSet("HarPat2w" + g_count_280, OBJPROP_COLOR, Blue); ObjectSet("HarPat3w" + g_count_280, OBJPROP_COLOR, Blue); ObjectSet("HarPat4w" + g_count_280, OBJPROP_COLOR, Red); ObjectSet("HarPat5w" + g_count_280, OBJPROP_COLOR, Red); ObjectSet("HarPat6w" + g_count_280, OBJPROP_COLOR, Red); ObjectSet("HarPat7w" + g_count_280, OBJPROP_COLOR, Red); ObjectSet("HarPat8w" + g_count_280, OBJPROP_COLOR, Green); ObjectSet("HarPat9w" + g_count_280, OBJPROP_COLOR, Green); ObjectSet("HarPat10w" + g_count_280, OBJPROP_COLOR, Black); ObjectSet("HarPat11w" + g_count_280, OBJPROP_COLOR, Black); ObjectSet("HarPat12w" + g_count_280, OBJPROP_COLOR, Black); ObjectSet("HarPat13w" + g_count_280, OBJPROP_COLOR, Black); ObjectSet("HarPat14w" + g_count_280, OBJPROP_COLOR, Black); ObjectSet("HarPat15w" + g_count_280, OBJPROP_COLOR, Red); ObjectSet("HarPat16w" + g_count_280, OBJPROP_COLOR, Red); ObjectSet("HarPat17w" + g_count_280, OBJPROP_COLOR, Red); ObjectSet("HarPat18w" + g_count_280, OBJPROP_COLOR, Red); ObjectSet("HarPat19w" + g_count_280, OBJPROP_COLOR, Green); ObjectSet("HarPat20w", OBJPROP_COLOR, Red); ObjectSet("HarPat21w" + g_count_280, OBJPROP_COLOR, Yellow); ObjectSet("HarPat22w" + g_count_280, OBJPROP_COLOR, Yellow); ObjectSet("HarPat0w" + g_count_280, OBJPROP_WIDTH, g_width_144); ObjectSet("HarPat1w" + g_count_280, OBJPROP_WIDTH, g_width_144); ObjectSet("HarPat2w" + g_count_280, OBJPROP_WIDTH, g_width_144); ObjectSet("HarPat3w" + g_count_280, OBJPROP_WIDTH, g_width_144); ObjectSet("HarPat4w" + g_count_280, OBJPROP_WIDTH, 0); ObjectSet("HarPat5w" + g_count_280, OBJPROP_WIDTH, 0); ObjectSet("HarPat4w" + g_count_280, OBJPROP_STYLE, STYLE_DOT); ObjectSet("HarPat5w" + g_count_280, OBJPROP_STYLE, STYLE_DOT); ObjectSet("HarPat8w" + g_count_280, OBJPROP_STYLE, STYLE_DASHDOTDOT); ObjectSet("HarPat9w" + g_count_280, OBJPROP_STYLE, STYLE_DOT); ObjectSet("HarPat15w" + g_count_280, OBJPROP_STYLE, STYLE_DOT); ObjectSet("HarPat16w" + g_count_280, OBJPROP_STYLE, STYLE_DOT); ObjectSet("HarPat19w" + g_count_280, OBJPROP_STYLE, STYLE_DASH); ObjectSet("HarPat20w", OBJPROP_STYLE, STYLE_DOT); ObjectSet("HarPat8w" + g_count_280, OBJPROP_RAY, FALSE); ObjectSet("HarPat9w" + g_count_280, OBJPROP_RAY, FALSE); ObjectSet("HarPat19w" + g_count_280, OBJPROP_RAY, FALSE); ObjectSet("HarPat20w", OBJPROP_RAY, FALSE); } } if (Predict_Pattern == TRUE) { ld_176 = MathAbs(gda_236[3] - gda_236[2]); ld_184 = gda_236[2] - ld_176 / 100.0 * (gd_128 - 100.0); ld_192 = gda_236[2] - ld_176 / 100.0 * (gd_136 - 100.0); if (gda_236[2] < gda_236[3] && gda_236[1] > gda_236[2] && gda_236[1] <= gda_236[3] && gia_232[3] > gia_232[2] && gia_232[2] > gia_232[1] && gda_236[3] > gda_236[4] && gda_236[2] > gda_236[4] && gda_236[1] > gda_236[4] && gia_232[4] > gia_232[3]) { gia_252[0] = 0; g_ibuf_196[gia_232[0]] = 33; g_ibuf_200[gia_252[0]] = gda_256[0]; g_ibuf_204[gia_232[0]] = gda_236[1]; if (MathAbs(gda_236[2] - gda_236[1]) / Point / (MathAbs(gda_236[2] - gda_236[3]) / Point + 0.0000001) <= 0.707) gda_256[0] = ld_184; else gda_256[0] = ld_192; gi_292 = 2; g_ibuf_196[gia_232[0]] = 44; g_ibuf_200[gia_252[0]] = gda_256[0]; g_ibuf_204[gia_232[0]] = gda_236[1]; if (Fill_Pattern == TRUE) { ObjectCreate("HarPat21mp", OBJ_TRIANGLE, 0, Time[gia_232[4]], gda_236[4], Time[gia_232[3]], gda_236[3], Time[gia_232[2]], gda_236[2]); ObjectCreate("HarPat22mp", OBJ_TRIANGLE, 0, Time[gia_232[2]], gda_236[2], Time[gia_232[1]], gda_236[1], Time[gia_244[0]], gda_256[0]); } ObjectCreate("HarPat0mp", OBJ_TREND, 0, Time[gia_232[4]], gda_236[4], Time[gia_232[3]], gda_236[3]); ObjectCreate("HarPat14mp", OBJ_TEXT, 0, Time[gia_232[4]], gda_236[4]); ObjectSetText("HarPat14mp", "x ", g_fontsize_148); ObjectCreate("HarPat15mp", OBJ_TREND, 0, Time[gia_232[4]], gda_236[4], Time[gia_232[2]], gda_236[2]); ObjectCreate("HarPat16mp", OBJ_TREND, 0, Time[gia_232[4]], gda_236[4], Time[gia_252[0]], gda_256[0]); ObjectCreate("HarPat17mp", OBJ_TEXT, 0, Time[gia_232[2] - (gia_232[2] - gia_232[4]) / 2], gda_236[2] - (gda_236[2] - gda_236[4]) / 2.0); ObjectCreate("HarPat18mp", OBJ_TEXT, 0, Time[gia_232[4] - (gia_232[4] - gia_252[0]) / 2], gda_236[4] - (gda_236[4] - gda_256[0]) / 2.0); ld_200 = MathAbs(gda_236[3] - gda_236[2]) / Point / (MathAbs(gda_236[3] - gda_236[4]) / Point); ld_208 = MathAbs(gda_256[0] - gda_236[3]) / Point / (MathAbs(gda_236[3] - gda_236[4]) / Point); ObjectSetText("HarPat17mp", DoubleToStr(ld_200, 3), g_fontsize_152); ObjectSetText("HarPat18mp", DoubleToStr(ld_208, 3), g_fontsize_152); if (gi_112 == TRUE) { ObjectCreate("HarPat19mp", OBJ_FIBO, 0, Time[gia_232[4]], gda_236[4], Time[gia_232[3]], gda_236[3]); ObjectDelete("HarPat20m"); ObjectDelete("HarPat20w"); } gs_308 = " Buy at point D : " + gda_256[0]; ObjectCreate("HarPat1mp", OBJ_TREND, 0, Time[gia_232[3]], gda_236[3], Time[gia_232[2]], gda_236[2]); ObjectCreate("HarPat2mp", OBJ_TREND, 0, Time[gia_232[2]], gda_236[2], Time[gia_232[1]], gda_236[1]); ObjectCreate("HarPat3mp", OBJ_TREND, 0, Time[gia_232[1]], gda_236[1], Time[gia_252[0]], gda_256[0]); ObjectCreate("HarPat4mp", OBJ_TREND, 0, Time[gia_232[3]], gda_236[3], Time[gia_232[1]], gda_236[1]); ObjectCreate("HarPat5mp", OBJ_TREND, 0, Time[gia_232[2]], gda_236[2], Time[gia_252[0]], gda_256[0]); ObjectCreate("HarPat6mp", OBJ_TEXT, 0, Time[gia_232[3] - (gia_232[3] - gia_232[1]) / 2], gda_236[3] - (gda_236[3] - gda_236[1]) / 2.0); ObjectCreate("HarPat7mp", OBJ_TEXT, 0, Time[gia_232[2] - (gia_232[2] - gia_252[0]) / 2], gda_236[2] - (gda_236[2] - gda_256[0]) / 2.0); ld_216 = MathAbs(gda_236[2] - gda_236[1]) / Point / (MathAbs(gda_236[2] - gda_236[3]) / Point + 0.0000001); ld_224 = MathAbs(gda_256[0] - gda_236[3]) / Point / (MathAbs(gda_236[2] - gda_236[3]) / Point + 0.0000001); ObjectSetText("HarPat6mp", DoubleToStr(ld_216, 3), g_fontsize_152); ObjectSetText("HarPat7mp", DoubleToStr(ld_224, 3), g_fontsize_152); if (gi_112 == TRUE) { ObjectCreate("HarPat8mp", OBJ_FIBO, 0, Time[gia_232[3]], gda_236[3], Time[gia_252[0]], gda_256[0]); ObjectCreate("HarPat9mp", OBJ_FIBO, 0, Time[gia_232[2]], gda_236[2], Time[gia_232[3]], gda_236[3]); } if (Show_Fibo_Levels == TRUE) { ObjectCreate("HarPat20mp", OBJ_FIBO, 0, Time[gia_232[1]], gda_236[1], Time[gia_252[0]], gda_256[0]); ObjectDelete("HarPat20m"); ObjectDelete("HarPat20w"); } ObjectCreate("HarPat10mp", OBJ_TEXT, 0, Time[gia_232[3]], gda_236[3]); ObjectSetText("HarPat10mp", "a ", g_fontsize_148); ObjectCreate("HarPat11mp", OBJ_TEXT, 0, Time[gia_232[2]], gda_236[2]); ObjectSetText("HarPat11mp", "b ", g_fontsize_148); ObjectCreate("HarPat12mp", OBJ_TEXT, 0, Time[gia_232[1]], gda_236[1]); ObjectSetText("HarPat12mp", "c ", g_fontsize_148); ObjectCreate("HarPat13mp", OBJ_TEXT, 0, Time[gia_252[0]], gda_256[0]); ObjectSetText("HarPat13mp", "d ", g_fontsize_148); if (High[iHighest(NULL, 0, MODE_HIGH, gia_232[1], 0)] > gda_236[1] && gi_108 == TRUE) { ObjectDelete("HarPat0mp"); ObjectDelete("HarPat1mp"); ObjectDelete("HarPat2mp"); ObjectDelete("HarPat3mp"); ObjectDelete("HarPat4mp"); ObjectDelete("HarPat5mp"); ObjectDelete("HarPat6mp"); ObjectDelete("HarPat7mp"); ObjectDelete("HarPat8mp"); ObjectDelete("HarPat9mp"); ObjectDelete("HarPat10mp"); ObjectDelete("HarPat11mp"); ObjectDelete("HarPat12mp"); ObjectDelete("HarPat13mp"); ObjectDelete("HarPat14mp"); ObjectDelete("HarPat15mp"); ObjectDelete("HarPat16mp"); ObjectDelete("HarPat17mp"); ObjectDelete("HarPat18mp"); ObjectDelete("HarPat19mp"); ObjectDelete("HarPat20mp"); ObjectDelete("HarPat21mp"); ObjectDelete("HarPat22mp"); gi_292 = 0; g_ibuf_196[gia_232[0]] = 0; } if ((gda_256[0] > Bid && gda_256[0] > Ask) || (gda_236[1] < Bid && gda_236[1] < Ask)) g_ibuf_196[gia_232[0]] = -1; } ld_232 = MathAbs(gda_236[2] - gda_236[3]); ld_240 = gda_236[2] + ld_232 / 100.0 * (gd_128 - 100.0); ld_248 = gda_236[2] + ld_232 / 100.0 * (gd_136 - 100.0); if (gda_236[2] > gda_236[3] && gda_236[1] < gda_236[2] && gda_236[1] >= gda_236[3] && gia_232[3] > gia_232[2] && gia_232[2] > gia_232[1] && gda_236[3] < gda_236[4] && gda_236[2] < gda_236[4] && gda_236[1] < gda_236[4] && gia_232[4] > gia_232[3]) { gia_244[0] = 0; g_ibuf_208[gia_232[0]] = 33; g_ibuf_212[gia_244[0]] = gda_248[0]; g_ibuf_216[gia_232[0]] = gda_236[1]; if (MathAbs(gda_236[2] - gda_236[1]) / Point / (MathAbs(gda_236[2] - gda_236[3]) / Point + 0.0000001) <= 0.707) gda_248[0] = ld_240; else gda_248[0] = ld_248; gi_296 = 2; g_ibuf_208[gia_232[0]] = 44; g_ibuf_212[gia_244[0]] = gda_248[0]; g_ibuf_216[gia_232[0]] = gda_236[1]; if (Fill_Pattern == TRUE) { ObjectCreate("HarPat21wp", OBJ_TRIANGLE, 0, Time[gia_232[4]], gda_236[4], Time[gia_232[3]], gda_236[3], Time[gia_232[2]], gda_236[2]); ObjectCreate("HarPat22wp", OBJ_TRIANGLE, 0, Time[gia_232[2]], gda_236[2], Time[gia_232[1]], gda_236[1], Time[gia_244[0]], gda_248[0]); } ObjectCreate("HarPat0wp", OBJ_TREND, 0, Time[gia_232[4]], gda_236[4], Time[gia_232[3]], gda_236[3]); ObjectCreate("HarPat14wp", OBJ_TEXT, 0, Time[gia_232[4]], gda_236[4]); ObjectSetText("HarPat14wp", "X ", g_fontsize_148); ObjectCreate("HarPat15wp", OBJ_TREND, 0, Time[gia_232[4]], gda_236[4], Time[gia_232[2]], gda_236[2]); ObjectCreate("HarPat16wp", OBJ_TREND, 0, Time[gia_232[4]], gda_236[4], Time[gia_244[0]], gda_248[0]); ObjectCreate("HarPat17wp", OBJ_TEXT, 0, Time[gia_232[2] - (gia_232[2] - gia_232[4]) / 2], gda_236[2] - (gda_236[2] - gda_236[4]) / 2.0); ObjectCreate("HarPat18wp", OBJ_TEXT, 0, Time[gia_232[4] - (gia_232[4] - gia_244[0]) / 2], gda_236[4] - (gda_236[4] - gda_248[0]) / 2.0); ld_256 = MathAbs(gda_236[2] - gda_236[3]) / Point / (MathAbs(gda_236[4] - gda_236[3]) / Point); ld_264 = MathAbs(gda_248[0] - gda_236[3]) / Point / (MathAbs(gda_236[4] - gda_236[3]) / Point); ObjectSetText("HarPat17wp", DoubleToStr(ld_256, 3), g_fontsize_152); ObjectSetText("HarPat18wp", DoubleToStr(ld_264, 3), g_fontsize_152); if (gi_112 == TRUE) { ObjectCreate("HarPat19wp", OBJ_FIBO, 0, Time[gia_232[3]], gda_236[3], Time[gia_232[4]], gda_236[4]); ObjectDelete("HarPat20m"); ObjectDelete("HarPat20w"); } gs_308 = " Sell at point D : " + gda_248[0]; ObjectCreate("HarPat1wp", OBJ_TREND, 0, Time[gia_232[3]], gda_236[3], Time[gia_232[2]], gda_236[2]); ObjectCreate("HarPat2wp", OBJ_TREND, 0, Time[gia_232[2]], gda_236[2], Time[gia_232[1]], gda_236[1]); ObjectCreate("HarPat3wp", OBJ_TREND, 0, Time[gia_232[1]], gda_236[1], Time[gia_244[0]], gda_248[0]); ObjectCreate("HarPat4wp", OBJ_TREND, 0, Time[gia_232[3]], gda_236[3], Time[gia_232[1]], gda_236[1]); ObjectCreate("HarPat5wp", OBJ_TREND, 0, Time[gia_232[2]], gda_236[2], Time[gia_244[0]], gda_248[0]); ObjectCreate("HarPat6wp", OBJ_TEXT, 0, Time[gia_232[3] - (gia_232[3] - gia_232[1]) / 2], gda_236[3] - (gda_236[3] - gda_236[1]) / 2.0); ObjectCreate("HarPat7wp", OBJ_TEXT, 0, Time[gia_232[2] - (gia_232[2] - gia_244[0]) / 2], gda_236[2] - (gda_236[2] - gda_248[0]) / 2.0); ld_272 = MathAbs(gda_236[2] - gda_236[1]) / Point / (MathAbs(gda_236[2] - gda_236[3]) / Point + 0.0000001); ld_280 = MathAbs(gda_248[0] - gda_236[3]) / Point / (MathAbs(gda_236[2] - gda_236[3]) / Point + 0.0000001); ObjectSetText("HarPat6wp", DoubleToStr(ld_272, 3), g_fontsize_152); ObjectSetText("HarPat7wp", DoubleToStr(ld_280, 3), g_fontsize_152); if (gi_112 == TRUE) { ObjectCreate("HarPat8wp", OBJ_FIBO, 0, Time[gia_232[3]], gda_236[3], Time[gia_244[0]], gda_248[0]); ObjectCreate("HarPat9wp", OBJ_FIBO, 0, Time[gia_232[2]], gda_236[2], Time[gia_232[3]], gda_236[3]); } if (Show_Fibo_Levels == TRUE) ObjectCreate("HarPat20wp", OBJ_FIBO, 0, Time[gia_232[1]], gda_236[1], Time[gia_244[0]], gda_248[0]); ObjectCreate("HarPat10wp", OBJ_TEXT, 0, Time[gia_232[3]], gda_236[3]); ObjectSetText("HarPat10wp", "A ", g_fontsize_148); ObjectCreate("HarPat11wp", OBJ_TEXT, 0, Time[gia_232[2]], gda_236[2]); ObjectSetText("HarPat11wp", "B ", g_fontsize_148); ObjectCreate("HarPat12wp", OBJ_TEXT, 0, Time[gia_232[1]], gda_236[1]); ObjectSetText("HarPat12wp", "C ", g_fontsize_148); ObjectCreate("HarPat13wp", OBJ_TEXT, 0, Time[gia_244[0]], gda_248[0]); ObjectSetText("HarPat13wp", "D ", g_fontsize_148); if (Low[iLowest(NULL, 0, MODE_LOW, gia_232[1], 0)] < gda_236[1] && gi_108 == TRUE) { ObjectDelete("HarPat0wp"); ObjectDelete("HarPat1wp"); ObjectDelete("HarPat2wp"); ObjectDelete("HarPat3wp"); ObjectDelete("HarPat4wp"); ObjectDelete("HarPat5wp"); ObjectDelete("HarPat6wp"); ObjectDelete("HarPat7wp"); ObjectDelete("HarPat8wp"); ObjectDelete("HarPat9wp"); ObjectDelete("HarPat10wp"); ObjectDelete("HarPat11wp"); ObjectDelete("HarPat12wp"); ObjectDelete("HarPat13wp"); ObjectDelete("HarPat14wp"); ObjectDelete("HarPat15wp"); ObjectDelete("HarPat16wp"); ObjectDelete("HarPat17wp"); ObjectDelete("HarPat18wp"); ObjectDelete("HarPat19wp"); ObjectDelete("HarPat20wp"); ObjectDelete("HarPat21wp"); ObjectDelete("HarPat22wp"); gi_296 = 0; g_ibuf_208[gia_232[0]] = 0; } if ((gda_248[0] < Bid && gda_248[0] < Ask) || (gda_236[1] > Bid && gda_236[1] > Ask)) g_ibuf_208[gia_232[0]] = -1; } ObjectSet("HarPat0mp", OBJPROP_RAY, FALSE); ObjectSet("HarPat1mp", OBJPROP_RAY, FALSE); ObjectSet("HarPat2mp", OBJPROP_RAY, FALSE); ObjectSet("HarPat3mp", OBJPROP_RAY, FALSE); ObjectSet("HarPat4mp", OBJPROP_RAY, FALSE); ObjectSet("HarPat5mp", OBJPROP_RAY, FALSE); ObjectSet("HarPat15mp", OBJPROP_RAY, FALSE); ObjectSet("HarPat16mp", OBJPROP_RAY, FALSE); ObjectSet("HarPat0mp", OBJPROP_COLOR, Orange); ObjectSet("HarPat1mp", OBJPROP_COLOR, Orange); ObjectSet("HarPat2mp", OBJPROP_COLOR, Orange); ObjectSet("HarPat3mp", OBJPROP_COLOR, Orange); ObjectSet("HarPat4mp", OBJPROP_COLOR, Blue); ObjectSet("HarPat5mp", OBJPROP_COLOR, Blue); ObjectSet("HarPat6mp", OBJPROP_COLOR, Blue); ObjectSet("HarPat7mp", OBJPROP_COLOR, Blue); ObjectSet("HarPat8mp", OBJPROP_COLOR, Green); ObjectSet("HarPat9mp", OBJPROP_COLOR, Green); ObjectSet("HarPat10mp", OBJPROP_COLOR, Black); ObjectSet("HarPat11mp", OBJPROP_COLOR, Black); ObjectSet("HarPat12mp", OBJPROP_COLOR, Black); ObjectSet("HarPat13mp", OBJPROP_COLOR, Black); ObjectSet("HarPat14mp", OBJPROP_COLOR, Black); ObjectSet("HarPat15mp", OBJPROP_COLOR, Blue); ObjectSet("HarPat16mp", OBJPROP_COLOR, Blue); ObjectSet("HarPat17mp", OBJPROP_COLOR, Blue); ObjectSet("HarPat18mp", OBJPROP_COLOR, Blue); ObjectSet("HarPat19mp", OBJPROP_COLOR, Green); ObjectSet("HarPat20mp", OBJPROP_COLOR, Blue); ObjectSet("HarPat21mp", OBJPROP_COLOR, Yellow); ObjectSet("HarPat22mp", OBJPROP_COLOR, Yellow); ObjectSet("HarPat0mp", OBJPROP_WIDTH, g_width_144); ObjectSet("HarPat1mp", OBJPROP_WIDTH, g_width_144); ObjectSet("HarPat2mp", OBJPROP_WIDTH, g_width_144); ObjectSet("HarPat3mp", OBJPROP_WIDTH, g_width_144); ObjectSet("HarPat4mp", OBJPROP_WIDTH, 0); ObjectSet("HarPat5mp", OBJPROP_WIDTH, 0); ObjectSet("HarPat4mp", OBJPROP_STYLE, STYLE_DOT); ObjectSet("HarPat5mp", OBJPROP_STYLE, STYLE_DOT); ObjectSet("HarPat8mp", OBJPROP_STYLE, STYLE_DASHDOTDOT); ObjectSet("HarPat9mp", OBJPROP_STYLE, STYLE_DOT); ObjectSet("HarPat15mp", OBJPROP_STYLE, STYLE_DOT); ObjectSet("HarPat16mp", OBJPROP_STYLE, STYLE_DOT); ObjectSet("HarPat19mp", OBJPROP_STYLE, STYLE_DASH); ObjectSet("HarPat20mp", OBJPROP_STYLE, STYLE_DOT); ObjectSet("HarPat8mp", OBJPROP_RAY, FALSE); ObjectSet("HarPat9mp", OBJPROP_RAY, FALSE); ObjectSet("HarPat19mp", OBJPROP_RAY, FALSE); ObjectSet("HarPat20mp", OBJPROP_RAY, FALSE); ObjectSet("HarPat0wp", OBJPROP_RAY, FALSE); ObjectSet("HarPat1wp", OBJPROP_RAY, FALSE); ObjectSet("HarPat2wp", OBJPROP_RAY, FALSE); ObjectSet("HarPat3wp", OBJPROP_RAY, FALSE); ObjectSet("HarPat4wp", OBJPROP_RAY, FALSE); ObjectSet("HarPat5wp", OBJPROP_RAY, FALSE); ObjectSet("HarPat15wp", OBJPROP_RAY, FALSE); ObjectSet("HarPat16wp", OBJPROP_RAY, FALSE); ObjectSet("HarPat0wp", OBJPROP_COLOR, DarkViolet); ObjectSet("HarPat1wp", OBJPROP_COLOR, DarkViolet); ObjectSet("HarPat2wp", OBJPROP_COLOR, DarkViolet); ObjectSet("HarPat3wp", OBJPROP_COLOR, DarkViolet); ObjectSet("HarPat4wp", OBJPROP_COLOR, Red); ObjectSet("HarPat5wp", OBJPROP_COLOR, Red); ObjectSet("HarPat6wp", OBJPROP_COLOR, Red); ObjectSet("HarPat7wp", OBJPROP_COLOR, Red); ObjectSet("HarPat8wp", OBJPROP_COLOR, Green); ObjectSet("HarPat9wp", OBJPROP_COLOR, Green); ObjectSet("HarPat10wp", OBJPROP_COLOR, Black); ObjectSet("HarPat11wp", OBJPROP_COLOR, Black); ObjectSet("HarPat12wp", OBJPROP_COLOR, Black); ObjectSet("HarPat13wp", OBJPROP_COLOR, Black); ObjectSet("HarPat14wp", OBJPROP_COLOR, Black); ObjectSet("HarPat15wp", OBJPROP_COLOR, Red); ObjectSet("HarPat16wp", OBJPROP_COLOR, Red); ObjectSet("HarPat17wp", OBJPROP_COLOR, Red); ObjectSet("HarPat18wp", OBJPROP_COLOR, Red); ObjectSet("HarPat19wp", OBJPROP_COLOR, Green); ObjectSet("HarPat20wp", OBJPROP_COLOR, Red); ObjectSet("HarPat21wp", OBJPROP_COLOR, Yellow); ObjectSet("HarPat22wp", OBJPROP_COLOR, Yellow); ObjectSet("HarPat0wp", OBJPROP_WIDTH, g_width_144); ObjectSet("HarPat1wp", OBJPROP_WIDTH, g_width_144); ObjectSet("HarPat2wp", OBJPROP_WIDTH, g_width_144); ObjectSet("HarPat3wp", OBJPROP_WIDTH, g_width_144); ObjectSet("HarPat4wp", OBJPROP_WIDTH, 0); ObjectSet("HarPat5wp", OBJPROP_WIDTH, 0); ObjectSet("HarPat4wp", OBJPROP_STYLE, STYLE_DOT); ObjectSet("HarPat5wp", OBJPROP_STYLE, STYLE_DOT); ObjectSet("HarPat8wp", OBJPROP_STYLE, STYLE_DASHDOTDOT); ObjectSet("HarPat9wp", OBJPROP_STYLE, STYLE_DOT); ObjectSet("HarPat15wp", OBJPROP_STYLE, STYLE_DOT); ObjectSet("HarPat16wp", OBJPROP_STYLE, STYLE_DOT); ObjectSet("HarPat19wp", OBJPROP_STYLE, STYLE_DASH); ObjectSet("HarPat20wp", OBJPROP_STYLE, STYLE_DOT); ObjectSet("HarPat8wp", OBJPROP_RAY, FALSE); ObjectSet("HarPat9wp", OBJPROP_RAY, FALSE); ObjectSet("HarPat19wp", OBJPROP_RAY, FALSE); ObjectSet("HarPat20wp", OBJPROP_RAY, FALSE); } if (gi_292 > 1 || gi_296 > 1 && gi_156 == 1 && MathMod(Minute(), Period()) == 0.0 && Seconds() <= 5 && gi_168 == FALSE) { Alert("Harmonic Pattern on: ", Symbol(), " graph : ", Period() + " " + TimeToStr(TimeCurrent()) + " " + gs_308); gi_168 = TRUE; if (gi_160 == TRUE) { SendMail("Harmonic Pattern", "Harmonic Pattern on " + Symbol() + " " + Period() + " " + TimeToStr(TimeCurrent()) + "\n\n " + gs_308); } } else if (Seconds() < 10) gi_168 = FALSE; gi_292 = 0; gi_296 = 0; gi_unused_300 = 0; gi_unused_304 = 0; ObjectsRedraw(); for (int l_count_288 = 0; l_count_288 < 23; l_count_288++) { for (int li_292 = 1; li_292 < gi_124; li_292++) { ld_296 = ObjectGet("HarPat" + l_count_288 + "m" + li_292, OBJPROP_PRICE1); ld_304 = ObjectGet("HarPat" + l_count_288 + "m" + li_292, OBJPROP_PRICE2); ld_312 = ObjectGet("HarPat" + l_count_288 + "w" + li_292, OBJPROP_PRICE1); ld_320 = ObjectGet("HarPat" + l_count_288 + "w" + li_292, OBJPROP_PRICE2); for (int li_328 = 1; li_328 < gi_124; li_328++) { ld_332 = ObjectGet("HarPat" + l_count_288 + "m" + ((li_292 + li_328)), OBJPROP_PRICE1); ld_340 = ObjectGet("HarPat" + l_count_288 + "m" + ((li_292 + li_328)), OBJPROP_PRICE2); ld_348 = ObjectGet("HarPat" + l_count_288 + "w" + ((li_292 + li_328)), OBJPROP_PRICE1); ld_356 = ObjectGet("HarPat" + l_count_288 + "w" + ((li_292 + li_328)), OBJPROP_PRICE2); if (ld_296 == ld_332 && ld_304 == ld_340) ObjectDelete("HarPat" + l_count_288 + "m" + li_292); if (ld_312 == ld_348 && ld_320 == ld_356) ObjectDelete("HarPat" + l_count_288 + "w" + li_292); } } } return (0); }