//+------------------------------------------------------------------+ //| __________ABHAFXS STARS V20.mq4 | //| Copyright © 2008, MetaQuotes SoAYftware Corp. | //| http://www.metaquotes.net | //+------------------------------------------------------------------+ #property copyright "Copyright © 2008, MetaQuotes SoAYftware Corp." #property link "http://www.metaquotes.net" #property indicator_chart_window #property indicator_buffers 8 #property indicator_color1 DarkOrange #property indicator_color2 Aqua #property indicator_color3 Aqua #property indicator_color4 Aqua #property indicator_color5 Aqua #property indicator_color6 DarkOrange #property indicator_color7 DarkOrange #property indicator_color8 DarkOrange double g_ibuf_76[]; double g_ibuf_80[]; double g_ibuf_84[]; double g_ibuf_88[]; double g_ibuf_92[]; double g_ibuf_96[]; double g_ibuf_100[]; double g_ibuf_104[]; extern bool Commentt = TRUE; extern int a = 1; int GMTshift=0; int g_timeframe_116 = PERIOD_D1; double gd_120; double gd_128; double gd_136; double gd_144; double gd_152; double gd_160; double gd_168; double gd_176; double gd_184; double gd_200; int init() { SetIndexBuffer(0, g_ibuf_76); SetIndexBuffer(1, g_ibuf_80); SetIndexBuffer(2, g_ibuf_84); SetIndexBuffer(3, g_ibuf_88); SetIndexBuffer(4, g_ibuf_92); SetIndexBuffer(5, g_ibuf_96); SetIndexBuffer(6, g_ibuf_100); SetIndexBuffer(7, g_ibuf_104); SetIndexStyle(0, DRAW_LINE, STYLE_SOLID, 0); SetIndexStyle(1, DRAW_LINE, STYLE_SOLID, 2); SetIndexStyle(2, DRAW_LINE, STYLE_SOLID, 2); SetIndexStyle(3, DRAW_LINE, STYLE_SOLID, 2); SetIndexStyle(4, DRAW_LINE, STYLE_SOLID, 2); SetIndexStyle(5, DRAW_LINE, STYLE_SOLID, 2); SetIndexStyle(6, DRAW_LINE, STYLE_SOLID, 2); SetIndexStyle(7, DRAW_LINE, STYLE_SOLID, 0); SetIndexStyle(8, DRAW_LINE, STYLE_SOLID, 0); SetIndexStyle(9, DRAW_LINE, STYLE_SOLID, 0); SetIndexStyle(11, DRAW_LINE, STYLE_SOLID, 0); return (0); } int deinit() { ObjectDelete("txtWeekS4"); ObjectDelete("txtWeekR4"); ObjectDelete("WeekR4"); ObjectDelete("WeekP"); ObjectDelete("WeekR1"); ObjectDelete("WeekR11"); ObjectDelete("WeekR2"); ObjectDelete("WeekR3"); ObjectDelete("WeekS1"); ObjectDelete("WeekS4"); ObjectDelete("WeekS2"); ObjectDelete("WeekS3"); ObjectDelete("txtWeekP"); ObjectDelete("txtWeekR1"); ObjectDelete("txtWeekR11"); ObjectDelete("txtWeekR2"); ObjectDelete("txtWeekR3"); ObjectDelete("txtWeekS1"); ObjectDelete("txtWeekS2"); ObjectDelete("txtWeekS3"); Comment(""); return (0); } int start() { int l_shift_4; int li_8 = IndicatorCounted(); if (li_8 < 0) return (-1); if (li_8 > 0) li_8--; int li_12 = Bars - li_8; for (int li_0 = li_12 - 1; li_0 >= 0; li_0--) { l_shift_4 = iBarShift(Symbol(), g_timeframe_116, Time[li_0], FALSE); gd_176 = iHigh(Symbol(), g_timeframe_116, l_shift_4) + iLow(Symbol(), g_timeframe_116, l_shift_4 + a); gd_120 = (iHigh(Symbol(), g_timeframe_116, l_shift_4 + a) + iLow(Symbol(), g_timeframe_116, l_shift_4 + a) + iClose(Symbol(), g_timeframe_116, l_shift_4 + a)) / 3.0; gd_200 = iHigh(Symbol(), g_timeframe_116, l_shift_4 + a) - iLow(Symbol(), g_timeframe_116, l_shift_4 + a); gd_128 = gd_176 / 2.0; if (iClose(Symbol(), g_timeframe_116, l_shift_4 + a) > gd_120) gd_152 = gd_128 + gd_200; if (iClose(Symbol(), g_timeframe_116, l_shift_4 + a) < gd_120) gd_152 = gd_128 - gd_200; if (Commentt) { if (iClose(Symbol(), g_timeframe_116, l_shift_4 + a) > gd_120) Comment("ABHA TREND <<<<< UP >>>>> ENTRY <<<<<<<< [[BUY LEVEL AT]] >>>> ", gd_120, " <<<< [[TARGET]] >>>> ", gd_152,", <<<< "); if (iClose(Symbol(), g_timeframe_116, l_shift_4 + a) < gd_120) Comment("ABHA TREND <<<<< DOWN >>>>> ENTRY <<<<<<<< [[SELL LEVEL AT]] >>>> ", gd_120, " <<<< [[TARGET]] >>>> ", gd_152,", <<<< "); } g_ibuf_80[li_0] = gd_128; SetPrice("WeekR1", Time[li_0], gd_128, Aqua); SetText("txtWeekR1", "TREND ", Time[li_0], gd_128, Aqua); g_ibuf_84[li_0] = gd_136; SetPrice("WeekS1", Time[li_0], gd_136, Aqua); SetText("txtWeekS1", "ENTRY ", Time[li_0], gd_136, Aqua); g_ibuf_88[li_0] = gd_144; SetPrice("WeekR2", Time[li_0], gd_144, Aqua); SetText("txtWeekR2", "W-R100%", Time[li_0], gd_144, Aqua); g_ibuf_92[li_0] = gd_152; SetPrice("WeekS2", Time[li_0], gd_152, Aqua); SetText("txtWeekS2", "TREND", Time[li_0], gd_152, Aqua); g_ibuf_96[li_0] = gd_160; SetPrice("WeekR3", Time[li_0], gd_160, DarkOrange); SetText("txtWeekR3", "W-R123%", Time[li_0], gd_160, DarkOrange); g_ibuf_100[li_0] = gd_168; SetPrice("WeekS3", Time[li_0], gd_168, DarkOrange); SetText("txtWeekS3", "W-S123%", Time[li_0], gd_168, DarkOrange); g_ibuf_104[li_0] = gd_184; SetPrice("WeekR4", Time[li_0], gd_184, DarkOrange); SetText("txtWeekR4", "W-R23%", Time[li_0], gd_184, DarkOrange); g_ibuf_76[li_0] = gd_120; SetPrice("WeekS4", Time[li_0], gd_120, DarkOrange); SetText("txtWeekS4", "ENTRY", Time[li_0], gd_120, DarkOrange); } return (0); } void SetPrice(string a_name_0, int a_datetime_8, double a_price_12, color a_color_20) { if (ObjectFind(a_name_0) == -1) { ObjectCreate(a_name_0, OBJ_ARROW, 0, a_datetime_8, a_price_12); ObjectSet(a_name_0, OBJPROP_COLOR, a_color_20); ObjectSet(a_name_0, OBJPROP_WIDTH, 2); ObjectSet(a_name_0, OBJPROP_ARROWCODE, SYMBOL_RIGHTPRICE); return; } ObjectSet(a_name_0, OBJPROP_TIME1, a_datetime_8); ObjectSet(a_name_0, OBJPROP_PRICE1, a_price_12); ObjectSet(a_name_0, OBJPROP_COLOR, a_color_20); ObjectSet(a_name_0, OBJPROP_WIDTH, 2); ObjectSet(a_name_0, OBJPROP_ARROWCODE, SYMBOL_RIGHTPRICE); } void SetText(string a_name_0, string a_text_8, int a_datetime_16, double a_price_20, color a_color_28) { if (ObjectFind(a_name_0) == -1) { ObjectCreate(a_name_0, OBJ_TEXT, 0, a_datetime_16, a_price_20); ObjectSetText(a_name_0, a_text_8, 9, "Arial", a_color_28); ObjectSet(a_name_0, OBJPROP_CORNER, 2); return; } ObjectSet(a_name_0, OBJPROP_TIME1, a_datetime_16); ObjectSet(a_name_0, OBJPROP_PRICE1, a_price_20); ObjectSetText(a_name_0, a_text_8, 9, "Arial", a_color_28); ObjectSet(a_name_0, OBJPROP_CORNER, 2); }