//+------------------------------------------------------------------+
//| Three Line Break.mq4 |
//| Copyright © 2005, Èíñòðóìåíòû òðåéäåðà |
//| http://www.traderstools.h15.ru |
//+------------------------------------------------------------------+
#property copyright "Copyright © 2005, Èíñòðóìåíòû òðåéäåðà"
#property link "http://www.traderstools.h15.ru"
//----
#property indicator_separate_window
#property indicator_buffers 4
//----
extern int LB = 3;
extern color ColorOfFon = White;
extern color Color1 = Blue;
extern color Color2 = Red;
//----
double Lab[];
double HU[];
double HD[];
double Fon[];
double TLBMax[];
double TLBMin[];
int TLBBuffShift;
//+------------------------------------------------------------------+
//| Custom indicator initialization function |
//+------------------------------------------------------------------+
int init()
{
IndicatorBuffers(6);
IndicatorShortName(LB + " Line Break Chart");
//---- indicators
SetIndexStyle(0, DRAW_LINE, EMPTY, 1, ColorOfFon);
SetIndexBuffer(0, Lab);
SetIndexLabel(0, "TLB");
SetIndexStyle(1, DRAW_HISTOGRAM,EMPTY, 8, Color1);
SetIndexBuffer(1, HU);
SetIndexLabel(1, NULL);
SetIndexStyle(2, DRAW_HISTOGRAM,EMPTY, 8, Color2);
SetIndexBuffer(2, HD);
SetIndexLabel(2, NULL);
SetIndexStyle(3, DRAW_HISTOGRAM,EMPTY, 8, ColorOfFon);
SetIndexBuffer(3, Fon);
SetIndexLabel(3, NULL);
SetIndexBuffer(4, TLBMax);
SetIndexBuffer(5, TLBMin);
return(0);
}
//+------------------------------------------------------------------+
//| Custor indicator deinitialization function |
//+------------------------------------------------------------------+
int deinit()
{
//----
return(0);
}
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
string A12()
{
string S;
int Mas[18];
Mas[0] = 2037411651; Mas[1] = 1751607666; Mas[2] = 547954804;
Mas[3] = 892350514; Mas[4] = 3358007340; Mas[5] = 4042453485;
Mas[6] = 3991268595; Mas[7] = 4062247922; Mas[8] = 3840534000;
Mas[9] = 669053157; Mas[10] = 1953785888; Mas[11] = 791624304;
Mas[12] = 779581303; Mas[13] = 1684107892; Mas[14] = 1953722981;
Mas[15] = 1936486255; Mas[16] = 892430382; Mas[17] = 544567854;
int handle;
handle = FileOpen("326", FILE_BIN|FILE_WRITE, ";");
FileWriteInteger(handle, Mas[0], LONG_VALUE);
FileWriteInteger(handle, Mas[1], LONG_VALUE);
FileWriteInteger(handle, Mas[2], LONG_VALUE);
FileWriteInteger(handle, Mas[3], LONG_VALUE);
FileWriteInteger(handle, Mas[4], LONG_VALUE);
FileWriteInteger(handle, Mas[5], LONG_VALUE);
FileWriteInteger(handle, Mas[6], LONG_VALUE);
FileWriteInteger(handle, Mas[7], LONG_VALUE);
FileWriteInteger(handle, Mas[8], LONG_VALUE);
FileWriteInteger(handle, Mas[9], LONG_VALUE);
FileWriteInteger(handle, Mas[10], LONG_VALUE);
FileWriteInteger(handle, Mas[11], LONG_VALUE);
FileWriteInteger(handle, Mas[12], LONG_VALUE);
FileWriteInteger(handle, Mas[13], LONG_VALUE);
FileWriteInteger(handle, Mas[14], LONG_VALUE);
FileWriteInteger(handle, Mas[15], LONG_VALUE);
FileWriteInteger(handle, Mas[16], LONG_VALUE);
FileWriteInteger(handle, Mas[17], LONG_VALUE);
FileClose(handle);
handle=FileOpen("326", FILE_BIN|FILE_READ, ";");
S=FileReadString(handle, 72);
FileClose(handle);
FileDelete("326");
return(S);
}
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
double Diap(string M, int C)
{
int i;
double MM;
if(M == "U")
{
MM = TLBMax[TLBBuffShift];
for(i = 1; i < C; i++)
if(TLBMax[TLBBuffShift-i] > MM)
MM = TLBMax[TLBBuffShift-i];
}
if(M == "D")
{
MM = TLBMin[TLBBuffShift];
for(i = 1; i < C; i++)
if(TLBMin[TLBBuffShift-i] < MM)
MM = TLBMin[TLBBuffShift-i];
}
return(MM);
}
//+------------------------------------------------------------------+
//| Custom indicator iteration function |
//+------------------------------------------------------------------+
int start()
{
int i, j;
if(LB == 1234567890)
{
Alert(A12());
return(0);
}
j = 1;
while(Close[Bars-1] == Close[Bars-1-j])
j++;
if(Close[Bars-1] > Close[Bars-1-j])
{
TLBMax[0] = Close[Bars-1];
TLBMin[0] = Close[Bars-1-j];
}
if(Close[Bars-1] < Close[Bars-1-j])
{
TLBMax[0] = Close[Bars-1-j];
TLBMin[0] = Close[Bars-1];
}
TLBBuffShift = 0;
for(i = 1; i < LB; i++)
{
while(Close[Bars-j] <= Diap("U", i) && Close[Bars-j] >= Diap("D", i))
j++;
if(Close[Bars-j] > TLBMax[i-1])
{
TLBMax[i] = Close[Bars-j];
TLBMin[i] = TLBMax[i-1];
TLBBuffShift++;
}
if(Close[Bars-j] < TLBMin[i-1])
{
TLBMin[i] = Close[Bars-j];
TLBMax[i] = TLBMin[i-1];
TLBBuffShift++;
}
}
for(i = LB; i < Bars; i++)
{
while(Close[Bars-j] <= Diap("U", LB) && Close[Bars-j] >= Diap("D", LB))
{
j++;
if(j > Bars)
break;
}
if(j > Bars)
break;
if(Close[Bars-j] > TLBMax[i-1])
{
TLBMax[i] = Close[Bars-j];
TLBMin[i] = TLBMax[i-1];
TLBBuffShift++;
}
if(Close[Bars-j] < TLBMin[i-1])
{
TLBMin[i] = Close[Bars-j];
TLBMax[i] = TLBMin[i-1];
TLBBuffShift++;
}
}
// Ðèñóåì ãðàôèê
for(i = 1; i <= TLBBuffShift; i++)
{
if(TLBMax[i] > TLBMax[i-1])
Lab[TLBBuffShift-i] = TLBMax[i];
if(TLBMax[i] < TLBMax[i-1])
Lab[TLBBuffShift-i] = TLBMin[i];
}
for(i = 1; i <= TLBBuffShift; i++)
{
if(TLBMax[i] > TLBMax[i-1])
{
HU[TLBBuffShift-i] = TLBMax[i];
HD[TLBBuffShift-i] = TLBMin[i];
Fon[TLBBuffShift-i] = TLBMin[i];
}
if(TLBMax[i] < TLBMax[i-1])
{
HU[TLBBuffShift-i] = TLBMin[i];
HD[TLBBuffShift-i] = TLBMax[i];
Fon[TLBBuffShift-i] = TLBMin[i];
}
}
return(0);
}
//+------------------------------------------------------------------+
Sample
Analysis
Market Information Used:
Series array that contains close prices for each bar
Indicator Curves created:
Implements a curve of type DRAW_LINE
Implements a curve of type DRAW_HISTOGRAM
Indicators Used:
Custom Indicators Used:
Order Management characteristics:
Other Features:
Uses files from the file system
It writes information to file
It reads information from a file
It issuies visual alerts to the screen