峰汇在线Dolly_v01 指标注释支撑及阻力位，同时为交易提供建议。
图表：
源码：
//+------------------------------------------------------------------+
//| Dolly_v01.mq4 |
//+------------------------------------------------------------------+
#property copyright ""
#property link "http://www.125808047.com"
#property indicator_chart_window
#property indicator_buffers 7
#property indicator_color1 Snow
#property indicator_width1 0
#property indicator_color2 Red
#property indicator_width2 3
#property indicator_color3 Blue
#property indicator_width3 3
#property indicator_color4 Crimson
#property indicator_width4 2
#property indicator_color5 SteelBlue
#property indicator_width5 2
#property indicator_color6 Lime
#property indicator_width6 1
#property indicator_color7 Lime
#property indicator_width7 1
double PBuffer[];
double J1Buffer[];
double B1Buffer[];
double J2Buffer[];
double B2Buffer[];
double J3Buffer[];
double B3Buffer[];
string Pivot = "Pivot Point", Jual1 = "S 1", Beli1 = "R 1";
string Jual2="S 2", Beli2="R 2", Jual3="S 3", Beli3="R 3";
int fontsize = 10;
double P, J1, B1, J2, B2, J3, B3;
double LastHigh, LastLow, x;
double D4=0.55;
//+------------------------------------------------------------------+
//| Custor indicator deinitialization function |
//+------------------------------------------------------------------+
void OnDeinit(const int reason)
{
ObjectDelete("Jual1");
ObjectDelete("Beli1");
ObjectDelete("Jual2");
ObjectDelete("Beli2");
ObjectDelete("Jual3");
ObjectDelete("Beli3");
}
//+------------------------------------------------------------------+
//| Custom indicator initialization function |
//+------------------------------------------------------------------+
int OnInit(void)
{
SetIndexStyle(0, DRAW_NONE);
SetIndexStyle(1, DRAW_LINE);
SetIndexStyle(2, DRAW_LINE);
SetIndexStyle(3, DRAW_LINE);
SetIndexStyle(4, DRAW_LINE);
SetIndexStyle(5, DRAW_LINE);
SetIndexStyle(6, DRAW_LINE);
SetIndexBuffer(0, PBuffer);
SetIndexBuffer(1, J1Buffer);
SetIndexBuffer(2, B1Buffer);
SetIndexBuffer(3, J2Buffer);
SetIndexBuffer(4, B2Buffer);
SetIndexBuffer(5, J3Buffer);
SetIndexBuffer(6, B3Buffer);
SetIndexDrawBegin(0,1);
IndicatorDigits(MarketInfo(Symbol(),MODE_DIGITS));
Comment("www.125808047.com");
return(INIT_SUCCEEDED);
}
//+------------------------------------------------------------------+
//| Custom indicator iteration function |
//+------------------------------------------------------------------+
int OnCalculate(const int rates_total,
const int prev_calculated,
const datetime &time[],
const double &open[],
const double &high[],
const double &low[],
const double &close[],
const long &tick_volume[],
const long &volume[],
const int &spread[])
{
int counted_bars = IndicatorCounted();
int limit, i;
Print(DoubleToStr(Close[i], Digits));
Print(DoubleToStr(Close[0], Digits));
Print(DoubleToStr(Close[0], Digits));
if(counted_bars == 0)
{
x = Period();
if(x > 240)
return(-1);
ObjectCreate("Jual1", OBJ_TEXT, 0, 0, 0);
ObjectSetText("Jual1", " SELL AREA", fontsize, "Arial", Green);
ObjectCreate("Beli1", OBJ_TEXT, 0, 0, 0);
ObjectSetText("Beli1", " BUY AREA", fontsize, "Arial", Green);
ObjectCreate("Jual2", OBJ_TEXT, 0, 0, 0);
ObjectSetText("Jual2", " BREAK LOW, TAKE PROFIT", fontsize, "Arial", Green);
ObjectCreate("Beli2", OBJ_TEXT, 0, 0, 0);
ObjectSetText("Beli2", " BREAK HIGH,TAKE PROFIT", fontsize, "Arial", Green);
ObjectCreate("Jual3", OBJ_TEXT, 0, 0, 0);
ObjectSetText("Jual3", " TARGET", fontsize, "Arial", Green);
ObjectCreate("Beli3", OBJ_TEXT, 0, 0, 0);
ObjectSetText("Beli3", " TARGET", fontsize, "Arial", Green);
}
if(counted_bars < 0)
return(-1);
limit = (Bars - counted_bars) - 1;
for(i = limit; i >= 0; i--)
{
if(High[i+1] > LastHigh)
LastHigh = High[i+1];
if(Low[i+1] < LastLow)
LastLow=Low[i+1];
if(TimeDay(Time[i]) != TimeDay(Time[i+1]))
{
Print(DoubleToStr(Close[i], Digits));
Print(DoubleToStr(High[0], Digits));
Print(DoubleToStr(Low[0], Digits));
P = (LastHigh + LastLow + Close[i+1]) / 3;
B1 = P + 20*Point;
J1 = P - 20*Point;
B2 = P + 40*Point;
J2 = P - 40*Point;
B3 = P + 55*Point;
J3 = P - 55*Point;
LastLow = Open[i];
LastHigh = Open[i];
ObjectMove("Jual1", 0, Time[i], J1);
ObjectMove("Beli1", 0, Time[i], B1);
ObjectMove("Jual2", 0, Time[i], J2);
ObjectMove("Beli2", 0, Time[i], B2);
ObjectMove("Jual3", 0, Time[i], J3);
ObjectMove("Beli3", 0, Time[i], B3);
}
PBuffer[i] = P;
J1Buffer[i] = J1;
B1Buffer[i] = B1;
J2Buffer[i] = J2;
B2Buffer[i] = B2;
J3Buffer[i] = J3;
B3Buffer[i] = B3;
double rates[1][6],yesterday_close,yesterday_high,yesterday_low;
ArrayCopyRates(rates, Symbol(), PERIOD_D1);
if(DayOfWeek() == 1)
{
if(TimeDayOfWeek(iTime(Symbol(),PERIOD_D1,1)) == 5)
{
yesterday_close = rates[1][4];
yesterday_high = rates[1][3];
yesterday_low = rates[1][2];
}
else
{
for(int d = 5;d>=0;d--)
{
if(TimeDayOfWeek(iTime(Symbol(),PERIOD_D1,d)) == 5)
{
yesterday_close = rates[d][4];
yesterday_high = rates[d][3];
yesterday_low = rates[d][2];
}
}
}
}
else
{
yesterday_close = rates[1][4];
yesterday_high = rates[1][3];
yesterday_low = rates[1][2];
}
double R = yesterday_high - yesterday_low;//range
double p = (yesterday_high + yesterday_low + yesterday_close)/3;// Standard Pivot
double r3 = (2*p)+(yesterday_high-(2*yesterday_low));
double r2 = p+(yesterday_high - yesterday_low);
double r1 = (2*p)-yesterday_low;
double s1 = (2*p)-yesterday_high;
double s2 = p-(yesterday_high - yesterday_low);
double s3 = (2*p)-((2* yesterday_high)-yesterday_low);
Comment ("\n Dolly 0.1 ( BREAKOUT STRATEGY ) "
+"\n "
+"\n \n -------------------------------------------------------------------"
+"\n :::::::::::: DURING AROUND 2 BREAK ::::::::::::"
+"\n -------------------------------------------------------------------"
+"\n BUY AREA (break) :"
+"\n # BUY STOP1 "+Symbol()+" TO "+(DoubleToStr (B1Buffer[i],Digits))
+"\n Set TP "+(DoubleToStr (B2Buffer[i],Digits))+" and SL TO "+(DoubleToStr(J1Buffer[i],Digits))
+"\n # BUY STOP2 "+Symbol()+" TO "+(DoubleToStr(B2Buffer[i],Digits))
+"\n Set TP "+(DoubleToStr ((B2Buffer[i]+(10*Point)),Digits))+" and SL TO "+(DoubleToStr (B1Buffer[i],Digits))
+"\n \n SELL AREA (break) :"
+"\n # SELL STOP "+Symbol()+" TO "+(DoubleToStr (J1Buffer[i],Digits))
+"\n Set TP "+(DoubleToStr (J2Buffer[i],Digits))+" and SL to "+(DoubleToStr (B1Buffer[i],Digits))
+"\n # SELL STOP2 "+Symbol()+" TO "+(DoubleToStr (J2Buffer[i],Digits))
+"\n Set TP "+(DoubleToStr ((J2Buffer[i]-(10*Point)),Digits))+" and SL TO "+(DoubleToStr(J1Buffer[i],Digits))
+"\n \n -------------------------------------------------------------------"
+"\n :::::::::::: WHEN PASSING THE CORRECTION ::::::::::::"
+"\n -------------------------------------------------------------------"
+"\n LOWER CORRECTION :"
+"\n # BUY STOP "+Symbol()+" TO "+(DoubleToStr(J2Buffer[i],Digits))
+"\n Set TP "+(DoubleToStr(B1Buffer[i],Digits))+" and SL TO "+(DoubleToStr(J3Buffer[i],Digits))
+"\n \n UPPER CORRECTION :"
+"\n # SELL STOP "+Symbol()+" TO "+(DoubleToStr(B2Buffer[i],Digits))
+"\n Set TP "+(DoubleToStr(J1Buffer[i],Digits))+" and SL TO "+(DoubleToStr(B3Buffer[i],Digits))
+"\n -------------------------------------------------------------------"
+"\n \n -------------------------------------------------------------------"
+"\n :::::: SUPPORT & RESISTANCE TODAY :::::"
+"\n -------------------------------------------------------------------"
+"\n Resistance 3 :"+(DoubleToStr(r3,Digits))
+"\n Resistance 2 :"+(DoubleToStr(r2,Digits))
+"\n Resistance 1 :"+(DoubleToStr(r1,Digits))
+"\n -------------------------------------------------------------------"
+"\n \n Pivot level :"+(DoubleToStr(p,Digits))
+"\n \n -------------------------------------------------------------------"
+"\n Support 1 :"+(DoubleToStr(s1,Digits))
+"\n Support 2 :"+(DoubleToStr(s2,Digits))
+"\n Support 3 :"+(DoubleToStr(s3,Digits))
+"\n -------------------------------------------------------------------");
}
return(rates_total);
}
//+------------------------------------------------------------------+
Dolly_v01.mq4 