//|----------------------------------------------------------------------------| //| Percent Change MICEX.mq4 | //| Àâòîð: Äèìîí Áàðìåí © Copyright 2009 | //| ICQ: 241448448 | //|----------------------------------------------------------------------------| //| Âåðñèÿ: 03.03.2009 | //| Ãîòîâíîñòü: 100% | //| Òåñòèðîâàíèå: Ïðîâåäåíî 100% | //| Îïèñàíèå: Èíäèêàòîð ïðîöåíòíîãî èçìåíåíèÿ öåíû çà äåíü àêöèé ÌÌÂÁ âõîäÿùèõ | //| â èíäåêñ ÌÌÂÁ à òàêæå òåêóùèõ êóðñîâ ïðîäàæè ïîêóïêè ðóáëÿ | //|----------------------------------------------------------------------------| //| Ïàðàìåòðû: Íèæå | //|----------------------------------------------------------------------------| #property copyright "Äèìîí Áàðìåí © Copyright 2009" #property indicator_chart_window //------------------------------Ïàðàìåòðû--------------------------------- 1 --| extern color BullishColor=DarkOliveGreen; extern color BearishColor=Maroon; extern color NeutralColor=DimGray; //-----------------------Èíèöèàëèçàöèÿ è óäàëåíèå------------------------- 2 --| int init() { ObjectCreate("Ïðîöåíò1",OBJ_LABEL,0,0,0,0,0); ObjectCreate("Ïðîöåíò2",OBJ_LABEL,0,0,0,0,0); ObjectCreate("Ïðîöåíò3",OBJ_LABEL,0,0,0,0,0); ObjectCreate("Ïðîöåíò4",OBJ_LABEL,0,0,0,0,0); ObjectCreate("Ïðîöåíò5",OBJ_LABEL,0,0,0,0,0); ObjectCreate("Ïðîöåíò6",OBJ_LABEL,0,0,0,0,0); ObjectCreate("Ïðîöåíò7",OBJ_LABEL,0,0,0,0,0); ObjectCreate("Ïðîöåíò8",OBJ_LABEL,0,0,0,0,0); ObjectCreate("Ïðîöåíò9",OBJ_LABEL,0,0,0,0,0); ObjectCreate("Ïðîöåíò10",OBJ_LABEL,0,0,0,0,0); ObjectCreate("Ïðîöåíò11",OBJ_LABEL,0,0,0,0,0); ObjectCreate("Ïðîöåíò12",OBJ_LABEL,0,0,0,0,0); ObjectCreate("Ïðîöåíò13",OBJ_LABEL,0,0,0,0,0); ObjectCreate("Ïðîöåíò14",OBJ_LABEL,0,0,0,0,0); ObjectCreate("Ïðîöåíò15",OBJ_LABEL,0,0,0,0,0); ObjectCreate("Ïðîöåíò16",OBJ_LABEL,0,0,0,0,0); ObjectCreate("Ïðîöåíò17",OBJ_LABEL,0,0,0,0,0); ObjectCreate("Ïðîöåíò18",OBJ_LABEL,0,0,0,0,0); ObjectCreate("Ïðîöåíò19",OBJ_LABEL,0,0,0,0,0); ObjectCreate("Ïðîöåíò20",OBJ_LABEL,0,0,0,0,0); ObjectCreate("Ïðîöåíò21",OBJ_LABEL,0,0,0,0,0); ObjectCreate("Ïðîöåíò22",OBJ_LABEL,0,0,0,0,0); ObjectCreate("Ïðîöåíò23",OBJ_LABEL,0,0,0,0,0); ObjectCreate("Ïðîöåíò24",OBJ_LABEL,0,0,0,0,0); ObjectCreate("Ïðîöåíò25",OBJ_LABEL,0,0,0,0,0); ObjectCreate("Ïðîöåíò26",OBJ_LABEL,0,0,0,0,0); ObjectCreate("Ïðîöåíò27",OBJ_LABEL,0,0,0,0,0); ObjectCreate("Ïðîöåíò28",OBJ_LABEL,0,0,0,0,0); ObjectCreate("Ïðîöåíò29",OBJ_LABEL,0,0,0,0,0); ObjectCreate("Íàäïèñü1",OBJ_LABEL,0,0,0,0,0); ObjectCreate("Íàäïèñü2",OBJ_LABEL,0,0,0,0,0); ObjectCreate("Íàäïèñü3",OBJ_LABEL,0,0,0,0,0); ObjectCreate("Íàäïèñü4",OBJ_LABEL,0,0,0,0,0); ObjectCreate("Íàäïèñü5",OBJ_LABEL,0,0,0,0,0); ObjectCreate("Íàäïèñü6",OBJ_LABEL,0,0,0,0,0); ObjectCreate("Íàäïèñü7",OBJ_LABEL,0,0,0,0,0); ObjectCreate("Íàäïèñü8",OBJ_LABEL,0,0,0,0,0); ObjectCreate("Íàäïèñü9",OBJ_LABEL,0,0,0,0,0); ObjectCreate("Íàäïèñü10",OBJ_LABEL,0,0,0,0,0); ObjectCreate("Íàäïèñü11",OBJ_LABEL,0,0,0,0,0); ObjectCreate("Íàäïèñü12",OBJ_LABEL,0,0,0,0,0); ObjectCreate("Íàäïèñü13",OBJ_LABEL,0,0,0,0,0); ObjectCreate("Íàäïèñü14",OBJ_LABEL,0,0,0,0,0); ObjectCreate("Íàäïèñü15",OBJ_LABEL,0,0,0,0,0); return(0); return(0); } int deinit() { ObjectDelete ("Ïðîöåíò1"); ObjectDelete ("Ïðîöåíò2"); ObjectDelete ("Ïðîöåíò3"); ObjectDelete ("Ïðîöåíò4"); ObjectDelete ("Ïðîöåíò5"); ObjectDelete ("Ïðîöåíò6"); ObjectDelete ("Ïðîöåíò7"); ObjectDelete ("Ïðîöåíò8"); ObjectDelete ("Ïðîöåíò9"); ObjectDelete ("Ïðîöåíò10"); ObjectDelete ("Ïðîöåíò11"); ObjectDelete ("Ïðîöåíò12"); ObjectDelete ("Ïðîöåíò13"); ObjectDelete ("Ïðîöåíò14"); ObjectDelete ("Ïðîöåíò15"); ObjectDelete ("Ïðîöåíò16"); ObjectDelete ("Ïðîöåíò17"); ObjectDelete ("Ïðîöåíò18"); ObjectDelete ("Ïðîöåíò19"); ObjectDelete ("Ïðîöåíò20"); ObjectDelete ("Ïðîöåíò21"); ObjectDelete ("Ïðîöåíò22"); ObjectDelete ("Ïðîöåíò23"); ObjectDelete ("Ïðîöåíò24"); ObjectDelete ("Ïðîöåíò25"); ObjectDelete ("Ïðîöåíò26"); ObjectDelete ("Ïðîöåíò27"); ObjectDelete ("Ïðîöåíò28"); ObjectDelete ("Ïðîöåíò29"); ObjectDelete ("Íàäïèñü1"); ObjectDelete ("Íàäïèñü2"); ObjectDelete ("Íàäïèñü3"); ObjectDelete ("Íàäïèñü4"); ObjectDelete ("Íàäïèñü5"); ObjectDelete ("Íàäïèñü6"); ObjectDelete ("Íàäïèñü7"); ObjectDelete ("Íàäïèñü8"); ObjectDelete ("Íàäïèñü9"); ObjectDelete ("Íàäïèñü10"); ObjectDelete ("Íàäïèñü11"); ObjectDelete ("Íàäïèñü12"); ObjectDelete ("Íàäïèñü13"); ObjectDelete ("Íàäïèñü14"); ObjectDelete ("Íàäïèñü15"); return(0); } //-----------------Âû÷èñëåíèå ïðîöåíòà è ïðèñâîåíèå öâåòà----------------- 3 --| int start() { double CH1; if (iClose("MICEX" , PERIOD_D1, 1) == 0) { CH1= 0.0000; } else { CH1 = (( (iClose("MICEX" ,PERIOD_D1 ,0) * 100 ) / iClose("MICEX" , PERIOD_D1, 1) - 100 ) ); } color lColor1 = NeutralColor; if ( CH1 > 0 ) lColor1 = BullishColor; if ( CH1 < 0 ) lColor1 = BearishColor; double CH2; if (iClose("GAZP" , PERIOD_D1, 1) == 0) { CH2= 0.0000; } else { CH2 = (( (iClose("GAZP" ,PERIOD_D1 ,0) * 100 ) / iClose("GAZP" , PERIOD_D1, 1) - 100 ) ); } color lColor2 = NeutralColor; if ( CH2 > 0 ) lColor2 = BullishColor; if ( CH2 < 0 ) lColor2 = BearishColor; double CH3; if (iClose("LKOH" , PERIOD_D1, 1) == 0) { CH3= 0.0000; } else { CH3 = (( (iClose("LKOH" ,PERIOD_D1 ,0) * 100 ) / iClose("LKOH" , PERIOD_D1, 1) - 100 ) ); } color lColor3 = NeutralColor; if ( CH3 > 0 ) lColor3 = BullishColor; if ( CH3 < 0 ) lColor3 = BearishColor; double CH4; if (iClose("ROSN" , PERIOD_D1, 1) == 0) { CH4= 0.0000; } else { CH4 = (( (iClose("ROSN" ,PERIOD_D1 ,0) * 100 ) / iClose("ROSN" , PERIOD_D1, 1) - 100 ) ); } color lColor4 = NeutralColor; if ( CH4 > 0 ) lColor4 = BullishColor; if ( CH4 < 0 ) lColor4 = BearishColor; double CH5; if (iClose("SNGS" , PERIOD_D1, 1) == 0) { CH5= 0.0000; } else { CH5 = (( (iClose("SNGS" ,PERIOD_D1 ,0) * 100 ) / iClose("SNGS" , PERIOD_D1, 1) - 100 ) ); } color lColor5 = NeutralColor; if ( CH5 > 0 ) lColor5 = BullishColor; if ( CH5 < 0 ) lColor5 = BearishColor; double CH6; if (iClose("TATN" , PERIOD_D1, 1) == 0) { CH6= 0.0000; } else { CH6 = (( (iClose("TATN" ,PERIOD_D1 ,0) * 100 ) / iClose("TATN" , PERIOD_D1, 1) - 100 ) ); } color lColor6 = NeutralColor; if ( CH6 > 0 ) lColor6 = BullishColor; if ( CH6 < 0 ) lColor6 = BearishColor; double CH7; if (iClose("SIBN" , PERIOD_D1, 1) == 0) { CH7= 0.0000; } else { CH7 = (( (iClose("SIBN" ,PERIOD_D1 ,0) * 100 ) / iClose("SIBN" , PERIOD_D1, 1) - 100 ) ); } color lColor7 = NeutralColor; if ( CH7 > 0 ) lColor7 = BullishColor; if ( CH7 < 0 ) lColor7 = BearishColor; double CH8; if (iClose("TRNF" , PERIOD_D1, 1) == 0) { CH8= 0.0000; } else { CH8 = (( (iClose("TRNF" ,PERIOD_D1 ,0) * 100 ) / iClose("TRNF" , PERIOD_D1, 1) - 100 ) ); } color lColor8 = NeutralColor; if ( CH8 > 0 ) lColor8 = BullishColor; if ( CH8 < 0 ) lColor8 = BearishColor; double CH9; if (iClose("GMKN" , PERIOD_D1, 1) == 0) { CH9= 0.0000; } else { CH9 = (( (iClose("GMKN" ,PERIOD_D1 ,0) * 100 ) / iClose("GMKN" , PERIOD_D1, 1) - 100 ) ); } color lColor9 = NeutralColor; if ( CH9 > 0 ) lColor9 = BullishColor; if ( CH9 < 0 ) lColor9 = BearishColor; double CH10; if (iClose("CHMF" , PERIOD_D1, 1) == 0) { CH10= 0.0000; } else { CH10 = (( (iClose("CHMF" ,PERIOD_D1 ,0) * 100 ) / iClose("CHMF" , PERIOD_D1, 1) - 100 ) ); } color lColor10 = NeutralColor; if ( CH10 > 0 ) lColor10 = BullishColor; if ( CH10 < 0 ) lColor10 = BearishColor; double CH11; if (iClose("NLMK" , PERIOD_D1, 1) == 0) { CH11= 0.0000; } else { CH11 = (( (iClose("NLMK" ,PERIOD_D1 ,0) * 100 ) / iClose("NLMK" , PERIOD_D1, 1) - 100 ) ); } color lColor11 = NeutralColor; if ( CH11 > 0 ) lColor11 = BullishColor; if ( CH11 < 0 ) lColor11 = BearishColor; double CH12; if (iClose("MAGN" , PERIOD_D1, 1) == 0) { CH12= 0.0000; } else { CH12 = (( (iClose("MAGN" ,PERIOD_D1 ,0) * 100 ) / iClose("MAGN" , PERIOD_D1, 1) - 100 ) ); } color lColor12 = NeutralColor; if ( CH12 > 0 ) lColor12 = BullishColor; if ( CH12 < 0 ) lColor12 = BearishColor; double CH13; if (iClose("PLZL" , PERIOD_D1, 1) == 0) { CH13= 0.0000; } else { CH13 = (( (iClose("PLZL" ,PERIOD_D1 ,0) * 100 ) / iClose("PLZL" , PERIOD_D1, 1) - 100 ) ); } color lColor13 = NeutralColor; if ( CH13 > 0 ) lColor13 = BullishColor; if ( CH13 < 0 ) lColor13 = BearishColor; double CH14; if (iClose("MTSI" , PERIOD_D1, 1) == 0) { CH14= 0.0000; } else { CH14 = (( (iClose("MTSI" ,PERIOD_D1 ,0) * 100 ) / iClose("MTSI" , PERIOD_D1, 1) - 100 ) ); } color lColor14 = NeutralColor; if ( CH14 > 0 ) lColor14 = BullishColor; if ( CH14 < 0 ) lColor14 = BearishColor; double CH15; if (iClose("RBCI" , PERIOD_D1, 1) == 0) { CH15= 0.0000; } else { CH15 = (( (iClose("RBCI" ,PERIOD_D1 ,0) * 100 ) / iClose("RBCI" , PERIOD_D1, 1) - 100 ) ); } color lColor15 = NeutralColor; if ( CH15 > 0 ) lColor15 = BullishColor; if ( CH15 < 0 ) lColor15 = BearishColor; double CH16; if (iClose("RTKM" , PERIOD_D1, 1) == 0) { CH16= 0.0000; } else { CH16 = (( (iClose("RTKM" ,PERIOD_D1 ,0) * 100 ) / iClose("RTKM" , PERIOD_D1, 1) - 100 ) ); } color lColor16 = NeutralColor; if ( CH16 > 0 ) lColor16 = BullishColor; if ( CH16 < 0 ) lColor16 = BearishColor; double CH17; if (iClose("URSI" , PERIOD_D1, 1) == 0) { CH17= 0.0000; } else { CH17 = (( (iClose("URSI" ,PERIOD_D1 ,0) * 100 ) / iClose("URSI" , PERIOD_D1, 1) - 100 ) ); } color lColor17 = NeutralColor; if ( CH17 > 0 ) lColor17 = BullishColor; if ( CH17 < 0 ) lColor17 = BearishColor; double CH18; if (iClose("VTEL" , PERIOD_D1, 1) == 0) { CH18= 0.0000; } else { CH18 = (( (iClose("VTEL" ,PERIOD_D1 ,0) * 100 ) / iClose("VTEL" , PERIOD_D1, 1) - 100 ) ); } color lColor18 = NeutralColor; if ( CH18 > 0 ) lColor18 = BullishColor; if ( CH18 < 0 ) lColor18 = BearishColor; double CH19; if (iClose("MSNG" , PERIOD_D1, 1) == 0) { CH19= 0.0000; } else { CH19 = (( (iClose("MSNG" ,PERIOD_D1 ,0) * 100 ) / iClose("MSNG" , PERIOD_D1, 1) - 100 ) ); } color lColor19 = NeutralColor; if ( CH19 > 0 ) lColor19 = BullishColor; if ( CH19 < 0 ) lColor19 = BearishColor; double CH20; if (iClose("OGKE" , PERIOD_D1, 1) == 0) { CH20= 0.0000; } else { CH20 = (( (iClose("OGKE" ,PERIOD_D1 ,0) * 100 ) / iClose("OGKE" , PERIOD_D1, 1) - 100 ) ); } color lColor20 = NeutralColor; if ( CH20 > 0 ) lColor20 = BullishColor; if ( CH20 < 0 ) lColor20 = BearishColor; double CH21; if (iClose("SBER" , PERIOD_D1, 1) == 0) { CH21= 0.0000; } else { CH21 = (( (iClose("SBER" ,PERIOD_D1 ,0) * 100 ) / iClose("SBER" , PERIOD_D1, 1) - 100 ) ); } color lColor21 = NeutralColor; if ( CH21 > 0 ) lColor21 = BullishColor; if ( CH21 < 0 ) lColor21 = BearishColor; double CH22; if (iClose("VTBR" , PERIOD_D1, 1) == 0) { CH22= 0.0000; } else { CH22 = (( (iClose("VTBR" ,PERIOD_D1 ,0) * 100 ) / iClose("VTBR" , PERIOD_D1, 1) - 100 ) ); } color lColor22 = NeutralColor; if ( CH22 > 0 ) lColor22 = BullishColor; if ( CH22 < 0 ) lColor22 = BearishColor; double CH23; if (iClose("URKA" , PERIOD_D1, 1) == 0) { CH23= 0.0000; } else { CH23 = (( (iClose("URKA" ,PERIOD_D1 ,0) * 100 ) / iClose("URKA" , PERIOD_D1, 1) - 100 ) ); } color lColor23 = NeutralColor; if ( CH23 > 0 ) lColor23 = BullishColor; if ( CH23 < 0 ) lColor23 = BearishColor; double CH24; if (iClose("AFLT" , PERIOD_D1, 1) == 0) { CH24= 0.0000; } else { CH24 = (( (iClose("AFLT" ,PERIOD_D1 ,0) * 100 ) / iClose("AFLT" , PERIOD_D1, 1) - 100 ) ); } color lColor24 = NeutralColor; if ( CH24 > 0 ) lColor24 = BullishColor; if ( CH24 < 0 ) lColor24 = BearishColor; double CH25; if (iClose("USDRUR" , PERIOD_D1, 1) == 0) { CH25= 0.0000; } else { CH25 = (( (iClose("USDRUR" ,PERIOD_D1 ,0) * 100 ) / iClose("USDRUR" , PERIOD_D1, 1) - 100 ) ); } color lColor25 = NeutralColor; if ( CH25 > 0 ) lColor25 = BullishColor; if ( CH25 < 0 ) lColor25 = BearishColor; double CH26; if (iClose("EURRUR" , PERIOD_D1, 1) == 0) { CH26= 0.0000; } else { CH26 = (( (iClose("EURRUR" ,PERIOD_D1 ,0) * 100 ) / iClose("EURRUR" , PERIOD_D1, 1) - 100 ) ); } color lColor26 = NeutralColor; if ( CH26 > 0 ) lColor26 = BullishColor; if ( CH26 < 0 ) lColor26 = BearishColor; double CH27; if (iClose("HYDR" , PERIOD_D1, 1) == 0) { CH27= 0.0000; } else { CH27 = (( (iClose("HYDR" ,PERIOD_D1 ,0) * 100 ) / iClose("HYDR" , PERIOD_D1, 1) - 100 ) ); } color lColor27 = NeutralColor; if ( CH27 > 0 ) lColor27 = BullishColor; if ( CH27 < 0 ) lColor27 = BearishColor; double CH28; if (iClose("OGKC" , PERIOD_D1, 1) == 0) { CH28= 0.0000; } else { CH28 = (( (iClose("OGKC" ,PERIOD_D1 ,0) * 100 ) / iClose("OGKC" , PERIOD_D1, 1) - 100 ) ); } color lColor28 = NeutralColor; if ( CH28 > 0 ) lColor28 = BullishColor; if ( CH28 < 0 ) lColor28 = BearishColor; double CH29; if (iClose("PMT" , PERIOD_D1, 1) == 0) { CH29= 0.0000; } else { CH29 = (( (iClose("PMT" ,PERIOD_D1 ,0) * 100 ) / iClose("PMT" , PERIOD_D1, 1) - 100 ) ); } color lColor29 = NeutralColor; if ( CH29 > 0 ) lColor29 = BullishColor; if ( CH29 < 0 ) lColor29 = BearishColor; //------------------------Îáúÿâëåíèå íàçâàíèé----------------------------- 4 --| string Ïðîöåíò1 ="MICEX "+DoubleToStr(CH1,2)+"% (" +DoubleToStr(iClose("MICEX" , PERIOD_D1, 0),2)+")"; string Ïðîöåíò2 ="Ãàçïðîì "+DoubleToStr(CH2,2)+"% (" +DoubleToStr(iClose("GAZP" ,PERIOD_D1 ,0),2)+")"; string Ïðîöåíò3 ="Ëóêîéë "+DoubleToStr(CH3,2)+"% (" +DoubleToStr(iClose("LKOH" , PERIOD_D1, 0),2)+")"; string Ïðîöåíò4 ="Ðîñíåôòü "+DoubleToStr(CH4,2)+"% (" +DoubleToStr(iClose("ROSN" , PERIOD_D1, 0),2)+")"; string Ïðîöåíò5 ="Ñóðãóòíåôòåãàç "+DoubleToStr(CH5,2)+"% (" +DoubleToStr(iClose("SNGS" , PERIOD_D1, 0),2)+")"; string Ïðîöåíò6 ="Òàòíåôòü "+DoubleToStr(CH6,2)+"% (" + DoubleToStr(iClose("TATN" , PERIOD_D1, 0),2)+")"; string Ïðîöåíò7 ="Ãàçïðîìíåôòü "+DoubleToStr(CH7,2)+"% (" +DoubleToStr(iClose("SIBN" , PERIOD_D1, 0),2)+")"; string Ïðîöåíò8 ="Òðàíñíåôòü "+DoubleToStr(CH8,2)+"% (" +DoubleToStr(iClose("TRNF" , PERIOD_D1, 0),2)+")"; string Ïðîöåíò9 ="Íîðíèêåëü "+DoubleToStr(CH9,2)+"% (" +DoubleToStr(iClose("GMKN" , PERIOD_D1, 0),2)+")"; string Ïðîöåíò10 ="Ñåâåðñòàëü "+DoubleToStr(CH10,2)+"% (" +DoubleToStr(iClose("CHMF" , PERIOD_D1, 0),2)+")"; string Ïðîöåíò11 ="Íîâîëèïåöêèé ÌÊ "+DoubleToStr(CH11,2)+"% (" +DoubleToStr(iClose("NLMK" , PERIOD_D1, 0),2)+")"; string Ïðîöåíò12 ="Ìàãíèòîãîðñêèé ÌÊ "+DoubleToStr(CH12,2)+"% (" +DoubleToStr(iClose("MAGN" , PERIOD_D1, 0),2)+")"; string Ïðîöåíò13 ="Ïîëþñ Çîëîòî "+DoubleToStr(CH13,2)+"% (" +DoubleToStr(iClose("PLZL" , PERIOD_D1, 0),2)+")"; string Ïðîöåíò14 ="MTC "+DoubleToStr(CH14,2)+"% (" +DoubleToStr(iClose("MTSI" , PERIOD_D1, 0),2)+")"; string Ïðîöåíò15 ="ÐÁÊ Ñèñòåìû "+DoubleToStr(CH15,2)+"% (" +DoubleToStr(iClose("RBCI" , PERIOD_D1, 0),2)+")"; string Ïðîöåíò16 ="Ðîñòåëåêîì "+DoubleToStr(CH16,2)+"% (" +DoubleToStr(iClose("RTKM" , PERIOD_D1, 0),2)+")"; string Ïðîöåíò17 ="Óðàëñâÿçüèíôîðì "+DoubleToStr(CH17,2)+"% (" +DoubleToStr(iClose("URSI" , PERIOD_D1, 0),2)+")"; string Ïðîöåíò18 ="Âîëãà Òåëåêîì "+DoubleToStr(CH18,2)+"% (" +DoubleToStr(iClose("VTEL" , PERIOD_D1, 0),2)+")"; string Ïðîöåíò19 ="Ìîñýíåðãî "+DoubleToStr(CH19,2)+"% (" +DoubleToStr(iClose("MSNG" , PERIOD_D1, 0),2)+")"; string Ïðîöåíò20 ="ÎÃÊ-5 "+DoubleToStr(CH20,2)+"% (" +DoubleToStr(iClose("OGKE" , PERIOD_D1, 0),2)+")"; string Ïðîöåíò21 ="Ñáåðáàíê "+DoubleToStr(CH21,2)+"% (" +DoubleToStr(iClose("SBER" , PERIOD_D1, 0),2)+")"; string Ïðîöåíò22 ="ÂÒÁ "+DoubleToStr(CH22,2)+"% (" +DoubleToStr(iClose("VTBR" , PERIOD_D1, 0),2)+")"; string Ïðîöåíò23 ="Óðàëêàëèé "+DoubleToStr(CH23,2)+"% (" +DoubleToStr(iClose("URKA" , PERIOD_D1, 0),2)+")"; string Ïðîöåíò24 ="Àýðîôëîò "+DoubleToStr(CH24,2)+"% (" +DoubleToStr(iClose("AFLT" , PERIOD_D1, 0),2)+")"; string Ïðîöåíò25 ="USDRUR "+DoubleToStr(CH25,2)+"% (" +DoubleToStr(iClose("USDRUR" , PERIOD_D1, 0),2)+")"; string Ïðîöåíò26 ="EURRUR "+DoubleToStr(CH26,2)+"% (" +DoubleToStr(iClose("EURRUR" , PERIOD_D1, 0),2)+")"; string Ïðîöåíò27 ="Ðóñãèäðî "+DoubleToStr(CH27,2)+"% (" +DoubleToStr(iClose("HYDR" , PERIOD_D1, 0),2)+")"; string Ïðîöåíò28 ="ÎÃÊ-3 "+DoubleToStr(CH28,2)+"% (" +DoubleToStr(iClose("OGKC" , PERIOD_D1, 0),2)+")"; string Ïðîöåíò29 ="Ïîëèìåòàëë "+DoubleToStr(CH29,2)+"% (" +DoubleToStr(iClose("PMT" , PERIOD_D1, 0),2)+")"; string Íàäïèñü1 ="Íåôòü è ãàç"; string Íàäïèñü2 ="--------------------------------"; string Íàäïèñü3 ="Ìåòàëëóðãèÿ"; string Íàäïèñü4 ="--------------------------------"; string Íàäïèñü5 ="Òåëåêîììóíèêàöèè"; string Íàäïèñü6 ="--------------------------------"; string Íàäïèñü7 ="Ýëåêòðîýíåðãåòèêà"; string Íàäïèñü8 ="--------------------------------"; string Íàäïèñü9 ="Áàíêîâñêèé ñåêòîð"; string Íàäïèñü10 ="--------------------------------"; string Íàäïèñü11 ="Óäîáðåíèÿ"; string Íàäïèñü12 ="--------------------------------"; string Íàäïèñü13 ="Ïåðåâîçêè"; string Íàäïèñü14 ="--------------------------------"; string Íàäïèñü15 ="--------------------------------"; //-----------------------------Ïîñòðîåíèå--------------------------------- 5 --| ObjectSetText("Ïðîöåíò1",Ïðîöåíò1,14,"Verdana",lColor1); ObjectSet("Ïðîöåíò1",OBJPROP_XDISTANCE,5); ObjectSet("Ïðîöåíò1",OBJPROP_YDISTANCE,5); ObjectSetText("Ïðîöåíò2",Ïðîöåíò2,9,"Verdana",lColor2); ObjectSet("Ïðîöåíò2",OBJPROP_XDISTANCE,10); ObjectSet("Ïðîöåíò2",OBJPROP_YDISTANCE,50); ObjectSetText("Ïðîöåíò3",Ïðîöåíò3,9,"Verdana",lColor3); ObjectSet("Ïðîöåíò3",OBJPROP_XDISTANCE,10); ObjectSet("Ïðîöåíò3",OBJPROP_YDISTANCE,60); ObjectSetText("Ïðîöåíò4",Ïðîöåíò4,9,"Verdana",lColor4); ObjectSet("Ïðîöåíò4",OBJPROP_XDISTANCE,10); ObjectSet("Ïðîöåíò4",OBJPROP_YDISTANCE,70); ObjectSetText("Ïðîöåíò5",Ïðîöåíò5,9,"Verdana",lColor5); ObjectSet("Ïðîöåíò5",OBJPROP_XDISTANCE,10); ObjectSet("Ïðîöåíò5",OBJPROP_YDISTANCE,80); ObjectSetText("Ïðîöåíò6",Ïðîöåíò6,9,"Verdana",lColor6); ObjectSet("Ïðîöåíò6",OBJPROP_XDISTANCE,10); ObjectSet("Ïðîöåíò6",OBJPROP_YDISTANCE,90); ObjectSetText("Ïðîöåíò7",Ïðîöåíò7,9,"Verdana",lColor7); ObjectSet("Ïðîöåíò7",OBJPROP_XDISTANCE,10); ObjectSet("Ïðîöåíò7",OBJPROP_YDISTANCE,100); ObjectSetText("Ïðîöåíò8",Ïðîöåíò8,9,"Verdana",lColor8); ObjectSet("Ïðîöåíò8",OBJPROP_XDISTANCE,10); ObjectSet("Ïðîöåíò8",OBJPROP_YDISTANCE,110); ObjectSetText("Ïðîöåíò9",Ïðîöåíò9,9,"Verdana",lColor9); ObjectSet("Ïðîöåíò9",OBJPROP_XDISTANCE,10); ObjectSet("Ïðîöåíò9",OBJPROP_YDISTANCE,149); ObjectSetText("Ïðîöåíò10",Ïðîöåíò10,9,"Verdana",lColor10); ObjectSet("Ïðîöåíò10",OBJPROP_XDISTANCE,10); ObjectSet("Ïðîöåíò10",OBJPROP_YDISTANCE,159); ObjectSetText("Ïðîöåíò11",Ïðîöåíò11,9,"Verdana",lColor11); ObjectSet("Ïðîöåíò11",OBJPROP_XDISTANCE,10); ObjectSet("Ïðîöåíò11",OBJPROP_YDISTANCE,169); ObjectSetText("Ïðîöåíò12",Ïðîöåíò12,9,"Verdana",lColor12); ObjectSet("Ïðîöåíò12",OBJPROP_XDISTANCE,10); ObjectSet("Ïðîöåíò12",OBJPROP_YDISTANCE,179); ObjectSetText("Ïðîöåíò13",Ïðîöåíò13,9,"Verdana",lColor13); ObjectSet("Ïðîöåíò13",OBJPROP_XDISTANCE,10); ObjectSet("Ïðîöåíò13",OBJPROP_YDISTANCE,199); ObjectSetText("Ïðîöåíò14",Ïðîöåíò14,9,"Verdana",lColor14); ObjectSet("Ïðîöåíò14",OBJPROP_XDISTANCE,10); ObjectSet("Ïðîöåíò14",OBJPROP_YDISTANCE,237); ObjectSetText("Ïðîöåíò15",Ïðîöåíò15,9,"Verdana",lColor15); ObjectSet("Ïðîöåíò15",OBJPROP_XDISTANCE,10); ObjectSet("Ïðîöåíò15",OBJPROP_YDISTANCE,247); ObjectSetText("Ïðîöåíò16",Ïðîöåíò16,9,"Verdana",lColor16); ObjectSet("Ïðîöåíò16",OBJPROP_XDISTANCE,10); ObjectSet("Ïðîöåíò16",OBJPROP_YDISTANCE,257); ObjectSetText("Ïðîöåíò17",Ïðîöåíò17,9,"Verdana",lColor17); ObjectSet("Ïðîöåíò17",OBJPROP_XDISTANCE,10); ObjectSet("Ïðîöåíò17",OBJPROP_YDISTANCE,267); ObjectSetText("Ïðîöåíò18",Ïðîöåíò18,9,"Verdana",lColor18); ObjectSet("Ïðîöåíò18",OBJPROP_XDISTANCE,10); ObjectSet("Ïðîöåíò18",OBJPROP_YDISTANCE,277); ObjectSetText("Ïðîöåíò19",Ïðîöåíò19,9,"Verdana",lColor19); ObjectSet("Ïðîöåíò19",OBJPROP_XDISTANCE,10); ObjectSet("Ïðîöåíò19",OBJPROP_YDISTANCE,315); ObjectSetText("Ïðîöåíò20",Ïðîöåíò20,9,"Verdana",lColor20); ObjectSet("Ïðîöåíò20",OBJPROP_XDISTANCE,10); ObjectSet("Ïðîöåíò20",OBJPROP_YDISTANCE,335); ObjectSetText("Ïðîöåíò21",Ïðîöåíò21,9,"Verdana",lColor21); ObjectSet("Ïðîöåíò21",OBJPROP_XDISTANCE,10); ObjectSet("Ïðîöåíò21",OBJPROP_YDISTANCE,459); ObjectSetText("Ïðîöåíò22",Ïðîöåíò22,9,"Verdana",lColor22); ObjectSet("Ïðîöåíò22",OBJPROP_XDISTANCE,10); ObjectSet("Ïðîöåíò22",OBJPROP_YDISTANCE,469); ObjectSetText("Ïðîöåíò23",Ïðîöåíò23,9,"Verdana",lColor23); ObjectSet("Ïðîöåíò23",OBJPROP_XDISTANCE,10); ObjectSet("Ïðîöåíò23",OBJPROP_YDISTANCE,421); ObjectSetText("Ïðîöåíò24",Ïðîöåíò24,9,"Verdana",lColor24); ObjectSet("Ïðîöåíò24",OBJPROP_XDISTANCE,10); ObjectSet("Ïðîöåíò24",OBJPROP_YDISTANCE,383); ObjectSetText("Ïðîöåíò25",Ïðîöåíò25,9,"Verdana",lColor25); ObjectSet("Ïðîöåíò25",OBJPROP_XDISTANCE,10); ObjectSet("Ïðîöåíò25",OBJPROP_YDISTANCE,488); ObjectSetText("Ïðîöåíò26",Ïðîöåíò26,9,"Verdana",lColor26); ObjectSet("Ïðîöåíò26",OBJPROP_XDISTANCE,10); ObjectSet("Ïðîöåíò26",OBJPROP_YDISTANCE,498); ObjectSetText("Ïðîöåíò27",Ïðîöåíò27,9,"Verdana",lColor27); ObjectSet("Ïðîöåíò27",OBJPROP_XDISTANCE,10); ObjectSet("Ïðîöåíò27",OBJPROP_YDISTANCE,345); ObjectSetText("Ïðîöåíò28",Ïðîöåíò28,9,"Verdana",lColor28); ObjectSet("Ïðîöåíò28",OBJPROP_XDISTANCE,10); ObjectSet("Ïðîöåíò28",OBJPROP_YDISTANCE,325); ObjectSetText("Ïðîöåíò29",Ïðîöåíò29,9,"Verdana",lColor29); ObjectSet("Ïðîöåíò29",OBJPROP_XDISTANCE,10); ObjectSet("Ïðîöåíò29",OBJPROP_YDISTANCE,189); ObjectSetText("Íàäïèñü1",Íàäïèñü1,9,"Verdana",NeutralColor); ObjectSet("Íàäïèñü1",OBJPROP_XDISTANCE,5); ObjectSet("Íàäïèñü1",OBJPROP_YDISTANCE,32); ObjectSetText("Íàäïèñü2",Íàäïèñü2,9,"Verdana",NeutralColor); ObjectSet("Íàäïèñü2",OBJPROP_XDISTANCE,5); ObjectSet("Íàäïèñü2",OBJPROP_YDISTANCE,40); ObjectSetText("Íàäïèñü3",Íàäïèñü3,9,"Verdana",NeutralColor); ObjectSet("Íàäïèñü3",OBJPROP_XDISTANCE,5); ObjectSet("Íàäïèñü3",OBJPROP_YDISTANCE,131); ObjectSetText("Íàäïèñü4",Íàäïèñü4,9,"Verdana",NeutralColor); ObjectSet("Íàäïèñü4",OBJPROP_XDISTANCE,5); ObjectSet("Íàäïèñü4",OBJPROP_YDISTANCE,139); ObjectSetText("Íàäïèñü5",Íàäïèñü5,9,"Verdana",NeutralColor); ObjectSet("Íàäïèñü5",OBJPROP_XDISTANCE,5); ObjectSet("Íàäïèñü5",OBJPROP_YDISTANCE,219); ObjectSetText("Íàäïèñü6",Íàäïèñü6,9,"Verdana",NeutralColor); ObjectSet("Íàäïèñü6",OBJPROP_XDISTANCE,5); ObjectSet("Íàäïèñü6",OBJPROP_YDISTANCE,227); ObjectSetText("Íàäïèñü7",Íàäïèñü7,9,"Verdana",NeutralColor); ObjectSet("Íàäïèñü7",OBJPROP_XDISTANCE,5); ObjectSet("Íàäïèñü7",OBJPROP_YDISTANCE,297); ObjectSetText("Íàäïèñü8",Íàäïèñü8,9,"Verdana",NeutralColor); ObjectSet("Íàäïèñü8",OBJPROP_XDISTANCE,5); ObjectSet("Íàäïèñü8",OBJPROP_YDISTANCE,305); ObjectSetText("Íàäïèñü9",Íàäïèñü9,9,"Verdana",NeutralColor); ObjectSet("Íàäïèñü9",OBJPROP_XDISTANCE,5); ObjectSet("Íàäïèñü9",OBJPROP_YDISTANCE,441); ObjectSetText("Íàäïèñü10",Íàäïèñü10,9,"Verdana",NeutralColor); ObjectSet("Íàäïèñü10",OBJPROP_XDISTANCE,5); ObjectSet("Íàäïèñü10",OBJPROP_YDISTANCE,449); ObjectSetText("Íàäïèñü11",Íàäïèñü11,9,"Verdana",NeutralColor); ObjectSet("Íàäïèñü11",OBJPROP_XDISTANCE,5); ObjectSet("Íàäïèñü11",OBJPROP_YDISTANCE,403); ObjectSetText("Íàäïèñü12",Íàäïèñü12,9,"Verdana",NeutralColor); ObjectSet("Íàäïèñü12",OBJPROP_XDISTANCE,5); ObjectSet("Íàäïèñü12",OBJPROP_YDISTANCE,411); ObjectSetText("Íàäïèñü13",Íàäïèñü13,9,"Verdana",NeutralColor); ObjectSet("Íàäïèñü13",OBJPROP_XDISTANCE,5); ObjectSet("Íàäïèñü13",OBJPROP_YDISTANCE,365); ObjectSetText("Íàäïèñü14",Íàäïèñü14,9,"Verdana",NeutralColor); ObjectSet("Íàäïèñü14",OBJPROP_XDISTANCE,5); ObjectSet("Íàäïèñü14",OBJPROP_YDISTANCE,373); ObjectSetText("Íàäïèñü15",Íàäïèñü15,9,"Verdana",NeutralColor); ObjectSet("Íàäïèñü15",OBJPROP_XDISTANCE,5); ObjectSet("Íàäïèñü15",OBJPROP_YDISTANCE,478); return(0); } //--------------------------------Êîíåö----------------------------------- 6 --|
Sample
Analysis
Market Information Used:
Series array that contains close prices for each bar
Indicator Curves created:
Indicators Used:
Custom Indicators Used:
Order Management characteristics:
Other Features: