//+------------------------------------------------------------------+
//| GLORINIKA.mq4 |
//+------------------------------------------------------------------+
//| ÄÍÅÂÍÎÉ ÊÀÍÀË GLORINIKA.
//| Çà îñíîâó âçÿò è äîðàáîòàí i-DayRange.mq4 http://www.kimiv.ru
//| 17.11.2005 Èíäèêàòîð äíåâíîãî äèàïàçîíà. Êèì Èãîðü Â. aka KimIV
//+------------------------------------------------------------------+
/* Ýòîò èíäèêàòîð, ïîäàðîê òðåéäåðó Glorinika, â äåíü 8 Ìàðòà.
Ñðåäè Èíäèêàòîðîâ äíåâíîãî äèàïàçîíà, i-DayRange.mq4 îêàçàëñÿ ëó÷øå âñåõ, è ïîýòîìó áûëî ðåøåíî åãî äîðàáîòàòü,
 èòîãå ïîëó÷èëñÿ äîâîëüíî ïðàêòè÷íûé èíäèêàòîð, ïîìîãàþùèé ðàçîáðàòüñÿ â ñèòóàöèè íà ðûíêå â òå÷åíèè äíÿ, à òàêæå è çàðàáàòûâàòü.
Êàê ïîëüçîâàòüñÿ. Ýòîò èíäèêàòîð ýôôåêòèâíî íà÷èíàåò ðàáîòàòü ñ îòêðûòèåì åâðîïåéñêîé ñåññèè. Ïðèìåíÿåòñÿ íà ìàëûõ òàéì ôðåéìàõ,
íà÷èíàÿ îò 1 ìèí è âûøå. Ïðåäíàçíà÷åí äëÿ ïèïñîâêè, èëè îïðåäåëåíèÿ ÷åòêîé òî÷êè âõîäà â ðûíîê. Ââåðõó ãðàôèêà â êîììåíòàðèÿõ
íàõîäèòñÿ íåîáõîäèìàÿ äëÿ àíàëèçà èíôîðìàöèÿ. Ñïðåä = â íåêîòîðûõ ÄÖ, èíîãäà èçìåíÿåòñÿ (íåîáõîäèìî êîíòðîëèðîâàòü), Êàíàë = äèàïàçîí äíåâíîãî êàíàëà â ïóíêòàõ.
Ñëåäóþùèå òðè öèôðû, äèàïàçîí ïîñëåäíèõ òðåõ ñâå÷åé, ñ ïëþñîì - ââåðõ, ñ ìèíóñîì âíèç, äâîåòî÷èå : îòêðûòèå ðàâíî çàêðûòèþ.
Äàëüøå, êàê ïðèìåð: 1/8 = 22 . 1/8 = ýòî äèàïàçîí â ïóíêòàõ, êàæäîãî èç 8 äåëåíèé Ôèáî. Òî åñòü, âåñü äíåâíîé äèàïàçîí
äåëèòñÿ íà 8, è òîãäà äèàïàçîí ìåæäó 62% è 50% áóäåò ðàâåí 1/8 , èëè = 22 ïóíêòà. Ñî âðåìåíåì ìîæíî ðàçîáðàòüñÿ, ñ èñïîëüçîâàíèåì ýòèõ êîììåíòàðèåâ.
Ñâåðõó è ñíèçó äíåâíîãî êàíàëà = Ôèáî, ñòîÿò öèôðû ïîêàçûâàþùèå â ïóíêòàõ ðàññòîÿíèå îò öåíû äî Õàÿ èëè Ëîó, äíåâíîãî äèàïàçîíà.
Êàê ïîëüçîâàòüñÿ Ôèáî, ïðè îòêàòå â 12,5 è 25, èëè 38%% (â çàâèñèìîñòè îò ñèòóàöèè íà ðûíêå!!!), ñòàíîâèìñÿ â ïîçèöèþ
ïî íàïðàâëåíèþ äâèæåíèÿ, = (äîï. âàæíîå óñëîâèå, =òîëüêî ïðè äèàïàçîíå êàíàëà áîëüøå 80-100 ïóíêòîâ, âîîáùå äëÿ êàæäîé âàëþòû,
äèàïàçîí = äûõàíèå âàëþòû = îïðåäåëÿåòñÿ ïåðñîíàëüíî). Êðàñíûå è ñèíèå ëèíèè íà ãðàôèêå ïîêàçûâàþò óðîâíè ïîääåðæêè è ñîïðîòèâëåíèÿ, íà äàííûé ìîìåíò.
Ïðè íàâåäåíèè íà íèõ êóðñîðîì, ïîêàçûâàþòñÿ èõ íàçâàíèå. Àëåðò, åñëè èñïîëüçîâàòü ïî óìîë÷àíèþ = íîëü, (ëó÷øèé âàðèàíò)
è íà íåñêîëüêèõ âàëþòàõ îäíîâðåìåííî, òî íàäîåäëèâîå è ÷àñòîå ïèùàíèå, ãîâîðèò, ÷òî íà÷àëîñü äâèæåíèå èëè òðåíä.
Òèøèíà ãîâîðèò, ÷òî ïðîèñõîäèò îòêàò èëè ôëåò. Âåðòèêàëüíûå ëèíèè = ïîêàçûâàþò î ïðèáëèæåíèè îêîí÷àíèÿ 4-÷àñîâîê, èëè ÷àñîâîê
òîæå î÷åíü âàæíûé ìîìåíò â àíàëèçå. Âðîäå âñå. Íó, è åùå, ýòîò èíäþê, èíîãäà, íåîáõîäèìî ïåðåêëþ÷àòü ñ îäíîãî òàéì ôðåéìà íà äðóãîé.
(è èíîãäà (ëó÷øå ïî÷àùå) ïðîñìàòðèâàòü íà ëèíåéíûõ ãðàôèêàõ). Âðîäå âñå.
Ïîñëå ïðåçåíòàöèè ýòîãî èíäèêàòîðà, ðåøèë åùå íàä íèì ïîðàáîòàòü. Äîáàâèë äîï. Êàíàë, TF_aux_chanel âûñòàâëÿåòñÿ âî âõîäíûõ ïàðàìåòðàõ èíäèêàòîðà.
Åñëè îí íå íóæåí ìîæíî âñåãäà îòêëþ÷èòü èçìåíèâ Aux_Chanel = true íà false. Âðîäå âñå. ÓÑÏÅÕÎÂ.
======== Ñ ÄÍÅÂÍÎÉ ÊÀÍÀËÀ GLORINIKA óáðàë Èíäèêàòîð äíåâíîãî äèàïàçîíà i-DayRange.mq4 è çàìåíèë ÷àñàìè. Íó à åñëè ñ èíäþêà óáðàëè ÄÍÅÂÍÎÉ ÊÀÍÀË,
çíà÷èò ñ íàçâàíèÿ òîæå, â èòîãå èìååì èíäèêàòîð GLORINIKA
*/
//+------------------------------------------------------------------+
#property indicator_chart_window
//------- Îáíîâëåíèå èíäèêàòîðà ïðîèñõîäèò êàæäûé òèê -------------------------------
extern bool Fibo_33 = false; // true false
extern string Alert_Line = "if set to -1, will not squeak ";//
extern int Alert_HighLine=0;
extern int Alert_LowLine=0;
extern color Right_Clock__Color = SlateGray;
extern bool Right_Clock=true;
extern color Left_Clock__Color = Blue;
extern bool Left_Clock=true ;
extern int Right_Clock_1_3 = 3,Left_Clock_0_2 = 2;
extern int Clock_Font = 9;
extern bool Fibo33 = false; // true false
extern string aux_chanel_TFs = "1440 240 60 30 15";//
extern int TF_aux_chanel=30;
extern bool Aux_Chanel = false; // true false
extern int ind_shift = 4;
extern bool Scalp = false; // true false
extern bool PopupON = false ; // true false
string AlertSound="alert.wav";
// extern bool EmailON=false;
double nPoint = 0;
//+------------------------------------------------------------------+
//| Custom indicator initialization function |
//+------------------------------------------------------------------+
void init() {
ObjectCreate( "Right Clock", OBJ_LABEL, 0,0,0,0,0,0,0);
ObjectSet( "Right Clock", OBJPROP_CORNER, Right_Clock_1_3 );
ObjectSet( "Right Clock", OBJPROP_XDISTANCE, 1);
ObjectSet( "Right Clock", OBJPROP_YDISTANCE, 1);
ObjectSetText( "Right Clock", "", Clock_Font, "Arial Black", Right_Clock__Color);
//+------
ObjectCreate( "Left Clock", OBJ_LABEL, 0,0,0,0,0,0,0);
ObjectSet( "Left Clock", OBJPROP_CORNER, Left_Clock_0_2);
ObjectSet( "Left Clock", OBJPROP_XDISTANCE, 1);
ObjectSet( "Left Clock", OBJPROP_YDISTANCE, 1);
ObjectSetText( "Left Clock", "", Clock_Font, "Arial Black", Left_Clock__Color);
return(0);
}
//+------------------------------------------------------------------+
//| Custor indicator deinitialization function |
//+------------------------------------------------------------------+
void deinit() {
ObjectsDeleteAll(); Comment("");
}
//+------------------------------------------------------------------+
int start(){
datetime t01 = iTime(NULL,0,0), t1 = iTime(NULL,0,1);
double HighLine = iHigh(NULL,PERIOD_D1,0) ;
double LowLine = iLow(NULL,PERIOD_D1,0) ;
nPoint = GetPoint(Symbol());
//+--------- Äîáàâëåí èíäèêàòîð, Äèàïàçîí ïîñëåäíèõ áàðîâ -------------------
string name, value,Fibo,Fibo1, data;
for (int ii = 3; ii >= 0; ii--){
data = DoubleToStr(High[ii]/nPoint-Low[ii]/nPoint,0);
if (Close[ii] > Open[ii])
{ value = " +" + data;
} if (Close[ii] < Open[ii])
{ value = " -" + data;
}if (Close[ii] == Open[ii])
{ value = " :" + data;}
name = name + value;
Fibo1 = DoubleToStr((HighLine-LowLine)/8/nPoint,0);
Fibo = DoubleToStr((HighLine-LowLine)/nPoint,0);
Comment( " Spread = ", (Ask-Bid)/nPoint,", Chanel = " ,Fibo +" p, ", name +" p, 1/8 = " ,Fibo1 +" p.");
}
//+-----------------------------------------------------------
if (Right_Clock)ObjectSetText("Right Clock", TimeToStr( CurTime(), TIME_MINUTES ), Clock_Font, "Arial Black", Right_Clock__Color );
if (Left_Clock) ObjectSetText("Left Clock", TimeToStr( CurTime(), TIME_MINUTES ), Clock_Font, "Arial Black", Left_Clock__Color );
//+---
//+---------------------------------------------------------------------------------------
if (Fibo_33) if(ObjectFind("Fibo33")<0)
ObjectCreate("Fibo33",OBJ_FIBO,0,Time[0],Low[0],Time[0],High[0]);
ObjectSet("Fibo33",OBJPROP_PRICE1,iHigh(NULL,PERIOD_D1,0));
ObjectSet("Fibo33",OBJPROP_TIME1,iTime(NULL,PERIOD_M5,1));
ObjectSet("Fibo33",OBJPROP_PRICE2,iLow(NULL,PERIOD_D1,0));
ObjectSet("Fibo33",OBJPROP_TIME2,iTime(NULL,PERIOD_M5,1)+6000000); // 00
ObjectSet("Fibo33", OBJPROP_COLOR,Silver ); //
ObjectSet("Fibo33",OBJPROP_RAY,0);
ObjectSet("Fibo33",OBJPROP_STYLE,2);
ObjectSet("Fibo33", OBJPROP_FIBOLEVELS, 32);//FIRSTLEVEL ìîæíî äîáàâëÿòü äî 32 øòóê ïî îáðàçöó
ObjectSet("Fibo33", OBJPROP_FIRSTLEVEL+0, 0);
ObjectSet("Fibo33", OBJPROP_FIRSTLEVEL+1, 0.875);
ObjectSet("Fibo33", OBJPROP_FIRSTLEVEL+2, 0.75);
ObjectSet("Fibo33", OBJPROP_FIRSTLEVEL+3, 0.62);
ObjectSet("Fibo33", OBJPROP_FIRSTLEVEL+4, 0.5);
ObjectSet("Fibo33", OBJPROP_FIRSTLEVEL+5, 0.38);
ObjectSet("Fibo33", OBJPROP_FIRSTLEVEL+6, 0.25);
ObjectSet("Fibo33", OBJPROP_FIRSTLEVEL+7, 0.125);
ObjectSet("Fibo33", OBJPROP_FIRSTLEVEL+8, 1.0);
//+---
ObjectSet("Fibo33", OBJPROP_FIRSTLEVEL+9, 1.12);
ObjectSet("Fibo33", OBJPROP_FIRSTLEVEL+10, -0.12);
ObjectSet("Fibo33", OBJPROP_FIRSTLEVEL+11, 1.25);
ObjectSet("Fibo33", OBJPROP_FIRSTLEVEL+12, -0.25);
ObjectSet("Fibo33", OBJPROP_FIRSTLEVEL+13, 1.38);
ObjectSet("Fibo33", OBJPROP_FIRSTLEVEL+14, -0.38);
ObjectSet("Fibo33", OBJPROP_FIRSTLEVEL+15, 1.62);
ObjectSet("Fibo33", OBJPROP_FIRSTLEVEL+16, -0.62);
ObjectSet("Fibo33", OBJPROP_FIRSTLEVEL+17, 1.5);
ObjectSet("Fibo33", OBJPROP_FIRSTLEVEL+18, -0.5);
ObjectSet("Fibo33", OBJPROP_FIRSTLEVEL+19, 2);
ObjectSet("Fibo33", OBJPROP_FIRSTLEVEL+20, -1);
ObjectSet("Fibo33", OBJPROP_FIRSTLEVEL+21, 2.6);
ObjectSet("Fibo33", OBJPROP_FIRSTLEVEL+22, -1.6);
ObjectSet("Fibo33", OBJPROP_FIRSTLEVEL+23, 1.75);
ObjectSet("Fibo33", OBJPROP_FIRSTLEVEL+24, -0.75);
ObjectSet("Fibo33", OBJPROP_FIRSTLEVEL+25, 1.875);
ObjectSet("Fibo33", OBJPROP_FIRSTLEVEL+26, -0.875);
//+---
ObjectSetFiboDescription("Fibo33",0,"%$");
ObjectSetFiboDescription("Fibo33",1,"0.125");
ObjectSetFiboDescription("Fibo33",2,"0.25");
ObjectSetFiboDescription("Fibo33",3,"0.38");
ObjectSetFiboDescription("Fibo33",4,"0.50");
ObjectSetFiboDescription("Fibo33",5,"0.62");
ObjectSetFiboDescription("Fibo33",6,"0.75");
ObjectSetFiboDescription("Fibo33",7,"0.125");
ObjectSetFiboDescription("Fibo33",8,"%$");
//+---
ObjectSetFiboDescription("Fibo33",9,""); //1.12
ObjectSetFiboDescription("Fibo33",10,""); //1.12
ObjectSetFiboDescription("Fibo33",11,""); //1.25
ObjectSetFiboDescription("Fibo33",12,""); //1.25
ObjectSetFiboDescription("Fibo33",13,""); //1.38
ObjectSetFiboDescription("Fibo33",14,""); //1.38
ObjectSetFiboDescription("Fibo33",15,""); //1.62
ObjectSetFiboDescription("Fibo33",16,""); //1.62
ObjectSetFiboDescription("Fibo33",17,"1.5");
ObjectSetFiboDescription("Fibo33",18,"1.5");
ObjectSetFiboDescription("Fibo33",19,"2.0");
ObjectSetFiboDescription("Fibo33",20,"2.0");
ObjectSetFiboDescription("Fibo33",21,"2.62");
ObjectSetFiboDescription("Fibo33",22,"2.62");
ObjectSet("Fibo33",OBJPROP_LEVELCOLOR,Silver);
ObjectSet("Fibo33",OBJPROP_LEVELSTYLE,2);
//+---
if (ObjectFind("Today\'s Open")==-1){
ObjectCreate("Today\'s Open",OBJ_TREND,0,0,0,0);
ObjectSet("Today\'s Open",OBJPROP_RAY,false);
ObjectSet("Today\'s Open",OBJPROP_STYLE,3); //0 1 2 3 4
ObjectSet("Today\'s Open",OBJPROP_COLOR,Blue);
}ObjectSet("Today\'s Open",OBJPROP_PRICE1, iOpen(NULL,PERIOD_D1,0));
ObjectSet("Today\'s Open",OBJPROP_TIME1,iTime(NULL,PERIOD_D1,0));
ObjectSet("Today\'s Open",OBJPROP_PRICE2,iOpen(NULL,PERIOD_D1,0));
ObjectSet("Îòêðûòèå ñåãîäíÿøíåãî äíÿ",OBJPROP_TIME2,iTime(NULL,PERIOD_M5,1));
//+---
if (ObjectFind("Expected Today\'s Close")==-1){
ObjectCreate("Expected Today\'s Close",OBJ_ARROW,0,0,0,0,0);
ObjectSet("Expected Today\'s Close",OBJPROP_ARROWCODE,6);
ObjectSet("Expected Today\'s Close",OBJPROP_COLOR,Magenta);
} ObjectSet("Expected Today\'s Close",OBJPROP_PRICE1, iClose(NULL,PERIOD_D1,1)+ (iClose(NULL,PERIOD_D1,1)-iClose(NULL,PERIOD_D1,2)));
ObjectSet("Expected Today\'s Close",OBJPROP_TIME1,iTime(NULL,PERIOD_D1,0)+86200);
//+---
if (ObjectFind("This Week Open")==-1){
ObjectCreate("This Week Open",OBJ_TREND,0,0,0,0);
ObjectSet("This Week Open",OBJPROP_RAY,True); //false False True
ObjectSet("This Week Open",OBJPROP_STYLE,2); //0 1 2 3 4
ObjectSet("This Week Open",OBJPROP_COLOR,Blue);
}ObjectSet("This Week Open",OBJPROP_PRICE1, iOpen(NULL,PERIOD_W1,0));
ObjectSet("This Week Open",OBJPROP_TIME1,iTime(NULL,PERIOD_W1,0));
ObjectSet("This Week Open",OBJPROP_PRICE2,iOpen(NULL,PERIOD_W1,0));
ObjectSet("This Week Open",OBJPROP_TIME2,iTime(NULL,PERIOD_M5,1));
//+--
//+---
if (ObjectFind("Last Week Close")==-1){
ObjectCreate("Last Week Close",OBJ_TREND,0,0,0,0);
ObjectSet("Last Week Close",OBJPROP_RAY,false); //false False True
ObjectSet("Last Week Close",OBJPROP_STYLE,2); //0 1 2 3 4
ObjectSet("Last Week Close",OBJPROP_COLOR,Magenta);
}ObjectSet("Last Week Close",OBJPROP_PRICE1, iClose(NULL,PERIOD_W1,1));
ObjectSet("Last Week Close",OBJPROP_TIME1,iTime(NULL,PERIOD_W1,0));
ObjectSet("Last Week Close",OBJPROP_PRICE2,iClose(NULL,PERIOD_W1,1));
ObjectSet("Last Week Close",OBJPROP_TIME2,iTime(NULL,PERIOD_M5,1));
//+---
if (ObjectFind("Yesterday\'s Close")==-1){
ObjectCreate("Yesterday\'s Close",OBJ_TREND,0,0,0,0);
ObjectSet("Yesterday\'s Close",OBJPROP_RAY,false); //false False True
ObjectSet("Yesterday\'s Close",OBJPROP_STYLE,2); //0 1 2 3 4
ObjectSet("Yesterday\'s Close",OBJPROP_COLOR,Magenta);
}ObjectSet("Yesterday\'s Close",OBJPROP_PRICE1, iClose(NULL,PERIOD_D1,1));
ObjectSet("Yesterday\'s Close",OBJPROP_TIME1,iTime(NULL,PERIOD_H4,1));
ObjectSet("Yesterday\'s Close",OBJPROP_PRICE2,iClose(NULL,PERIOD_D1,1));
ObjectSet("Yesterday\'s Close",OBJPROP_TIME2,iTime(NULL,PERIOD_M5,1));
//+--
//+---
if (ObjectFind("Close of Two Days Ago ")==-1){
ObjectCreate("Close of Two Days Ago ",OBJ_TREND,0,0,0,0);
ObjectSet("Close of Two Days Ago ",OBJPROP_RAY,false); //false False True
ObjectSet("Close of Two Days Ago ",OBJPROP_STYLE,2); //0 1 2 3 4
ObjectSet("Close of Two Days Ago ",OBJPROP_COLOR,Magenta);
}ObjectSet("Close of Two Days Ago ",OBJPROP_PRICE1, iClose(NULL,PERIOD_D1,2));
ObjectSet("Close of Two Days Ago ",OBJPROP_TIME1,iTime(NULL,PERIOD_H4,1));
ObjectSet("Close of Two Days Ago ",OBJPROP_PRICE2,iClose(NULL,PERIOD_D1,2));
ObjectSet("Close of Two Days Ago ",OBJPROP_TIME2,iTime(NULL,PERIOD_M5,1));
//+--
//+--
if (ObjectFind("Yesterday\'s Low")==-1){
ObjectCreate("Yesterday\'s Low",OBJ_TREND,0,0,0,0);
ObjectSet("Yesterday\'s Low",OBJPROP_RAY,false);
ObjectSet("Yesterday\'s Low",OBJPROP_STYLE,2); //0 1 2 3 4
ObjectSet("Yesterday\'s Low",OBJPROP_COLOR,Blue);
}ObjectSet("Yesterday\'s Low",OBJPROP_PRICE1, iLow(NULL,PERIOD_D1,1));
ObjectSet("Yesterday\'s Low",OBJPROP_TIME1,iTime(NULL,PERIOD_H4,1));
ObjectSet("Yesterday\'s Low",OBJPROP_PRICE2,iLow(NULL,PERIOD_D1,1));
ObjectSet("Yesterday\'s Low",OBJPROP_TIME2,t01+(t01-t1)*4);
//+--
if (ObjectFind("Yesterday\'s High")==-1){
ObjectCreate("Yesterday\'s High",OBJ_TREND,0,0,0,0);
ObjectSet("Yesterday\'s High",OBJPROP_RAY,false);
ObjectSet("Yesterday\'s High",OBJPROP_STYLE,2); //0 1 2 3 4
ObjectSet("Yesterday\'s High",OBJPROP_COLOR,Red);
} ObjectSet("Yesterday\'s High",OBJPROP_PRICE1, iHigh(NULL,PERIOD_D1,1));
ObjectSet("Yesterday\'s High",OBJPROP_TIME1,iTime(NULL,PERIOD_H4,1));
ObjectSet("Yesterday\'s High",OBJPROP_PRICE2,iHigh(NULL,PERIOD_D1,1));
ObjectSet("Yesterday\'s High",OBJPROP_TIME2,t01+(t01-t1)*4);
//+---
//+---
if (ObjectFind("Last Week Low")==-1){
ObjectCreate("Last Week Low",OBJ_ARROW,0,0,0,0,0);
ObjectSet("Last Week Low",OBJPROP_ARROWCODE,6);
ObjectSet("Last Week Low",OBJPROP_COLOR,Blue);
ObjectSet("Last Week Low",OBJPROP_TIMEFRAMES,OBJ_PERIOD_M5|OBJ_PERIOD_M15|OBJ_PERIOD_M30|OBJ_PERIOD_H1); // |OBJ_PERIOD_H4
} ObjectSet("Last Week Low",OBJPROP_PRICE1,iLow(NULL, PERIOD_W1, 1));
ObjectSet("Last Week Low",OBJPROP_TIME1,t01+(t01-t1)*4);
//+---
if (ObjectFind("Last Week High")==-1){
ObjectCreate("Last Week High",OBJ_ARROW,0,0,0,0,0);
ObjectSet("Last Week High",OBJPROP_ARROWCODE,6);
ObjectSet("Last Week High",OBJPROP_COLOR,Magenta);
ObjectSet("Last Week High",OBJPROP_TIMEFRAMES,OBJ_PERIOD_M5|OBJ_PERIOD_M15|OBJ_PERIOD_M30|OBJ_PERIOD_H1); // |OBJ_PERIOD_H4
} ObjectSet("Last Week High",OBJPROP_PRICE1,iHigh(NULL, PERIOD_W1, 1));
ObjectSet("Last Week High",OBJPROP_TIME1,t01+(t01-t1)*4);
//+---
if (ObjectFind("Expected Close, Weekly")==-1){
ObjectCreate("Expected Close, Weekly",OBJ_ARROW,0,0,0,0);
ObjectSet("Expected Close, Weekly",OBJPROP_ARROWCODE,115); // 167 159 115 4 5
ObjectSet("Expected Close, Weekly",OBJPROP_WIDTH ,1); //0,1,2,3
ObjectSet("Expected Close, Weekly",OBJPROP_COLOR,Magenta);
} ObjectSet("Expected Close, Weekly",OBJPROP_PRICE1, iClose(NULL,PERIOD_W1,1)+ (iClose(NULL,PERIOD_W1,1)-iClose(NULL,PERIOD_W1,2)));
ObjectSet("Expected Close, Weekly",OBJPROP_TIME1,iTime(NULL,PERIOD_W1,0)+(iTime(NULL,PERIOD_W1,0)-iTime(NULL,PERIOD_W1,1)));
//+--
if (ObjectFind("High of Two Days Ago")==-1){
ObjectCreate("High of Two Days Ago",OBJ_TREND,0,0,0,0);
ObjectSet("High of Two Days Ago",OBJPROP_RAY,false);
ObjectSet("High of Two Days Ago",OBJPROP_STYLE,2); //0 1 2 3 4
ObjectSet("High of Two Days Ago",OBJPROP_COLOR,Red);
} ObjectSet("High of Two Days Ago",OBJPROP_PRICE1, iHigh(NULL,PERIOD_D1,2));
ObjectSet("High of Two Days Ago",OBJPROP_TIME1,iTime(NULL,PERIOD_H4,1));
ObjectSet("High of Two Days Ago",OBJPROP_PRICE2,iHigh(NULL,PERIOD_D1,2));
ObjectSet("High of Two Days Ago",OBJPROP_TIME2,iTime(NULL,PERIOD_M5,1));
//+---
if (ObjectFind("Low of Two Days Ago")==-1){
ObjectCreate("Low of Two Days Ago",OBJ_TREND,0,0,0,0);
ObjectSet("Low of Two Days Ago",OBJPROP_RAY,false);
ObjectSet("Low of Two Days Ago",OBJPROP_STYLE,2); //0 1 2 3 4
ObjectSet("Low of Two Days Ago",OBJPROP_COLOR,Blue);
}ObjectSet("Low of Two Days Ago",OBJPROP_PRICE1, iLow(NULL,PERIOD_D1,2));
ObjectSet("Low of Two Days Ago",OBJPROP_TIME1,iTime(NULL,PERIOD_H4,1));
ObjectSet("Low of Two Days Ago",OBJPROP_PRICE2,iLow(NULL,PERIOD_D1,2));
ObjectSet("Low of Two Days Ago",OBJPROP_TIME2,iTime(NULL,PERIOD_M5,1));
//+------------------------------------------------------------------+
//+--
if (ObjectFind("Next H1Period VLine")==-1){
ObjectCreate("Next H1Period VLine",OBJ_VLINE,0,0,0);
ObjectSet("Next H1Period VLine",OBJPROP_COLOR,DarkGray);
ObjectSet("Next H1Period VLine",OBJPROP_TIMEFRAMES,OBJ_PERIOD_M1 |OBJ_PERIOD_M5 ); // | OBJ_PERIOD_M15
ObjectSet("Next H1Period VLine",OBJPROP_STYLE,2); //0 1 2 3 4
ObjectSet("Next H1Period VLine",OBJPROP_BACK,true);// true false
} ObjectSet("Next H1Period VLine",OBJPROP_TIME1,iTime(NULL,PERIOD_H1,0)+3600);
ObjectSet("Next H1Period VLine",OBJPROP_PRICE1, 0);
//+------------------------------------------------------------------+
//+---
if (ObjectFind("Next H4Period")==-1){
ObjectCreate("Next H4Period",OBJ_VLINE,0,0,0);
ObjectSet("Next H4Period",OBJPROP_COLOR,DarkGray);
ObjectSet("Next H4Period",OBJPROP_STYLE,2); //0 1 2 3 4
ObjectSet("Next H4Period",OBJPROP_BACK,true);// true false
} ObjectSet("Next H4Period",OBJPROP_TIME1,iTime(NULL,PERIOD_H4,0)+14400);
ObjectSet("Next H4Period",OBJPROP_PRICE1, 0);
//+------------------------------------------------------------------+
//+--
if (ObjectFind("Channel 11")==-1){ ObjectCreate("Channel 11", OBJ_CHANNEL, 0, 0,0, 0, 0);
} ObjectSet("Channel 11",OBJPROP_TIME1,Time[1]); ObjectSet("Channel 11",OBJPROP_PRICE1,HighLine);
ObjectSet("Channel 11",OBJPROP_TIME2,Time[0]); ObjectSet("Channel 11",OBJPROP_PRICE2,HighLine);
ObjectSet("Channel 11",OBJPROP_TIME3,Time[0]); ObjectSet("Channel 11",OBJPROP_PRICE3,HighLine);
ObjectSet("Channel 11", OBJPROP_COLOR, SlateGray); ObjectSet("Channel 11",OBJPROP_RAY,0);
//+---------
if (ObjectFind("HighLine")==-1){ ObjectCreate("HighLine",OBJ_TEXT, 0, 0, 0);
} ObjectSetText("HighLine",DoubleToStr(MathAbs((NormalizeDouble(Bid,Digits)-NormalizeDouble
(ObjectGetValueByShift("Channel "+11,0),Digits))*MathPow(10,Digits)),0),7,"Arial",SlateGray);
ObjectSet("HighLine",OBJPROP_PRICE1,NormalizeDouble(ObjectGetValueByShift("Channel "+11,0),Digits)+5*nPoint);
ObjectSet("HighLine",OBJPROP_TIME1,Time[0]) ;
//---------
double val1=ObjectGetValueByShift("Channel 11", 0);
if (Bid-Alert_HighLine*nPoint <= val1 && Bid+Alert_HighLine*nPoint >= val1)
{ PlaySound (AlertSound);
if (PopupON) Alert (Symbol()," price within ",Alert_HighLine," pips of ","Channel 11");
// if (EmailON) SendMail(Symbol()+" ",Alert_HighLine+" pips from "+"Channel 11");
}
//+-----------------------------------------------------------------------------------------------
if (ObjectFind("Channel 111")==-1){ ObjectCreate("Channel 111", OBJ_CHANNEL, 0, 0,0, 0, 0);
} ObjectSet("Channel 111",OBJPROP_TIME1,Time[1]); ObjectSet("Channel 111",OBJPROP_PRICE1,LowLine);
ObjectSet("Channel 111",OBJPROP_TIME2,Time[0]); ObjectSet("Channel 111",OBJPROP_PRICE2,LowLine);
ObjectSet("Channel 111",OBJPROP_TIME3,Time[0]); ObjectSet("Channel 111",OBJPROP_PRICE3,LowLine);
ObjectSet("Channel 111", OBJPROP_COLOR, SlateGray); ObjectSet("Channel 111",OBJPROP_RAY,0);
//+---------
if (ObjectFind("LowLine")==-1){ ObjectCreate("LowLine",OBJ_TEXT, 0, 0, 0);
} ObjectSetText("LowLine",DoubleToStr(MathAbs((NormalizeDouble(Bid,Digits)-NormalizeDouble
(ObjectGetValueByShift("Channel "+111,0),Digits))*MathPow(10,Digits)),0),7,"Arial",SlateGray);
ObjectSet("LowLine",OBJPROP_PRICE1,NormalizeDouble(ObjectGetValueByShift("Channel "+111,0),Digits)-2*nPoint);
ObjectSet("LowLine",OBJPROP_TIME1,Time[0]) ;
//+-------
double val2=ObjectGetValueByShift("Channel 111", 0);
if (Bid-Alert_LowLine*nPoint <= val2 && Bid+Alert_LowLine*nPoint >= val2)
{ PlaySound (AlertSound);
if (PopupON) Alert (Symbol()," price within ",Alert_LowLine," pips of ","Channel 111");
//if (EmailON) SendMail(Symbol()+" ",Alert_LowLine+" pips from "+"Channel 111");
}
//+-----------------------------------------------------------------------------------------------
if (ObjectFind("Last_Week_High")==-1){ ObjectCreate("Last_Week_High", OBJ_TREND,0,0,0,0);
} ObjectSet("Last_Week_High",OBJPROP_TIME1,iTime(NULL,PERIOD_H4,1)); ObjectSet("Last_Week_High",OBJPROP_PRICE1,iHigh(NULL,PERIOD_W1,1));
ObjectSet("Last_Week_High",OBJPROP_TIME2,t01+(t01-t1)*3); ObjectSet("Last_Week_High",OBJPROP_PRICE2,iHigh(NULL,PERIOD_W1,1));
ObjectSet("Last_Week_High", OBJPROP_COLOR, Magenta); ObjectSet("Last_Week_High",OBJPROP_RAY,0);
ObjectSet("Last_Week_High",OBJPROP_STYLE,2); //0 1 2 3 4
//+---------
if (ObjectFind("Distance from Price to Last Week High")==-1){ ObjectCreate("Distance from Price to Last Week High",OBJ_TEXT, 0, 0, 0);
} ObjectSetText("Distance from Price to Last Week High",DoubleToStr(MathAbs((NormalizeDouble(Bid,Digits)-NormalizeDouble
(ObjectGetValueByShift("Last_Week_High",0),Digits))*MathPow(10,Digits)),0),7,"Arial",SlateGray);
ObjectSet("Distance from Price to Last Week High",OBJPROP_PRICE1,NormalizeDouble(ObjectGetValueByShift("Last_Week_High",0),Digits)+5*nPoint);
ObjectSet("Distance from Price to Last Week High",OBJPROP_TIME1,iTime(NULL,PERIOD_H1,1));
ObjectSet("Distance from Price to Last Week High", OBJPROP_COLOR, Magenta);
//+-------
if (ObjectFind("Low LastWeek")==-1){ ObjectCreate("Low LastWeek", OBJ_TREND,0,0,0,0);
} ObjectSet("Low LastWeek",OBJPROP_TIME1,iTime(NULL,PERIOD_H4,1)); ObjectSet("Low LastWeek",OBJPROP_PRICE1,iLow(NULL,PERIOD_W1,1));
ObjectSet("Low LastWeek",OBJPROP_TIME2,t01+(t01-t1)*3); ObjectSet("Low LastWeek",OBJPROP_PRICE2,iLow(NULL,PERIOD_W1,1));
ObjectSet("Low LastWeek", OBJPROP_COLOR, Blue); ObjectSet("Low LastWeek",OBJPROP_RAY,0);
ObjectSet("Low LastWeek",OBJPROP_STYLE,2); //0 1 2 3 4
//+---------
if (ObjectFind("Distance from Price to LastWeek Low")==-1){ ObjectCreate("Distance from Price to LastWeek Low",OBJ_TEXT, 0, 0, 0);
} ObjectSetText("Distance from Price to LastWeek Low",DoubleToStr(MathAbs((NormalizeDouble(Bid,Digits)-NormalizeDouble
(ObjectGetValueByShift("Low LastWeek",0),Digits))*MathPow(10,Digits)),0),7,"Arial",SlateGray);
ObjectSet("Distance from Price to LastWeek Low",OBJPROP_PRICE1,NormalizeDouble(ObjectGetValueByShift("Low LastWeek",0),Digits)-2*nPoint);
ObjectSet("Distance from Price to LastWeek Low",OBJPROP_TIME1,iTime(NULL,PERIOD_H1,1));// t01+(t01-t1)*1);
ObjectSet("Distance from Price to LastWeek Low", OBJPROP_COLOR, Blue);
//+---
//+---
if (Aux_Chanel) if (ObjectFind("Bar_2")==-1){
ObjectCreate("Bar_2",OBJ_TREND,0,0,0,0);
ObjectSet("Bar_2",OBJPROP_RAY,false);
ObjectSet("Bar_2",OBJPROP_STYLE,0); //0 1 2 3 4
ObjectSet("Bar_2",OBJPROP_COLOR,DarkSlateGray);
}ObjectSet("Bar_2",OBJPROP_PRICE1, iHigh(NULL, TF_aux_chanel,2));
ObjectSet("Bar_2",OBJPROP_TIME1,Time[0]+(Time[0] - Time[1]) * (ind_shift - 2));
ObjectSet("Bar_2",OBJPROP_PRICE2,iLow(NULL, TF_aux_chanel,2));
ObjectSet("Bar_2",OBJPROP_TIME2,Time[0]+(Time[0] - Time[1]) * (ind_shift - 2));
//+--
if (Aux_Chanel) if (ObjectFind("Bar_1")==-1){
ObjectCreate("Bar_1",OBJ_TREND,0,0,0,0);
ObjectSet("Bar_1",OBJPROP_RAY,false);
ObjectSet("Bar_1",OBJPROP_STYLE,0); //0 1 2 3 4
ObjectSet("Bar_1",OBJPROP_COLOR,DarkSlateGray);
}ObjectSet("Bar_1",OBJPROP_PRICE1, iHigh(NULL, TF_aux_chanel,1));
ObjectSet("Bar_1",OBJPROP_TIME1,Time[0]+(Time[0] - Time[1]) * (ind_shift - 1));
ObjectSet("Bar_1",OBJPROP_PRICE2,iLow(NULL, TF_aux_chanel,1));
ObjectSet("Bar_1",OBJPROP_TIME2,Time[0]+(Time[0] - Time[1]) * (ind_shift - 1));
//+--
if (Aux_Chanel) if (ObjectFind("Bar_0")==-1){
ObjectCreate("Bar_0",OBJ_TREND,0,0,0,0);
ObjectSet("Bar_0",OBJPROP_RAY,false);
ObjectSet("Bar_0",OBJPROP_STYLE,0); //0 1 2 3 4
ObjectSet("Bar_0",OBJPROP_COLOR,DarkSlateGray);
}ObjectSet("Bar_0",OBJPROP_PRICE1, iHigh(NULL, TF_aux_chanel,0));
ObjectSet("Bar_0",OBJPROP_TIME1,Time[0]+(Time[0] - Time[1])* ind_shift );
ObjectSet("Bar_0",OBJPROP_PRICE2,iLow(NULL, TF_aux_chanel,0));
ObjectSet("Bar_0",OBJPROP_TIME2,Time[0]+(Time[0] - Time[1]) * ind_shift );
//+--
if (Aux_Chanel) if (ObjectFind("Close_Bar_2")==-1){
ObjectCreate("Close_Bar_2",OBJ_ARROW,0,0,0);
ObjectSet("Close_Bar_2",OBJPROP_ARROWCODE,4);
ObjectSet("Close_Bar_2",OBJPROP_COLOR,DarkGray);
}ObjectSet("Close_Bar_2",OBJPROP_PRICE1, iClose(NULL, TF_aux_chanel,2));
ObjectSet("Close_Bar_2",OBJPROP_TIME1,Time[0]+(Time[0] - Time[1]) * (ind_shift - 2));
//+--
if (Aux_Chanel) if (ObjectFind("Close_Bar_1")==-1){
ObjectCreate("Close_Bar_1",OBJ_ARROW,0,0,0);
ObjectSet("Close_Bar_1",OBJPROP_ARROWCODE,4);
ObjectSet("Close_Bar_1",OBJPROP_COLOR,DarkGray);
}ObjectSet("Close_Bar_1",OBJPROP_PRICE1, iClose(NULL, TF_aux_chanel,1));
ObjectSet("Close_Bar_1",OBJPROP_TIME1,Time[0]+(Time[0] - Time[1]) * (ind_shift - 1));
//+--
if (Aux_Chanel) if (ObjectFind("Close_Bar_0")==-1){
ObjectCreate("Close_Bar_0",OBJ_ARROW,0,0,0);
ObjectSet("Close_Bar_0",OBJPROP_ARROWCODE,4);
ObjectSet("Close_Bar_0",OBJPROP_COLOR,DarkGray);
}ObjectSet("Close_Bar_0",OBJPROP_PRICE1, iClose(NULL, TF_aux_chanel,0));
ObjectSet("Close_Bar_0",OBJPROP_TIME1,Time[0]+(Time[0] - Time[1]) * ind_shift );
//+--
if (Aux_Chanel) if (ObjectFind("ChanelLline High ")==-1){
ObjectCreate("ChanelLline High ",OBJ_CHANNEL,0,0,0,0,0);
ObjectSet("ChanelLline High ",OBJPROP_RAY,false);
ObjectSet("ChanelLline High ",OBJPROP_STYLE,2); //0,1,2,3 OBJPROP_STYLE WIDTH
ObjectSet("ChanelLline High ",OBJPROP_COLOR,DarkGray);
} ObjectSet("ChanelLline High ",OBJPROP_PRICE1, iHigh(NULL, TF_aux_chanel,2));
ObjectSet("ChanelLline High ",OBJPROP_TIME1,Time[0]+(Time[0] - Time[1]) * (ind_shift - 2));
ObjectSet("ChanelLline High ",OBJPROP_PRICE2,iHigh(NULL, TF_aux_chanel,1));
ObjectSet("ChanelLline High ",OBJPROP_TIME2,Time[0]+(Time[0] - Time[1]) * (ind_shift - 1));
ObjectSet("ChanelLline High ",OBJPROP_PRICE3,iHigh(NULL, TF_aux_chanel,1));
ObjectSet("ChanelLline High ",OBJPROP_TIME3,Time[0]+(Time[0] - Time[1]) * (ind_shift - 1));
//+--
if (Aux_Chanel) if (ObjectFind("ChanelLline Low ")==-1){
ObjectCreate("ChanelLline Low ",OBJ_CHANNEL,0,0,0,0,0);
ObjectSet("ChanelLline Low ",OBJPROP_RAY,false);
ObjectSet("ChanelLline Low ",OBJPROP_STYLE,2); //0,1,2,3 OBJPROP_STYLE WIDTH
ObjectSet("ChanelLline Low ",OBJPROP_COLOR,DarkGray);
} ObjectSet("ChanelLline Low ",OBJPROP_PRICE1, iLow(NULL, TF_aux_chanel,2));
ObjectSet("ChanelLline Low ",OBJPROP_TIME1,Time[0]+(Time[0] - Time[1]) * (ind_shift - 2));
ObjectSet("ChanelLline Low ",OBJPROP_PRICE2,iLow(NULL, TF_aux_chanel,1));
ObjectSet("ChanelLline Low ",OBJPROP_TIME2,Time[0]+(Time[0] - Time[1]) * (ind_shift - 1));
ObjectSet("ChanelLline Low ",OBJPROP_PRICE3,iLow(NULL, TF_aux_chanel,1));
ObjectSet("ChanelLline Low ",OBJPROP_TIME3,Time[0]+(Time[0] - Time[1]) * (ind_shift - 1));
//+--
if (Aux_Chanel) if (ObjectFind("ChanelLline Close")==-1){
ObjectCreate("ChanelLline Close",OBJ_CHANNEL,0,0,0,0,0);
ObjectSet("ChanelLline Close",OBJPROP_RAY,false);
ObjectSet("ChanelLline Close",OBJPROP_STYLE,2); //0,1,2,3 OBJPROP_STYLE WIDTH
ObjectSet("ChanelLline Close",OBJPROP_COLOR,SteelBlue);
} ObjectSet("ChanelLline Close",OBJPROP_PRICE1, iClose(NULL, TF_aux_chanel,2));
ObjectSet("ChanelLline Close",OBJPROP_TIME1,Time[0]+(Time[0] - Time[1]) * (ind_shift - 2));
ObjectSet("ChanelLline Close",OBJPROP_PRICE2,iClose(NULL, TF_aux_chanel,1));
ObjectSet("ChanelLline Close",OBJPROP_TIME2,Time[0]+(Time[0] - Time[1]) * (ind_shift - 1));
ObjectSet("ChanelLline Close",OBJPROP_PRICE3,iClose(NULL, TF_aux_chanel,1));
ObjectSet("ChanelLline Close",OBJPROP_TIME3,Time[0]+(Time[0] - Time[1]) * (ind_shift - 1));
//+--
//+------------------------------------------------------------------+
if (Scalp ) if (ObjectFind("STOPLEVEL at High + Spread")==-1){
ObjectCreate("STOPLEVEL at High + Spread",OBJ_ARROW,0,0,0,0);
ObjectSet("STOPLEVEL at High + Spread",OBJPROP_ARROWCODE,4); // 167 159 115 4 5 170
ObjectSet("STOPLEVEL at High + Spread",OBJPROP_COLOR,Blue);
} ObjectSet("STOPLEVEL at High + Spread",OBJPROP_PRICE1,Ask+MarketInfo(Symbol(),MODE_STOPLEVEL)*nPoint);
ObjectSet("STOPLEVEL at High + Spread",OBJPROP_TIME1,Time[0]);
//+--
if (Scalp ) if (ObjectFind("STOPLEVEL at High")==-1){
ObjectCreate("STOPLEVEL at High",OBJ_ARROW,0,0,0,0);
ObjectSet("STOPLEVEL at High",OBJPROP_ARROWCODE,4); // 167 159 115 4 5 170
ObjectSet("STOPLEVEL at High",OBJPROP_COLOR,Blue);
} ObjectSet("STOPLEVEL at High",OBJPROP_PRICE1,Bid+MarketInfo(Symbol(),MODE_STOPLEVEL)*nPoint);
ObjectSet("STOPLEVEL at High",OBJPROP_TIME1,Time[0]);
//+--
if (Scalp ) if (ObjectFind("STOPLEVEL at Low")==-1){
ObjectCreate("STOPLEVEL at Low",OBJ_ARROW,0,0,0,0);
ObjectSet("STOPLEVEL at Low",OBJPROP_ARROWCODE,4); // 167 159 115 4 5 170
ObjectSet("STOPLEVEL at Low",OBJPROP_COLOR,Blue);
} ObjectSet("STOPLEVEL at Low",OBJPROP_PRICE1,Bid-MarketInfo(Symbol(),MODE_STOPLEVEL)*nPoint);
ObjectSet("STOPLEVEL at Low",OBJPROP_TIME1,Time[0]);
//+--
if (Scalp ) if (ObjectFind("STOPLEVEL at Low + Spread")==-1){
ObjectCreate("STOPLEVEL at Low + Spread",OBJ_ARROW,0,0,0,0);
ObjectSet("STOPLEVEL at Low + Spread",OBJPROP_ARROWCODE,4); // 167 159 115 4 5 170
ObjectSet("STOPLEVEL at Low + Spread",OBJPROP_COLOR,Blue);
} ObjectSet("STOPLEVEL at Low + Spread",OBJPROP_PRICE1,Bid-(Ask-Bid)-MarketInfo(Symbol(),MODE_STOPLEVEL)*nPoint);
ObjectSet("STOPLEVEL at Low + Spread",OBJPROP_TIME1,Time[0]);
//+--
}
//+-------------------------------------------------------------------------------------------------
//+------------------------------------------------------------------+
double GetPoint(string vSymbol)
{
int vres = StringFind(vSymbol,"JPY");
if (vres == -1) return(0.0001);
return(0.01);
}
//+-----------------------------------------------+
Comments