/* Generated by EX4-TO-MQ4 decompiler V4.0.224.1 [] Website: http://purebeam.biz E-mail : purebeam@gmail.com */ #property copyright "BPS Wolfe Wave Copyright © 2010 Barry Stander fx1@4africa.net" #property link "http://www.4Africa.net/4meta/" #property indicator_chart_window #property indicator_buffers 7 #property indicator_color6 Black #property indicator_color7 Black #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 Wolfe Wave Indicator Version 1.33 31/01/2030 Copyright © 2009 Barry Stander fx1@4africa.net , Pretoria , South Africa "; int gi_unused_84 = 300; int gi_88; bool gi_92 = TRUE; extern bool Show_ETA_EPA_lines = TRUE; extern bool Show_Old_Pattern = TRUE; extern bool Show_Old_Pattern_ETA_EPA = TRUE; int gi_108 = 50; int gi_112 = 1; double gd_116 = 161.0; double gd_124 = 127.0; int g_width_132 = 2; int g_fontsize_136 = 15; int gi_unused_140 = 10; bool gi_144 = FALSE; extern color indicator_color1 = Red; extern color indicator_color2 = Blue; extern color indicator_color3 = Yellow; extern color indicator_color4 = Orange; extern color indicator_color5 = DarkViolet; int gi_168; int gi_172 = 2; int g_count_176; double g_ibuf_180[]; double g_ibuf_184[]; double g_ibuf_188[]; double g_ibuf_192[]; double g_ibuf_196[]; double g_ibuf_200[]; double g_ibuf_204[]; int gia_208[101]; double gda_212[101]; int gia_216[2]; double gda_220[2]; int gia_224[2]; double gda_228[2]; int g_count_232; int g_count_236; void BPSwatermark(string as_unused_0) { string ls_8 = "www.4africa.net/4meta/ "; 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); } void TimeCheck(string as_0) { if (Hour() == Month() || Hour() == Month() + 12 || Hour() == Month() + 6) { Comment("\n\n" + as_0 + "Programmed by Barry Stander fx@4africa.net , Pretoria , South Africa Copyright © 2007 " + "\n\n" + "If you like this Indicator / Expert and want to show me your appreciation why not send me a E-mail gift certificate from Amazon.com to fx1@4africa.net" + "\n\n"); } } 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); } 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); return (0); } int DeleteObj_preD() { ObjectDelete("WWPat0mp"); ObjectDelete("WWPat1mp"); ObjectDelete("WWPat2mp"); ObjectDelete("WWPat3mp"); ObjectDelete("WWPat4mp"); ObjectDelete("WWPat5mp"); ObjectDelete("WWPat6mp"); ObjectDelete("WWPat7mp"); ObjectDelete("WWPat8mp"); ObjectDelete("WWPat9mp"); ObjectDelete("WWPat10mp"); ObjectDelete("WWPat11mp"); ObjectDelete("WWPat12mp"); ObjectDelete("WWPat0wp"); ObjectDelete("WWPat1wp"); ObjectDelete("WWPat2wp"); ObjectDelete("WWPat3wp"); ObjectDelete("WWPat4wp"); ObjectDelete("WWPat5wp"); ObjectDelete("WWPat6wp"); ObjectDelete("WWPat7wp"); ObjectDelete("WWPat8wp"); ObjectDelete("WWPat9wp"); ObjectDelete("WWPat10wp"); ObjectDelete("WWPat11wp"); ObjectDelete("WWPat12wp"); return (0); } int DeleteObj_old() { for (int l_count_0 = 0; l_count_0 <= gi_112; l_count_0++) { ObjectDelete("WWPat0m" + l_count_0); ObjectDelete("WWPat1m" + l_count_0); ObjectDelete("WWPat2m" + l_count_0); ObjectDelete("WWPat3m" + l_count_0); ObjectDelete("WWPat4m" + l_count_0); ObjectDelete("WWPat5m" + l_count_0); ObjectDelete("WWPat6m" + l_count_0); ObjectDelete("WWPat7m" + l_count_0); ObjectDelete("WWPat8m" + l_count_0); ObjectDelete("WWPat9m" + l_count_0); ObjectDelete("WWPat10m" + l_count_0); ObjectDelete("WWPat11m" + l_count_0); ObjectDelete("WWPat12m" + l_count_0); ObjectDelete("WWPat13m" + l_count_0); ObjectDelete("WWPat0w" + l_count_0); ObjectDelete("WWPat1w" + l_count_0); ObjectDelete("WWPat2w" + l_count_0); ObjectDelete("WWPat3w" + l_count_0); ObjectDelete("WWPat4w" + l_count_0); ObjectDelete("WWPat5w" + l_count_0); ObjectDelete("WWPat6w" + l_count_0); ObjectDelete("WWPat7w" + l_count_0); ObjectDelete("WWPat8w" + l_count_0); ObjectDelete("WWPat9w" + l_count_0); ObjectDelete("WWPat10w" + l_count_0); ObjectDelete("WWPat11w" + l_count_0); ObjectDelete("WWPat12w" + l_count_0); ObjectDelete("WWPat13w" + l_count_0); } return (0); } int init() { Comment(gs_76); Web(21); IndicatorBuffers(7); 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 (gi_144 == TRUE) SetIndexStyle(0, DRAW_ARROW, EMPTY, 5, Red); SetIndexBuffer(0, g_ibuf_180); SetIndexBuffer(1, g_ibuf_184); SetIndexBuffer(2, g_ibuf_188); SetIndexBuffer(3, g_ibuf_192); SetIndexBuffer(4, g_ibuf_196); SetIndexBuffer(5, g_ibuf_200); SetIndexBuffer(6, g_ibuf_204); SetIndexLabel(0, "P"); SetIndexLabel(1, "mpb"); SetIndexLabel(2, "wps"); SetIndexLabel(3, "MP4"); SetIndexLabel(4, "WP4"); SetIndexLabel(5, "MP3"); SetIndexLabel(6, "WP3"); DeleteObj_preD(); DeleteObj_old(); return (0); } int deinit() { 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; int li_136; double ld_140; int li_148; double ld_152; double ld_160; double ld_168; int li_176; double ld_180; int li_188; double ld_192; double ld_200; double ld_208; double ld_216; double ld_224; double ld_232; int li_240; double ld_248; double ld_256; double ld_264; double ld_272; double ld_280; double ld_288; int li_296; double ld_308; double ld_316; double ld_324; double ld_332; double ld_344; double ld_352; double ld_360; double ld_368; TimeCheck(gs_76); BPSwatermark(gs_76); 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"); return (0); } g_count_176 = 0; for (int l_count_0 = 0; l_count_0 < gi_108; l_count_0++) { for (int l_count_4 = 0; l_count_4 < gi_108; l_count_4++) { ld_8 = ObjectGet("WWPat1m" + l_count_0, OBJPROP_PRICE1); ld_16 = ObjectGet("WWPat1m" + ((l_count_0 + l_count_4)), OBJPROP_PRICE1); ld_24 = ObjectGet("WWPat1w" + l_count_0, OBJPROP_PRICE1); ld_32 = ObjectGet("WWPat1w" + ((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_176++; } } if (g_count_176 > 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; if (gi_108 > 500) gi_108 = 500; gi_168 = 3 * gi_108; int l_ind_counted_84 = IndicatorCounted(); int li_76 = gi_168 - gi_172; if (li_76 > gi_172) li_76 = li_76 - gi_172 - 1; if (l_ind_counted_84 == 0) { DeleteObj_preD(); DeleteObj_old(); } while (li_76 > gi_172 - 1) { g_ibuf_180[li_76] = 0; ld_68 = Low[li_76]; for (int li_80 = 1; li_80 <= gi_172; 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_180[li_40] = ld_52; gda_212[0] = g_ibuf_180[li_40]; gia_208[0] = li_40; li_48 = 2; } break; case 2: if (ld_68 > ld_60) { g_ibuf_180[li_44] = ld_60; gda_212[0] = g_ibuf_180[li_44]; gia_208[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_172; 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_180[li_40] = ld_52; gda_212[0] = g_ibuf_180[li_40]; gia_208[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_180[li_44] = ld_60; gda_212[0] = g_ibuf_180[li_44]; gia_208[0] = li_44; li_48 = 1; } } } ld_52 = ld_68; li_40 = li_76; } if (gda_212[0] > 0.0 && gda_212[0] != gda_212[1]) { for (int li_100 = gi_108; li_100 >= 0; li_100--) { gda_212[li_100] = gda_212[li_100 - 1]; gia_208[li_100] = gia_208[li_100 - 1]; } } li_76--; } if (li_48 == 1) { g_ibuf_180[li_40] = ld_52; gda_212[0] = g_ibuf_180[li_40]; gia_208[0] = li_40; } else { g_ibuf_180[li_44] = ld_60; gda_212[0] = g_ibuf_180[li_44]; gia_208[0] = li_44; } if (gda_212[0] > 0.0 && gda_212[0] != gda_212[1]) { for (int li_104 = gi_108; li_104 >= 0; li_104--) { gda_212[li_104] = gda_212[li_104 - 1]; gia_208[li_104] = gia_208[li_104 - 1]; } } g_count_232 = 0; g_count_236 = 0; for (int li_108 = 1; li_108 < gi_108; li_108++) { if (Show_Old_Pattern == TRUE) { ld_112 = gda_212[li_108 - 1] - (gda_212[li_108 - 0]); ld_120 = gda_212[li_108 - 3] - (gda_212[li_108 - 2]); if (gda_212[li_108 - 0] < gda_212[li_108 - 1] && gda_212[li_108 - 2] < gda_212[li_108 - 0] && gda_212[li_108 - 3] > gda_212[li_108 - 2] && gda_212[li_108 - 4] < gda_212[li_108 - 2] && gda_212[li_108 - 4] > 0.0 && gda_212[li_108 - 3] < gda_212[li_108 - 1] && gia_208[li_108 - 4] < gia_208[li_108 - 3] && gia_208[li_108 - 3] < gia_208[li_108 - 2] && gia_208[li_108 - 2] < gia_208[li_108 - 1] && gia_208[li_108 - 1] < gia_208[li_108 - 0] && ld_112 > ld_120 + 2.0 * Point) { g_count_232++; if (g_count_232 > gi_112 - 1) g_count_232 = 0; ObjectCreate("WWPat0m" + g_count_232, OBJ_TREND, 0, Time[gia_208[li_108 - 0]], gda_212[li_108 - 0], Time[gia_208[li_108 - 1]], gda_212[li_108 - 1]); ObjectCreate("WWPat6m" + g_count_232, OBJ_TEXT, 0, Time[gia_208[li_108 - 0]], gda_212[li_108 - 0]); ObjectSetText("WWPat6m" + g_count_232, " 1 ", g_fontsize_136); ObjectCreate("WWPat1m" + g_count_232, OBJ_TREND, 0, Time[gia_208[li_108 - 1]], gda_212[li_108 - 1], Time[gia_208[li_108 - 2]], gda_212[li_108 - 2]); ObjectCreate("WWPat2m" + g_count_232, OBJ_TREND, 0, Time[gia_208[li_108 - 2]], gda_212[li_108 - 2], Time[gia_208[li_108 - 3]], gda_212[li_108 - 3]); ObjectCreate("WWPat3m" + g_count_232, OBJ_TREND, 0, Time[gia_208[li_108 - 3]], gda_212[li_108 - 3], Time[gia_208[li_108 - 4]], gda_212[li_108 - 4]); ObjectCreate("WWPat7m" + g_count_232, OBJ_TEXT, 0, Time[gia_208[li_108 - 4]], gda_212[li_108 - 4]); ObjectSetText("WWPat7m" + g_count_232, " 5 ", g_fontsize_136); ObjectCreate("WWPat8m" + g_count_232, OBJ_TEXT, 0, Time[gia_208[li_108 - 3]], gda_212[li_108 - 3]); ObjectSetText("WWPat8m" + g_count_232, " 4 ", g_fontsize_136); ObjectCreate("WWPat9m" + g_count_232, OBJ_TEXT, 0, Time[gia_208[li_108 - 2]], gda_212[li_108 - 2]); ObjectSetText("WWPat9m" + g_count_232, " 3 ", g_fontsize_136); ObjectCreate("WWPat10m" + g_count_232, OBJ_TEXT, 0, Time[gia_208[li_108 - 1]], gda_212[li_108 - 1]); ObjectSetText("WWPat10m" + g_count_232, " 2 ", g_fontsize_136); if (Show_Old_Pattern_ETA_EPA == TRUE) { ObjectCreate("WWPat4m" + g_count_232, OBJ_TREND, 0, Time[gia_208[li_108 - 0]], gda_212[li_108 - 0], Time[gia_208[li_108 - 2]], gda_212[li_108 - 2]); ObjectCreate("WWPat5m" + g_count_232, OBJ_TREND, 0, Time[gia_208[li_108 - 0]], gda_212[li_108 - 0], Time[gia_208[li_108 - 3]], gda_212[li_108 - 3]); ObjectCreate("WWPat11m" + g_count_232, OBJ_TREND, 0, Time[gia_208[li_108 - 1]], gda_212[li_108 - 1], Time[gia_208[li_108 - 3]], gda_212[li_108 - 3]); ld_128 = gda_212[li_108 - 1] - (gda_212[li_108 - 3]); li_136 = gia_208[li_108 - 1] - (gia_208[li_108 - 3]); if (gia_208[li_108 - 2] - li_136 >= 0) ObjectCreate("WWPat12m" + g_count_232, OBJ_TREND, 0, Time[gia_208[li_108 - 2]], gda_212[li_108 - 2], Time[gia_208[li_108 - 2] - li_136], gda_212[li_108 - 2] - ld_128); ld_140 = gda_212[li_108 - 0] - (gda_212[li_108 - 2]); li_148 = gia_208[li_108 - 0] - (gia_208[li_108 - 2]); if (gia_208[li_108 - 2] - li_148 > 0) ObjectCreate("WWPat13m" + g_count_232, OBJ_TRIANGLE, 0, Time[gia_208[li_108 - 2]], gda_212[li_108 - 2], Time[gia_208[li_108 - 2] - li_136], gda_212[li_108 - 2] - ld_128, Time[gia_208[li_108 - 2] - li_148], gda_212[li_108 - 2] - ld_140); } } ld_152 = gda_212[li_108 - 0] - (gda_212[li_108 - 1]); ld_160 = gda_212[li_108 - 2] - (gda_212[li_108 - 3]); if (gda_212[li_108 - 0] > gda_212[li_108 - 1] && gda_212[li_108 - 2] > gda_212[li_108 - 0] && gda_212[li_108 - 3] < gda_212[li_108 - 2] && gda_212[li_108 - 4] > gda_212[li_108 - 2] && gda_212[li_108 - 4] > 0.0 && gda_212[li_108 - 3] > gda_212[li_108 - 1] && gia_208[li_108 - 4] < gia_208[li_108 - 3] && gia_208[li_108 - 3] < gia_208[li_108 - 2] && gia_208[li_108 - 2] < gia_208[li_108 - 1] && gia_208[li_108 - 1] < gia_208[li_108 - 0] && ld_152 > ld_160 + 2.0 * Point) { g_count_236++; if (g_count_236 > gi_112 - 1) g_count_236 = 0; ObjectCreate("WWPat0w" + g_count_236, OBJ_TREND, 0, Time[gia_208[li_108 - 0]], gda_212[li_108 - 0], Time[gia_208[li_108 - 1]], gda_212[li_108 - 1]); ObjectCreate("WWPat6w" + g_count_236, OBJ_TEXT, 0, Time[gia_208[li_108 - 0]], gda_212[li_108 - 0]); ObjectSetText("WWPat6w" + g_count_236, "1 ", g_fontsize_136); ObjectCreate("WWPat1w" + g_count_236, OBJ_TREND, 0, Time[gia_208[li_108 - 1]], gda_212[li_108 - 1], Time[gia_208[li_108 - 2]], gda_212[li_108 - 2]); ObjectCreate("WWPat2w" + g_count_236, OBJ_TREND, 0, Time[gia_208[li_108 - 2]], gda_212[li_108 - 2], Time[gia_208[li_108 - 3]], gda_212[li_108 - 3]); ObjectCreate("WWPat3w" + g_count_236, OBJ_TREND, 0, Time[gia_208[li_108 - 3]], gda_212[li_108 - 3], Time[gia_208[li_108 - 4]], gda_212[li_108 - 4]); ObjectCreate("WWPat7w" + g_count_236, OBJ_TEXT, 0, Time[gia_208[li_108 - 1]], gda_212[li_108 - 1]); ObjectSetText("WWPat7w" + g_count_236, "2 ", g_fontsize_136); ObjectCreate("WWPat8w" + g_count_236, OBJ_TEXT, 0, Time[gia_208[li_108 - 2]], gda_212[li_108 - 2]); ObjectSetText("WWPat8w" + g_count_236, "3 ", g_fontsize_136); ObjectCreate("WWPat9w" + g_count_236, OBJ_TEXT, 0, Time[gia_208[li_108 - 3]], gda_212[li_108 - 3]); ObjectSetText("WWPat9w" + g_count_236, "4 ", g_fontsize_136); ObjectCreate("WWPat10w" + g_count_236, OBJ_TEXT, 0, Time[gia_208[li_108 - 4]], gda_212[li_108 - 4]); ObjectSetText("WWPat10w" + g_count_236, "5 ", g_fontsize_136); if (Show_Old_Pattern_ETA_EPA == TRUE) { ObjectCreate("WWPat4w" + g_count_236, OBJ_TREND, 0, Time[gia_208[li_108 - 0]], gda_212[li_108 - 0], Time[gia_208[li_108 - 2]], gda_212[li_108 - 2]); ObjectCreate("WWPat5w" + g_count_236, OBJ_TREND, 0, Time[gia_208[li_108 - 0]], gda_212[li_108 - 0], Time[gia_208[li_108 - 3]], gda_212[li_108 - 3]); ObjectCreate("WWPat11w" + g_count_236, OBJ_TREND, 0, Time[gia_208[li_108 - 1]], gda_212[li_108 - 1], Time[gia_208[li_108 - 3]], gda_212[li_108 - 3]); ld_168 = gda_212[li_108 - 3] - (gda_212[li_108 - 1]); li_176 = gia_208[li_108 - 1] - (gia_208[li_108 - 3]); if (gia_208[li_108 - 2] - li_176 >= 0) ObjectCreate("WWPat12w" + g_count_236, OBJ_TREND, 0, Time[gia_208[li_108 - 2]], gda_212[li_108 - 2], Time[gia_208[li_108 - 2] - li_176], gda_212[li_108 - 2] + ld_168); ld_180 = gda_212[li_108 - 2] - (gda_212[li_108 - 0]); li_188 = gia_208[li_108 - 0] - (gia_208[li_108 - 2]); if (gia_208[li_108 - 2] - li_188 > 0) { ObjectCreate("WWPat13w" + g_count_236, OBJ_TRIANGLE, 0, Time[gia_208[li_108 - 2]], gda_212[li_108 - 2], Time[gia_208[li_108 - 2] - li_176], gda_212[li_108 - 2] + ld_168, Time[gia_208[li_108 - 2] - li_188], gda_212[li_108 - 2] + ld_180); } } } ObjectSet("WWPat0m" + g_count_232, OBJPROP_RAY, FALSE); ObjectSet("WWPat1m" + g_count_232, OBJPROP_RAY, FALSE); ObjectSet("WWPat2m" + g_count_232, OBJPROP_RAY, FALSE); ObjectSet("WWPat3m" + g_count_232, OBJPROP_RAY, FALSE); ObjectSet("WWPat4m" + g_count_232, OBJPROP_RAY, TRUE); ObjectSet("WWPat5m" + g_count_232, OBJPROP_RAY, TRUE); ObjectSet("WWPat11m" + g_count_232, OBJPROP_RAY, TRUE); ObjectSet("WWPat12m" + g_count_232, OBJPROP_RAY, TRUE); ObjectSet("WWPat0m" + g_count_232, OBJPROP_COLOR, indicator_color1); ObjectSet("WWPat1m" + g_count_232, OBJPROP_COLOR, indicator_color1); ObjectSet("WWPat2m" + g_count_232, OBJPROP_COLOR, indicator_color1); ObjectSet("WWPat3m" + g_count_232, OBJPROP_COLOR, indicator_color1); ObjectSet("WWPat4m" + g_count_232, OBJPROP_COLOR, indicator_color2); ObjectSet("WWPat5m" + g_count_232, OBJPROP_COLOR, indicator_color2); ObjectSet("WWPat6m" + g_count_232, OBJPROP_COLOR, indicator_color5); ObjectSet("WWPat7m" + g_count_232, OBJPROP_COLOR, indicator_color5); ObjectSet("WWPat8m" + g_count_232, OBJPROP_COLOR, indicator_color5); ObjectSet("WWPat9m" + g_count_232, OBJPROP_COLOR, indicator_color5); ObjectSet("WWPat10m" + g_count_232, OBJPROP_COLOR, indicator_color5); ObjectSet("WWPat11m" + g_count_232, OBJPROP_COLOR, indicator_color2); ObjectSet("WWPat12m" + g_count_232, OBJPROP_COLOR, indicator_color2); ObjectSet("WWPat13m" + g_count_232, OBJPROP_COLOR, indicator_color3); ObjectSet("WWPat0m" + g_count_232, OBJPROP_WIDTH, g_width_132); ObjectSet("WWPat1m" + g_count_232, OBJPROP_WIDTH, g_width_132); ObjectSet("WWPat2m" + g_count_232, OBJPROP_WIDTH, g_width_132); ObjectSet("WWPat3m" + g_count_232, OBJPROP_WIDTH, g_width_132); ObjectSet("WWPat4m" + g_count_232, OBJPROP_WIDTH, g_width_132); ObjectSet("WWPat5m" + g_count_232, OBJPROP_WIDTH, g_width_132 - 1); ObjectSet("WWPat11m" + g_count_232, OBJPROP_WIDTH, g_width_132); ObjectSet("WWPat12m" + g_count_232, OBJPROP_WIDTH, g_width_132 - 1); ObjectSet("WWPat4m" + g_count_232, OBJPROP_STYLE, STYLE_DOT); ObjectSet("WWPat5m" + g_count_232, OBJPROP_STYLE, STYLE_DOT); ObjectSet("WWPat11m" + g_count_232, OBJPROP_STYLE, STYLE_DOT); ObjectSet("WWPat12m" + g_count_232, OBJPROP_STYLE, STYLE_DOT); ObjectSet("WWPat0w" + g_count_236, OBJPROP_RAY, FALSE); ObjectSet("WWPat1w" + g_count_236, OBJPROP_RAY, FALSE); ObjectSet("WWPat2w" + g_count_236, OBJPROP_RAY, FALSE); ObjectSet("WWPat3w" + g_count_236, OBJPROP_RAY, FALSE); ObjectSet("WWPat4w" + g_count_236, OBJPROP_RAY, TRUE); ObjectSet("WWPat5w" + g_count_236, OBJPROP_RAY, TRUE); ObjectSet("WWPat11w" + g_count_236, OBJPROP_RAY, TRUE); ObjectSet("WWPat12w" + g_count_236, OBJPROP_RAY, TRUE); ObjectSet("WWPat0w" + g_count_236, OBJPROP_COLOR, indicator_color2); ObjectSet("WWPat1w" + g_count_236, OBJPROP_COLOR, indicator_color2); ObjectSet("WWPat2w" + g_count_236, OBJPROP_COLOR, indicator_color2); ObjectSet("WWPat3w" + g_count_236, OBJPROP_COLOR, indicator_color2); ObjectSet("WWPat4w" + g_count_236, OBJPROP_COLOR, indicator_color1); ObjectSet("WWPat5w" + g_count_236, OBJPROP_COLOR, indicator_color1); ObjectSet("WWPat11w" + g_count_236, OBJPROP_COLOR, indicator_color1); ObjectSet("WWPat12w" + g_count_236, OBJPROP_COLOR, indicator_color1); ObjectSet("WWPat13w" + g_count_236, OBJPROP_COLOR, indicator_color3); ObjectSet("WWPat7w" + g_count_236, OBJPROP_COLOR, indicator_color3); ObjectSet("WWPat8w" + g_count_236, OBJPROP_COLOR, indicator_color3); ObjectSet("WWPat9w" + g_count_236, OBJPROP_COLOR, indicator_color3); ObjectSet("WWPat10w" + g_count_236, OBJPROP_COLOR, indicator_color3); ObjectSet("WWPat6w" + g_count_236, OBJPROP_COLOR, indicator_color3); ObjectSet("WWPat0w" + g_count_236, OBJPROP_WIDTH, g_width_132); ObjectSet("WWPat1w" + g_count_236, OBJPROP_WIDTH, g_width_132); ObjectSet("WWPat2w" + g_count_236, OBJPROP_WIDTH, g_width_132); ObjectSet("WWPat3w" + g_count_236, OBJPROP_WIDTH, g_width_132); ObjectSet("WWPat4w" + g_count_236, OBJPROP_WIDTH, g_width_132); ObjectSet("WWPat5w" + g_count_236, OBJPROP_WIDTH, g_width_132 - 1); ObjectSet("WWPat11w" + g_count_236, OBJPROP_WIDTH, g_width_132); ObjectSet("WWPat12w" + g_count_236, OBJPROP_WIDTH, g_width_132 - 1); ObjectSet("WWPat4w" + g_count_236, OBJPROP_STYLE, STYLE_DOT); ObjectSet("WWPat5w" + g_count_236, OBJPROP_STYLE, STYLE_DOT); ObjectSet("WWPat11w" + g_count_236, OBJPROP_STYLE, STYLE_DOT); ObjectSet("WWPat12w" + g_count_236, OBJPROP_STYLE, STYLE_DOT); } } if (gi_92 == TRUE) { ld_192 = MathAbs(gda_212[3] - gda_212[2]); ld_200 = gda_212[2] - ld_192 / 100.0 * (gd_116 - 100.0); ld_208 = gda_212[2] - ld_192 / 100.0 * (gd_124 - 100.0); ld_216 = gda_212[3] - gda_212[4]; ld_224 = gda_212[1] - gda_212[2]; if (gda_212[4] < gda_212[3] && gda_212[1] < gda_212[3] && gda_212[2] < gda_212[3] && gda_212[2] < gda_212[4] && gda_212[1] > gda_212[2] && gda_212[1] > gda_212[4] && gia_208[1] < gia_208[2] && gia_208[2] < gia_208[3] && gia_208[3] < gia_208[4] && ld_216 > ld_224) { gia_224[0] = 0; if (MathAbs(gda_212[2] - gda_212[1]) / Point / (MathAbs(gda_212[2] - gda_212[3]) / Point + 0.0000001) <= 0.707) gda_228[0] = ld_200; else gda_228[0] = ld_208; ObjectCreate("WWPat0mp", OBJ_TREND, 0, Time[gia_208[4]], gda_212[4], Time[gia_208[3]], gda_212[3]); ObjectCreate("WWPat6mp", OBJ_TEXT, 0, Time[gia_208[4]], gda_212[4]); ObjectSetText("WWPat6mp", " 1 ", g_fontsize_136); ObjectCreate("WWPat1mp", OBJ_TREND, 0, Time[gia_208[3]], gda_212[3], Time[gia_208[2]], gda_212[2]); ObjectCreate("WWPat2mp", OBJ_TREND, 0, Time[gia_208[2]], gda_212[2], Time[gia_208[1]], gda_212[1]); ObjectCreate("WWPat3mp", OBJ_TREND, 0, Time[gia_208[1]], gda_212[1], Time[gia_224[0]], gda_228[0]); ObjectCreate("WWPat7mp", OBJ_TEXT, 0, Time[gia_208[3]], gda_212[3]); ObjectSetText("WWPat7mp", "2 ", g_fontsize_136); ObjectCreate("WWPat8mp", OBJ_TEXT, 0, Time[gia_208[2]], gda_212[2]); ObjectSetText("WWPat8mp", "3 ", g_fontsize_136); ObjectCreate("WWPat9mp", OBJ_TEXT, 0, Time[gia_208[1]], gda_212[1]); ObjectSetText("WWPat9mp", "4 ", g_fontsize_136); ObjectCreate("WWPat10mp", OBJ_TEXT, 0, Time[gia_224[0]], gda_228[0]); ObjectSetText("WWPat10mp", "5 ", g_fontsize_136); if (Show_ETA_EPA_lines == TRUE) { ObjectCreate("WWPat4mp", OBJ_TREND, 0, Time[gia_208[4]], gda_212[4], Time[gia_208[2]], gda_212[2]); ObjectCreate("WWPat5mp", OBJ_TREND, 0, Time[gia_208[4]], gda_212[4], Time[gia_208[1]], gda_212[1]); ObjectCreate("WWPat11mp", OBJ_TREND, 0, Time[gia_208[3]], gda_212[3], Time[gia_208[1]], gda_212[1]); ld_232 = gda_212[3] - gda_212[1]; li_240 = gia_208[3] - gia_208[1]; if (gia_208[2] - li_240 >= 0) ObjectCreate("WWPat12mp", OBJ_TREND, 0, Time[gia_208[2]], gda_212[2], Time[gia_208[2] - li_240], gda_212[2] - ld_232); if (High[iHighest(NULL, 0, MODE_HIGH, gia_208[1], 0)] < gda_212[1]) { for (int li_244 = gia_208[1]; li_244 >= 0; li_244--) { g_ibuf_184[li_244] = 1; g_ibuf_192[li_244] = gda_212[1]; g_ibuf_200[li_244] = gda_212[2]; } } } } ld_248 = MathAbs(gda_212[2] - gda_212[3]); ld_256 = gda_212[2] + ld_248 / 100.0 * (gd_116 - 100.0); ld_264 = gda_212[2] + ld_248 / 100.0 * (gd_124 - 100.0); ld_272 = gda_212[4] - gda_212[3]; ld_280 = gda_212[2] - gda_212[1]; if (gda_212[4] > gda_212[3] && gda_212[1] > gda_212[3] && gda_212[2] > gda_212[3] && gda_212[2] > gda_212[4] && gda_212[1] < gda_212[2] && gda_212[1] < gda_212[4] && gia_208[1] < gia_208[2] && gia_208[2] < gia_208[3] && gia_208[3] < gia_208[4] && ld_272 > ld_280) { gia_216[0] = 0; if (MathAbs(gda_212[2] - gda_212[1]) / Point / (MathAbs(gda_212[2] - gda_212[3]) / Point + 0.0000001) <= 0.707) gda_220[0] = ld_256; else gda_220[0] = ld_264; ObjectCreate("WWPat0wp", OBJ_TREND, 0, Time[gia_208[4]], gda_212[4], Time[gia_208[3]], gda_212[3]); ObjectCreate("WWPat6wp", OBJ_TEXT, 0, Time[gia_208[4]], gda_212[4]); ObjectSetText("WWPat6wp", "1 ", g_fontsize_136); ObjectCreate("WWPat1wp", OBJ_TREND, 0, Time[gia_208[3]], gda_212[3], Time[gia_208[2]], gda_212[2]); ObjectCreate("WWPat2wp", OBJ_TREND, 0, Time[gia_208[2]], gda_212[2], Time[gia_208[1]], gda_212[1]); ObjectCreate("WWPat3wp", OBJ_TREND, 0, Time[gia_208[1]], gda_212[1], Time[gia_216[0]], gda_220[0]); ObjectCreate("WWPat7wp", OBJ_TEXT, 0, Time[gia_208[3]], gda_212[3]); ObjectSetText("WWPat7wp", "2 ", g_fontsize_136); ObjectCreate("WWPat8wp", OBJ_TEXT, 0, Time[gia_208[2]], gda_212[2]); ObjectSetText("WWPat8wp", "3 ", g_fontsize_136); ObjectCreate("WWPat9wp", OBJ_TEXT, 0, Time[gia_208[1]], gda_212[1]); ObjectSetText("WWPat9wp", "4 ", g_fontsize_136); ObjectCreate("WWPat10wp", OBJ_TEXT, 0, Time[gia_216[0]], gda_220[0]); ObjectSetText("WWPat10wp", "5 ", g_fontsize_136); if (Show_ETA_EPA_lines == TRUE) { ObjectCreate("WWPat4wp", OBJ_TREND, 0, Time[gia_208[4]], gda_212[4], Time[gia_208[2]], gda_212[2]); ObjectCreate("WWPat5wp", OBJ_TREND, 0, Time[gia_208[4]], gda_212[4], Time[gia_208[1]], gda_212[1]); ObjectCreate("WWPat11wp", OBJ_TREND, 0, Time[gia_208[3]], gda_212[3], Time[gia_208[1]], gda_212[1]); ld_288 = gda_212[1] - gda_212[3]; li_296 = gia_208[3] - gia_208[1]; if (gia_208[2] - li_296 >= 0) ObjectCreate("WWPat12wp", OBJ_TREND, 0, Time[gia_208[2]], gda_212[2], Time[gia_208[2] - li_296], gda_212[2] + ld_288); if (Low[iLowest(NULL, 0, MODE_LOW, gia_208[1], 0)] > gda_212[1]) { for (li_244 = gia_208[1]; li_244 >= 0; li_244--) { g_ibuf_188[li_244] = 1; g_ibuf_196[li_244] = gda_212[1]; g_ibuf_204[li_244] = gda_212[2]; } } } } ObjectSet("WWPat0mp", OBJPROP_RAY, FALSE); ObjectSet("WWPat1mp", OBJPROP_RAY, FALSE); ObjectSet("WWPat2mp", OBJPROP_RAY, FALSE); ObjectSet("WWPat3mp", OBJPROP_RAY, FALSE); ObjectSet("WWPat4mp", OBJPROP_RAY, TRUE); ObjectSet("WWPat5mp", OBJPROP_RAY, TRUE); ObjectSet("WWPat11mp", OBJPROP_RAY, TRUE); ObjectSet("WWPat12mp", OBJPROP_RAY, TRUE); ObjectSet("WWPat0mp", OBJPROP_COLOR, indicator_color4); ObjectSet("WWPat1mp", OBJPROP_COLOR, indicator_color4); ObjectSet("WWPat2mp", OBJPROP_COLOR, indicator_color4); ObjectSet("WWPat3mp", OBJPROP_COLOR, indicator_color4); ObjectSet("WWPat4mp", OBJPROP_COLOR, indicator_color2); ObjectSet("WWPat5mp", OBJPROP_COLOR, indicator_color2); ObjectSet("WWPat11mp", OBJPROP_COLOR, indicator_color2); ObjectSet("WWPat12mp", OBJPROP_COLOR, indicator_color2); ObjectSet("WWPat7mp", OBJPROP_COLOR, indicator_color3); ObjectSet("WWPat8mp", OBJPROP_COLOR, indicator_color3); ObjectSet("WWPat9mp", OBJPROP_COLOR, indicator_color3); ObjectSet("WWPat10mp", OBJPROP_COLOR, indicator_color3); ObjectSet("WWPat6mp", OBJPROP_COLOR, indicator_color3); ObjectSet("WWPat0mp", OBJPROP_WIDTH, g_width_132); ObjectSet("WWPat1mp", OBJPROP_WIDTH, g_width_132); ObjectSet("WWPat2mp", OBJPROP_WIDTH, g_width_132); ObjectSet("WWPat3mp", OBJPROP_WIDTH, g_width_132); ObjectSet("WWPat4mp", OBJPROP_WIDTH, g_width_132); ObjectSet("WWPat5mp", OBJPROP_WIDTH, g_width_132 - 1); ObjectSet("WWPat11mp", OBJPROP_WIDTH, g_width_132); ObjectSet("WWPat12mp", OBJPROP_WIDTH, g_width_132 - 1); ObjectSet("WWPat4mp", OBJPROP_STYLE, STYLE_DOT); ObjectSet("WWPat5mp", OBJPROP_STYLE, STYLE_DOT); ObjectSet("WWPat11mp", OBJPROP_STYLE, STYLE_DOT); ObjectSet("WWPat12mp", OBJPROP_STYLE, STYLE_DOT); ObjectSet("WWPat0wp", OBJPROP_RAY, FALSE); ObjectSet("WWPat1wp", OBJPROP_RAY, FALSE); ObjectSet("WWPat2wp", OBJPROP_RAY, FALSE); ObjectSet("WWPat3wp", OBJPROP_RAY, FALSE); ObjectSet("WWPat4wp", OBJPROP_RAY, TRUE); ObjectSet("WWPat5wp", OBJPROP_RAY, TRUE); ObjectSet("WWPat11wp", OBJPROP_RAY, TRUE); ObjectSet("WWPat12wp", OBJPROP_RAY, TRUE); ObjectSet("WWPat0wp", OBJPROP_COLOR, indicator_color5); ObjectSet("WWPat1wp", OBJPROP_COLOR, indicator_color5); ObjectSet("WWPat2wp", OBJPROP_COLOR, indicator_color5); ObjectSet("WWPat3wp", OBJPROP_COLOR, indicator_color5); ObjectSet("WWPat4wp", OBJPROP_COLOR, indicator_color1); ObjectSet("WWPat5wp", OBJPROP_COLOR, indicator_color1); ObjectSet("WWPat11wp", OBJPROP_COLOR, indicator_color1); ObjectSet("WWPat12wp", OBJPROP_COLOR, indicator_color1); ObjectSet("WWPat7wp", OBJPROP_COLOR, indicator_color3); ObjectSet("WWPat8wp", OBJPROP_COLOR, indicator_color3); ObjectSet("WWPat9wp", OBJPROP_COLOR, indicator_color3); ObjectSet("WWPat10wp", OBJPROP_COLOR, indicator_color3); ObjectSet("WWPat6wp", OBJPROP_COLOR, indicator_color3); ObjectSet("WWPat0wp", OBJPROP_WIDTH, g_width_132); ObjectSet("WWPat1wp", OBJPROP_WIDTH, g_width_132); ObjectSet("WWPat2wp", OBJPROP_WIDTH, g_width_132); ObjectSet("WWPat3wp", OBJPROP_WIDTH, g_width_132); ObjectSet("WWPat4wp", OBJPROP_WIDTH, g_width_132); ObjectSet("WWPat5wp", OBJPROP_WIDTH, g_width_132 - 1); ObjectSet("WWPat11wp", OBJPROP_WIDTH, g_width_132); ObjectSet("WWPat12wp", OBJPROP_WIDTH, g_width_132 - 1); ObjectSet("WWPat4wp", OBJPROP_STYLE, STYLE_DOT); ObjectSet("WWPat5wp", OBJPROP_STYLE, STYLE_DOT); ObjectSet("WWPat11wp", OBJPROP_STYLE, STYLE_DOT); ObjectSet("WWPat12wp", OBJPROP_STYLE, STYLE_DOT); } ObjectsRedraw(); for (int l_count_300 = 0; l_count_300 < 11; l_count_300++) { for (int li_304 = 1; li_304 < gi_112; li_304++) { ld_308 = ObjectGet("WWPat" + l_count_300 + "m" + li_304, OBJPROP_PRICE1); ld_316 = ObjectGet("WWPat" + l_count_300 + "m" + li_304, OBJPROP_PRICE2); ld_324 = ObjectGet("WWPat" + l_count_300 + "w" + li_304, OBJPROP_PRICE1); ld_332 = ObjectGet("WWPat" + l_count_300 + "w" + li_304, OBJPROP_PRICE2); for (int li_340 = 1; li_340 < gi_112; li_340++) { ld_344 = ObjectGet("WWPat" + l_count_300 + "m" + ((li_304 + li_340)), OBJPROP_PRICE1); ld_352 = ObjectGet("WWPat" + l_count_300 + "m" + ((li_304 + li_340)), OBJPROP_PRICE2); ld_360 = ObjectGet("WWPat" + l_count_300 + "w" + ((li_304 + li_340)), OBJPROP_PRICE1); ld_368 = ObjectGet("WWPat" + l_count_300 + "w" + ((li_304 + li_340)), OBJPROP_PRICE2); if (ld_308 == ld_344 && ld_316 == ld_352) ObjectDelete("WWPat" + l_count_300 + "m" + li_304); if (ld_324 == ld_360 && ld_332 == ld_368) ObjectDelete("WWPat" + l_count_300 + "w" + li_304); } } } return (0); }