/* G e n e r a t e d by ex4-to-mq4 decompiler FREEWARE 4.0.509.5 Website: h tt p: / / w Ww. M etA q U o T ES.n eT E-mail : SUPp oRt@mE Taq UO T e S .NET */ #property copyright "Copyright © 2006, Winning-Solution.Net " #property link "http://www.winning-solution.net/" #property indicator_chart_window string Gs_76 = "Gold Version"; string Gs_84 = "Harry Saputra"; string Gs_92 = "doragembul.net@gmail.com"; string Gs_100 = "Perum 2, Jl. Mat Sainin C.43 Pontianak "; string Gs_108 = "Pontianak"; string Gs_116 = "+08152211421"; string Gs_124 = " 83.237.230.35"; string Gs_132 = "2030.12.31 23:00:00"; int Gi_140 = 0; extern int TimeSettingPlus21 = 1; extern string Note = "If your broker server time is gmt+0 then TimeSettingPlus21 is 21+0=21"; int Gi_156 = 0; int Gi_160 = 1; bool Gi_164 = TRUE; extern bool ShowHighLowOpen = TRUE; bool Gi_172 = FALSE; extern bool Alarm = TRUE; extern bool ShowWSSArea = TRUE; extern bool EmailAlert = TRUE; extern bool ShowPivots = FALSE; extern bool ShowMidPitvot = FALSE; extern bool ShowFibos = FALSE; extern bool ShowCamarilla = FALSE; extern bool ShowTrapping = FALSE; bool Gi_208 = TRUE; bool Gi_212 = FALSE; bool Gi_216 = FALSE; bool Gi_220 = FALSE; bool Gi_224 = FALSE; bool Gi_228 = FALSE; bool Gi_232 = FALSE; string Gs_236; int Gi_244 = 10; bool Gi_248 = FALSE; int Gi_unused_252 = 0; int Gi_unused_256 = 24; int Gi_260; int G_datetime_264 = 0; int G_timeframe_268 = 0; int init() { deinit(); if (Ask > 10.0) Gi_260 = 2; else Gi_260 = 4; Print("Period= ", Period()); return (0); } int deinit() { string name_16; int Li_0 = ObjectsTotal(); for (int objs_total_12 = Li_0; objs_total_12 >= 0; objs_total_12--) { name_16 = ObjectName(objs_total_12); if (StringSubstr(name_16, 0, 7) == "[PIVOT]") ObjectDelete(name_16); } string var_name_4 = Symbol() + "st"; GlobalVariableDel(var_name_4); var_name_4 = Symbol() + "p"; GlobalVariableDel(var_name_4); var_name_4 = Symbol() + "r1"; GlobalVariableDel(var_name_4); var_name_4 = Symbol() + "r2"; GlobalVariableDel(var_name_4); var_name_4 = Symbol() + "r3"; GlobalVariableDel(var_name_4); var_name_4 = Symbol() + "s1"; GlobalVariableDel(var_name_4); var_name_4 = Symbol() + "s2"; GlobalVariableDel(var_name_4); var_name_4 = Symbol() + "s3"; GlobalVariableDel(var_name_4); var_name_4 = Symbol() + "yh"; GlobalVariableDel(var_name_4); var_name_4 = Symbol() + "to"; GlobalVariableDel(var_name_4); var_name_4 = Symbol() + "yl"; GlobalVariableDel(var_name_4); var_name_4 = Symbol() + "ds1"; GlobalVariableDel(var_name_4); var_name_4 = Symbol() + "ds2"; GlobalVariableDel(var_name_4); var_name_4 = Symbol() + "flm618"; GlobalVariableDel(var_name_4); var_name_4 = Symbol() + "flm382"; GlobalVariableDel(var_name_4); var_name_4 = Symbol() + "flp382"; GlobalVariableDel(var_name_4); var_name_4 = Symbol() + "flp5"; GlobalVariableDel(var_name_4); var_name_4 = Symbol() + "fhm382"; GlobalVariableDel(var_name_4); var_name_4 = Symbol() + "fhp382"; GlobalVariableDel(var_name_4); var_name_4 = Symbol() + "fhp618"; GlobalVariableDel(var_name_4); var_name_4 = Symbol() + "h3"; GlobalVariableDel(var_name_4); var_name_4 = Symbol() + "h4"; GlobalVariableDel(var_name_4); var_name_4 = Symbol() + "l3"; GlobalVariableDel(var_name_4); var_name_4 = Symbol() + "l4"; GlobalVariableDel(var_name_4); var_name_4 = Symbol() + "mr3"; GlobalVariableDel(var_name_4); var_name_4 = Symbol() + "mr2"; GlobalVariableDel(var_name_4); var_name_4 = Symbol() + "mr1"; GlobalVariableDel(var_name_4); var_name_4 = Symbol() + "ms1"; GlobalVariableDel(var_name_4); var_name_4 = Symbol() + "ms2"; GlobalVariableDel(var_name_4); var_name_4 = Symbol() + "ms3"; GlobalVariableDel(var_name_4); return (0); } int start() { string Ls_unused_20; bool Li_44; datetime time_48; double Ld_52; double Ld_60; double Ld_68; double Ld_76; double open_84; double Ld_92; double close_100; int Li_108; int Li_112; int Li_116; string var_name_120; double Ld_128; 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; int Li_256; int Li_260; double Ld_264; double Ld_272; double Ld_280; double Ld_288; double Ld_296; double Ld_304; string Ls_312; double ima_320; double ima_328; double Ld_336; string Ls_344; double irsi_352; double Ld_360; double Ld_368; string Ls_376; double icci_384; double Ld_392; double Ld_400; string Ls_408; double iwpr_416; double Ld_424; double Ld_432; string Ls_440; double idemarker_448; double Ld_456; double Ld_464; string Ls_unused_472; double imacd_480; double imacd_488; double Ld_496; string Ls_504; double iadx_512; double iadx_520; double Ld_528; string Ls_536; string Ls_544; string Ls_552; string Ls_unused_560; string Ls_568; double highest_576; double lowest_584; double Ld_592; double Ld_600; double Ld_608; string Ls_616; string Ls_624; string Ls_unused_0 = TimeToStr(TimeCurrent(), TIME_DATE); string Ls_unused_8 = TimeToStr(TimeCurrent(), TIME_MINUTES|TIME_SECONDS); int str2time_16 = StrToTime(Gs_132); int str2time_28 = StrToTime("00:00:00"); int str2time_32 = StrToTime("00:05:00"); string Ls_unused_36 = TimeToStr(TimeCurrent(), TIME_DATE|TIME_SECONDS); if (TimeCurrent() < str2time_16) { Li_44 = FALSE; time_48 = 0; Ld_52 = 0; Ld_60 = 0; Ld_68 = 0; Ld_76 = 0; open_84 = 0; Ld_92 = 0; close_100 = 0; Li_108 = 0; Li_112 = 0; Li_116 = 0; if (TimeCurrent() - G_datetime_264 < 60 && Period() == G_timeframe_268) return (0); G_timeframe_268 = Period(); G_datetime_264 = TimeCurrent(); if (Period() > PERIOD_D1) { Alert("Error - Chart period is greater than 1 day."); return (-1); } if (Gi_248) { Print("Local time current bar:", TimeToStr(Time[0])); Print("Dest time current bar: ", TimeToStr(Time[0] - 3600 * (Gi_140 - TimeSettingPlus21)), ", tzdiff= ", Gi_140 - TimeSettingPlus21); } ComputeDayIndices(Gi_140, TimeSettingPlus21, Li_108, Li_112, Li_116); Li_44 = Time[Li_108]; var_name_120 = Symbol() + "st"; Ld_128 = Li_44; GlobalVariableSet(var_name_120, Ld_128); time_48 = Time[Li_112]; Ld_76 = -99999; Ld_92 = 99999; for (int Li_136 = Li_112; Li_136 >= Li_116; Li_136--) { if (open_84 == 0.0) open_84 = Open[Li_136]; Ld_76 = MathMax(High[Li_136], Ld_76); Ld_92 = MathMin(Low[Li_136], Ld_92); close_100 = Close[Li_136]; } Ld_68 = Open[Li_108]; Ld_52 = -99999; Ld_60 = 99999; for (int Li_140 = Li_108; Li_140 >= 0; Li_140--) { Ld_52 = MathMax(Ld_52, High[Li_140]); Ld_60 = MathMin(Ld_60, Low[Li_140]); } Ld_144 = (Ld_76 + Ld_92 + close_100) / 3.0; SetTimeLine("YesterdayStart", "yesterday", Li_112, CadetBlue, Ld_144 - 4.0 * Point); SetTimeLine("YesterdayEnd", "today", Li_108, CadetBlue, Ld_144 - 4.0 * Point); if (Gi_248) Print("Timezoned values: yo= ", open_84, ", yc =", close_100, ", yhigh= ", Ld_76, ", ylow= ", Ld_92, ", to= ", Ld_68); Ld_168 = Ld_52 - Ld_60; Ld_160 = Ld_76 - Ld_92; Ld_152 = (Ld_76 + Ld_92 + close_100) / 3.0; Ld_152 = NormalizeDouble(Ld_152, Gi_260); var_name_120 = Symbol() + "p"; Ld_128 = Ld_152; GlobalVariableSet(var_name_120, Ld_128); Ld_176 = Ld_152 + 20.0 * Point; Ld_176 = NormalizeDouble(Ld_176, Gi_260); var_name_120 = Symbol() + "r1"; Ld_128 = Ld_176; GlobalVariableSet(var_name_120, Ld_128); Ld_184 = Ld_152 + 40.0 * Point; Ld_184 = NormalizeDouble(Ld_184, Gi_260); var_name_120 = Symbol() + "r2"; Ld_128 = Ld_184; GlobalVariableSet(var_name_120, Ld_128); Ld_192 = Ld_152 + (Ld_76 - Ld_92); Ld_192 = NormalizeDouble(Ld_192, Gi_260); var_name_120 = Symbol() + "r3"; Ld_128 = Ld_192; GlobalVariableSet(var_name_120, Ld_128); Ld_216 = Ld_152 - (Ld_76 - Ld_92); Ld_216 = NormalizeDouble(Ld_216, Gi_260); var_name_120 = Symbol() + "s3"; Ld_128 = Ld_216; GlobalVariableSet(var_name_120, Ld_128); Ld_200 = Ld_152 - 20.0 * Point; Ld_200 = NormalizeDouble(Ld_200, Gi_260); var_name_120 = Symbol() + "s1"; Ld_128 = Ld_200; GlobalVariableSet(var_name_120, Ld_128); Ld_208 = Ld_152 - 40.0 * Point; Ld_208 = NormalizeDouble(Ld_208, Gi_260); var_name_120 = Symbol() + "s2"; Ld_128 = Ld_208; GlobalVariableSet(var_name_120, Ld_128); Ld_224 = 2.0 * Ld_152 - (2.0 * Ld_76 - Ld_92); Ld_224 = NormalizeDouble(Ld_224, Gi_260); var_name_120 = Symbol() + "s4"; Ld_128 = Ld_224; GlobalVariableSet(var_name_120, Ld_128); Ld_248 = 3.0 * Ld_152 - (3.0 * Ld_76 - Ld_92); Ld_248 = NormalizeDouble(Ld_248, Gi_260); var_name_120 = Symbol() + "s5"; Ld_128 = Ld_248; GlobalVariableSet(var_name_120, Ld_128); Ld_232 = 2.0 * Ld_152 + (Ld_76 - 2.0 * Ld_92); Ld_232 = NormalizeDouble(Ld_232, Gi_260); var_name_120 = Symbol() + "r4"; Ld_128 = Ld_232; GlobalVariableSet(var_name_120, Ld_128); Ld_240 = 3.0 * Ld_152 + (Ld_76 - 3.0 * Ld_92); Ld_240 = NormalizeDouble(Ld_240, Gi_260); var_name_120 = Symbol() + "r5"; Ld_128 = Ld_240; GlobalVariableSet(var_name_120, Ld_128); if (ShowHighLowOpen) { SetLevel("Yesterday High", Ld_76, Orange, STYLE_DOT, 1, time_48); SetLevel("Yesterday Low", Ld_92, Orange, STYLE_DOT, 1, time_48); var_name_120 = Symbol() + "yh"; Ld_128 = Ld_76; GlobalVariableSet(var_name_120, Ld_128); var_name_120 = Symbol() + "to"; Ld_128 = Ld_68; GlobalVariableSet(var_name_120, Ld_128); var_name_120 = Symbol() + "yl"; Ld_128 = Ld_92; GlobalVariableSet(var_name_120, Ld_128); } if (Gi_172) { Li_256 = Bid / Point; Li_256 -= Li_256 % 50; Li_260 = Li_256 + 50; Ld_264 = Li_256 * Point; Ld_272 = Li_260 * Point; SetLevel(DoubleToStr(Ld_264, Digits), Ld_264, Gold, Gi_156, Gi_160, Time[10]); SetLevel(DoubleToStr(Ld_272, Digits), Ld_272, Gold, Gi_156, Gi_160, Time[10]); var_name_120 = Symbol() + "ds1"; Ld_128 = Ld_264; GlobalVariableSet(var_name_120, Ld_128); var_name_120 = Symbol() + "ds2"; Ld_128 = Ld_272; GlobalVariableSet(var_name_120, Ld_128); } Ld_280 = 0.55 * Ld_160 + close_100; Ld_288 = 0.27 * Ld_160 + close_100; Ld_304 = close_100 - 0.27 * Ld_160; Ld_296 = close_100 - 0.55 * Ld_160; if (ShowCamarilla == TRUE) { SetLevel("H3", Ld_288, Khaki, Gi_156, Gi_160, Li_44); SetLevel("H4", Ld_280, Khaki, Gi_156, Gi_160, Li_44); SetLevel("L3", Ld_304, Khaki, Gi_156, Gi_160, Li_44); SetLevel("L4", Ld_296, Khaki, Gi_156, Gi_160, Li_44); var_name_120 = Symbol() + "h3"; Ld_128 = Ld_288; Ld_128 = NormalizeDouble(Ld_128, Gi_260); GlobalVariableSet(var_name_120, Ld_128); var_name_120 = Symbol() + "h4"; Ld_128 = Ld_280; Ld_128 = NormalizeDouble(Ld_128, Gi_260); GlobalVariableSet(var_name_120, Ld_128); var_name_120 = Symbol() + "l3"; Ld_128 = Ld_304; Ld_128 = NormalizeDouble(Ld_128, Gi_260); GlobalVariableSet(var_name_120, Ld_128); var_name_120 = Symbol() + "l4"; Ld_128 = Ld_296; Ld_128 = NormalizeDouble(Ld_128, Gi_260); GlobalVariableSet(var_name_120, Ld_128); } if (ShowWSSArea == TRUE) { SetLevel("[DANGER! DONT TRADE HERE!]", Ld_240, Maroon, Gi_156, 5, Li_44); SetLevel("[DANGER! DONT TRADE HERE!]", Ld_248, DarkBlue, Gi_156, 5, Li_44); SetLevel("[MAXIMUM OVERBOUGHT]", Ld_232, DarkBlue, Gi_156, 5, Li_44); SetLevel("[MAXIMUM OVERSOLD]", Ld_224, Maroon, Gi_156, 5, Li_44); SetLevel("[Reversal Prediction HIGH]", (Ld_192 + Ld_280 + (Ld_76 + Ld_160 / 2.0)) / 3.0, DarkBlue, Gi_156, 3, Li_44); SetLevel("[Reversal Prediction LOW]", (Ld_216 + Ld_296 + (Ld_92 - Ld_160 / 2.0)) / 3.0, Maroon, Gi_156, 3, Li_44); SetLevel("[High] 20 Pips", Ld_176, DarkBlue, Gi_156, 2, Li_44); SetLevel("[High] BreakOut", Ld_184, DarkBlue, Gi_156, 5, Li_44); SetLevel2("1", Ld_176 + 1.0 * Point, DarkBlue, Gi_156, Gi_160, Li_44); SetLevel2("2", Ld_176 + 2.0 * Point, DarkBlue, Gi_156, Gi_160, Li_44); SetLevel2("3", Ld_176 + 3.0 * Point, DarkBlue, Gi_156, Gi_160, Li_44); SetLevel2("4", Ld_176 + 4.0 * Point, DarkBlue, Gi_156, Gi_160, Li_44); SetLevel2("5", Ld_176 + 5.0 * Point, DarkBlue, Gi_156, Gi_160, Li_44); SetLevel2("6", Ld_176 + 6.0 * Point, DarkBlue, Gi_156, Gi_160, Li_44); SetLevel2("7", Ld_176 + 7.0 * Point, DarkBlue, Gi_156, Gi_160, Li_44); SetLevel2("8", Ld_176 + 8.0 * Point, DarkBlue, Gi_156, Gi_160, Li_44); SetLevel2("9", Ld_176 + 9.0 * Point, DarkBlue, Gi_156, Gi_160, Li_44); SetLevel2("10", Ld_176 + 10.0 * Point, DarkBlue, Gi_156, Gi_160, Li_44); SetLevel2("11", Ld_176 + 11.0 * Point, DarkBlue, Gi_156, Gi_160, Li_44); SetLevel2("12", Ld_176 + 12.0 * Point, DarkBlue, Gi_156, Gi_160, Li_44); SetLevel2("13", Ld_176 + 13.0 * Point, DarkBlue, Gi_156, Gi_160, Li_44); SetLevel2("14", Ld_176 + 14.0 * Point, DarkBlue, Gi_156, Gi_160, Li_44); SetLevel2("15", Ld_176 + 15.0 * Point, DarkBlue, Gi_156, Gi_160, Li_44); SetLevel2("16", Ld_176 + 16.0 * Point, DarkBlue, Gi_156, Gi_160, Li_44); SetLevel2("17", Ld_176 + 17.0 * Point, DarkBlue, Gi_156, Gi_160, Li_44); SetLevel2("18", Ld_176 + 18.0 * Point, DarkBlue, Gi_156, Gi_160, Li_44); SetLevel2("19", Ld_176 + 19.0 * Point, DarkBlue, Gi_156, 5, Li_44); SetLevel2("20", Ld_176 + 20.0 * Point, DarkBlue, Gi_156, Gi_160, Li_44); SetLevel2("21", Ld_176 - 1.0 * Point, Gray, Gi_156, Gi_160, Li_44); SetLevel2("22", Ld_176 - 2.0 * Point, Gray, Gi_156, Gi_160, Li_44); SetLevel2("23", Ld_176 - 3.0 * Point, Gray, Gi_156, Gi_160, Li_44); SetLevel2("24", Ld_176 - 4.0 * Point, Gray, Gi_156, Gi_160, Li_44); SetLevel2("25", Ld_176 - 5.0 * Point, Gray, Gi_156, Gi_160, Li_44); SetLevel2("26", Ld_176 - 6.0 * Point, Gray, Gi_156, Gi_160, Li_44); SetLevel2("27", Ld_176 - 7.0 * Point, Gray, Gi_156, Gi_160, Li_44); SetLevel2("28", Ld_176 - 8.0 * Point, Gray, Gi_156, Gi_160, Li_44); SetLevel2("29", Ld_176 - 9.0 * Point, Gray, Gi_156, Gi_160, Li_44); SetLevel2("30", Ld_176 - 10.0 * Point, Gray, Gi_156, Gi_160, Li_44); SetLevel2("31", Ld_176 - 11.0 * Point, Gray, Gi_156, Gi_160, Li_44); SetLevel2("32", Ld_176 - 12.0 * Point, Gray, Gi_156, Gi_160, Li_44); SetLevel2("33", Ld_176 - 13.0 * Point, Gray, Gi_156, Gi_160, Li_44); SetLevel2("34", Ld_176 - 14.0 * Point, Gray, Gi_156, Gi_160, Li_44); SetLevel2("35", Ld_176 - 15.0 * Point, Gray, Gi_156, Gi_160, Li_44); SetLevel2("36", Ld_176 - 16.0 * Point, Gray, Gi_156, Gi_160, Li_44); SetLevel2("37", Ld_176 - 17.0 * Point, Gray, Gi_156, Gi_160, Li_44); SetLevel2("38", Ld_176 - 18.0 * Point, Gray, Gi_156, Gi_160, Li_44); SetLevel2("39", Ld_176 - 19.0 * Point, Gray, Gi_156, Gi_160, Li_44); SetLevel2("40", Ld_176 - 20.0 * Point, Gray, Gi_156, Gi_160, Li_44); SetLevel2("41", Ld_176 - 21.0 * Point, Gray, Gi_156, Gi_160, Li_44); SetLevel2("42", Ld_176 - 22.0 * Point, Gray, Gi_156, Gi_160, Li_44); SetLevel2("43", Ld_176 - 23.0 * Point, Gray, Gi_156, Gi_160, Li_44); SetLevel2("44", Ld_176 - 24.0 * Point, Gray, Gi_156, Gi_160, Li_44); SetLevel2("45", Ld_176 - 25.0 * Point, Gray, Gi_156, Gi_160, Li_44); SetLevel2("46", Ld_176 - 26.0 * Point, Gray, Gi_156, Gi_160, Li_44); SetLevel2("47", Ld_176 - 27.0 * Point, Gray, Gi_156, Gi_160, Li_44); SetLevel2("48", Ld_176 - 28.0 * Point, Gray, Gi_156, Gi_160, Li_44); SetLevel2("49", Ld_176 - 29.0 * Point, Gray, Gi_156, Gi_160, Li_44); SetLevel2("50", Ld_176 - 30.0 * Point, Gray, Gi_156, Gi_160, Li_44); SetLevel2("51", Ld_176 - 31.0 * Point, Gray, Gi_156, Gi_160, Li_44); SetLevel2("52", Ld_176 - 32.0 * Point, Gray, Gi_156, Gi_160, Li_44); SetLevel2("53", Ld_176 - 33.0 * Point, Gray, Gi_156, Gi_160, Li_44); SetLevel2("54", Ld_176 - 34.0 * Point, Gray, Gi_156, Gi_160, Li_44); SetLevel2("55", Ld_176 - 35.0 * Point, Gray, Gi_156, Gi_160, Li_44); SetLevel2("56", Ld_176 - 36.0 * Point, Gray, Gi_156, Gi_160, Li_44); SetLevel2("57", Ld_176 - 37.0 * Point, Gray, Gi_156, Gi_160, Li_44); SetLevel2("58", Ld_176 - 38.0 * Point, Gray, Gi_156, Gi_160, Li_44); SetLevel2("59", Ld_176 - 39.0 * Point, Gray, Gi_156, Gi_160, Li_44); SetLevel2("60", Ld_176 - 40.0 * Point, Gray, Gi_156, Gi_160, Li_44); SetLevel("[Low] 20 Pips", Ld_200, Maroon, Gi_156, 2, Li_44); SetLevel2("61", Ld_200 - 1.0 * Point, Maroon, Gi_156, Gi_160, Li_44); SetLevel2("62", Ld_200 - 2.0 * Point, Maroon, Gi_156, Gi_160, Li_44); SetLevel2("63", Ld_200 - 3.0 * Point, Maroon, Gi_156, Gi_160, Li_44); SetLevel2("64", Ld_200 - 4.0 * Point, Maroon, Gi_156, Gi_160, Li_44); SetLevel2("65", Ld_200 - 5.0 * Point, Maroon, Gi_156, Gi_160, Li_44); SetLevel2("66", Ld_200 - 6.0 * Point, Maroon, Gi_156, Gi_160, Li_44); SetLevel2("67", Ld_200 - 7.0 * Point, Maroon, Gi_156, Gi_160, Li_44); SetLevel2("68", Ld_200 - 8.0 * Point, Maroon, Gi_156, Gi_160, Li_44); SetLevel2("69", Ld_200 - 9.0 * Point, Maroon, Gi_156, Gi_160, Li_44); SetLevel2("70", Ld_200 - 10.0 * Point, Maroon, Gi_156, Gi_160, Li_44); SetLevel2("71", Ld_200 - 11.0 * Point, Maroon, Gi_156, Gi_160, Li_44); SetLevel2("72", Ld_200 - 12.0 * Point, Maroon, Gi_156, Gi_160, Li_44); SetLevel2("73", Ld_200 - 13.0 * Point, Maroon, Gi_156, Gi_160, Li_44); SetLevel2("74", Ld_200 - 14.0 * Point, Maroon, Gi_156, Gi_160, Li_44); SetLevel2("75", Ld_200 - 15.0 * Point, Maroon, Gi_156, Gi_160, Li_44); SetLevel2("76", Ld_200 - 16.0 * Point, Maroon, Gi_156, Gi_160, Li_44); SetLevel2("77", Ld_200 - 17.0 * Point, Maroon, Gi_156, Gi_160, Li_44); SetLevel2("78", Ld_200 - 18.0 * Point, Maroon, Gi_156, Gi_160, Li_44); SetLevel2("79", Ld_200 - 19.0 * Point, Maroon, Gi_156, 5, Li_44); SetLevel2("80", Ld_200 - 20.0 * Point, Maroon, Gi_156, Gi_160, Li_44); SetLevel("[Low] BreakOut", Ld_208, Maroon, Gi_156, 5, Li_44); } if (ShowFibos) { SetLevel("Low - 61.8%", Ld_92 - 0.618 * Ld_160, Yellow, Gi_156, Gi_160, Li_44); SetLevel("Low - 38.2%", Ld_92 - Ld_160 / 2.0, Yellow, Gi_156, Gi_160, Li_44); SetLevel("Low + 38.2%", Ld_92 + Ld_160 / 2.0, Yellow, Gi_156, Gi_160, Li_44); SetLevel("LowHigh 50%", Ld_92 + Ld_160 / 2.0, Yellow, Gi_156, Gi_160, Li_44); SetLevel("High - 38.2%", Ld_76 - Ld_160 / 2.0, Yellow, Gi_156, Gi_160, Li_44); SetLevel("High + 38.2%", Ld_76 + Ld_160 / 2.0, Yellow, Gi_156, Gi_160, Li_44); SetLevel("High + 61.8%", Ld_76 + 0.618 * Ld_160, Yellow, Gi_156, Gi_160, Li_44); var_name_120 = Symbol() + "flm618"; Ld_128 = Ld_92 - 0.618 * Ld_160; Ld_128 = NormalizeDouble(Ld_128, Gi_260); GlobalVariableSet(var_name_120, Ld_128); var_name_120 = Symbol() + "flm382"; Ld_128 = Ld_92 - Ld_160 / 2.0; Ld_128 = NormalizeDouble(Ld_128, Gi_260); GlobalVariableSet(var_name_120, Ld_128); var_name_120 = Symbol() + "flp382"; Ld_128 = Ld_92 + Ld_160 / 2.0; Ld_128 = NormalizeDouble(Ld_128, Gi_260); GlobalVariableSet(var_name_120, Ld_128); var_name_120 = Symbol() + "flp5"; Ld_128 = Ld_92 + Ld_160 / 2.0; Ld_128 = NormalizeDouble(Ld_128, Gi_260); GlobalVariableSet(var_name_120, Ld_128); var_name_120 = Symbol() + "fhm382"; Ld_128 = Ld_76 - Ld_160 / 2.0; Ld_128 = NormalizeDouble(Ld_128, Gi_260); GlobalVariableSet(var_name_120, Ld_128); var_name_120 = Symbol() + "fhp382"; Ld_128 = Ld_76 + Ld_160 / 2.0; Ld_128 = NormalizeDouble(Ld_128, Gi_260); GlobalVariableSet(var_name_120, Ld_128); var_name_120 = Symbol() + "fhp618"; Ld_128 = Ld_76 + 0.618 * Ld_160; Ld_128 = NormalizeDouble(Ld_128, Gi_260); GlobalVariableSet(var_name_120, Ld_128); } if (ShowPivots == TRUE) { SetLevel("R1", Ld_192, Blue, Gi_156, Gi_160, Li_44); SetLevel("R2", Ld_232, Blue, Gi_156, Gi_160, Li_44); SetLevel("R3", Ld_240, Blue, Gi_156, Gi_160, Li_44); SetLevel("Pivot", Ld_152, Fuchsia, Gi_156, Gi_160, Li_44); SetLevel("S1", Ld_216, Red, Gi_156, Gi_160, Li_44); SetLevel("S2", Ld_224, Red, Gi_156, Gi_160, Li_44); SetLevel("S3", Ld_248, Red, Gi_156, Gi_160, Li_44); } if (ShowMidPitvot == TRUE) { SetLevel("MR3", (Ld_232 + Ld_240) / 2.0, Green, Gi_156, Gi_160, Li_44); SetLevel("MR2", (Ld_192 + Ld_232) / 2.0, Green, Gi_156, Gi_160, Li_44); SetLevel("MR1", (Ld_152 + Ld_192) / 2.0, Green, Gi_156, Gi_160, Li_44); SetLevel("MS1", (Ld_152 + Ld_216) / 2.0, Green, Gi_156, Gi_160, Li_44); SetLevel("MS2", (Ld_216 + Ld_224) / 2.0, Green, Gi_156, Gi_160, Li_44); SetLevel("MS3", (Ld_224 + Ld_248) / 2.0, Green, Gi_156, Gi_160, Li_44); var_name_120 = Symbol() + "mr3"; Ld_128 = (Ld_184 + Ld_192) / 2.0; Ld_128 = NormalizeDouble(Ld_128, Gi_260); GlobalVariableSet(var_name_120, Ld_128); var_name_120 = Symbol() + "mr2"; Ld_128 = (Ld_176 + Ld_184) / 2.0; Ld_128 = NormalizeDouble(Ld_128, Gi_260); GlobalVariableSet(var_name_120, Ld_128); var_name_120 = Symbol() + "mr1"; Ld_128 = (Ld_152 + Ld_176) / 2.0; Ld_128 = NormalizeDouble(Ld_128, Gi_260); GlobalVariableSet(var_name_120, Ld_128); var_name_120 = Symbol() + "ms1"; Ld_128 = (Ld_152 + Ld_200) / 2.0; Ld_128 = NormalizeDouble(Ld_128, Gi_260); GlobalVariableSet(var_name_120, Ld_128); var_name_120 = Symbol() + "ms2"; Ld_128 = (Ld_152 + Ld_208) / 2.0; Ld_128 = NormalizeDouble(Ld_128, Gi_260); GlobalVariableSet(var_name_120, Ld_128); var_name_120 = Symbol() + "ms3"; Ld_128 = (Ld_152 + Ld_216) / 2.0; Ld_128 = NormalizeDouble(Ld_128, Gi_260); GlobalVariableSet(var_name_120, Ld_128); } if (Gi_164) { Ls_312 = Ls_312 + "WINNING-SOLUTION SYSTEM v.9.3 " + Gs_76 + "\n"; if (ShowTrapping) { Ls_312 = Ls_312 + "\nSPECIAL TRAPPING (ONLY USE 5 MINUTES BEFORE BIG NEWS!!!):\nDONT FORGET TO READ FOREX CALENDAR..."; Ls_312 = Ls_312 + "\n- BUY STOP @" + DoubleToStr(Close[0] + 25.0 * Point, Digits) + ", Set S/L @" + DoubleToStr(Close[0] + 25.0 * Point - 50.0 * Point, Digits) + ", Set TP @" + DoubleToStr(Close[0] + 25.0 * Point + 100.0 * Point, Digits) + ", Set Trailing Stop 30 pips"; Ls_312 = Ls_312 + "\n- SELL STOP @" + DoubleToStr(Close[0] - 25.0 * Point, Digits) + ", Set S/L @" + DoubleToStr(Close[0] - 25.0 * Point + 50.0 * Point, Digits) + ", Set TP @" + DoubleToStr(Close[0] - 25.0 * Point - 100.0 * Point, Digits) + ", Set Trailing Stop 30 pips"; } ima_320 = iMA(NULL, 0, 3, 0, MODE_EMA, PRICE_CLOSE, 0); ima_328 = iMA(NULL, 0, 50, 0, MODE_EMA, PRICE_CLOSE, 0); Ld_336 = ima_320 - ima_328; irsi_352 = iRSI(NULL, 0, 14, PRICE_CLOSE, 0); Ld_360 = 50; Ld_368 = irsi_352 - Ld_360; icci_384 = iCCI(NULL, 0, 14, PRICE_CLOSE, 0); Ld_392 = 0; Ld_400 = icci_384 - Ld_392; iwpr_416 = iWPR(NULL, 0, 14, 0); Ld_424 = -50; Ld_432 = iwpr_416 - Ld_424; idemarker_448 = iDeMarker(NULL, 0, 14, 0); Ld_456 = 50; Ld_464 = idemarker_448 - Ld_456; imacd_480 = iMACD(NULL, 0, 12, 26, 9, PRICE_CLOSE, MODE_MAIN, 0); imacd_488 = iMACD(NULL, 0, 12, 26, 9, PRICE_CLOSE, MODE_SIGNAL, 0); Ld_496 = imacd_480 - imacd_488; iadx_512 = iADX(NULL, 0, 14, PRICE_CLOSE, MODE_PLUSDI, 0); iadx_520 = iADX(NULL, 0, 14, PRICE_CLOSE, MODE_MINUSDI, 0); Ld_528 = iadx_512 - iadx_520; if (Ld_336 >= 0.0) Ls_344 = "UP"; else if (Ld_336 < 0.0) Ls_344 = "DOWN"; if (Close[0] > Ld_152) { Ls_568 = "High Market / Blue Area"; Ls_544 = "BUY [" + Symbol() + "] @" + DoubleToStr(Ld_152 + 20.0 * Point, Digits) + " Set S/L @" + DoubleToStr(Ld_152 - 10.0 * Point, Digits) + " Set TP @" + DoubleToStr(Ld_152 + 40.0 * Point, Digits); Ls_552 = "BUY [" + Symbol() + "] @" + DoubleToStr(Ld_152 + 40.0 * Point, Digits) + " Set S/L @" + DoubleToStr(Ld_152 + 10.0 * Point, Digits) + " Set TP @" + DoubleToStr(Ld_152 + 60.0 * Point, Digits); } else if (Close[0] < Ld_152) Ls_568 = "Low Market / Red Area"; if (Ld_368 >= 0.0) Ls_376 = "UP"; else if (Ld_368 < 0.0) Ls_376 = "DOWN"; if (Ld_464 >= 0.0) Ls_unused_472 = "UP"; else if (Ld_464 < 0.0) Ls_unused_472 = "DOWN"; if (Ld_496 >= 0.0) Ls_504 = "UP"; else if (Ld_496 < 0.0) Ls_504 = "DOWN"; if (Ld_528 >= 0.0) Ls_536 = "UP"; else if (Ld_528 < 0.0) Ls_536 = "DOWN"; if (Ld_400 >= 0.0) Ls_408 = "UP"; else if (Ld_400 < 0.0) Ls_408 = "DOWN"; if (Ld_432 >= 0.0) Ls_440 = "UP"; else if (Ld_432 < 0.0) Ls_440 = "DOWN"; highest_576 = iHighest(NULL, 0, MODE_HIGH, 9, 0); lowest_584 = iLowest(NULL, 0, MODE_LOW, 9, 0); Ld_592 = 100 - 100.0 * ((highest_576 - 0.0) / 10.0); Ld_600 = 100 - 100.0 * ((lowest_584 - 0.0) / 10.0); if (Ld_592 == 0.0) Ld_592 = 0.0000001; if (Ld_600 == 0.0) Ld_600 = 0.0000001; Ld_608 = Ld_592 - Ld_600; if (Ld_608 >= 0.0) Ls_616 = "UP"; else if (Ld_608 < 0.0) Ls_616 = "DOWN"; if (Ls_568 == "High Market / Blue Area" && Ls_344 == "UP" && Ls_376 == "UP" && Ls_504 == "UP" && Ls_616 == "UP" && Ls_536 == "UP" && Ls_408 == "UP" && Ls_440 == "UP") { Ls_624 = "UP TREND (STRONG)"; Ls_544 = "BUY [" + Symbol() + "] @" + DoubleToStr(Ld_152 + 20.0 * Point, Digits) + " Set S/L @" + DoubleToStr(Ld_152 - 10.0 * Point, Digits) + " Set TP @" + DoubleToStr(Ld_152 + 40.0 * Point, Digits); Ls_552 = "BUY [" + Symbol() + "] @" + DoubleToStr(Ld_152 + 40.0 * Point, Digits) + " Set S/L @" + DoubleToStr(Ld_152 + 10.0 * Point, Digits) + " Set TP @" + DoubleToStr(Ld_152 + 60.0 * Point, Digits); if (Close[0] > Ld_152 + 15.0 * Point && Close[0] < Ld_152 + 35.0 * Point) Gs_236 = "SIGNAL1"; else if (Close[0] > Ld_152 + 35.0 * Point && Close[0] < Ld_152 + 55.0 * Point) Gs_236 = "SIGNAL2"; } else { if (Ls_344 == "UP" && Ls_376 == "UP" && Ls_504 == "UP" && Ls_616 == "UP" && Ls_536 == "UP" && Ls_408 == "UP" && Ls_440 == "UP") { Ls_624 = "UP TREND (STRONG)"; Ls_544 = "---"; Ls_552 = "---"; } else { if (Ls_568 == "High Market / Blue Area" && Ls_344 == "UP") { Ls_624 = "SIDEWAYS, UP TREND (WEAK)"; Ls_544 = "BUY [" + Symbol() + "] @" + DoubleToStr(Ld_152 + 20.0 * Point, Digits) + " Set S/L @" + DoubleToStr(Ld_152 - 10.0 * Point, Digits) + " Set TP @" + DoubleToStr(Ld_152 + 40.0 * Point, Digits); Ls_552 = "---"; if (Close[0] > Ld_152 + 15.0 * Point && Close[0] < Ld_152 + 35.0 * Point) Gs_236 = "SIGNAL3"; } else { if (Ls_344 == "UP") { Ls_624 = "SIDEWAYS, UP TREND (WEAK)"; Ls_544 = "---"; Ls_552 = "---"; } else { if (Ls_568 == "Low Market / Red Area" && Ls_344 == "DOWN" && Ls_376 == "DOWN" && Ls_504 == "DOWN" && Ls_616 == "DOWN" && Ls_536 == "DOWN" && Ls_408 == "DOWN" && Ls_440 == "DOWN") { Ls_624 = "DOWN TREND (STRONG)"; Ls_544 = "SELL [" + Symbol() + "] @" + DoubleToStr(Ld_152 - 20.0 * Point, Digits) + " Set S/L @" + DoubleToStr(Ld_152 + 10.0 * Point, Digits) + " Set TP @" + DoubleToStr(Ld_152 - 40.0 * Point, Digits); Ls_552 = "SELL [" + Symbol() + "] @" + DoubleToStr(Ld_152 - 40.0 * Point, Digits) + " Set S/L @" + DoubleToStr(Ld_152 - 10.0 * Point, Digits) + " Set TP @" + DoubleToStr(Ld_152 - 60.0 * Point, Digits); if (Close[0] < Ld_152 - 15.0 * Point && Close[0] > Ld_152 - 35.0 * Point) Gs_236 = "SIGNAL4"; else if (Close[0] < Ld_152 - 35.0 * Point && Close[0] > Ld_152 - 55.0 * Point) Gs_236 = "SIGNAL5"; } else { if (Ls_344 == "DOWN" && Ls_376 == "DOWN" && Ls_504 == "DOWN" && Ls_616 == "DOWN" && Ls_536 == "DOWN" && Ls_408 == "DOWN" && Ls_440 == "DOWN") { Ls_624 = "DOWN TREND (STRONG)"; Ls_544 = "---"; Ls_552 = "---"; } else { if (Ls_568 == "Low Market / Red Area" && Ls_344 == "DOWN") { Ls_624 = "SIDEWAYS, DOWN TREND (WEAK)"; Ls_544 = "SELL [" + Symbol() + "] @" + DoubleToStr(Ld_152 - 20.0 * Point, Digits) + " Set S/L @" + DoubleToStr(Ld_152 + 10.0 * Point, Digits) + " Set TP @" + DoubleToStr(Ld_152 - 40.0 * Point, Digits); Ls_552 = "---"; if (Close[0] < Ld_152 - 15.0 * Point && Close[0] > Ld_152 - 35.0 * Point) Gs_236 = "SIGNAL6"; } else { if (Ls_344 == "DOWN") { Ls_624 = "SIDEWAYS, DOWN TREND (WEAK)"; Ls_544 = "---"; Ls_552 = "---"; } } } } } } } } Ls_312 = Ls_312 + "------------------------------------------------------------------------------------------------------------\n"; Ls_312 = Ls_312 + " " + Symbol() + " Analysis at " + TimeToStr(TimeCurrent()) + " :\n"; Ls_312 = Ls_312 + "------------------------------------------------------------------------------------------------------------\n"; Ls_312 = Ls_312 + " - Price Move = " + Ls_568 + "\n"; Ls_312 = Ls_312 + " - Indicator A = " + Ls_344 + "\n"; Ls_312 = Ls_312 + " - Indicator B = " + Ls_376 + "\n"; Ls_312 = Ls_312 + " - Indicator C = " + Ls_504 + "\n"; Ls_312 = Ls_312 + " - Indicator D = " + Ls_616 + "\n"; Ls_312 = Ls_312 + " - Indicator E = " + Ls_536 + "\n"; Ls_312 = Ls_312 + " - Indicator F = " + Ls_408 + "\n"; Ls_312 = Ls_312 + " - Indicator G = " + Ls_440 + "\n"; Ls_312 = Ls_312 + "------------------------------------------------------------------------------------------------------------\n"; Ls_312 = Ls_312 + " --> Analysis Result : " + Ls_624 + "\n"; Ls_312 = Ls_312 + " --> Signal 20 pips : " + Ls_544 + "\n"; Ls_312 = Ls_312 + " --> Signal Breakout : " + Ls_552 + "\n"; Ls_312 = Ls_312 + " --> Please use Trailing Stop 15 pips to prevent losses because Fast Reversal\n"; Ls_312 = Ls_312 + "------------------------------------------------------------------------------------------------------------\n"; Ls_312 = Ls_312 + "\nSimple Rule : \nThis System not for Sale or Share, \nif you Break this Rule:\n"; Ls_312 = Ls_312 + "- Your membership will be banned\n"; Ls_312 = Ls_312 + "- You will never get any UPDATE & UPGRADE\n"; Ls_312 = Ls_312 + "- We wont support you again\n"; Ls_312 = Ls_312 + "\nRegistered Name : " + Gs_84 + "\n"; Ls_312 = Ls_312 + "Registered Address : " + Gs_100 + "\n"; Ls_312 = Ls_312 + "Registered Country : " + Gs_108 + "\n"; Ls_312 = Ls_312 + "Registered Phone : " + Gs_116 + "\n"; Ls_312 = Ls_312 + "Registered User : " + Gs_92 + "\n"; Ls_312 = Ls_312 + "Registered IP : " + Gs_124 + "\n"; Ls_312 = Ls_312 + "\nCopyright © Sept,2006, Winning Solution Team\n"; Ls_312 = Ls_312 + "Programmer : Ashar Hanif\n"; Ls_312 = Ls_312 + "Website : http://www.winning-solution.net\n"; Ls_312 = Ls_312 + "Email : support@winning-solution.net\n"; Ls_312 = Ls_312 + "Country : Indonesia, South East Asia\n"; Comment(Ls_312); if (Gs_236 == "SIGNAL1" && (!Gi_212)) { if (Alarm) { Alert("20Pips BUY [" + Symbol() + "] @" + DoubleToStr(Ld_152 + 20.0 * Point, Digits) + " Set S/L @" + DoubleToStr(Ld_152 - 10.0 * Point, Digits) + " Set TP @" + DoubleToStr(Ld_152 + 40.0 * Point, Digits)); } if (EmailAlert) SendMail(Symbol() + " Signal from WSS 9.3 at " + TimeToStr(TimeCurrent()) + "", TimeToStr(TimeCurrent()) + Ls_312); Gi_212 = TRUE; Gi_216 = FALSE; Gi_220 = FALSE; Gi_224 = FALSE; Gi_228 = FALSE; Gi_232 = FALSE; } else { if (Gs_236 == "SIGNAL2" && (!Gi_216)) { if (Alarm) { Alert("Breakout BUY [" + Symbol() + "] @" + DoubleToStr(Ld_152 + 40.0 * Point, Digits) + " Set S/L @" + DoubleToStr(Ld_152 + 10.0 * Point, Digits) + " Set TP @" + DoubleToStr(Ld_152 + 60.0 * Point, Digits)); } if (EmailAlert) SendMail(Symbol() + " Signal from WSS 9.3 at " + TimeToStr(TimeCurrent()) + "", TimeToStr(TimeCurrent()) + Ls_312); Gi_212 = FALSE; Gi_216 = TRUE; Gi_220 = FALSE; Gi_224 = FALSE; Gi_228 = FALSE; Gi_232 = FALSE; } else { if (Gs_236 == "SIGNAL3" && (!Gi_220)) { if (Alarm) { Alert("20Pips BUY [" + Symbol() + "] @" + DoubleToStr(Ld_152 + 20.0 * Point, Digits) + " Set S/L @" + DoubleToStr(Ld_152 - 10.0 * Point, Digits) + " Set TP @" + DoubleToStr(Ld_152 + 40.0 * Point, Digits)); } if (EmailAlert) SendMail(Symbol() + " Signal from WSS 9.3 at " + TimeToStr(TimeCurrent()) + "", TimeToStr(TimeCurrent()) + Ls_312); Gi_212 = FALSE; Gi_216 = FALSE; Gi_220 = TRUE; Gi_224 = FALSE; Gi_228 = FALSE; Gi_232 = FALSE; } else { if (Gs_236 == "SIGNAL4" && (!Gi_224)) { if (Alarm) { Alert("20Pips SELL [" + Symbol() + "] @" + DoubleToStr(Ld_152 - 20.0 * Point, Digits) + " Set S/L @" + DoubleToStr(Ld_152 + 10.0 * Point, Digits) + " Set TP @" + DoubleToStr(Ld_152 - 40.0 * Point, Digits)); } if (EmailAlert) SendMail(Symbol() + " Signal from WSS 9.3 at " + TimeToStr(TimeCurrent()) + "", TimeToStr(TimeCurrent()) + Ls_312); Gi_212 = FALSE; Gi_216 = FALSE; Gi_220 = FALSE; Gi_224 = TRUE; Gi_228 = FALSE; Gi_232 = FALSE; } else { if (Gs_236 == "SIGNAL5" && (!Gi_228)) { if (Alarm) { Alert("Breakout SELL [" + Symbol() + "] @" + DoubleToStr(Ld_152 - 40.0 * Point, Digits) + " Set S/L @" + DoubleToStr(Ld_152 - 10.0 * Point, Digits) + " Set TP @" + DoubleToStr(Ld_152 - 60.0 * Point, Digits)); } if (EmailAlert) SendMail(Symbol() + " Signal from WSS 9.3 at " + TimeToStr(TimeCurrent()) + "", TimeToStr(TimeCurrent()) + Ls_312); Gi_212 = FALSE; Gi_216 = FALSE; Gi_220 = FALSE; Gi_224 = FALSE; Gi_228 = TRUE; Gi_232 = FALSE; } else { if (Gs_236 == "SIGNAL6" && (!Gi_232)) { if (Alarm) { Alert("20Pips SELL [" + Symbol() + "] @" + DoubleToStr(Ld_152 - 20.0 * Point, Digits) + " Set S/L @" + DoubleToStr(Ld_152 + 10.0 * Point, Digits) + " Set TP @" + DoubleToStr(Ld_152 - 40.0 * Point, Digits)); } if (EmailAlert) SendMail(Symbol() + " Signal from WSS 9.3 at " + TimeToStr(TimeCurrent()) + "", TimeToStr(TimeCurrent()) + Ls_312); Gi_212 = FALSE; Gi_216 = FALSE; Gi_220 = FALSE; Gi_224 = FALSE; Gi_228 = FALSE; Gi_232 = TRUE; } } } } } } } } else { Comment("We are sorry, Your WSS 9.3 must UPDATE now, \nPlease Contact support@winning-solution.net for FREE Update"); Alert("We are sorry, Your WSS 9.3 must UPDATE now, \nPlease Contact support@winning-solution.net for Free Update"); } return (0); } void ComputeDayIndices(int Ai_0, int Ai_4, int &Ai_8, int &Ai_12, int &Ai_16) { int Li_52; int Li_60; int Li_64; int Li_20 = Ai_0 - Ai_4; int Li_24 = 3600 * Li_20; int Li_28 = 1440; int Li_32 = Li_28 / Period(); int day_of_week_36 = TimeDayOfWeek(Time[0] - Li_24); int Li_40 = -1; Ai_8 = 0; Ai_12 = 0; Ai_16 = 0; switch (day_of_week_36) { case 6: case 0: case 1: Li_40 = 5; break; default: Li_40 = day_of_week_36 - 1; } if (Gi_248) { Print("Dayofweektoday= ", day_of_week_36); Print("Dayofweekyesterday= ", Li_40); } for (int Li_48 = 1; Li_48 <= Li_32 + 1; Li_48++) { Li_52 = Time[Li_48] - Li_24; if (TimeDayOfWeek(Li_52) != day_of_week_36) { Ai_8 = Li_48 - 1; break; } } for (int count_56 = 0; count_56 <= Li_32 * 2 + 1; count_56++) { Li_60 = Time[Li_48 + count_56] - Li_24; if (TimeDayOfWeek(Li_60) == Li_40) { Ai_16 = Li_48 + count_56; break; } } for (count_56 = 1; count_56 <= Li_32; count_56++) { Li_64 = Time[Ai_16 + count_56] - Li_24; if (TimeDayOfWeek(Li_64) != Li_40) { Ai_12 = Ai_16 + count_56 - 1; break; } } if (Gi_248) { Print("Dest time zone\'s current day starts:", TimeToStr(Time[Ai_8]), " (local time), idxbar= ", Ai_8); Print("Dest time zone\'s previous day starts:", TimeToStr(Time[Ai_12]), " (local time), idxbar= ", Ai_12); Print("Dest time zone\'s previous day ends:", TimeToStr(Time[Ai_16]), " (local time), idxbar= ", Ai_16); } } void SetLevel(string As_0, double A_price_8, color A_color_16, int A_style_20, int A_width_24, int A_datetime_28) { int Li_unused_32 = Digits; string name_36 = "[PIVOT] " + As_0 + " Label"; string name_44 = "[PIVOT] " + As_0 + " Line"; if (ObjectFind(name_44) != 0) { ObjectCreate(name_44, OBJ_TREND, 0, A_datetime_28, A_price_8, Time[0], A_price_8); ObjectSet(name_44, OBJPROP_STYLE, A_style_20); ObjectSet(name_44, OBJPROP_COLOR, A_color_16); ObjectSet(name_44, OBJPROP_WIDTH, A_width_24); ObjectSet(name_44, OBJPROP_BACK, TRUE); } else { ObjectMove(name_44, 1, Time[0], A_price_8); ObjectMove(name_44, 0, A_datetime_28, A_price_8); } if (ObjectFind(name_36) != 0) ObjectCreate(name_36, OBJ_TEXT, 0, MathMin(Time[Gi_244], A_datetime_28 + 60 * (Period() * 2)), A_price_8); else ObjectMove(name_36, 0, MathMin(Time[Gi_244], A_datetime_28 + 60 * (Period() * 2)), A_price_8); string text_52 = " " + As_0; if (Gi_208 && StrToInteger(As_0) == 0) text_52 = text_52 + ": " + DoubleToStr(A_price_8, Digits); ObjectSetText(name_36, text_52, 8, "Arial", White); } void SetLevel2(string As_0, double A_price_8, color A_color_16, int A_style_20, int A_width_24, int A_datetime_28) { string Ls_unused_52; int Li_unused_32 = Digits; string Ls_36 = "[PIVOT] " + As_0 + " Label"; string name_44 = "[PIVOT] " + As_0 + " Line"; if (ObjectFind(name_44) != 0) { ObjectCreate(name_44, OBJ_TREND, 0, A_datetime_28, A_price_8, Time[0], A_price_8); ObjectSet(name_44, OBJPROP_STYLE, A_style_20); ObjectSet(name_44, OBJPROP_COLOR, A_color_16); ObjectSet(name_44, OBJPROP_WIDTH, A_width_24); ObjectSet(name_44, OBJPROP_BACK, TRUE); return; } ObjectMove(name_44, 1, Time[0], A_price_8); ObjectMove(name_44, 0, A_datetime_28, A_price_8); } void SetTimeLine(string As_0, string A_text_8, int Ai_16, color A_color_20, double A_price_24) { string name_32 = "[PIVOT] " + As_0; int time_40 = Time[Ai_16]; if (ObjectFind(name_32) != 0) ObjectCreate(name_32, OBJ_TREND, 0, time_40, 0, time_40, 100); else { ObjectMove(name_32, 0, time_40, 0); ObjectMove(name_32, 1, time_40, 100); } ObjectSet(name_32, OBJPROP_STYLE, STYLE_DOT); ObjectSet(name_32, OBJPROP_COLOR, DarkGray); if (ObjectFind(name_32 + " Label") != 0) ObjectCreate(name_32 + " Label", OBJ_TEXT, 0, time_40, A_price_24); else ObjectMove(name_32 + " Label", 0, time_40, A_price_24); ObjectSetText(name_32 + " Label", A_text_8, 8, "Arial", A_color_20); }